File |
Line number |
Procedure |
Code |
./model/src/find_alpha.F |
412 |
FIND_BETA |
betaLoc(i,j) = rhonil * sBeta |
./model/src/find_alpha.F |
82 |
FIND_ALPHA |
alphaLoc(i,j) = -rhonil * tAlpha |
./model/src/ini_parms.F |
183 |
INI_PARMS |
& gravity, gBaro, gravityFile, rhonil, tAlpha, sBeta, |
./verification/dome/code/obcs_calc.F |
61 |
OBCS_CALC |
dTemp=(2. _d 0/rhonil)/(2. _d -4) |
./pkg/ebm/ebm_load_climatology.F |
62 |
EBM_LOAD_CLIMATOLOGY |
tauMax = 1.0 * 1./(delR(1)*rhonil) |
./pkg/ecco/cost_obcs_ageos.F |
279 |
COST_OBCS_AGEOS |
& * gravity / f0 / rhonil |
./pkg/ecco/cost_obcs_ageos.F |
350 |
COST_OBCS_AGEOS |
& * gravity / f0 /rhonil |
./pkg/ecco/cost_obcs_ageos.F |
418 |
COST_OBCS_AGEOS |
& * gravity / f0 / rhonil |
./pkg/ecco/cost_obcs_ageos.F |
485 |
COST_OBCS_AGEOS |
& * gravity / f0 /rhonil |