File |
Line number |
Procedure |
Code |
./pkg/generic_advdiff/gad_advection.F |
129 |
GAD_ADVECTION |
_RL wFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/generic_advdiff/gad_advection.F |
742 |
GAD_ADVECTION |
wFld(i,j) = 0. |
./pkg/generic_advdiff/gad_advection.F |
759 |
GAD_ADVECTION |
wFld(i,j) = wVel(i,j,k,bi,bj) |
./pkg/generic_advdiff/gad_advection.F |
771 |
GAD_ADVECTION |
U wFld, rTrans, |
./pkg/generic_advdiff/gad_advection.F |
786 |
GAD_ADVECTION |
I deltaTLev(k),rTrans,wFld,localTijk, |
./pkg/generic_advdiff/gad_advection.F |
790 |
GAD_ADVECTION |
I rTrans, wFld, localTijk, |
./pkg/generic_advdiff/gad_advection.F |
794 |
GAD_ADVECTION |
I rTrans, wFld, localTijk, |
./pkg/generic_advdiff/gad_advection.F |
798 |
GAD_ADVECTION |
I rTrans, wFld, localTijk, |
./pkg/generic_advdiff/gad_advection.F |
803 |
GAD_ADVECTION |
I rTrans, wFld, localTijk, |
./pkg/generic_advdiff/gad_calc_rhs.F |
12 |
GAD_CALC_RHS |
I xA, yA, maskUp, uFld, vFld, wFld, |
./pkg/generic_advdiff/gad_calc_rhs.F |
455 |
GAD_CALC_RHS |
I deltaTLev(k),rTrans,wFld,TracAB(1-Olx,1-Oly,1,bi,bj), |
./pkg/generic_advdiff/gad_calc_rhs.F |
459 |
GAD_CALC_RHS |
I deltaTLev(k),rTrans,wFld,TracAB(1-Olx,1-Oly,1,bi,bj), |
./pkg/generic_advdiff/gad_calc_rhs.F |
467 |
GAD_CALC_RHS |
I deltaTLev(k),rTrans,wFld,TracAB(1-Olx,1-Oly,1,bi,bj), |
./pkg/generic_advdiff/gad_calc_rhs.F |
475 |
GAD_CALC_RHS |
I deltaTLev(k),rTrans,wFld,TracAB(1-Olx,1-Oly,1,bi,bj), |
./pkg/generic_advdiff/gad_calc_rhs.F |
479 |
GAD_CALC_RHS |
I deltaTLev(k),rTrans,wFld,TracAB(1-Olx,1-Oly,1,bi,bj), |
./pkg/generic_advdiff/gad_calc_rhs.F |
485 |
GAD_CALC_RHS |
I deltaTLev(k),rTrans,wFld,TracAB(1-Olx,1-Oly,1,bi,bj), |
./pkg/generic_advdiff/gad_calc_rhs.F |
94 |
GAD_CALC_RHS |
_RL wFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/generic_advdiff/gad_dst2u1_adv_r.F |
12 |
GAD_DST2U1_ADV_R |
I deltaTloc, rTrans, wFld, |
./pkg/generic_advdiff/gad_dst2u1_adv_r.F |
42 |
GAD_DST2U1_ADV_R |
_RL wFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/generic_advdiff/gad_dst2u1_adv_r.F |
75 |
GAD_DST2U1_ADV_R |
wLoc = wFld(i,j) |
./pkg/generic_advdiff/gad_dst3_adv_r.F |
12 |
GAD_DST3_ADV_R |
I rTrans, wFld, |
./pkg/generic_advdiff/gad_dst3_adv_r.F |
43 |
GAD_DST3_ADV_R |
_RL wFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/generic_advdiff/gad_dst3_adv_r.F |
84 |
GAD_DST3_ADV_R |
wLoc = wFld(i,j) |
./pkg/generic_advdiff/gad_dst3fl_adv_r.F |
12 |
GAD_DST3FL_ADV_R |
I rTrans, wFld, |
./pkg/generic_advdiff/gad_dst3fl_adv_r.F |
41 |
GAD_DST3FL_ADV_R |
_RL wFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/generic_advdiff/gad_dst3fl_adv_r.F |
75 |
GAD_DST3FL_ADV_R |
wLoc = wFld(i,j) |
./pkg/generic_advdiff/gad_fluxlimit_adv_r.F |
12 |
GAD_FLUXLIMIT_ADV_R |
I rTrans, wFld, |
./pkg/generic_advdiff/gad_fluxlimit_adv_r.F |
47 |
GAD_FLUXLIMIT_ADV_R |
_RL wFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/generic_advdiff/gad_fluxlimit_adv_r.F |
85 |
GAD_FLUXLIMIT_ADV_R |
wLoc = wFld(i,j) |
./pkg/generic_advdiff/gad_implicit_r.F |
188 |
GAD_IMPLICIT_R |
wFld(i,j) = 0. _d 0 |
./pkg/generic_advdiff/gad_implicit_r.F |
195 |
GAD_IMPLICIT_R |
wFld(i,j) = wVel(i,j,k,bi,bj) |
./pkg/generic_advdiff/gad_implicit_r.F |
196 |
GAD_IMPLICIT_R |
rTrans(i,j) = wFld(i,j)*rA(i,j,bi,bj)*maskC(i,j,k-1,bi,bj) |
./pkg/generic_advdiff/gad_implicit_r.F |
203 |
GAD_IMPLICIT_R |
U wFld, rTrans, |
./pkg/generic_advdiff/gad_implicit_r.F |
74 |
GAD_IMPLICIT_R |
_RL wFld (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
28 |
GAD_OS7MP_ADV_R |
_RL wFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
62 |
GAD_OS7MP_ADV_R |
wLoc = wFld(i,j) |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
8 |
GAD_OS7MP_ADV_R |
I wTrans, wFld, |
./pkg/generic_advdiff/gad_som_advect.F |
102 |
GAD_SOM_ADVECT |
_RL wFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/generic_advdiff/gad_som_advect.F |
549 |
GAD_SOM_ADVECT |
wFld(i,j) = 0. |
./pkg/generic_advdiff/gad_som_advect.F |
559 |
GAD_SOM_ADVECT |
wFld(i,j) = wVel(i,j,k,bi,bj) |
./pkg/generic_advdiff/gad_som_advect.F |
572 |
GAD_SOM_ADVECT |
wFld(i,j) = wVel(i,j,k,bi,bj) |
./pkg/generic_advdiff/gad_som_advect.F |
586 |
GAD_SOM_ADVECT |
U wFld, rTrans, |
./pkg/gmredi/gmredi_calc_wflow.F |
10 |
GMREDI_CALC_WFLOW |
U wFld, rTrans, |
./pkg/gmredi/gmredi_calc_wflow.F |
32 |
GMREDI_CALC_WFLOW |
_RL wFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/gmredi/gmredi_calc_wflow.F |
56 |
GMREDI_CALC_WFLOW |
wFld(i,j) = wFld(i,j) + delPsi*recip_rA(i,j,bi,bj) |
./pkg/longstep/longstep_thermodynamics.F |
104 |
LONGSTEP_THERMODYNAMICS |
_RL wFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/longstep/longstep_thermodynamics.F |
336 |
LONGSTEP_THERMODYNAMICS |
wFld(i,j) = 0. _d 0 |
./pkg/longstep/longstep_thermodynamics.F |
346 |
LONGSTEP_THERMODYNAMICS |
wFld(i,j) = LS_wVel(i,j,k,bi,bj) |
./pkg/longstep/longstep_thermodynamics.F |
348 |
LONGSTEP_THERMODYNAMICS |
rTrans(i,j) = wFld(i,j)*rA(i,j,bi,bj)*maskUp(i,j) |
./pkg/longstep/longstep_thermodynamics.F |
362 |
LONGSTEP_THERMODYNAMICS |
U wFld, rTrans, |
./pkg/longstep/longstep_thermodynamics.F |
425 |
LONGSTEP_THERMODYNAMICS |
I xA, yA, maskUp, uFld, vFld, wFld, |
./pkg/mom_common/mom_u_coriolis_nh.F |
11 |
MOM_U_CORIOLIS_NH |
I bi,bj,k,wFld, |
./pkg/mom_common/mom_u_coriolis_nh.F |
35 |
MOM_U_CORIOLIS_NH |
_RL wFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
./pkg/mom_common/mom_u_coriolis_nh.F |
58 |
MOM_U_CORIOLIS_NH |
& *0.5*( wFld( i ,j, k ,bi,bj)*rVel2wUnit( k ) |
./pkg/mom_common/mom_u_coriolis_nh.F |
59 |
MOM_U_CORIOLIS_NH |
& +wFld( i ,j,kp1,bi,bj)*rVel2wUnit(kp1)*wMsk ) |
./pkg/mom_common/mom_u_coriolis_nh.F |
61 |
MOM_U_CORIOLIS_NH |
& *0.5*( wFld(i-1,j, k ,bi,bj)*rVel2wUnit( k ) |
./pkg/mom_common/mom_u_coriolis_nh.F |
62 |
MOM_U_CORIOLIS_NH |
& +wFld(i-1,j,kp1,bi,bj)*rVel2wUnit(kp1)*wMsk ) |
./pkg/mom_common/mom_u_metric_nh.F |
12 |
MOM_U_METRIC_NH |
I uFld, wFld, |
./pkg/mom_common/mom_u_metric_nh.F |
37 |
MOM_U_METRIC_NH |
_RL wFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
./pkg/mom_common/mom_u_metric_nh.F |
57 |
MOM_U_METRIC_NH |
& *0.25*( (wFld(i-1,j,kp1,bi,bj)+wFld(i,j,kp1,bi,bj)) |
./pkg/mom_common/mom_u_metric_nh.F |
59 |
MOM_U_METRIC_NH |
& + (wFld(i-1,j, k ,bi,bj)+wFld(i,j, k ,bi,bj)) |
./pkg/mom_common/mom_v_coriolis_nh.F |
11 |
MOM_V_CORIOLIS_NH |
I bi,bj,k,wFld, |
./pkg/mom_common/mom_v_coriolis_nh.F |
35 |
MOM_V_CORIOLIS_NH |
_RL wFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
./pkg/mom_common/mom_v_coriolis_nh.F |
58 |
MOM_V_CORIOLIS_NH |
& *0.5*( wFld( i ,j, k ,bi,bj)*rVel2wUnit( k ) |
./pkg/mom_common/mom_v_coriolis_nh.F |
59 |
MOM_V_CORIOLIS_NH |
& +wFld( i ,j,kp1,bi,bj)*rVel2wUnit(kp1)*wMsk ) |
./pkg/mom_common/mom_v_coriolis_nh.F |
61 |
MOM_V_CORIOLIS_NH |
& *0.5*( wFld(i,j-1, k ,bi,bj)*rVel2wUnit( k ) |
./pkg/mom_common/mom_v_coriolis_nh.F |
62 |
MOM_V_CORIOLIS_NH |
& +wFld(i,j-1,kp1,bi,bj)*rVel2wUnit(kp1)*wMsk ) |
./pkg/mom_common/mom_v_metric_nh.F |
12 |
MOM_V_METRIC_NH |
I vFld,wFld, |
./pkg/mom_common/mom_v_metric_nh.F |
37 |
MOM_V_METRIC_NH |
_RL wFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
./pkg/mom_common/mom_v_metric_nh.F |
57 |
MOM_V_METRIC_NH |
& *0.25*( (wFld(i,j-1,kp1,bi,bj)+wFld(i,j,kp1,bi,bj)) |
./pkg/mom_common/mom_v_metric_nh.F |
59 |
MOM_V_METRIC_NH |
& + (wFld(i,j-1, k ,bi,bj)+wFld(i,j, k ,bi,bj)) |
./pkg/mom_common/mom_w_sidedrag.F |
103 |
MOM_W_SIDEDRAG |
& *( viscAh_W(i,j,k,bi,bj)*wFld(i,j,k,bi,bj) |
./pkg/mom_common/mom_w_sidedrag.F |
117 |
MOM_W_SIDEDRAG |
& *( viscAh_W(i,j,k,bi,bj)*wFld(i,j,k,bi,bj) |
./pkg/mom_common/mom_w_sidedrag.F |
12 |
MOM_W_SIDEDRAG |
I wFld, del2w, |
./pkg/mom_common/mom_w_sidedrag.F |
43 |
MOM_W_SIDEDRAG |
_RL wFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
./pkg/mom_common/mom_w_sidedrag.F |
83 |
MOM_W_SIDEDRAG |
& *( viscAh_W(i,j,k,bi,bj)*wFld(i,j,k,bi,bj) |
./pkg/mom_common/mom_w_sidedrag.F |
93 |
MOM_W_SIDEDRAG |
& *( viscAh_W(i,j,k,bi,bj)*wFld(i,j,k,bi,bj) |
./pkg/mom_fluxform/mom_u_adv_wu.F |
101 |
MOM_U_ADV_WU |
& +wFld(i-1,j,k,bi,bj)*rA(i-1,j,bi,bj)* |
./pkg/mom_fluxform/mom_u_adv_wu.F |
12 |
MOM_U_ADV_WU |
I uFld,wFld,rTrans, |
./pkg/mom_fluxform/mom_u_adv_wu.F |
38 |
MOM_U_ADV_WU |
_RL wFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
./pkg/mom_fluxform/mom_u_adv_wu.F |
99 |
MOM_U_ADV_WU |
& wFld(i, j ,k,bi,bj)*rA(i, j ,bi,bj)* |
./model/src/calc_gs.F |
12 |
CALC_GS |
I xA, yA, maskUp, uFld, vFld, wFld, |
./model/src/calc_gs.F |
164 |
CALC_GS |
I xA, yA, maskUp, uFld, vFld, wFld, |
./model/src/calc_gs.F |
176 |
CALC_GS |
I xA, yA, maskUp, uFld, vFld, wFld, |
./model/src/calc_gs.F |
93 |
CALC_GS |
_RL wFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_fluxform/mom_v_adv_wv.F |
100 |
MOM_V_ADV_WV |
& wFld(i, j ,k,bi,bj)*rA(i, j ,bi,bj)* |
./pkg/mom_fluxform/mom_v_adv_wv.F |
102 |
MOM_V_ADV_WV |
& +wFld(i,j-1,k,bi,bj)*rA(i,j-1,bi,bj)* |
./pkg/mom_fluxform/mom_v_adv_wv.F |
13 |
MOM_V_ADV_WV |
I vFld,wFld,rTrans, |
./pkg/mom_fluxform/mom_v_adv_wv.F |
39 |
MOM_V_ADV_WV |
_RL wFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
./model/src/calc_gt.F |
12 |
CALC_GT |
I xA, yA, maskUp, uFld, vFld, wFld, |
./model/src/calc_gt.F |
163 |
CALC_GT |
I xA, yA, maskUp, uFld, vFld, wFld, |
./model/src/calc_gt.F |
175 |
CALC_GT |
I xA, yA, maskUp, uFld, vFld, wFld, |
./model/src/calc_gt.F |
92 |
CALC_GT |
_RL wFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_vecinv/mom_vi_u_vertshear.F |
26 |
MOM_VI_U_VERTSHEAR |
_RL wFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
./pkg/mom_vecinv/mom_vi_u_vertshear.F |
69 |
MOM_VI_U_VERTSHEAR |
& wFld(I,J,K,bi,bj)*rA(i,j,bi,bj)*maskC(I,J,Km1,bi,bj) |
./pkg/mom_vecinv/mom_vi_u_vertshear.F |
70 |
MOM_VI_U_VERTSHEAR |
& +wFld(I-1,J,K,bi,bj)*rA(i-1,j,bi,bj)*maskC(I-1,J,Km1,bi,bj) |
./pkg/mom_vecinv/mom_vi_u_vertshear.F |
76 |
MOM_VI_U_VERTSHEAR |
& wFld(I,J,Kp1,bi,bj)*rA(i,j,bi,bj) |
./pkg/mom_vecinv/mom_vi_u_vertshear.F |
77 |
MOM_VI_U_VERTSHEAR |
& +wFld(I-1,J,Kp1,bi,bj)*rA(i-1,j,bi,bj) |
./pkg/mom_vecinv/mom_vi_u_vertshear.F |
83 |
MOM_VI_U_VERTSHEAR |
& wFld(I,J,K,bi,bj)*maskC(I,J,Km1,bi,bj) |
./pkg/mom_vecinv/mom_vi_u_vertshear.F |
84 |
MOM_VI_U_VERTSHEAR |
& +wFld(I-1,J,K,bi,bj)*maskC(I-1,J,Km1,bi,bj) |
./pkg/mom_vecinv/mom_vi_u_vertshear.F |
89 |
MOM_VI_U_VERTSHEAR |
& wFld(I,J,Kp1,bi,bj) |
./pkg/mom_vecinv/mom_vi_u_vertshear.F |
8 |
MOM_VI_U_VERTSHEAR |
I uFld,wFld, |
./pkg/mom_vecinv/mom_vi_u_vertshear.F |
90 |
MOM_VI_U_VERTSHEAR |
& +wFld(I-1,J,Kp1,bi,bj) |
./model/src/calc_gw.F |
269 |
CALC_GW |
wFld(i,j) = wVel(i,j,k,bi,bj) |
./model/src/calc_gw.F |
281 |
CALC_GW |
& wFld, bi,bj, myThid ) |
./model/src/calc_gw.F |
287 |
CALC_GW |
& ( wFld(i,j) - wFld(i-1,j) ) |
./model/src/calc_gw.F |
299 |
CALC_GW |
& wFld, bi,bj, myThid ) |
./model/src/calc_gw.F |
307 |
CALC_GW |
& ( wFld(i,j) - wFld(i,j-1) ) |
./model/src/calc_gw.F |
456 |
CALC_GW |
flx_EW(i,j) = uTrans*(wFld(i,j)+wFld(i-1,j))*halfRL |
./model/src/calc_gw.F |
471 |
CALC_GW |
flx_NS(i,j) = vTrans*(wFld(i,j)+wFld(i,j-1))*halfRL |
./model/src/calc_gw.F |
91 |
CALC_GW |
_RL wFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_vecinv/mom_vi_v_vertshear.F |
26 |
MOM_VI_V_VERTSHEAR |
_RL wFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
./pkg/mom_vecinv/mom_vi_v_vertshear.F |
69 |
MOM_VI_V_VERTSHEAR |
& wFld(I,J,K,bi,bj)*rA(i,j,bi,bj)*maskC(i,j,Km1,bi,bj) |
./pkg/mom_vecinv/mom_vi_v_vertshear.F |
70 |
MOM_VI_V_VERTSHEAR |
& +wFld(I,J-1,K,bi,bj)*rA(i,j-1,bi,bj)*maskC(i,j-1,Km1,bi,bj) |
./pkg/mom_vecinv/mom_vi_v_vertshear.F |
76 |
MOM_VI_V_VERTSHEAR |
& wFld(I,J,Kp1,bi,bj)*rA(i,j,bi,bj) |
./pkg/mom_vecinv/mom_vi_v_vertshear.F |
77 |
MOM_VI_V_VERTSHEAR |
& +wFld(I,J-1,Kp1,bi,bj)*rA(i,j-1,bi,bj) |
./pkg/mom_vecinv/mom_vi_v_vertshear.F |
83 |
MOM_VI_V_VERTSHEAR |
& wFld(I,J,K,bi,bj)*maskC(i,j,Km1,bi,bj) |
./pkg/mom_vecinv/mom_vi_v_vertshear.F |
84 |
MOM_VI_V_VERTSHEAR |
& +wFld(I,J-1,K,bi,bj)*maskC(i,j-1,Km1,bi,bj) |
./pkg/mom_vecinv/mom_vi_v_vertshear.F |
89 |
MOM_VI_V_VERTSHEAR |
& wFld(I,J,Kp1,bi,bj) |
./pkg/mom_vecinv/mom_vi_v_vertshear.F |
8 |
MOM_VI_V_VERTSHEAR |
I vFld,wFld, |
./pkg/mom_vecinv/mom_vi_v_vertshear.F |
90 |
MOM_VI_V_VERTSHEAR |
& +wFld(I,J-1,Kp1,bi,bj) |
./pkg/obcs/obcs_apply_w.F |
22 |
OBCS_APPLY_W |
_RL wFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
./pkg/obcs/obcs_apply_w.F |
43 |
OBCS_APPLY_W |
wFld(I,J_obc,K,bi,bj)=OBNw(I,K,bi,bj) * obc_mask |
./pkg/obcs/obcs_apply_w.F |
53 |
OBCS_APPLY_W |
wFld(I,J_obc,K,bi,bj)=OBSw(I,K,bi,bj) * obc_mask |
./pkg/obcs/obcs_apply_w.F |
65 |
OBCS_APPLY_W |
wFld(I_obc,J,K,bi,bj)=OBEw(J,K,bi,bj) * obc_mask |
./pkg/obcs/obcs_apply_w.F |
75 |
OBCS_APPLY_W |
wFld(I_obc,J,K,bi,bj)=OBWw(J,K,bi,bj) * obc_mask |
./pkg/obcs/obcs_apply_w.F |
7 |
OBCS_APPLY_W |
U wFld, |
./pkg/obcs/obcs_apply_w.F |
87 |
OBCS_APPLY_W |
IF (J_obc.NE.0) wFld(I,J_obc,K,bi,bj) = 0. _d 0 |
./pkg/obcs/obcs_apply_w.F |
90 |
OBCS_APPLY_W |
IF (J_obc.NE.0) wFld(I,J_obc,K,bi,bj) = 0. _d 0 |
./pkg/obcs/obcs_apply_w.F |
95 |
OBCS_APPLY_W |
IF (I_obc.NE.0) wFld(I_obc,J,K,bi,bj) = 0. _d 0 |
./pkg/obcs/obcs_apply_w.F |
98 |
OBCS_APPLY_W |
IF (I_obc.NE.0) wFld(I_obc,J,K,bi,bj) = 0. _d 0 |
./pkg/ptracers/ptracers_integrate.F |
12 |
PTRACERS_INTEGRATE |
I xA, yA, maskUp, uFld, vFld, wFld, |
./pkg/ptracers/ptracers_integrate.F |
139 |
PTRACERS_INTEGRATE |
I xA, yA, maskUp, uFld, vFld, wFld, |
./pkg/ptracers/ptracers_integrate.F |
63 |
PTRACERS_INTEGRATE |
_RL wFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./model/src/diags_rho.F |
18 |
DIAGS_RHO_L |
I rhoK, rhoKm1, wFld, |
./model/src/diags_rho.F |
50 |
DIAGS_RHO_L |
_RL wFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
./model/src/diags_rho.F |
68 |
DIAGS_RHO_L |
tmpFld(i,j) = wFld(i,j,k,bi,bj)*rhoK(i,j) |
./model/src/diags_rho.F |
74 |
DIAGS_RHO_L |
tmpFld(i,j) = wFld(i,j,k,bi,bj) |
./verification/OpenAD/code_oad_all/gad_implicit_r.F |
186 |
GAD_IMPLICIT_R |
wFld(i,j) = 0. _d 0 |
./verification/OpenAD/code_oad_all/gad_implicit_r.F |
193 |
GAD_IMPLICIT_R |
wFld(i,j) = wVel(i,j,k,bi,bj) |
./verification/OpenAD/code_oad_all/gad_implicit_r.F |
194 |
GAD_IMPLICIT_R |
rTrans(i,j) = wFld(i,j)*rA(i,j,bi,bj)v*maskC(i,j,k-1,bi,bj) |
./verification/OpenAD/code_oad_all/gad_implicit_r.F |
201 |
GAD_IMPLICIT_R |
U wFld, rTrans, |
./verification/OpenAD/code_oad_all/gad_implicit_r.F |
72 |
GAD_IMPLICIT_R |
_RL wFld (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/integrate_for_w.F |
107 |
INTEGRATE_FOR_W |
wFld(i,j,k,bi,bj) = |
./model/src/integrate_for_w.F |
108 |
INTEGRATE_FOR_W |
& ( wFld(i,j,k+1,bi,bj)*deepFac2F(k+1)*rhoFacF(k+1) |
./model/src/integrate_for_w.F |
11 |
INTEGRATE_FOR_W |
O wFld, |
./model/src/integrate_for_w.F |
123 |
INTEGRATE_FOR_W |
wFld(i,j,k,bi,bj) = |
./model/src/integrate_for_w.F |
133 |
INTEGRATE_FOR_W |
wFld(i,j,k,bi,bj) = |
./model/src/integrate_for_w.F |
134 |
INTEGRATE_FOR_W |
& ( wFld(i,j,k+1,bi,bj)*deepFac2F(k+1)*rhoFacF(k+1) |
./model/src/integrate_for_w.F |
149 |
INTEGRATE_FOR_W |
wFld(i,j,k,bi,bj) = |
./model/src/integrate_for_w.F |
158 |
INTEGRATE_FOR_W |
wFld(i,j,k,bi,bj) = |
./model/src/integrate_for_w.F |
159 |
INTEGRATE_FOR_W |
& ( wFld(i,j,k+1,bi,bj) |
./model/src/integrate_for_w.F |
174 |
INTEGRATE_FOR_W |
wFld(i,j,k,bi,bj) = |
./model/src/integrate_for_w.F |
183 |
INTEGRATE_FOR_W |
wFld(i,j,k,bi,bj) = |
./model/src/integrate_for_w.F |
184 |
INTEGRATE_FOR_W |
& ( wFld(i,j,k+1,bi,bj)*deepFac2F(k+1)*rhoFacF(k+1) |
./model/src/integrate_for_w.F |
43 |
INTEGRATE_FOR_W |
_RL wFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
./model/src/integrate_for_w.F |
92 |
INTEGRATE_FOR_W |
wFld(i,j,k,bi,bj) = 0. |
./model/src/integrate_for_w.F |
98 |
INTEGRATE_FOR_W |
wFld(i,j,k,bi,bj) = |
./model/src/thermodynamics.F |
162 |
THERMODYNAMICS |
_RL wFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./model/src/thermodynamics.F |
507 |
THERMODYNAMICS |
wFld(i,j) = 0. _d 0 |
./model/src/thermodynamics.F |
517 |
THERMODYNAMICS |
wFld(i,j) = wVel(i,j,k,bi,bj) |
./model/src/thermodynamics.F |
519 |
THERMODYNAMICS |
rTrans(i,j) = wFld(i,j)*rA(i,j,bi,bj)*maskUp(i,j) |
./model/src/thermodynamics.F |
533 |
THERMODYNAMICS |
U wFld, rTrans, |
./model/src/thermodynamics.F |
626 |
THERMODYNAMICS |
I xA, yA, maskUp, uFld, vFld, wFld, |
./model/src/thermodynamics.F |
676 |
THERMODYNAMICS |
I xA, yA, maskUp, uFld, vFld, wFld, |
./model/src/thermodynamics.F |
715 |
THERMODYNAMICS |
I xA, yA, maskUp, uFld, vFld, wFld, |