File |
Line number |
Procedure |
Code |
./model/inc/PARAMS.h |
135 |
NO PROCEDURE |
CHARACTER*(MAX_LEN_FNAM) vVelInitFile |
./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 |
75 |
INI_VEL |
IF (vVelInitFile .NE. ' ') |
./verification/advect_cs/code/ini_vel.F |
76 |
INI_VEL |
& CALL READ_FLD_XYZ_RL( vVelInitFile, ' ', vVel, 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 |
65 |
INI_VEL |
IF (vVelInitFile .NE. ' ') |
./verification/advect_xy/code/ini_vel.F |
66 |
INI_VEL |
& CALL READ_FLD_XYZ_RL( vVelInitFile, ' ', vVel, 0, myThid ) |
./model/src/ini_vel.F |
59 |
INI_VEL |
IF (uVelInitFile .NE. ' ' .OR. vVelInitFile .NE. ' ') THEN |
./model/src/ini_vel.F |
64 |
INI_VEL |
IF (vVelInitFile .NE. ' ') |
./model/src/ini_vel.F |
65 |
INI_VEL |
& CALL READ_FLD_XYZ_RL( vVelInitFile, ' ', vVel, 0, myThid ) |
./verification/solid-body.cs-32x32x1/code/ini_vel.F |
75 |
INI_VEL |
IF (vVelInitFile .NE. ' ') THEN |
./verification/solid-body.cs-32x32x1/code/ini_vel.F |
77 |
INI_VEL |
CALL READ_FLD_XYZ_RL( vVelInitFile, ' ', vVel, 0, myThid ) |
./model/src/set_defaults.F |
384 |
SET_DEFAULTS |
vVelInitFile = ' ' |