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 |
81 |
GAD_C4_ADV_R |
Rjjp=(Rjp-Rj) |
./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 |
68 |
GAD_C4_ADV_X |
Rjjp=(Rjp-Rj) |
./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 |
68 |
GAD_C4_ADV_Y |
Rjjp=(Rjp-Rj) |
./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 |
74 |
GAD_U3_ADV_R |
Rjjp = Rjp-Rj |
./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 |
67 |
GAD_U3_ADV_X |
Rjjp=Rjp-Rj |
./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 |
67 |
GAD_U3_ADV_Y |
Rjjp=Rjp-Rj |
./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 ) |