| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/GAD.h |
75 |
NO PROCEDURE |
_RL oneSixth |
|
./pkg/generic_advdiff/GAD.h |
76 |
NO PROCEDURE |
PARAMETER(oneSixth=1.D0/6.D0) |
|
./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_r.F |
89 |
GAD_C4_ADV_R |
& oneSixth*(Rjjm-Rjjp)*0.5 _d 0*(1. _d 0 - maskBound) |
|
./pkg/generic_advdiff/gad_c4_adv_x.F |
73 |
GAD_C4_ADV_X |
& Tracer(i,j)+Tracer(i-1,j)-oneSixth*( Rjjp+Rjjm ) |
|
./pkg/generic_advdiff/gad_c4_adv_x.F |
75 |
GAD_C4_ADV_X |
& +ABS( uTrans(i,j) )*0.5 _d 0*oneSixth*( Rjjp-Rjjm ) |
|
./pkg/generic_advdiff/gad_c4_adv_y.F |
73 |
GAD_C4_ADV_Y |
& Tracer(i,j)+Tracer(i,j-1)-oneSixth*( Rjjp+Rjjm ) |
|
./pkg/generic_advdiff/gad_c4_adv_y.F |
75 |
GAD_C4_ADV_Y |
& +ABS( vTrans(i,j) )*0.5 _d 0*oneSixth*( Rjjp-Rjjm ) |
|
./pkg/generic_advdiff/gad_dst3_adv_r.F |
87 |
GAD_DST3_ADV_R |
d0=(2.-cfl)*(1.-cfl)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3_adv_r.F |
88 |
GAD_DST3_ADV_R |
d1=(1.-cfl*cfl)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3_adv_x.F |
86 |
GAD_DST3_ADV_X |
d0=(2.-uCFL)*(1.-uCFL)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3_adv_x.F |
87 |
GAD_DST3_ADV_X |
d1=(1.-uCFL*uCFL)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3_adv_y.F |
85 |
GAD_DST3_ADV_Y |
d0=(2.-vCFL)*(1.-vCFL)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3_adv_y.F |
86 |
GAD_DST3_ADV_Y |
d1=(1.-vCFL*vCFL)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3fl_adv_r.F |
77 |
GAD_DST3FL_ADV_R |
d0=(2. _d 0 -wCFL)*(1. _d 0 -wCFL)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3fl_adv_r.F |
78 |
GAD_DST3FL_ADV_R |
d1=(1. _d 0 -wCFL*wCFL)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
59 |
GAD_DST3FL_ADV_X |
d0=(2. _d 0 -uCFL)*(1. _d 0 -uCFL)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
60 |
GAD_DST3FL_ADV_X |
d1=(1. _d 0 -uCFL*uCFL)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3fl_adv_y.F |
55 |
GAD_DST3FL_ADV_Y |
d0=(2. _d 0 -vCFL)*(1. _d 0 -vCFL)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3fl_adv_y.F |
56 |
GAD_DST3FL_ADV_Y |
d1=(1. _d 0 -vCFL*vCFL)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
102 |
GAD_DST3FL_IMPL_R |
cL1 = (2. _d 0 -wCFL)*(1. _d 0 -wCFL)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
103 |
GAD_DST3FL_IMPL_R |
cH3 = (1. _d 0 -wCFL*wCFL)*oneSixth |
|
./pkg/generic_advdiff/gad_u3_adv_r.F |
81 |
GAD_U3_ADV_R |
& -oneSixth*(Rjjm+Rjjp)*0.5 _d 0 ) |
|
./pkg/generic_advdiff/gad_u3_adv_r.F |
83 |
GAD_U3_ADV_R |
& oneSixth*(Rjjm-Rjjp)*0.5 _d 0 |
|
./pkg/generic_advdiff/gad_u3_adv_x.F |
69 |
GAD_U3_ADV_X |
& Tracer(i,j)+Tracer(i-1,j)-oneSixth*( Rjjp+Rjjm ) |
|
./pkg/generic_advdiff/gad_u3_adv_x.F |
71 |
GAD_U3_ADV_X |
& +ABS( uTrans(i,j) )*0.5 _d 0*oneSixth*( Rjjp-Rjjm ) |
|
./pkg/generic_advdiff/gad_u3_adv_y.F |
69 |
GAD_U3_ADV_Y |
& Tracer(i,j)+Tracer(i,j-1)-oneSixth*( Rjjp+Rjjm ) |
|
./pkg/generic_advdiff/gad_u3_adv_y.F |
71 |
GAD_U3_ADV_Y |
& +ABS( vTrans(i,j) )*0.5 _d 0*oneSixth*( Rjjp-Rjjm ) |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
103 |
GAD_U3C4_IMPL_R |
rHigh = (1. _d 0 -wCFL*wCFL)*oneSixth |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
109 |
GAD_U3C4_IMPL_R |
rUpwind= 2. _d 0*oneSixth*ABS(rCenter) |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
110 |
GAD_U3C4_IMPL_R |
rC4km = oneSixth*(rCenter+ABS(rCenter))*mskM |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
111 |
GAD_U3C4_IMPL_R |
rC4kp = oneSixth*(rCenter-ABS(rCenter))*mskP |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
98 |
GAD_U3C4_IMPL_R |
rC4km = oneSixth*rCenter*mskM |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
99 |
GAD_U3C4_IMPL_R |
rC4kp = oneSixth*rCenter*mskP |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
177 |
MOM_VI_U_CORIOLIS_C4 |
Rjp = vort3r(i,j+1) -oneSixth*( vort3r(i,j+2)-vort3r(i, j ) ) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
178 |
MOM_VI_U_CORIOLIS_C4 |
Rjm = vort3r(i, j ) +oneSixth*( vort3r(i,j+1)-vort3r(i,j-1) ) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
60 |
MOM_VI_U_CORIOLIS_C4 |
_RL oneSixth, oneTwelve |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
62 |
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 |
177 |
MOM_VI_V_CORIOLIS_C4 |
Rjp = vort3r(i+1,j) -oneSixth*( vort3r(i+2,j)-vort3r( i ,j) ) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
178 |
MOM_VI_V_CORIOLIS_C4 |
Rjm = vort3r( i ,j) +oneSixth*( vort3r(i+1,j)-vort3r(i-1,j) ) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
60 |
MOM_VI_V_CORIOLIS_C4 |
_RL oneSixth, oneTwelve |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
62 |
MOM_VI_V_CORIOLIS_C4 |
PARAMETER(oneSixth=1.D0/6.D0 , oneTwelve=1.D0/12.D0) |