| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/gad_dst3fl_adv_r.F |
100 |
GAD_DST3FL_ADV_R |
IF ( ABS(Rj)*thetaMax .LE. ABS(Rjp) ) THEN |
|
./pkg/generic_advdiff/gad_dst3fl_adv_r.F |
101 |
GAD_DST3FL_ADV_R |
thetaM=SIGN(thetaMax,Rjp*Rj) |
|
./pkg/generic_advdiff/gad_dst3fl_adv_r.F |
59 |
GAD_DST3FL_ADV_R |
_RL thetaMax |
|
./pkg/generic_advdiff/gad_dst3fl_adv_r.F |
60 |
GAD_DST3FL_ADV_R |
PARAMETER( thetaMax = 1.D+20 ) |
|
./pkg/generic_advdiff/gad_dst3fl_adv_r.F |
95 |
GAD_DST3FL_ADV_R |
IF ( ABS(Rj)*thetaMax .LE. ABS(Rjm) ) THEN |
|
./pkg/generic_advdiff/gad_dst3fl_adv_r.F |
96 |
GAD_DST3FL_ADV_R |
thetaP=SIGN(thetaMax,Rjm*Rj) |
|
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
38 |
GAD_DST3FL_ADV_X |
_RL thetaMax |
|
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
39 |
GAD_DST3FL_ADV_X |
PARAMETER( thetaMax = 1.D+20 ) |
|
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
77 |
GAD_DST3FL_ADV_X |
IF ( ABS(Rj)*thetaMax .LE. ABS(Rjm) ) THEN |
|
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
78 |
GAD_DST3FL_ADV_X |
thetaP=SIGN(thetaMax,Rjm*Rj) |
|
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
82 |
GAD_DST3FL_ADV_X |
IF ( ABS(Rj)*thetaMax .LE. ABS(Rjp) ) THEN |
|
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
83 |
GAD_DST3FL_ADV_X |
thetaM=SIGN(thetaMax,Rjp*Rj) |
|
./pkg/generic_advdiff/gad_dst3fl_adv_y.F |
38 |
GAD_DST3FL_ADV_Y |
_RL thetaMax |
|
./pkg/generic_advdiff/gad_dst3fl_adv_y.F |
39 |
GAD_DST3FL_ADV_Y |
PARAMETER( thetaMax = 1.D+20 ) |
|
./pkg/generic_advdiff/gad_dst3fl_adv_y.F |
73 |
GAD_DST3FL_ADV_Y |
IF ( ABS(Rj)*thetaMax .LE. ABS(Rjm) ) THEN |
|
./pkg/generic_advdiff/gad_dst3fl_adv_y.F |
74 |
GAD_DST3FL_ADV_Y |
thetaP=SIGN(thetaMax,Rjm*Rj) |
|
./pkg/generic_advdiff/gad_dst3fl_adv_y.F |
78 |
GAD_DST3FL_ADV_Y |
IF ( ABS(Rj)*thetaMax .LE. ABS(Rjp) ) THEN |
|
./pkg/generic_advdiff/gad_dst3fl_adv_y.F |
79 |
GAD_DST3FL_ADV_Y |
thetaM=SIGN(thetaMax,Rjp*Rj) |
|
./pkg/cheapaml/cheapaml_gad_dst3fl_adv_r.F |
57 |
CHEAPAML_GAD_DST3FL_ADV_R |
_RL thetaMax |
|
./pkg/cheapaml/cheapaml_gad_dst3fl_adv_r.F |
58 |
CHEAPAML_GAD_DST3FL_ADV_R |
PARAMETER( thetaMax = 1.D+20 ) |
|
./pkg/cheapaml/cheapaml_gad_dst3fl_adv_r.F |
75 |
CHEAPAML_GAD_DST3FL_ADV_R |
thetaP=SIGN(thetaMax,Rjm*Rj) |
|
./pkg/cheapaml/cheapaml_gad_dst3fl_adv_r.F |
76 |
CHEAPAML_GAD_DST3FL_ADV_R |
thetaM=SIGN(thetaMax,Rjp*Rj) |