| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
1294 |
TURBIO |
tmpFac = 1.e6 |
|
./pkg/fizhi/fizhi_turb.F |
1296 |
TURBIO |
CALL DIAGNOSTICS_SCALE_FILL( qliqtmp,tmpFac,1, |
|
./pkg/fizhi/fizhi_turb.F |
1341 |
TURBIO |
tmpFac = atimstp * secday |
|
./pkg/fizhi/fizhi_turb.F |
1342 |
TURBIO |
CALL DIAGNOSTICS_SCALE_FILL(dvturb,tmpFac,1, |
|
./pkg/fizhi/fizhi_turb.F |
1344 |
TURBIO |
CALL DIAGNOSTICS_SCALE_FILL(duturb,tmpFac,1, |
|
./pkg/fizhi/fizhi_turb.F |
1346 |
TURBIO |
tmpFac = atimstp * secday * 1000. |
|
./pkg/fizhi/fizhi_turb.F |
1347 |
TURBIO |
CALL DIAGNOSTICS_SCALE_FILL(dqturb,tmpFac,1, |
|
./pkg/fizhi/fizhi_turb.F |
166 |
TURBIO |
_RL tmpdiag(im*jm,1), tmpFac |
|
./pkg/fizhi/fizhi_turb.F |
364 |
TURBIO |
tmpFac = -1. |
|
./pkg/fizhi/fizhi_turb.F |
365 |
TURBIO |
CALL DIAGNOSTICS_SCALE_FILL( tgz,tmpFac,1, |
|
./pkg/generic_advdiff/salt_fill.F |
65 |
SALT_FILL |
_RL tmpFac |
|
./pkg/generic_advdiff/salt_fill.F |
75 |
SALT_FILL |
tmpFac = -1. _d 0 |
|
./pkg/generic_advdiff/salt_fill.F |
76 |
SALT_FILL |
CALL DIAGNOSTICS_SCALE_FILL(salt,tmpFac,1,'SALTFILL', |
|
./pkg/kpp/kpp_output.F |
211 |
KPP_OUTPUT |
tmpFac = 1. _d 0 |
|
./pkg/kpp/kpp_output.F |
213 |
KPP_OUTPUT |
tmpFac = 0. _d 0 |
|
./pkg/kpp/kpp_output.F |
229 |
KPP_OUTPUT |
& +tmpFac*Kwz(i,j,k,bi,bj) |
|
./pkg/kpp/kpp_output.F |
365 |
KPP_OUTPUT |
tmpFac = 1. _d 0 |
|
./pkg/kpp/kpp_output.F |
367 |
KPP_OUTPUT |
tmpFac = 0. _d 0 |
|
./pkg/kpp/kpp_output.F |
382 |
KPP_OUTPUT |
& + tmpFac*Kwz(i,j,k,bi,bj) |
|
./pkg/kpp/kpp_output.F |
87 |
KPP_OUTPUT |
_RL tmpFac |
|
./pkg/kpp/kpp_transport_ptr.F |
100 |
KPP_TRANSPORT_PTR |
& + tmpFac*LS_Kwz(i,j,k,bi,bj) |
|
./pkg/kpp/kpp_transport_ptr.F |
106 |
KPP_TRANSPORT_PTR |
& + tmpFac*Kwz(i,j,k,bi,bj) |
|
./pkg/kpp/kpp_transport_ptr.F |
71 |
KPP_TRANSPORT_PTR |
_RL tmpFac |
|
./pkg/kpp/kpp_transport_ptr.F |
90 |
KPP_TRANSPORT_PTR |
tmpFac = 1. _d 0 |
|
./pkg/kpp/kpp_transport_ptr.F |
92 |
KPP_TRANSPORT_PTR |
tmpFac = 0. _d 0 |
|
./pkg/kpp/kpp_transport_s.F |
62 |
KPP_TRANSPORT_S |
_RL tmpFac |
|
./pkg/kpp/kpp_transport_s.F |
81 |
KPP_TRANSPORT_S |
tmpFac = 1. _d 0 |
|
./pkg/kpp/kpp_transport_s.F |
83 |
KPP_TRANSPORT_S |
tmpFac = 0. _d 0 |
|
./pkg/kpp/kpp_transport_s.F |
88 |
KPP_TRANSPORT_S |
& *( KPPdiffKzS(i,j,k,bi,bj) + tmpFac*Kwz(i,j,k,bi,bj) ) |
|
./pkg/kpp/kpp_transport_t.F |
63 |
KPP_TRANSPORT_T |
_RL tmpFac |
|
./pkg/kpp/kpp_transport_t.F |
71 |
KPP_TRANSPORT_T |
tmpFac = 1. _d 0 |
|
./pkg/kpp/kpp_transport_t.F |
73 |
KPP_TRANSPORT_T |
tmpFac = 0. _d 0 |
|
./pkg/kpp/kpp_transport_t.F |
78 |
KPP_TRANSPORT_T |
& *( KPPdiffKzT(i,j,k,bi,bj) + tmpFac*Kwz(i,j,k,bi,bj) ) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
51 |
MOM_VI_U_CORIOLIS |
_RL oneThird, tmpFac |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
56 |
MOM_VI_U_CORIOLIS |
tmpFac = 1. _d 0 |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
51 |
MOM_VI_V_CORIOLIS |
_RL oneThird, tmpFac |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
56 |
MOM_VI_V_CORIOLIS |
tmpFac = 1. _d 0 |
|
./model/src/calc_oce_mxlayer.F |
120 |
CALC_OCE_MXLAYER |
tmpFac = ( rhoMxL(i,j) - rhoKm1(i,j) ) |
|
./model/src/calc_oce_mxlayer.F |
123 |
CALC_OCE_MXLAYER |
tmpFac = 0. |
|
./model/src/calc_oce_mxlayer.F |
125 |
CALC_OCE_MXLAYER |
hMixLayer(i,j,bi,bj) = rF(1)-rC(k-1)+tmpFac*drC(k) |
|
./model/src/calc_oce_mxlayer.F |
168 |
CALC_OCE_MXLAYER |
tmpFac = 0. _d 0 |
|
./model/src/calc_oce_mxlayer.F |
170 |
CALC_OCE_MXLAYER |
tmpFac = hMixCriteria*sigmaR(i,j,k)/sigmaR(i,j,k+1) |
|
./model/src/calc_oce_mxlayer.F |
171 |
CALC_OCE_MXLAYER |
IF ( tmpFac .GT. 1. _d 0 ) THEN |
|
./model/src/calc_oce_mxlayer.F |
172 |
CALC_OCE_MXLAYER |
tmpFac = 1. _d 0 |
|
./model/src/calc_oce_mxlayer.F |
173 |
CALC_OCE_MXLAYER |
& + ( tmpFac - 1. _d 0 )/( hMixCriteria - 1. _d 0 ) |
|
./model/src/calc_oce_mxlayer.F |
175 |
CALC_OCE_MXLAYER |
tmpFac = MAX( 0. _d 0, MIN( tmpFac, 2. _d 0 ) ) |
|
./model/src/calc_oce_mxlayer.F |
178 |
CALC_OCE_MXLAYER |
& - drF(k)*tmpFac*0.5 _d 0 |
|
./model/src/calc_oce_mxlayer.F |
191 |
CALC_OCE_MXLAYER |
tmpFac = (1. _d 0 - hMixSmooth ) / 4. _d 0 |
|
./model/src/calc_oce_mxlayer.F |
195 |
CALC_OCE_MXLAYER |
& tmpFac * ( hMixLayer(i-1,j,bi,bj) + |
|
./model/src/calc_oce_mxlayer.F |
201 |
CALC_OCE_MXLAYER |
& tmpFac * ( maskC(i-1,j,1,bi,bj) + |
|
./model/src/calc_oce_mxlayer.F |
63 |
CALC_OCE_MXLAYER |
_RL tmpFac, sigmAv |
|
./pkg/monitor/mon_vort3.F |
50 |
MON_VORT3 |
_RL tmpFac |
|
./pkg/monitor/mon_vort3.F |
80 |
MON_VORT3 |
tmpFac = 0. |
|
./pkg/monitor/mon_vort3.F |
82 |
MON_VORT3 |
& tmpFac = (0.5+abEps) / implicDiv2Dflow |
|
./pkg/monitor/mon_vort3.F |
86 |
MON_VORT3 |
& + tmpFac*(etaN(i,j,bi,bj)-etaH(i,j,bi,bj)) |
|
./model/src/diags_oceanic_surf_flux.F |
101 |
DIAGS_OCEANIC_SURF_FLUX |
tmpFac = HeatCapacity_Cp*rUnit2mass |
|
./model/src/diags_oceanic_surf_flux.F |
102 |
DIAGS_OCEANIC_SURF_FLUX |
CALL DIAGNOSTICS_SCALE_FILL( surfaceForcingT,tmpFac,1, |
|
./model/src/diags_oceanic_surf_flux.F |
106 |
DIAGS_OCEANIC_SURF_FLUX |
tmpFac = rUnit2mass |
|
./model/src/diags_oceanic_surf_flux.F |
107 |
DIAGS_OCEANIC_SURF_FLUX |
CALL DIAGNOSTICS_SCALE_FILL( surfaceForcingS,tmpFac,1, |
|
./model/src/diags_oceanic_surf_flux.F |
50 |
DIAGS_OCEANIC_SURF_FLUX |
_RL tmpFac |
|
./model/src/diags_oceanic_surf_flux.F |
74 |
DIAGS_OCEANIC_SURF_FLUX |
tmpFac = -1. _d 0 |
|
./model/src/diags_oceanic_surf_flux.F |
75 |
DIAGS_OCEANIC_SURF_FLUX |
CALL DIAGNOSTICS_SCALE_FILL_RS( EmPmR,tmpFac,1, |
|
./model/src/diags_oceanic_surf_flux.F |
79 |
DIAGS_OCEANIC_SURF_FLUX |
tmpFac = -1. _d 0 |
|
./model/src/diags_oceanic_surf_flux.F |
80 |
DIAGS_OCEANIC_SURF_FLUX |
CALL DIAGNOSTICS_SCALE_FILL_RS( saltFlux,tmpFac,1, |
|
./model/src/diags_oceanic_surf_flux.F |
84 |
DIAGS_OCEANIC_SURF_FLUX |
tmpFac = -1. _d 0 |
|
./model/src/diags_oceanic_surf_flux.F |
85 |
DIAGS_OCEANIC_SURF_FLUX |
CALL DIAGNOSTICS_SCALE_FILL_RS( Qnet,tmpFac,1, |
|
./model/src/diags_oceanic_surf_flux.F |
90 |
DIAGS_OCEANIC_SURF_FLUX |
tmpFac = -1. _d 0 |
|
./model/src/diags_oceanic_surf_flux.F |
91 |
DIAGS_OCEANIC_SURF_FLUX |
CALL DIAGNOSTICS_SCALE_FILL_RS( Qsw,tmpFac,1, |
|
./model/src/diags_oceanic_surf_flux.F |
96 |
DIAGS_OCEANIC_SURF_FLUX |
tmpFac = HeatCapacity_Cp*rUnit2mass |
|
./model/src/diags_oceanic_surf_flux.F |
97 |
DIAGS_OCEANIC_SURF_FLUX |
CALL DIAGNOSTICS_SCALE_FILL( surfaceForcingTice,tmpFac,1, |
|
./model/src/diags_rho.F |
134 |
DIAGS_RHO_G |
_RL tmpFac |
|
./model/src/diags_rho.F |
142 |
DIAGS_RHO_G |
tmpFac = 1. _d 0 |
|
./model/src/diags_rho.F |
143 |
DIAGS_RHO_G |
CALL DIAGNOSTICS_SCALE_FILL( rho3d, tmpFac, 2, |
|
./pkg/salt_plume/salt_plume_calc_depth.F |
112 |
SALT_PLUME_CALC_DEPTH |
tmpFac = (SaltPlumeCriterion - GGm1) |
|
./pkg/salt_plume/salt_plume_calc_depth.F |
115 |
SALT_PLUME_CALC_DEPTH |
SaltPlumeDepth(i,j,bi,bj) = rF(1)-rC(k-1)+tmpFac*drC(k) |
|
./pkg/salt_plume/salt_plume_calc_depth.F |
119 |
SALT_PLUME_CALC_DEPTH |
tmpFac = 0. |
|
./pkg/salt_plume/salt_plume_calc_depth.F |
52 |
SALT_PLUME_CALC_DEPTH |
_RL rhoBigNb, tmpFac |
|
./pkg/salt_plume/salt_plume_calc_depth.F |
88 |
SALT_PLUME_CALC_DEPTH |
tmpFac = ( rhoMxL(i,j) - rhoKm1(i,j) ) |
|
./pkg/salt_plume/salt_plume_calc_depth.F |
91 |
SALT_PLUME_CALC_DEPTH |
tmpFac = 0. |
|
./pkg/salt_plume/salt_plume_calc_depth.F |
93 |
SALT_PLUME_CALC_DEPTH |
SaltPlumeDepth(i,j,bi,bj) = rF(1)-rC(k-1)+tmpFac*drC(k) |
|
./pkg/salt_plume/salt_plume_diagnostics_fill.F |
30 |
SALT_PLUME_DIAGNOSTICS_FILL |
_RL tmpFac |
|
./pkg/salt_plume/salt_plume_diagnostics_fill.F |
36 |
SALT_PLUME_DIAGNOSTICS_FILL |
tmpFac = 1. _d 0 |
|
./pkg/salt_plume/salt_plume_diagnostics_fill.F |
37 |
SALT_PLUME_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_SCALE_FILL( SaltPlumeDepth,tmpFac,1, |
|
./pkg/salt_plume/salt_plume_diagnostics_fill.F |
41 |
SALT_PLUME_DIAGNOSTICS_FILL |
tmpFac = 1. _d 0 |
|
./pkg/salt_plume/salt_plume_diagnostics_fill.F |
42 |
SALT_PLUME_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_SCALE_FILL( saltPlumeFlux,tmpFac,1, |
|
./pkg/seaice/seaice_advection.F |
140 |
SEAICE_ADVECTION |
_RL tmpFac |
|
./pkg/seaice/seaice_advection.F |
708 |
SEAICE_ADVECTION |
tmpFac= SEAICE_deltaTtherm*recip_rA(i,j,bi,bj) |
|
./pkg/seaice/seaice_advection.F |
710 |
SEAICE_ADVECTION |
& afx(i,j)*tmpFac,afx(i+1,j)*tmpFac, |
|
./pkg/seaice/seaice_advection.F |
711 |
SEAICE_ADVECTION |
& afy(i,j)*tmpFac,afy(i,j+1)*tmpFac |
|
./model/src/dynamics.F |
200 |
DYNAMICS |
_RL tmpFac |
|
./model/src/dynamics.F |
499 |
DYNAMICS |
tmpFac = -1. _d 0 |
|
./model/src/dynamics.F |
500 |
DYNAMICS |
CALL DIAGNOSTICS_SCALE_FILL( dPhiHydX, tmpFac, 1, |
|
./model/src/dynamics.F |
502 |
DYNAMICS |
CALL DIAGNOSTICS_SCALE_FILL( dPhiHydY, tmpFac, 1, |
|
./model/src/dynamics.F |
681 |
DYNAMICS |
tmpFac = 1. _d 0 |
|
./model/src/dynamics.F |
682 |
DYNAMICS |
CALL DIAGNOSTICS_SCALE_FILL(totPhihyd,tmpFac,2, |
|
./model/src/dynamics.F |
685 |
DYNAMICS |
CALL DIAGNOSTICS_SCALE_FILL(phiHydLow,tmpFac,2, |
|
./pkg/shelfice/shelfice_thermodynamics.F |
307 |
SHELFICE_THERMODYNAMICS |
tmpFac = HeatCapacity_Cp*rUnit2mass |
|
./pkg/shelfice/shelfice_thermodynamics.F |
308 |
SHELFICE_THERMODYNAMICS |
CALL DIAGNOSTICS_SCALE_FILL(shelficeForcingT,tmpFac,1, |
|
./pkg/shelfice/shelfice_thermodynamics.F |
311 |
SHELFICE_THERMODYNAMICS |
tmpFac = rUnit2mass |
|
./pkg/shelfice/shelfice_thermodynamics.F |
312 |
SHELFICE_THERMODYNAMICS |
CALL DIAGNOSTICS_SCALE_FILL(shelficeForcingS,tmpFac,1, |
|
./pkg/shelfice/shelfice_thermodynamics.F |
72 |
SHELFICE_THERMODYNAMICS |
_RL tmpFac |
|
./model/src/external_forcing_surf.F |
168 |
EXTERNAL_FORCING_SURF |
tmpFac = HeatCapacity_Cp*rUnit2mass |
|
./model/src/external_forcing_surf.F |
170 |
EXTERNAL_FORCING_SURF |
& surfaceForcingT(1-OLx,1-OLy,bi,bj),tmpFac,1, |
|
./model/src/external_forcing_surf.F |
174 |
EXTERNAL_FORCING_SURF |
tmpFac = rUnit2mass |
|
./model/src/external_forcing_surf.F |
176 |
EXTERNAL_FORCING_SURF |
& surfaceForcingS(1-OLx,1-OLy,bi,bj),tmpFac,1, |
|
./model/src/external_forcing_surf.F |
65 |
EXTERNAL_FORCING_SURF |
_RL tmpFac |
|
./pkg/thsice/thsice_advdiff.F |
100 |
THSICE_ADVDIFF |
_RL tmpFac |
|
./pkg/thsice/thsice_advdiff.F |
513 |
THSICE_ADVDIFF |
tmpFac = 1. _d 0 |
|
./pkg/thsice/thsice_advdiff.F |
515 |
THSICE_ADVDIFF |
I iceHeight, iceMask,tmpFac,1,'SI_AdvHi', |
|
./pkg/thsice/thsice_advdiff.F |
518 |
THSICE_ADVDIFF |
I snowHeight,iceMask,tmpFac,1,'SI_AdvHs', |
|
./pkg/thsice/thsice_advdiff.F |
530 |
THSICE_ADVDIFF |
I iceVol,tmpFac,1,'SI_AdvQ1', |
|
./pkg/thsice/thsice_advdiff.F |
534 |
THSICE_ADVDIFF |
I iceVol,tmpFac,1,'SI_AdvQ2', |
|
./pkg/thsice/thsice_advection.F |
141 |
THSICE_ADVECTION |
_RL tmpFac |
|
./pkg/thsice/thsice_advection.F |
715 |
THSICE_ADVECTION |
tmpFac= deltaTadvect*recip_rA(i,j,bi,bj) |
|
./pkg/thsice/thsice_advection.F |
717 |
THSICE_ADVECTION |
& afx(i,j)*tmpFac,afx(i+1,j)*tmpFac, |
|
./pkg/thsice/thsice_advection.F |
718 |
THSICE_ADVECTION |
& afy(i,j)*tmpFac,afy(i,j+1)*tmpFac |
|
./pkg/thsice/thsice_diagnostics_state.F |
44 |
THSICE_DIAGNOSTICS_STATE |
_RL tmpFac |
|
./pkg/thsice/thsice_diagnostics_state.F |
55 |
THSICE_DIAGNOSTICS_STATE |
tmpFac = 1. _d 0 |
|
./pkg/thsice/thsice_diagnostics_state.F |
57 |
THSICE_DIAGNOSTICS_STATE |
I iceHeight, iceMask,tmpFac,1,'SI_Thick', |
|
./pkg/thsice/thsice_diagnostics_state.F |
60 |
THSICE_DIAGNOSTICS_STATE |
I snowHeight,iceMask,tmpFac,1,'SI_SnowH', |
|
./pkg/thsice/thsice_diagnostics_state.F |
63 |
THSICE_DIAGNOSTICS_STATE |
I Tsrf, iceMask,tmpFac,1,'SI_Tsrf ', |
|
./pkg/thsice/thsice_diagnostics_state.F |
66 |
THSICE_DIAGNOSTICS_STATE |
I Tice1, iceMask,tmpFac,1,'SI_Tice1', |
|
./pkg/thsice/thsice_diagnostics_state.F |
69 |
THSICE_DIAGNOSTICS_STATE |
I Tice2, iceMask,tmpFac,1,'SI_Tice2', |
|
./pkg/thsice/thsice_diagnostics_state.F |
82 |
THSICE_DIAGNOSTICS_STATE |
I tmpFld,tmpFac,1,'SI_Qice1', |
|
./pkg/thsice/thsice_diagnostics_state.F |
86 |
THSICE_DIAGNOSTICS_STATE |
I tmpFld,tmpFac,1,'SI_Qice2', |
|
./pkg/thsice/thsice_step_fwd.F |
174 |
THSICE_STEP_FWD |
tmpFac = 1. _d 0 |
|
./pkg/thsice/thsice_step_fwd.F |
177 |
THSICE_STEP_FWD |
I snowPrc, iceMask,tmpFac,1,'SIsnwPrc', |
|
./pkg/thsice/thsice_step_fwd.F |
180 |
THSICE_STEP_FWD |
I siceAlb, iceMask,tmpFac,1,'SIalbedo', |
|
./pkg/thsice/thsice_step_fwd.F |
99 |
THSICE_STEP_FWD |
_RL tmpFac |
|
./model/src/ini_cg3d.F |
140 |
INI_CG3D |
tmpFac = nh_Fac*rVel2wUnit(k)*rVel2wUnit(k) |
|
./model/src/ini_cg3d.F |
142 |
INI_CG3D |
IF (tmpFac.GT.0. ) tmpFac = 1. _d 0 / tmpFac |
|
./model/src/ini_cg3d.F |
154 |
INI_CG3D |
aV3d(i,j,k,bi,bj) = faceArea*theRecip_Dr*tmpFac |
|
./model/src/ini_cg3d.F |
55 |
INI_CG3D |
_RL tmpFac, nh_Fac, igwFac |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
151 |
EXTERNAL_FORCING_SURF |
tmpFac = HeatCapacity_Cp*rUnit2mass |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
153 |
EXTERNAL_FORCING_SURF |
& surfaceForcingT(1-OLx,1-OLy,bi,bj),tmpFac,1, |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
157 |
EXTERNAL_FORCING_SURF |
tmpFac = rUnit2mass |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
159 |
EXTERNAL_FORCING_SURF |
& surfaceForcingS(1-OLx,1-OLy,bi,bj),tmpFac,1, |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
65 |
EXTERNAL_FORCING_SURF |
_RL tmpFac |
|
./model/src/pre_cg3d.F |
125 |
PRE_CG3D |
tmpFac = 0. |
|
./model/src/pre_cg3d.F |
147 |
PRE_CG3D |
tmpFac = freeSurfFac*deepFac2F(1) |
|
./model/src/pre_cg3d.F |
150 |
PRE_CG3D |
tmpFac = 0. |
|
./model/src/pre_cg3d.F |
213 |
PRE_CG3D |
& +( tmpFac*etaN(i,j,bi,bj)/deltaTfreesurf |
|
./model/src/pre_cg3d.F |
63 |
PRE_CG3D |
_RL tmpFac, tmpSurf |
|
./model/src/pre_cg3d.F |
82 |
PRE_CG3D |
tmpFac = freeSurfFac*mass2rUnit |
|
./model/src/pre_cg3d.F |
84 |
PRE_CG3D |
& tmpFac = freeSurfFac*mass2rUnit*implicDiv2DFlow |
|
./model/src/pre_cg3d.F |
90 |
PRE_CG3D |
& + tmpFac*_rA(i,j,bi,bj)*EmPmR(i,j,bi,bj)/deltaTMom |
|
./model/src/pre_cg3d.F |
98 |
PRE_CG3D |
tmpFac = 0. |
|
./model/src/solve_for_pressure.F |
133 |
SOLVE_FOR_PRESSURE |
tmpFac = freeSurfFac*mass2rUnit |
|
./model/src/solve_for_pressure.F |
135 |
SOLVE_FOR_PRESSURE |
& tmpFac = freeSurfFac*mass2rUnit*implicDiv2DFlow |
|
./model/src/solve_for_pressure.F |
139 |
SOLVE_FOR_PRESSURE |
& tmpFac*_rA(i,j,bi,bj)*EmPmR(i,j,bi,bj)/deltaTMom |
|
./model/src/solve_for_pressure.F |
162 |
SOLVE_FOR_PRESSURE |
tmpFac = 0. |
|
./model/src/solve_for_pressure.F |
163 |
SOLVE_FOR_PRESSURE |
IF (globalArea.GT.0.) tmpFac = |
|
./model/src/solve_for_pressure.F |
168 |
SOLVE_FOR_PRESSURE |
& - tmpFac*Bo_surf(i,j,bi,bj) |
|
./model/src/solve_for_pressure.F |
61 |
SOLVE_FOR_PRESSURE |
_RL tmpFac |
|
./model/src/timestep_wvel.F |
42 |
TIMESTEP_WVEL |
_RL tmpFac, nh_Fac, igwFac |
|
./model/src/timestep_wvel.F |
64 |
TIMESTEP_WVEL |
tmpFac = pfFacMom*(1. _d 0 - implicitNHPress) |
|
./model/src/timestep_wvel.F |
70 |
TIMESTEP_WVEL |
& - tmpFac*rkSign*recip_drC(k) |
|
./model/src/timestep_wvel.F |
78 |
TIMESTEP_WVEL |
& - tmpFac*rkSign*recip_drC(k) |
|
./model/src/timestep_wvel.F |
93 |
TIMESTEP_WVEL |
tmpFac = nh_Fac + igwFac*wUnit2rVel(k)*wUnit2rVel(k) |
|
./model/src/timestep_wvel.F |
95 |
TIMESTEP_WVEL |
IF (tmpFac.GT.0. ) tmpFac = 1. _d 0 / tmpFac |
|
./model/src/timestep_wvel.F |
99 |
TIMESTEP_WVEL |
& + deltaTmom*tmpFac*gWtmp(i,j) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
444 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_SCALE_FILL(theta,tmpFac,2, |
|
./pkg/diagnostics/diagnostics_fill_state.F |
446 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_SCALE_FILL(salt,tmpFac,2, |
|
./pkg/diagnostics/diagnostics_fill_state.F |
490 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_SCALE_FILL(tmpMk,tmpFac,2, |
|
./pkg/diagnostics/diagnostics_fill_state.F |
49 |
DIAGNOSTICS_FILL_STATE |
_RL tmpFac, uBarC, vBarC |
|
./pkg/diagnostics/diagnostics_fill_state.F |
56 |
DIAGNOSTICS_FILL_STATE |
tmpFac = 1. _d 0 |
|
./pkg/diagnostics/diagnostics_fill_state.F |
76 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_SCALE_FILL(etaN,tmpFac,2, |
|
./pkg/diagnostics/diagnostics_fill_state.F |
80 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_SCALE_FILL(dEtaHdt,tmpFac,2, |
|
./pkg/diagnostics/diagnostics_fill_state.F |
93 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_SCALE_FILL(uVel,tmpFac,2, |
|
./pkg/diagnostics/diagnostics_fill_state.F |
95 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_SCALE_FILL(vVel,tmpFac,2, |
|
./pkg/diagnostics/diagnostics_fill_state.F |
97 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_SCALE_FILL(wVel,tmpFac,2, |
|
./pkg/diagnostics/diagnostics_sum_levels.F |
104 |
DIAGNOSTICS_SUM_LEVELS |
tmpFac = drC(kLev) |
|
./pkg/diagnostics/diagnostics_sum_levels.F |
106 |
DIAGNOSTICS_SUM_LEVELS |
tmpFac = drF(kLev) |
|
./pkg/diagnostics/diagnostics_sum_levels.F |
111 |
DIAGNOSTICS_SUM_LEVELS |
& + tmpFac*fld3d(i,j,kLev,bi,bj) |
|
./pkg/diagnostics/diagnostics_sum_levels.F |
128 |
DIAGNOSTICS_SUM_LEVELS |
tmpFac = drC(kLev) |
|
./pkg/diagnostics/diagnostics_sum_levels.F |
130 |
DIAGNOSTICS_SUM_LEVELS |
tmpFac = drF(kLev) |
|
./pkg/diagnostics/diagnostics_sum_levels.F |
135 |
DIAGNOSTICS_SUM_LEVELS |
& + tmpFac*fld3d(i,j,kLev,bi,bj) |
|
./pkg/diagnostics/diagnostics_sum_levels.F |
144 |
DIAGNOSTICS_SUM_LEVELS |
tmpFac = drC(kLev) |
|
./pkg/diagnostics/diagnostics_sum_levels.F |
146 |
DIAGNOSTICS_SUM_LEVELS |
tmpFac = drF(kLev) |
|
./pkg/diagnostics/diagnostics_sum_levels.F |
151 |
DIAGNOSTICS_SUM_LEVELS |
& + tmpFac*fld3d(i,j,kLev,bi,bj) |
|
./pkg/diagnostics/diagnostics_sum_levels.F |
160 |
DIAGNOSTICS_SUM_LEVELS |
tmpFac = drC(kLev) |
|
./pkg/diagnostics/diagnostics_sum_levels.F |
162 |
DIAGNOSTICS_SUM_LEVELS |
tmpFac = drF(kLev) |
|
./pkg/diagnostics/diagnostics_sum_levels.F |
167 |
DIAGNOSTICS_SUM_LEVELS |
& + tmpFac*fld3d(i,j,kLev,bi,bj) |
|
./pkg/diagnostics/diagnostics_sum_levels.F |
176 |
DIAGNOSTICS_SUM_LEVELS |
tmpFac = drC(kLev) |
|
./pkg/diagnostics/diagnostics_sum_levels.F |
178 |
DIAGNOSTICS_SUM_LEVELS |
tmpFac = drF(kLev) |
|
./pkg/diagnostics/diagnostics_sum_levels.F |
189 |
DIAGNOSTICS_SUM_LEVELS |
& + tmpFac*fld3d(i,j,kLev,bi,bj) |
|
./pkg/diagnostics/diagnostics_sum_levels.F |
61 |
DIAGNOSTICS_SUM_LEVELS |
_RL tmpFac, hFacLoc |
|
./pkg/diagnostics/diagstats_calc.F |
126 |
DIAGSTATS_CALC |
tmpFld = tmpFac*inpArr(i,j)*inpArr(i,j) |
|
./pkg/diagnostics/diagstats_calc.F |
128 |
DIAGSTATS_CALC |
tmpFld = tmpFac*inpArr(i,j) |
|
./pkg/diagnostics/diagstats_calc.F |
156 |
DIAGSTATS_CALC |
tmpFld = tmpFac*inpArr(i,j)*inpArr(i,j) |
|
./pkg/diagnostics/diagstats_calc.F |
158 |
DIAGSTATS_CALC |
tmpFld = tmpFac*inpArr(i,j) |
|
./pkg/diagnostics/diagstats_calc.F |
185 |
DIAGSTATS_CALC |
tmpFld = tmpFac*inpArr(i,j)*inpArr(i,j) |
|
./pkg/diagnostics/diagstats_calc.F |
187 |
DIAGSTATS_CALC |
tmpFld = tmpFac*inpArr(i,j) |
|
./pkg/diagnostics/diagstats_calc.F |
216 |
DIAGSTATS_CALC |
tmpFld = tmpFac*inpArr(i,j)*inpArr(i,j) |
|
./pkg/diagnostics/diagstats_calc.F |
218 |
DIAGSTATS_CALC |
tmpFld = tmpFac*inpArr(i,j) |
|
./pkg/diagnostics/diagstats_calc.F |
246 |
DIAGSTATS_CALC |
tmpFld = tmpFac*inpArr(i,j)*inpArr(i,j) |
|
./pkg/diagnostics/diagstats_calc.F |
248 |
DIAGSTATS_CALC |
tmpFld = tmpFac*inpArr(i,j) |
|
./pkg/diagnostics/diagstats_calc.F |
277 |
DIAGSTATS_CALC |
tmpFld = tmpFac*inpArr(i,j)*inpArr(i,j) |
|
./pkg/diagnostics/diagstats_calc.F |
279 |
DIAGSTATS_CALC |
tmpFld = tmpFac*inpArr(i,j) |
|
./pkg/diagnostics/diagstats_calc.F |
307 |
DIAGSTATS_CALC |
tmpFld = tmpFac*inpArr(i,j)*inpArr(i,j) |
|
./pkg/diagnostics/diagstats_calc.F |
309 |
DIAGSTATS_CALC |
tmpFld = tmpFac*inpArr(i,j) |
|
./pkg/diagnostics/diagstats_calc.F |
80 |
DIAGSTATS_CALC |
_RL tmpFac |
|
./pkg/diagnostics/diagstats_calc.F |
87 |
DIAGSTATS_CALC |
tmpFac = scaleFact |
|
./pkg/diagnostics/diagstats_calc.F |
88 |
DIAGSTATS_CALC |
IF ( power.EQ.2) tmpFac = scaleFact*scaleFact |
|
./pkg/diagnostics/diagstats_calc.F |
97 |
DIAGSTATS_CALC |
tmpFld = tmpFac*inpArr(i,j)*inpArr(i,j) |
|
./pkg/diagnostics/diagstats_calc.F |
99 |
DIAGSTATS_CALC |
tmpFld = tmpFac*inpArr(i,j) |