File |
Line number |
Procedure |
Code |
./model/src/ini_linear_phisurf.F |
85 |
INI_LINEAR_PHISURF |
Bo_surf(I,J,bi,bj) = gBaro |
./model/src/ini_linear_phisurf.F |
86 |
INI_LINEAR_PHISURF |
recip_Bo(I,J,bi,bj) = 1. _d 0 / gBaro |
./model/src/config_summary.F |
202 |
CONFIG_SUMMARY |
CALL WRITE_0D_R8( gBaro, INDEX_NONE,'gBaro =', |
./model/src/ini_parms.F |
137 |
INI_PARMS |
& gravity, gBaro, rhonil, tAlpha, sBeta, |
./model/src/ini_parms.F |
339 |
INI_PARMS |
gBaro = UNSET_RL |
./model/src/ini_parms.F |
401 |
INI_PARMS |
IF ( gBaro .EQ. UNSET_RL ) gBaro=gravity |
./model/inc/PARAMS.h |
590 |
NO PROCEDURE |
& gravity, recip_Gravity, gBaro, rhonil, recip_rhonil, |
./model/inc/PARAMS.h |
676 |
NO PROCEDURE |
_RL gBaro |