Definition at line 106 of file collier_coefs.F90.
◆ db0_arrays_cll()
subroutine collier_coefs::db0_cll::db0_arrays_cll |
( |
double complex, intent(out) |
DB0, |
|
|
double complex, dimension(1), intent(in) |
MomInv, |
|
|
double complex, dimension(0:1), intent(in) |
masses2 |
|
) |
| |
Definition at line 5381 of file collier_coefs.F90.
5382 double complex,
intent(in) :: MomInv(1), masses2(0:1)
5383 double complex,
intent(out) :: DB0
5385 call db0_main_cll(db0,mominv(1),masses2(0),masses2(1))
◆ db0_main_cll()
subroutine collier_coefs::db0_cll::db0_main_cll |
( |
double complex, intent(out) |
DB0, |
|
|
double complex, intent(in) |
p10, |
|
|
double complex, intent(in) |
m02, |
|
|
double complex, intent(in) |
m12 |
|
) |
| |
Definition at line 5295 of file collier_coefs.F90.
5296 double complex,
intent(in) :: p10,m02,m12
5297 double precision :: q10
5298 double complex :: mm02,mm12
5299 double complex,
intent(out) :: DB0
5300 double complex :: DB0dd, DB1dd
5301 double complex :: DB0_coli
5302 double complex :: args(3)
5303 double complex :: DBdduv(0:0,0:0)
5304 double complex :: DBdd(0:0,0:0)
5311 call setmasterfname_cll(
'DB0_cll')
5312 call setmastern_cll(2)
5313 call setmasterr_cll(0)
5314 call setmasterargs_cll(3,args)
5317 select case (mode_cll)
5323 db0 = db0_coli(p10,m02,m12)
5331 q10 = dreal(getminf2dd_cll(p10))
5332 mm02 = getminf2dd_cll(m02)
5333 mm12 = getminf2dd_cll(m12)
5335 use_cache_system=.false.
5336 call db_dd(dbdd,dbdduv,q10,mm02,mm12,0)
5337 use_cache_system=use_cache_system_save
5347 db0 = db0_coli(p10,m02,m12)
5351 q10 = dreal(getminf2dd_cll(p10))
5352 mm02 = getminf2dd_cll(m02)
5353 mm12 = getminf2dd_cll(m12)
5355 use_cache_system=.false.
5356 call db_dd(dbdd,dbdduv,q10,mm02,mm12,0)
5357 use_cache_system=use_cache_system_save
5361 call checkcoefsdbr_cll(db0,db0dd,p10,m02,m12,0)
5366 call propagateerrflag_cll
The documentation for this interface was generated from the following file: