File |
Line number |
Procedure |
Code |
./model/inc/PARAMS.h |
134 |
NO PROCEDURE |
CHARACTER*(MAX_LEN_FNAM) uVelInitFile |
./model/inc/PARAMS.h |
98 |
NO PROCEDURE |
& uVelInitFile, vVelInitFile, pSurfInitFile, |
./model/src/ini_parms.F |
295 |
INI_PARMS |
& uVelInitFile, vVelInitFile, pSurfInitFile, |
./verification/advect_cs/code/ini_vel.F |
69 |
INI_VEL |
IF (uVelInitFile .NE. ' ' .OR. vVelInitFile .NE. ' ') THEN |
./verification/advect_cs/code/ini_vel.F |
72 |
INI_VEL |
IF (uVelInitFile .NE. ' ') |
./verification/advect_cs/code/ini_vel.F |
73 |
INI_VEL |
& CALL READ_FLD_XYZ_RL( uVelInitFile, ' ', uVel, 0, myThid ) |
./verification/advect_xy/code/ini_vel.F |
59 |
INI_VEL |
IF (uVelInitFile .NE. ' ' .OR. vVelInitFile .NE. ' ') THEN |
./verification/advect_xy/code/ini_vel.F |
62 |
INI_VEL |
IF (uVelInitFile .NE. ' ') |
./verification/advect_xy/code/ini_vel.F |
63 |
INI_VEL |
& CALL READ_FLD_XYZ_RL( uVelInitFile, ' ', uVel, 0, myThid ) |
./model/src/ini_vel.F |
59 |
INI_VEL |
IF (uVelInitFile .NE. ' ' .OR. vVelInitFile .NE. ' ') THEN |
./model/src/ini_vel.F |
61 |
INI_VEL |
IF (uVelInitFile .NE. ' ') |
./model/src/ini_vel.F |
62 |
INI_VEL |
& CALL READ_FLD_XYZ_RL( uVelInitFile, ' ', uVel, 0, myThid ) |
./verification/solid-body.cs-32x32x1/code/ini_vel.F |
68 |
INI_VEL |
IF (uVelInitFile .NE. ' ') THEN |
./verification/solid-body.cs-32x32x1/code/ini_vel.F |
70 |
INI_VEL |
CALL READ_FLD_XYZ_RL( uVelInitFile, ' ', uVel, 0, myThid ) |
./model/src/set_defaults.F |
383 |
SET_DEFAULTS |
uVelInitFile = ' ' |