| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
229 |
NO PROCEDURE |
& selectNHfreeSurf, selectP_inEOS_Zc, |
|
./model/inc/PARAMS.h |
253 |
NO PROCEDURE |
INTEGER selectNHfreeSurf |
|
./model/src/calc_gw.F |
280 |
CALC_GW |
ELSEIF ( selectNHfreeSurf.GE.1 ) THEN |
|
./model/src/calc_gw.F |
494 |
CALC_GW |
IF ( k.GT.1 .OR. selectNHfreeSurf.GE.1 ) THEN |
|
./model/src/calc_gw.F |
544 |
CALC_GW |
IF ( k.EQ.1 .AND. selectNHfreeSurf.GE.1 ) THEN |
|
./model/src/calc_gw.F |
557 |
CALC_GW |
IF ( k.GT.1 .OR. selectNHfreeSurf.GE.1 ) THEN |
|
./pkg/monitor/mon_ke.F |
77 |
MON_KE |
IF ( k.EQ.1 .AND. selectNHfreeSurf.LE.0 ) msk_1 = 0. |
|
./model/src/check_pickup.F |
69 |
CHECK_PICKUP |
IF ( selectNHfreeSurf.GE.1 ) THEN |
|
./model/src/config_summary.F |
415 |
CONFIG_SUMMARY |
CALL WRITE_0D_I( selectNHfreeSurf, INDEX_NONE, |
|
./model/src/ini_cg3d.F |
208 |
INI_CG3D |
IF ( selectNHfreeSurf.GE.1 ) THEN |
|
./pkg/shelfice/shelfice_check.F |
157 |
SHELFICE_CHECK |
IF ( selectNHfreeSurf.NE.0 ) THEN |
|
./pkg/shelfice/shelfice_check.F |
166 |
SHELFICE_CHECK |
& ' Free-Surf option (selectNHfreeSurf=',selectNHfreeSurf,' )' |
|
./model/src/ini_parms.F |
213 |
INI_PARMS |
& nonHydrostatic, selectNHfreeSurf, quasiHydrostatic, |
|
./model/src/post_cg3d.F |
103 |
POST_CG3D |
IF ( selectNHfreeSurf.GE.1 .AND. |
|
./model/src/post_cg3d.F |
62 |
POST_CG3D |
IF ( selectNHfreeSurf.GE.1 ) THEN |
|
./model/src/pre_cg3d.F |
118 |
PRE_CG3D |
IF ( selectNHfreeSurf.GE.1 ) THEN |
|
./model/src/read_pickup.F |
419 |
READ_PICKUP |
IF ( selectNHfreeSurf.GE.1 ) THEN |
|
./model/src/read_pickup.F |
553 |
READ_PICKUP |
IF ( selectNHfreeSurf.GE.1 ) THEN |
|
./model/src/set_defaults.F |
258 |
SET_DEFAULTS |
selectNHfreeSurf = 0 |
|
./model/src/set_parms.F |
132 |
SET_PARMS |
IF ( selectNHfreeSurf.NE.0 .AND. |
|
./model/src/set_parms.F |
140 |
SET_PARMS |
selectNHfreeSurf = 0 |
|
./model/src/timestep_wvel.F |
78 |
TIMESTEP_WVEL |
ELSEIF ( selectNHfreeSurf.GE.1 ) THEN |
|
./model/src/write_pickup.F |
300 |
WRITE_PICKUP |
IF ( selectNHfreeSurf.GE.1 ) THEN |
|
./model/src/write_state.F |
163 |
WRITE_STATE |
IF ( selectNHfreeSurf.GE.1 ) THEN |