| File |
Line number |
Procedure |
Code |
|
./pkg/opps/opps_calc.F |
528 |
OPPS_CALC |
& - tAlpha*(tLoc-tRef(KREF)) ) + dRho |
|
./model/src/config_summary.F |
189 |
CONFIG_SUMMARY |
CALL WRITE_0D_RL( tAlpha, INDEX_NONE,'tAlpha =', |
|
./model/src/find_alpha.F |
77 |
FIND_ALPHA |
alphaLoc(i,j) = -rhonil * tAlpha |
|
./model/src/find_rho.F |
103 |
FIND_RHO_2D |
& -tAlpha*(tFld(i,j)-refTemp) ) |
|
./model/src/find_rho.F |
634 |
FIND_RHO_SCALAR |
& -tAlpha*(tLoc-tRef(1)) |
|
./model/src/ini_eos.F |
74 |
INI_EOS |
IF ( tAlpha .EQ. UNSET_RL ) tAlpha = 2. _d -4 |
|
./model/src/ini_parms.F |
156 |
INI_PARMS |
& gravity, gBaro, rhonil, tAlpha, sBeta, |
|
./model/src/ini_parms.F |
351 |
INI_PARMS |
tAlpha = UNSET_RL |
|
./verification/internal_wave/code/obcs_calc.F |
127 |
OBCS_CALC |
& *sqrt(strat/(tAlpha*gravity)) |
|
./verification/internal_wave/code/obcs_calc.F |
50 |
OBCS_CALC |
strat = 1.0 _d -6 / (gravity*tAlpha) |
|
./model/src/set_parms.F |
142 |
SET_PARMS |
IF ( tAlpha.EQ.0. ) tempIsActiveTr = .FALSE. |
|
./model/src/set_ref_state.F |
134 |
SET_REF_STATE |
& -tAlpha*(tRef(k)-tRef(k-1)) |
|
./model/inc/EOS.h |
26 |
NO PROCEDURE |
COMMON /PARM_EOS_LIN/ tAlpha,sBeta,equationOfState |
|
./model/inc/EOS.h |
27 |
NO PROCEDURE |
_RL tAlpha |