| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
720 |
NO PROCEDURE |
& f0, beta, fPrime, omega, rotationPeriod, |
|
./model/inc/PARAMS.h |
780 |
NO PROCEDURE |
_RL omega |
|
./model/src/config_summary.F |
235 |
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 |
157 |
INI_PARMS |
& selectCoriMap, f0, beta, fPrime, omega, rotationPeriod, |
|
./model/src/ini_parms.F |
345 |
INI_PARMS |
omega = UNSET_RL |
|
./model/src/ini_parms.F |
416 |
INI_PARMS |
IF ( omega .EQ. UNSET_RL ) THEN |
|
./model/src/ini_parms.F |
417 |
INI_PARMS |
omega = 0. _d 0 |
|
./model/src/ini_parms.F |
419 |
INI_PARMS |
& omega = 2. _d 0 * PI / rotationPeriod |
|
./model/src/ini_parms.F |
420 |
INI_PARMS |
ELSEIF ( omega .EQ. 0. _d 0 ) THEN |
|
./model/src/ini_parms.F |
423 |
INI_PARMS |
rotationPeriod = 2. _d 0 * PI / omega |
|
./pkg/dic/insol.F |
72 |
INSOL |
& lat = asin( fCori(1,j,1,bj)/(2. _d 0*omega) ) |