File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_turb.F |
3739 |
TRBL20 |
_RL b1,b2,d3,rf1,rf2,d3b2,d2,e5,d4,d1,d1half,d2half |
./pkg/fizhi/fizhi_utils.F |
222 |
QSAT |
_RL d0, d1, d2, d3, d4, d5, d6 |
./pkg/fizhi/fizhi_utils.F |
279 |
QSAT |
parameter ( d2 = 0.129690326e-01 * esfac ) |
./pkg/fizhi/fizhi_utils.F |
347 |
QSAT |
qx = d0+T*(d1+T*(d2+T*(d3+T*(d4+T*(d5+T*d6))))) |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
172 |
GAD_OS7MP_ADV_R |
d2 = Del2 !( ( Qip + Qim ) - 2.*Qi ) * MskI * MskIm |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
175 |
GAD_OS7MP_ADV_R |
A = 4. _d 0*d2 - d2p1 |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
176 |
GAD_OS7MP_ADV_R |
B = 4. _d 0*d2p1 - d2 |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
177 |
GAD_OS7MP_ADV_R |
C = d2 |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
180 |
GAD_OS7MP_ADV_R |
A = 4. _d 0*d2m1 - d2 |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
181 |
GAD_OS7MP_ADV_R |
B = 4. _d 0*d2 - d2m1 |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
183 |
GAD_OS7MP_ADV_R |
D = d2 |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
40 |
GAD_OS7MP_ADV_R |
_RL d2,d2p1,d2m1,A,B,C,D |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
176 |
GAD_OS7MP_ADV_X |
d2 = Del2 !( ( Qip + Qim ) - 2.*Qi ) * MskI * MskIm |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
179 |
GAD_OS7MP_ADV_X |
A = 4. _d 0*d2 - d2p1 |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
180 |
GAD_OS7MP_ADV_X |
B = 4. _d 0*d2p1 - d2 |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
181 |
GAD_OS7MP_ADV_X |
C = d2 |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
184 |
GAD_OS7MP_ADV_X |
A = 4. _d 0*d2m1 - d2 |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
185 |
GAD_OS7MP_ADV_X |
B = 4. _d 0*d2 - d2m1 |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
187 |
GAD_OS7MP_ADV_X |
D = d2 |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
42 |
GAD_OS7MP_ADV_X |
_RL d2,d2p1,d2m1,A,B,C,D |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
176 |
GAD_OS7MP_ADV_Y |
d2 = Del2 !( ( Qip + Qim ) - 2.*Qi ) * MskI * MskIm |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
179 |
GAD_OS7MP_ADV_Y |
A = 4. _d 0*d2 - d2p1 |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
180 |
GAD_OS7MP_ADV_Y |
B = 4. _d 0*d2p1 - d2 |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
181 |
GAD_OS7MP_ADV_Y |
C = d2 |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
184 |
GAD_OS7MP_ADV_Y |
A = 4. _d 0*d2m1 - d2 |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
185 |
GAD_OS7MP_ADV_Y |
B = 4. _d 0*d2 - d2m1 |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
187 |
GAD_OS7MP_ADV_Y |
D = d2 |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
42 |
GAD_OS7MP_ADV_Y |
_RL d2,d2p1,d2m1,A,B,C,D |
./model/src/convective_weights.F |
55 |
CONVECTIVE_WEIGHTS |
_RL dS,d1,d2 |
./model/src/convective_weights.F |
66 |
CONVECTIVE_WEIGHTS |
d2 = _hFacC(i,j, k ,bi,bj)*drF( k ) |
./model/src/convective_weights.F |
67 |
CONVECTIVE_WEIGHTS |
dS = d1+d2 |
./model/src/convective_weights.F |
68 |
CONVECTIVE_WEIGHTS |
weightA(i,j) = d2/dS |
./pkg/openad/ad_s_different_multiple.F |
40 |
OAD_S_DIFFERENT_MULTIPLE |
_RL v1, v2, v3, v4, d1, d2, d3 |
./pkg/openad/ad_s_different_multiple.F |
59 |
OAD_S_DIFFERENT_MULTIPLE |
d2 = v2-v4 |
./pkg/openad/ad_s_different_multiple.F |
61 |
OAD_S_DIFFERENT_MULTIPLE |
IF ( ABS(d1) .LT. ABS(d2) .AND. ABS(d1) .LE. ABS(d3) ) |
./eesupp/src/diff_phase_multiple.F |
41 |
NO PROCEDURE |
_RL v1, v2, v3, v4, d1, d2, d3 |
./eesupp/src/diff_phase_multiple.F |
63 |
NO PROCEDURE |
d2 = v2-v4 |
./eesupp/src/diff_phase_multiple.F |
65 |
NO PROCEDURE |
IF ( ABS(d1) .LT. ABS(d2) .AND. ABS(d1) .LE. ABS(d3) ) |
./eesupp/src/different_multiple.F |
40 |
NO PROCEDURE |
_RL v1, v2, v3, v4, d1, d2, d3 |
./eesupp/src/different_multiple.F |
59 |
NO PROCEDURE |
d2 = v2-v4 |
./eesupp/src/different_multiple.F |
61 |
NO PROCEDURE |
IF ( ABS(d1) .LT. ABS(d2) .AND. ABS(d1) .LE. ABS(d3) ) |