File |
Line number |
Procedure |
Code |
./pkg/generic_advdiff/gad_c4_adv_r.F |
57 |
GAD_C4_ADV_R |
_RL Rjm,Rj,Rjp,Rjjm,Rjjp |
./pkg/generic_advdiff/gad_c4_adv_r.F |
82 |
GAD_C4_ADV_R |
Rjjm=(Rj-Rjm) |
./pkg/generic_advdiff/gad_c4_adv_r.F |
85 |
GAD_C4_ADV_R |
& -oneSixth*(Rjjm+Rjjp)*0.5 _d 0 ) |
./pkg/generic_advdiff/gad_c4_adv_r.F |
87 |
GAD_C4_ADV_R |
& oneSixth*(Rjjm-Rjjp)*0.5 _d 0 |
./pkg/generic_advdiff/gad_c4_adv_x.F |
55 |
GAD_C4_ADV_X |
_RL Rjm,Rj,Rjp,Rjjm,Rjjp |
./pkg/generic_advdiff/gad_c4_adv_x.F |
69 |
GAD_C4_ADV_X |
Rjjm=(Rj-Rjm) |
./pkg/generic_advdiff/gad_c4_adv_x.F |
72 |
GAD_C4_ADV_X |
& Tracer(i,j)+Tracer(i-1,j)-oneSixth*( Rjjp+Rjjm ) |
./pkg/generic_advdiff/gad_c4_adv_x.F |
74 |
GAD_C4_ADV_X |
& +ABS( uTrans(i,j) )*0.5 _d 0*oneSixth*( Rjjp-Rjjm ) |
./pkg/generic_advdiff/gad_c4_adv_y.F |
55 |
GAD_C4_ADV_Y |
_RL Rjm,Rj,Rjp,Rjjm,Rjjp |
./pkg/generic_advdiff/gad_c4_adv_y.F |
69 |
GAD_C4_ADV_Y |
Rjjm=(Rj-Rjm) |
./pkg/generic_advdiff/gad_c4_adv_y.F |
72 |
GAD_C4_ADV_Y |
& Tracer(i,j)+Tracer(i,j-1)-oneSixth*( Rjjp+Rjjm ) |
./pkg/generic_advdiff/gad_c4_adv_y.F |
74 |
GAD_C4_ADV_Y |
& +ABS( vTrans(i,j) )*0.5 _d 0*oneSixth*( Rjjp-Rjjm ) |
./pkg/generic_advdiff/gad_u3_adv_r.F |
55 |
GAD_U3_ADV_R |
_RL Rjm,Rj,Rjp,Rjjm,Rjjp |
./pkg/generic_advdiff/gad_u3_adv_r.F |
75 |
GAD_U3_ADV_R |
Rjjm = Rj-Rjm |
./pkg/generic_advdiff/gad_u3_adv_r.F |
78 |
GAD_U3_ADV_R |
& -oneSixth*(Rjjm+Rjjp)*0.5 _d 0 ) |
./pkg/generic_advdiff/gad_u3_adv_r.F |
80 |
GAD_U3_ADV_R |
& oneSixth*(Rjjm-Rjjp)*0.5 _d 0 |
./pkg/generic_advdiff/gad_u3_adv_x.F |
54 |
GAD_U3_ADV_X |
_RL Rjm,Rj,Rjp,Rjjm,Rjjp |
./pkg/generic_advdiff/gad_u3_adv_x.F |
68 |
GAD_U3_ADV_X |
Rjjm=Rj-Rjm |
./pkg/generic_advdiff/gad_u3_adv_x.F |
71 |
GAD_U3_ADV_X |
& Tracer(i,j)+Tracer(i-1,j)-oneSixth*( Rjjp+Rjjm ) |
./pkg/generic_advdiff/gad_u3_adv_x.F |
73 |
GAD_U3_ADV_X |
& +ABS( uTrans(i,j) )*0.5 _d 0*oneSixth*( Rjjp-Rjjm ) |
./pkg/generic_advdiff/gad_u3_adv_y.F |
54 |
GAD_U3_ADV_Y |
_RL Rjm,Rj,Rjp,Rjjm,Rjjp |
./pkg/generic_advdiff/gad_u3_adv_y.F |
68 |
GAD_U3_ADV_Y |
Rjjm=Rj-Rjm |
./pkg/generic_advdiff/gad_u3_adv_y.F |
71 |
GAD_U3_ADV_Y |
& Tracer(i,j)+Tracer(i,j-1)-oneSixth*( Rjjp+Rjjm ) |
./pkg/generic_advdiff/gad_u3_adv_y.F |
73 |
GAD_U3_ADV_Y |
& +ABS( vTrans(i,j) )*0.5 _d 0*oneSixth*( Rjjp-Rjjm ) |