File |
Line number |
Procedure |
Code |
./pkg/generic_advdiff/gad_dst2u1_adv_r.F |
12 |
GAD_DST2U1_ADV_R |
I deltaTloc, rTrans, wFld, |
./pkg/generic_advdiff/gad_dst2u1_adv_r.F |
40 |
GAD_DST2U1_ADV_R |
_RL deltaTloc |
./pkg/generic_advdiff/gad_dst2u1_adv_r.F |
77 |
GAD_DST2U1_ADV_R |
wCFL = ABS(wLoc*deltaTloc*recip_drC(k)) |
./pkg/generic_advdiff/gad_dst2u1_adv_x.F |
12 |
GAD_DST2U1_ADV_X |
I deltaTloc, uTrans, uFld, |
./pkg/generic_advdiff/gad_dst2u1_adv_x.F |
42 |
GAD_DST2U1_ADV_X |
_RL deltaTloc |
./pkg/generic_advdiff/gad_dst2u1_adv_x.F |
70 |
GAD_DST2U1_ADV_X |
IF ( calcCFL ) uCFL = ABS( uFld(i,j)*deltaTloc |
./pkg/generic_advdiff/gad_dst2u1_adv_y.F |
12 |
GAD_DST2U1_ADV_Y |
I deltaTloc, vTrans, vFld, |
./pkg/generic_advdiff/gad_dst2u1_adv_y.F |
41 |
GAD_DST2U1_ADV_Y |
_RL deltaTloc |
./pkg/generic_advdiff/gad_dst2u1_adv_y.F |
69 |
GAD_DST2U1_ADV_Y |
IF ( calcCFL ) vCFL = ABS( vFld(i,j)*deltaTloc |
./pkg/generic_advdiff/gad_dst3_adv_x.F |
11 |
GAD_DST3_ADV_X |
I bi,bj,k, calcCFL, deltaTloc, |
./pkg/generic_advdiff/gad_dst3_adv_x.F |
45 |
GAD_DST3_ADV_X |
_RL deltaTloc |
./pkg/generic_advdiff/gad_dst3_adv_x.F |
86 |
GAD_DST3_ADV_X |
IF ( calcCFL ) uCFL = ABS( uFld(i,j)*deltaTloc |
./pkg/generic_advdiff/gad_dst3_adv_y.F |
11 |
GAD_DST3_ADV_Y |
I bi,bj,k, calcCFL, deltaTloc, |
./pkg/generic_advdiff/gad_dst3_adv_y.F |
44 |
GAD_DST3_ADV_Y |
_RL deltaTloc |
./pkg/generic_advdiff/gad_dst3_adv_y.F |
85 |
GAD_DST3_ADV_Y |
IF ( calcCFL ) vCFL = ABS( vFld(i,j)*deltaTloc |
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
27 |
GAD_DST3FL_ADV_X |
_RL deltaTloc |
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
62 |
GAD_DST3FL_ADV_X |
IF ( calcCFL ) uCFL = ABS( uFld(i,j)*deltaTloc |
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
7 |
GAD_DST3FL_ADV_X |
I bi,bj,k, calcCFL, deltaTloc, |
./pkg/generic_advdiff/gad_dst3fl_adv_y.F |
27 |
GAD_DST3FL_ADV_Y |
_RL deltaTloc |
./pkg/generic_advdiff/gad_dst3fl_adv_y.F |
58 |
GAD_DST3FL_ADV_Y |
IF ( calcCFL ) vCFL = ABS( vFld(i,j)*deltaTloc |
./pkg/generic_advdiff/gad_dst3fl_adv_y.F |
7 |
GAD_DST3FL_ADV_Y |
I bi,bj,k, calcCFL, deltaTloc, |
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F |
11 |
GAD_FLUXLIMIT_ADV_X |
I bi,bj,k, calcCFL, deltaTloc, |
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F |
46 |
GAD_FLUXLIMIT_ADV_X |
_RL deltaTloc |
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F |
77 |
GAD_FLUXLIMIT_ADV_X |
IF ( calcCFL ) uCFL = ABS( uFld(i,j)*deltaTloc |
./pkg/generic_advdiff/gad_fluxlimit_adv_y.F |
11 |
GAD_FLUXLIMIT_ADV_Y |
I bi,bj,k, calcCFL, deltaTloc, |
./pkg/generic_advdiff/gad_fluxlimit_adv_y.F |
46 |
GAD_FLUXLIMIT_ADV_Y |
_RL deltaTloc |
./pkg/generic_advdiff/gad_fluxlimit_adv_y.F |
77 |
GAD_FLUXLIMIT_ADV_Y |
IF ( calcCFL ) vCFL = ABS( vFld(i,j)*deltaTloc |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
26 |
GAD_OS7MP_ADV_R |
_RL deltaTloc |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
63 |
GAD_OS7MP_ADV_R |
cfl = abs(wLoc*deltaTloc*recip_drC(k)) |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
7 |
GAD_OS7MP_ADV_R |
I bi,bj,k,deltaTloc, |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
27 |
GAD_OS7MP_ADV_X |
_RL deltaTloc |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
67 |
GAD_OS7MP_ADV_X |
IF ( calcCFL ) cfl = abs(uLoc*deltaTloc*recip_dxC(i,j,bi,bj)) |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
7 |
GAD_OS7MP_ADV_X |
I bi,bj,k, calcCFL, deltaTloc, |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
27 |
GAD_OS7MP_ADV_Y |
_RL deltaTloc |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
67 |
GAD_OS7MP_ADV_Y |
IF ( calcCFL ) cfl = abs(vLoc*deltaTloc*recip_dyC(i,j,bi,bj)) |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
7 |
GAD_OS7MP_ADV_Y |
I bi,bj,k, calcCFL, deltaTloc, |
./pkg/generic_advdiff/gad_som_adv_r.F |
12 |
GAD_SOM_ADV_R |
I deltaTloc, rTrans, maskUp, maskIn, |
./pkg/generic_advdiff/gad_som_adv_r.F |
148 |
GAD_SOM_ADV_R |
IF ( deltaTloc.GT.zeroRL ) recip_dT = 1.0 _d 0 / deltaTloc |
./pkg/generic_advdiff/gad_som_adv_r.F |
156 |
GAD_SOM_ADV_R |
wLoc = rTrans(i,j)*deltaTloc |
./pkg/generic_advdiff/gad_som_adv_r.F |
189 |
GAD_SOM_ADV_R |
wLoc = rTrans(i,j)*deltaTloc |
./pkg/generic_advdiff/gad_som_adv_r.F |
217 |
GAD_SOM_ADV_R |
wLoc = maskUp(i,j)*rTrans(i,j)*deltaTloc |
./pkg/generic_advdiff/gad_som_adv_r.F |
257 |
GAD_SOM_ADV_R |
wLoc = rTrans(i,j)*deltaTloc |
./pkg/generic_advdiff/gad_som_adv_r.F |
56 |
GAD_SOM_ADV_R |
_RL deltaTloc |
./pkg/generic_advdiff/gad_som_adv_x.F |
124 |
GAD_SOM_ADV_X |
IF ( deltaTloc.GT.zeroRL ) recip_dT = 1.0 _d 0 / deltaTloc |
./pkg/generic_advdiff/gad_som_adv_x.F |
14 |
GAD_SOM_ADV_X |
I deltaTloc, uTrans, maskIn, |
./pkg/generic_advdiff/gad_som_adv_x.F |
177 |
GAD_SOM_ADV_X |
uLoc = uTrans(i,j)*deltaTloc |
./pkg/generic_advdiff/gad_som_adv_x.F |
56 |
GAD_SOM_ADV_X |
_RL deltaTloc |
./pkg/generic_advdiff/gad_som_adv_y.F |
124 |
GAD_SOM_ADV_Y |
IF ( deltaTloc.GT.zeroRL ) recip_dT = 1.0 _d 0 / deltaTloc |
./pkg/generic_advdiff/gad_som_adv_y.F |
14 |
GAD_SOM_ADV_Y |
I deltaTloc, vTrans, maskIn, |
./pkg/generic_advdiff/gad_som_adv_y.F |
177 |
GAD_SOM_ADV_Y |
vLoc = vTrans(i,j)*deltaTloc |
./pkg/generic_advdiff/gad_som_adv_y.F |
56 |
GAD_SOM_ADV_Y |
_RL deltaTloc |
./pkg/timeave/timeave_cumul_1k1t.F |
30 |
TIMEAVE_CUMUL_1K1T |
_RL deltaTloc |
./pkg/timeave/timeave_cumul_1k1t.F |
42 |
TIMEAVE_CUMUL_1K1T |
& + fld(i,j)*deltaTloc |
./pkg/timeave/timeave_cumul_1k1t.F |
8 |
TIMEAVE_CUMUL_1K1T |
I fld, deltaTloc, |
./pkg/timeave/timeave_cumul_1t.F |
28 |
TIMEAVE_CUMUL_1T |
_RL deltaTloc |
./pkg/timeave/timeave_cumul_1t.F |
41 |
TIMEAVE_CUMUL_1T |
& fldtave(i,j,k,bi,bj)+fld(i,j,k)*deltaTloc |
./pkg/timeave/timeave_cumul_1t.F |
8 |
TIMEAVE_CUMUL_1T |
I fld, Ksize, deltaTloc, |
./pkg/timeave/timeave_cumul_1vfc.F |
31 |
TIMEAVE_CUMUL_1VFC |
_RL deltaTloc |
./pkg/timeave/timeave_cumul_1vfc.F |
46 |
TIMEAVE_CUMUL_1VFC |
& + deltaTloc*fld1(i,j,k,bi,bj)*fld2(i,j,k,bi,bj) |
./pkg/timeave/timeave_cumul_1vfc.F |
8 |
TIMEAVE_CUMUL_1VFC |
I fld1, fld2, Ksize, deltaTloc, |
./pkg/timeave/timeave_cumul_2v.F |
100 |
TIMEAVE_CUMUL_2V |
& * deltaTloc |
./pkg/timeave/timeave_cumul_2v.F |
115 |
TIMEAVE_CUMUL_2V |
& * deltaTloc |
./pkg/timeave/timeave_cumul_2v.F |
132 |
TIMEAVE_CUMUL_2V |
& * deltaTloc |
./pkg/timeave/timeave_cumul_2v.F |
149 |
TIMEAVE_CUMUL_2V |
& * deltaTloc |
./pkg/timeave/timeave_cumul_2v.F |
166 |
TIMEAVE_CUMUL_2V |
& * deltaTloc |
./pkg/timeave/timeave_cumul_2v.F |
183 |
TIMEAVE_CUMUL_2V |
& * deltaTloc |
./pkg/timeave/timeave_cumul_2v.F |
35 |
TIMEAVE_CUMUL_2V |
_RL deltaTloc |
./pkg/timeave/timeave_cumul_2v.F |
55 |
TIMEAVE_CUMUL_2V |
& + fld1(i,j,k,bi,bj)*fld2(i,j,k,bi,bj)*deltaTloc |
./pkg/timeave/timeave_cumul_2v.F |
71 |
TIMEAVE_CUMUL_2V |
& * deltaTloc |
./pkg/timeave/timeave_cumul_2v.F |
85 |
TIMEAVE_CUMUL_2V |
& * deltaTloc |
./pkg/timeave/timeave_cumul_2v.F |
8 |
TIMEAVE_CUMUL_2V |
I fld1, fld2, Ksize, dir, deltaTloc, |
./pkg/timeave/timeave_cumul_2vfc.F |
37 |
TIMEAVE_CUMUL_2VFC |
_RL deltaTloc |
./pkg/timeave/timeave_cumul_2vfc.F |
53 |
TIMEAVE_CUMUL_2VFC |
fldtave(i,j,k,bi,bj) = fldtave(i,j,k,bi,bj) + deltaTloc* |
./pkg/timeave/timeave_cumul_2vfc.F |
68 |
TIMEAVE_CUMUL_2VFC |
fldtave(i,j,k,bi,bj) = fldtave(i,j,k,bi,bj) + deltaTloc* |
./pkg/timeave/timeave_cumul_2vfc.F |
84 |
TIMEAVE_CUMUL_2VFC |
fldtave(i,j,k,bi,bj) = fldtave(i,j,k,bi,bj) + deltaTloc* |
./pkg/timeave/timeave_cumul_2vfc.F |
8 |
TIMEAVE_CUMUL_2VFC |
I fld1, fld2, fld3, Ksize, dir, deltaTloc, |
./pkg/timeave/timeave_cumul_dif_1t.F |
32 |
TIMEAVE_CUMUL_DIF_1T |
_RL deltaTloc |
./pkg/timeave/timeave_cumul_dif_1t.F |
50 |
TIMEAVE_CUMUL_DIF_1T |
& * fld2(i,j,k) * deltaTloc |
./pkg/timeave/timeave_cumul_dif_1t.F |
63 |
TIMEAVE_CUMUL_DIF_1T |
& * fld2(i,j,k) * deltaTloc |
./pkg/timeave/timeave_cumul_dif_1t.F |
76 |
TIMEAVE_CUMUL_DIF_1T |
& * fld2(i,j,k) * deltaTloc |
./pkg/timeave/timeave_cumul_dif_1t.F |
8 |
TIMEAVE_CUMUL_DIF_1T |
I fld1, fld2, Ksize, dir, deltaTloc, |
./pkg/timeave/timeave_cumulate.F |
28 |
TIMEAVE_CUMULATE |
_RL deltaTloc |
./pkg/timeave/timeave_cumulate.F |
43 |
TIMEAVE_CUMULATE |
& fldtave(i,j,k,bi,bj)+fld(i,j,k,bi,bj)*deltaTloc |
./pkg/timeave/timeave_cumulate.F |
8 |
TIMEAVE_CUMULATE |
I fld, Ksize, deltaTloc, |
./pkg/cheapaml/cheapaml_timestep.F |
11 |
CHEAPAML_TIMESTEP |
I deltaTloc, |
./pkg/cheapaml/cheapaml_timestep.F |
34 |
CHEAPAML_TIMESTEP |
_RL deltaTloc |
./pkg/cheapaml/cheapaml_timestep.F |
48 |
CHEAPAML_TIMESTEP |
& + deltaTloc*gTracer(i,j,bi,bj) |