GetNewMpfromC Subroutine

public subroutine GetNewMpfromC(start, C, Ncut, rCN, zM, zMp, Z6p, a, b, rMp, maxC, z, zpi, zMpi, Ndef, zp, w, rn, rMWplus, zcomp, zdef, rMW, rMdef, Mglobal)

this subroutines for a C value returns the correponding new M20+ value

Arguments

Type IntentOptional Attributes Name
logical :: start
real(kind=pr) :: C
integer :: Ncut
integer, dimension(imax) :: rCN
real(kind=pr), dimension(imax) :: zM
real(kind=pr) :: zMp
real(kind=pr) :: Z6p
real(kind=pr) :: a
real(kind=pr) :: b
real(kind=pr) :: rMp
integer :: maxC
real(kind=pr), dimension(imax) :: z
real(kind=pr), dimension(300) :: zpi
real(kind=pr), dimension(300) :: zMpi
integer :: Ndef
real(kind=pr) :: zp
real(kind=pr), dimension(imax) :: w
real(kind=pr), dimension(imax) :: rn
real(kind=pr) :: rMWplus
real(kind=pr), dimension(imax) :: zcomp
real(kind=pr), dimension(maxD) :: zdef
real(kind=pr), dimension(imax) :: rMW
real(kind=pr), dimension(maxD) :: rMdef
real(kind=pr) :: Mglobal

Calls

proc~~getnewmpfromc~~CallsGraph proc~getnewmpfromc GetNewMpfromC proc~difmpfromc difMpfromC proc~getnewmpfromc->proc~difmpfromc proc~difnewmp difnewMp proc~getnewmpfromc->proc~difnewmp bestlinearregression bestlinearregression proc~difmpfromc->bestlinearregression proc~limitline~2 LimitLine proc~difmpfromc->proc~limitline~2 proc~linec60max LineC60max proc~difmpfromc->proc~linec60max proc~difnewmp->bestlinearregression proc~difnewmp->proc~limitline~2 proc~difnewmp->proc~linec60max

Variables

Type Visibility Attributes Name Initial
real(kind=pr), public :: aux
real(kind=pr), public :: dif
real(kind=pr), public :: dold
integer, public, parameter :: imax = 48
integer, public, parameter :: maxD = 15
real(kind=pr), public, dimension(imax) :: rM
real(kind=pr), public :: rMpold