| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
753 |
NO PROCEDURE |
& f0, beta, fPrime, omega, rotationPeriod, |
|
./model/inc/PARAMS.h |
812 |
NO PROCEDURE |
_RL omega |
|
./pkg/monitor/mon_ke.F |
289 |
MON_KE |
& *omega*rSphere*rSphere |
|
./model/src/config_summary.F |
301 |
CONFIG_SUMMARY |
CALL WRITE_0D_RL( omega, INDEX_NONE,'omega =', |
|
./model/src/ini_cori.F |
95 |
INI_CORI |
& 2. _d 0*omega*sin(_yC(i,j,bi,bj)*deg2rad) |
|
./model/src/ini_cori.F |
97 |
INI_CORI |
& 2. _d 0*omega*sin(yG(i,j,bi,bj)*deg2rad) |
|
./model/src/ini_cori.F |
99 |
INI_CORI |
& 2. _d 0*omega*cos(_yC(i,j,bi,bj)*deg2rad) |
|
./model/src/ini_parms.F |
175 |
INI_PARMS |
& selectCoriMap, f0, beta, fPrime, omega, rotationPeriod, |
|
./model/src/ini_parms.F |
437 |
INI_PARMS |
IF ( omega .EQ. UNSET_RL ) THEN |
|
./model/src/ini_parms.F |
438 |
INI_PARMS |
omega = 0. _d 0 |
|
./model/src/ini_parms.F |
440 |
INI_PARMS |
& omega = 2. _d 0 * PI / rotationPeriod |
|
./model/src/ini_parms.F |
441 |
INI_PARMS |
ELSEIF ( omega .EQ. 0. _d 0 ) THEN |
|
./model/src/ini_parms.F |
444 |
INI_PARMS |
rotationPeriod = 2. _d 0 * PI / omega |
|
./model/src/set_defaults.F |
116 |
SET_DEFAULTS |
omega = UNSET_RL |
|
./pkg/dic/insol.F |
72 |
INSOL |
& lat = asin( fCori(1,j,1,bj)/(2. _d 0*omega) ) |