| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/GAD.h |
100 |
NO PROCEDURE |
PARAMETER(oneSixth=1.D0/6.D0) |
|
./pkg/generic_advdiff/GAD.h |
99 |
NO PROCEDURE |
_RL oneSixth |
|
./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 |
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 |
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_dst3_adv_r.F |
89 |
GAD_DST3_ADV_R |
d0=(2.-cfl)*(1.-cfl)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3_adv_r.F |
90 |
GAD_DST3_ADV_R |
d1=(1.-cfl*cfl)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3_adv_x.F |
88 |
GAD_DST3_ADV_X |
d0=(2.-uCFL)*(1.-uCFL)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3_adv_x.F |
89 |
GAD_DST3_ADV_X |
d1=(1.-uCFL*uCFL)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3_adv_y.F |
87 |
GAD_DST3_ADV_Y |
d0=(2.-vCFL)*(1.-vCFL)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3_adv_y.F |
88 |
GAD_DST3_ADV_Y |
d1=(1.-vCFL*vCFL)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3fl_adv_r.F |
82 |
GAD_DST3FL_ADV_R |
d0=(2. _d 0 -wCFL)*(1. _d 0 -wCFL)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3fl_adv_r.F |
83 |
GAD_DST3FL_ADV_R |
d1=(1. _d 0 -wCFL*wCFL)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
64 |
GAD_DST3FL_ADV_X |
d0=(2. _d 0 -uCFL)*(1. _d 0 -uCFL)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
65 |
GAD_DST3FL_ADV_X |
d1=(1. _d 0 -uCFL*uCFL)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3fl_adv_y.F |
60 |
GAD_DST3FL_ADV_Y |
d0=(2. _d 0 -vCFL)*(1. _d 0 -vCFL)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3fl_adv_y.F |
61 |
GAD_DST3FL_ADV_Y |
d1=(1. _d 0 -vCFL*vCFL)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
105 |
GAD_DST3FL_IMPL_R |
cL1 = (2. _d 0 -wCFL)*(1. _d 0 -wCFL)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
106 |
GAD_DST3FL_IMPL_R |
cH3 = (1. _d 0 -wCFL*wCFL)*oneSixth |
|
./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 |
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 |
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 ) |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
108 |
GAD_U3C4_IMPL_R |
rC4km2D (i,j) = oneSixth*rCenter*mskM |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
109 |
GAD_U3C4_IMPL_R |
rC4kp2D (i,j) = oneSixth*rCenter*mskP |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
114 |
GAD_U3C4_IMPL_R |
rHigh = (1. _d 0 -wCFL*wCFL)*oneSixth |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
120 |
GAD_U3C4_IMPL_R |
rUpwind2D(i,j) = 2. _d 0*oneSixth*ABS(rCenter) |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
121 |
GAD_U3C4_IMPL_R |
rC4km2D (i,j) = oneSixth*(rCenter+ABS(rCenter))*mskM |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
122 |
GAD_U3C4_IMPL_R |
rC4kp2D (i,j) = oneSixth*(rCenter-ABS(rCenter))*mskP |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
140 |
GAD_U3C4_IMPL_R |
rC4km = oneSixth*rCenter*mskM |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
141 |
GAD_U3C4_IMPL_R |
rC4kp = oneSixth*rCenter*mskP |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
146 |
GAD_U3C4_IMPL_R |
rHigh = (1. _d 0 -wCFL*wCFL)*oneSixth |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
152 |
GAD_U3C4_IMPL_R |
rUpwind= 2. _d 0*oneSixth*ABS(rCenter) |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
153 |
GAD_U3C4_IMPL_R |
rC4km = oneSixth*(rCenter+ABS(rCenter))*mskM |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
154 |
GAD_U3C4_IMPL_R |
rC4kp = oneSixth*(rCenter-ABS(rCenter))*mskP |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
193 |
MOM_VI_U_CORIOLIS_C4 |
Rjp = vort3r(i,j+1) -oneSixth*( Rjp-Rj ) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
194 |
MOM_VI_U_CORIOLIS_C4 |
Rjm = vort3r(i, j ) -oneSixth*( Rj-Rjm ) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
62 |
MOM_VI_U_CORIOLIS_C4 |
_RL oneSixth, oneTwelve |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
65 |
MOM_VI_U_CORIOLIS_C4 |
PARAMETER(oneSixth=1.D0/6.D0 , oneTwelve=1.D0/12.D0) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
193 |
MOM_VI_V_CORIOLIS_C4 |
Rjp = vort3r(i+1,j) -oneSixth*( Rjp-Rj ) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
194 |
MOM_VI_V_CORIOLIS_C4 |
Rjm = vort3r( i ,j) -oneSixth*( Rj-Rjm ) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
62 |
MOM_VI_V_CORIOLIS_C4 |
_RL oneSixth, oneTwelve |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
65 |
MOM_VI_V_CORIOLIS_C4 |
PARAMETER(oneSixth=1.D0/6.D0 , oneTwelve=1.D0/12.D0) |
|
./pkg/cheapaml/cheapaml_gad_dst3fl_adv_r.F |
71 |
CHEAPAML_GAD_DST3FL_ADV_R |
d0=(2. _d 0 -wCFL)*(1. _d 0 -wCFL)*oneSixth |
|
./pkg/cheapaml/cheapaml_gad_dst3fl_adv_r.F |
72 |
CHEAPAML_GAD_DST3FL_ADV_R |
d1=(1. _d 0 -wCFL*wCFL)*oneSixth |