File |
Line number |
Procedure |
Code |
./pkg/generic_advdiff/gad_dst3_adv_r.F |
110 |
GAD_DST3_ADV_R |
& *( tracer(i,j,km1) - psiP*Rj ) |
./pkg/generic_advdiff/gad_dst3_adv_r.F |
61 |
GAD_DST3_ADV_R |
_RL psiP,psiM,thetaP,thetaM |
./pkg/generic_advdiff/gad_dst3_adv_r.F |
93 |
GAD_DST3_ADV_R |
psiP=0. |
./pkg/generic_advdiff/gad_dst3_adv_r.F |
96 |
GAD_DST3_ADV_R |
psiP=d0+d1*thetaP |
./pkg/generic_advdiff/gad_dst3_adv_x.F |
107 |
GAD_DST3_ADV_X |
& *( Tracer(i-1,j) + psiP*Rj ) |
./pkg/generic_advdiff/gad_dst3_adv_x.F |
61 |
GAD_DST3_ADV_X |
_RL psiP,psiM,thetaP,thetaM |
./pkg/generic_advdiff/gad_dst3_adv_x.F |
92 |
GAD_DST3_ADV_X |
psiP=0. |
./pkg/generic_advdiff/gad_dst3_adv_x.F |
95 |
GAD_DST3_ADV_X |
psiP=d0+d1*thetaP |
./pkg/generic_advdiff/gad_dst3_adv_y.F |
106 |
GAD_DST3_ADV_Y |
& *( Tracer(i,j-1) + psiP*Rj ) |
./pkg/generic_advdiff/gad_dst3_adv_y.F |
60 |
GAD_DST3_ADV_Y |
_RL psiP,psiM,thetaP,thetaM |
./pkg/generic_advdiff/gad_dst3_adv_y.F |
91 |
GAD_DST3_ADV_Y |
psiP=0. |
./pkg/generic_advdiff/gad_dst3_adv_y.F |
94 |
GAD_DST3_ADV_Y |
psiP=d0+d1*thetaP |
./pkg/generic_advdiff/gad_dst3fl_adv_r.F |
101 |
GAD_DST3FL_ADV_R |
psiP=d0+d1*thetaP |
./pkg/generic_advdiff/gad_dst3fl_adv_r.F |
102 |
GAD_DST3FL_ADV_R |
psiP=MAX(0. _d 0,MIN(MIN(1. _d 0,psiP), |
./pkg/generic_advdiff/gad_dst3fl_adv_r.F |
112 |
GAD_DST3FL_ADV_R |
& *( tracer(i,j,km1) - psiP*Rj ) |
./pkg/generic_advdiff/gad_dst3fl_adv_r.F |
57 |
GAD_DST3FL_ADV_R |
_RL psiP,psiM,thetaP,thetaM |
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
37 |
GAD_DST3FL_ADV_X |
_RL Rjm,Rj,Rjp,uCFL,d0,d1,psiP,psiM,thetaP,thetaM |
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
83 |
GAD_DST3FL_ADV_X |
psiP=d0+d1*thetaP |
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
84 |
GAD_DST3FL_ADV_X |
psiP=MAX(0. _d 0,MIN(MIN(1. _d 0,psiP), |
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
92 |
GAD_DST3FL_ADV_X |
& *( Tracer(i-1,j) + psiP*Rj ) |
./pkg/generic_advdiff/gad_dst3fl_adv_y.F |
37 |
GAD_DST3FL_ADV_Y |
_RL Rjm,Rj,Rjp,vCFL,d0,d1,psiP,psiM,thetaP,thetaM |
./pkg/generic_advdiff/gad_dst3fl_adv_y.F |
79 |
GAD_DST3FL_ADV_Y |
psiP=d0+d1*thetaP |
./pkg/generic_advdiff/gad_dst3fl_adv_y.F |
80 |
GAD_DST3FL_ADV_Y |
psiP=MAX(0. _d 0,MIN(MIN(1. _d 0,psiP), |
./pkg/generic_advdiff/gad_dst3fl_adv_y.F |
88 |
GAD_DST3FL_ADV_Y |
& *( Tracer(i,j-1) + psiP*Rj ) |