| File |
Line number |
Procedure |
Code |
|
./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) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
430 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_SCALE_FILL(theta,tmpFac,2, |
|
./pkg/diagnostics/diagnostics_fill_state.F |
432 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_SCALE_FILL(salt,tmpFac,2, |
|
./pkg/diagnostics/diagnostics_fill_state.F |
46 |
DIAGNOSTICS_FILL_STATE |
_RL tmpFac, uBarC, vBarC |
|
./pkg/diagnostics/diagnostics_fill_state.F |
476 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_SCALE_FILL(tmpMk,tmpFac,2, |
|
./pkg/diagnostics/diagnostics_fill_state.F |
53 |
DIAGNOSTICS_FILL_STATE |
tmpFac = 1. _d 0 |
|
./pkg/diagnostics/diagnostics_fill_state.F |
73 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_SCALE_FILL(etaN,tmpFac,2, |
|
./pkg/diagnostics/diagnostics_fill_state.F |
77 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_SCALE_FILL(dEtaHdt,tmpFac,2, |
|
./pkg/diagnostics/diagnostics_fill_state.F |
85 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_SCALE_FILL(uVel,tmpFac,2, |
|
./pkg/diagnostics/diagnostics_fill_state.F |
87 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_SCALE_FILL(vVel,tmpFac,2, |
|
./pkg/diagnostics/diagnostics_fill_state.F |
89 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_SCALE_FILL(wVel,tmpFac,2, |
|
./model/src/ini_cg3d.F |
137 |
INI_CG3D |
tmpFac = nh_Fac*recip_horiVertRatio*recip_horiVertRatio |
|
./model/src/ini_cg3d.F |
139 |
INI_CG3D |
IF (tmpFac.GT.0. ) tmpFac = 1. _d 0 / tmpFac |
|
./model/src/ini_cg3d.F |
150 |
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 |
|
./model/src/dynamics.F |
193 |
DYNAMICS |
_RL tmpFac |
|
./model/src/dynamics.F |
647 |
DYNAMICS |
tmpFac = 1. _d 0 |
|
./model/src/dynamics.F |
648 |
DYNAMICS |
CALL DIAGNOSTICS_SCALE_FILL(totPhihyd,tmpFac,2, |
|
./model/src/dynamics.F |
651 |
DYNAMICS |
CALL DIAGNOSTICS_SCALE_FILL(phiHydLow,tmpFac,2, |
|
./model/src/timestep_wvel.F |
42 |
TIMESTEP_WVEL |
_RL tmpFac, nh_Fac, igwFac |
|
./model/src/timestep_wvel.F |
77 |
TIMESTEP_WVEL |
tmpFac = nh_Fac + igwFac*dBdrRef(k)*deltaTMom*dTtracerLev(k) |
|
./model/src/timestep_wvel.F |
78 |
TIMESTEP_WVEL |
IF (tmpFac.GT.0. ) tmpFac = 1. _d 0 / tmpFac |
|
./model/src/timestep_wvel.F |
82 |
TIMESTEP_WVEL |
& + deltaTmom*tmpFac*gWtmp(i,j) |
|
./model/src/external_forcing_surf.F |
136 |
EXTERNAL_FORCING_SURF |
tmpFac = HeatCapacity_Cp*recip_horiVertRatio*rhoConst |
|
./model/src/external_forcing_surf.F |
138 |
EXTERNAL_FORCING_SURF |
& surfaceForcingT(1-Olx,1-Oly,bi,bj),tmpFac,1, |
|
./model/src/external_forcing_surf.F |
142 |
EXTERNAL_FORCING_SURF |
tmpFac = recip_horiVertRatio*rhoConst |
|
./model/src/external_forcing_surf.F |
144 |
EXTERNAL_FORCING_SURF |
& surfaceForcingS(1-Olx,1-Oly,bi,bj),tmpFac,1, |
|
./model/src/external_forcing_surf.F |
57 |
EXTERNAL_FORCING_SURF |
_RL tmpFac |
|
./model/src/solve_for_pressure.F |
128 |
SOLVE_FOR_PRESSURE |
tmpFac = freeSurfFac*convertEmP2rUnit |
|
./model/src/solve_for_pressure.F |
130 |
SOLVE_FOR_PRESSURE |
& tmpFac = freeSurfFac*convertEmP2rUnit*implicDiv2DFlow |
|
./model/src/solve_for_pressure.F |
134 |
SOLVE_FOR_PRESSURE |
& tmpFac*_rA(i,j,bi,bj)*EmPmR(i,j,bi,bj)/deltaTMom |
|
./model/src/solve_for_pressure.F |
157 |
SOLVE_FOR_PRESSURE |
tmpFac = 0. |
|
./model/src/solve_for_pressure.F |
158 |
SOLVE_FOR_PRESSURE |
IF (globalArea.GT.0.) tmpFac = freeSurfFac*deltaTfreesurf |
|
./model/src/solve_for_pressure.F |
163 |
SOLVE_FOR_PRESSURE |
& - tmpFac*Bo_surf(i,j,bi,bj) |
|
./model/src/solve_for_pressure.F |
383 |
SOLVE_FOR_PRESSURE |
tmpFac = freeSurfFac |
|
./model/src/solve_for_pressure.F |
386 |
SOLVE_FOR_PRESSURE |
tmpFac = 0. |
|
./model/src/solve_for_pressure.F |
409 |
SOLVE_FOR_PRESSURE |
& +( tmpFac*etaN(i,j,bi,bj)/deltaTfreesurf |
|
./model/src/solve_for_pressure.F |
61 |
SOLVE_FOR_PRESSURE |
_RL tmpFac |
|
./model/src/diags_oceanic_surf_flux.F |
115 |
DIAGS_OCEANIC_SURF_FLUX |
tmpFac = HeatCapacity_Cp*recip_horiVertRatio*rhoConst |
|
./model/src/diags_oceanic_surf_flux.F |
116 |
DIAGS_OCEANIC_SURF_FLUX |
CALL DIAGNOSTICS_SCALE_FILL(surfaceForcingTice,tmpFac,1, |
|
./model/src/diags_oceanic_surf_flux.F |
50 |
DIAGS_OCEANIC_SURF_FLUX |
_RL tmpFac |
|
./pkg/kpp/kpp_transport_ptr.F |
60 |
KPP_TRANSPORT_PTR |
_RL tmpFac |
|
./pkg/kpp/kpp_transport_ptr.F |
65 |
KPP_TRANSPORT_PTR |
tmpFac = 1. _d 0 |
|
./pkg/kpp/kpp_transport_ptr.F |
67 |
KPP_TRANSPORT_PTR |
tmpFac = 0. _d 0 |
|
./pkg/kpp/kpp_transport_ptr.F |
72 |
KPP_TRANSPORT_PTR |
& *( KPPdiffKzS(i,j,k,bi,bj) + tmpFac*Kwz(i,j,k,bi,bj) ) |
|
./pkg/kpp/kpp_transport_s.F |
51 |
KPP_TRANSPORT_S |
_RL tmpFac |
|
./pkg/kpp/kpp_transport_s.F |
56 |
KPP_TRANSPORT_S |
tmpFac = 1. _d 0 |
|
./pkg/kpp/kpp_transport_s.F |
58 |
KPP_TRANSPORT_S |
tmpFac = 0. _d 0 |
|
./pkg/kpp/kpp_transport_s.F |
63 |
KPP_TRANSPORT_S |
& *( KPPdiffKzS(i,j,k,bi,bj) + tmpFac*Kwz(i,j,k,bi,bj) ) |
|
./pkg/kpp/kpp_transport_t.F |
55 |
KPP_TRANSPORT_T |
_RL tmpFac |
|
./pkg/kpp/kpp_transport_t.F |
60 |
KPP_TRANSPORT_T |
tmpFac = 1. _d 0 |
|
./pkg/kpp/kpp_transport_t.F |
62 |
KPP_TRANSPORT_T |
tmpFac = 0. _d 0 |
|
./pkg/kpp/kpp_transport_t.F |
67 |
KPP_TRANSPORT_T |
& *( KPPdiffKzT(i,j,k,bi,bj) + tmpFac*Kwz(i,j,k,bi,bj) ) |
|
./pkg/monitor/mon_vort3.F |
44 |
MON_VORT3 |
_RL tmpFac |
|
./pkg/monitor/mon_vort3.F |
74 |
MON_VORT3 |
tmpFac = 0. |
|
./pkg/monitor/mon_vort3.F |
76 |
MON_VORT3 |
& tmpFac = (0.5+abEps) / implicDiv2Dflow |
|
./pkg/monitor/mon_vort3.F |
80 |
MON_VORT3 |
& + tmpFac*(etaN(i,j,bi,bj)-etaH(i,j,bi,bj)) |
|
./pkg/thsice/thsice_step_fwd.F |
136 |
THSICE_STEP_FWD |
tmpFac = 1. _d 0 |
|
./pkg/thsice/thsice_step_fwd.F |
138 |
THSICE_STEP_FWD |
I snowPrc, iceMask,tmpFac,1,'SIsnwPrc', |
|
./pkg/thsice/thsice_step_fwd.F |
141 |
THSICE_STEP_FWD |
I siceAlb, iceMask,tmpFac,1,'SIalbedo', |
|
./pkg/thsice/thsice_step_fwd.F |
87 |
THSICE_STEP_FWD |
_RL tmpFac |
|
./pkg/thsice/thsice_diagnostics_fill.F |
44 |
THSICE_DIAGNOSTICS_FILL |
_RL tmpFac |
|
./pkg/thsice/thsice_diagnostics_fill.F |
55 |
THSICE_DIAGNOSTICS_FILL |
tmpFac = 1. _d 0 |
|
./pkg/thsice/thsice_diagnostics_fill.F |
57 |
THSICE_DIAGNOSTICS_FILL |
I iceheight, iceMask,tmpFac,1,'SI_Thick', |
|
./pkg/thsice/thsice_diagnostics_fill.F |
60 |
THSICE_DIAGNOSTICS_FILL |
I snowheight,iceMask,tmpFac,1,'SI_SnowH', |
|
./pkg/thsice/thsice_diagnostics_fill.F |
63 |
THSICE_DIAGNOSTICS_FILL |
I Tsrf, iceMask,tmpFac,1,'SI_Tsrf ', |
|
./pkg/thsice/thsice_diagnostics_fill.F |
66 |
THSICE_DIAGNOSTICS_FILL |
I Tice1, iceMask,tmpFac,1,'SI_Tice1', |
|
./pkg/thsice/thsice_diagnostics_fill.F |
69 |
THSICE_DIAGNOSTICS_FILL |
I Tice2, iceMask,tmpFac,1,'SI_Tice2', |
|
./pkg/thsice/thsice_diagnostics_fill.F |
82 |
THSICE_DIAGNOSTICS_FILL |
I tmpFld,tmpFac,1,'SI_Qice1', |
|
./pkg/thsice/thsice_diagnostics_fill.F |
86 |
THSICE_DIAGNOSTICS_FILL |
I tmpFld,tmpFac,1,'SI_Qice2', |