| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
230 |
NO PROCEDURE |
& selectAddFluid, selectImplicitDrag, |
|
./model/inc/PARAMS.h |
255 |
NO PROCEDURE |
INTEGER selectAddFluid |
|
./model/src/apply_forcing.F |
514 |
APPLY_FORCING_T |
IF ( selectAddFluid.NE.0 .AND. temp_addMass.NE.UNSET_RL ) THEN |
|
./model/src/apply_forcing.F |
515 |
APPLY_FORCING_T |
IF ( ( selectAddFluid.GE.1 .AND. nonlinFreeSurf.GT.0 ) |
|
./model/src/apply_forcing.F |
879 |
APPLY_FORCING_S |
IF ( selectAddFluid.NE.0 .AND. salt_addMass.NE.UNSET_RL ) THEN |
|
./model/src/apply_forcing.F |
880 |
APPLY_FORCING_S |
IF ( ( selectAddFluid.GE.1 .AND. nonlinFreeSurf.GT.0 ) |
|
./model/src/calc_div_ghat.F |
183 |
CALC_DIV_GHAT |
IF ( selectAddFluid.GE.1 ) THEN |
|
./model/src/calc_gw.F |
573 |
CALC_GW |
IF ( selectAddFluid.GE.1 ) THEN |
|
./pkg/mom_fluxform/mom_fluxform.F |
486 |
MOM_FLUXFORM |
IF ( selectAddFluid.GE.1 ) THEN |
|
./pkg/mom_fluxform/mom_fluxform.F |
719 |
MOM_FLUXFORM |
IF ( selectAddFluid.GE.1 ) THEN |
|
./model/src/check_pickup.F |
139 |
CHECK_PICKUP |
& .AND. selectAddFluid.EQ.2 ) THEN |
|
./model/src/config_check.F |
301 |
CONFIG_CHECK |
IF ( selectAddFluid.NE.0 ) THEN |
|
./model/src/config_check.F |
306 |
CONFIG_CHECK |
& selectAddFluid, ' is not zero' |
|
./model/src/config_check.F |
702 |
CONFIG_CHECK |
IF ( selectAddFluid.LT.-1 .OR. selectAddFluid.GT.2 ) THEN |
|
./model/src/config_check.F |
704 |
CONFIG_CHECK |
& selectAddFluid, ' not allowed' |
|
./model/src/config_check.F |
711 |
CONFIG_CHECK |
IF ( selectAddFluid.GE.1 .AND. rigidLid ) THEN |
|
./model/src/config_check.F |
720 |
CONFIG_CHECK |
IF ( selectAddFluid.GE.1 .AND. .NOT.staggerTimeStep ) THEN |
|
./model/src/config_summary.F |
390 |
CONFIG_SUMMARY |
CALL WRITE_0D_I( selectAddFluid, INDEX_NONE, |
|
./model/src/config_summary.F |
399 |
CONFIG_SUMMARY |
IF ( .NOT.useRealFreshWaterFlux .OR. selectAddFluid.EQ.-1 |
|
./model/src/external_forcing.F |
386 |
EXTERNAL_FORCING_T |
IF ( selectAddFluid.NE.0 .AND. temp_addMass.NE.UNSET_RL ) THEN |
|
./model/src/external_forcing.F |
387 |
EXTERNAL_FORCING_T |
IF ( ( selectAddFluid.GE.1 .AND. nonlinFreeSurf.GT.0 ) |
|
./model/src/external_forcing.F |
708 |
EXTERNAL_FORCING_S |
IF ( selectAddFluid.NE.0 .AND. salt_addMass.NE.UNSET_RL ) THEN |
|
./model/src/external_forcing.F |
709 |
EXTERNAL_FORCING_S |
IF ( ( selectAddFluid.GE.1 .AND. nonlinFreeSurf.GT.0 ) |
|
./pkg/thsice/thsice_test_addfluid.h |
10 |
NO PROCEDURE |
IF ( selectAddFluid.NE.0 .AND. hsMax.GT.hiMax ) THEN |
|
./model/src/ini_parms.F |
235 |
INI_PARMS |
& selectAddFluid, useRealFreshWaterFlux, convertFW2Salt, |
|
./model/src/ini_parms.F |
603 |
INI_PARMS |
IF ( selectAddFluid.GE.1 ) convertFW2Salt=-1 |
|
./model/src/integr_continuity.F |
90 |
INTEGR_CONTINUITY |
IF ( selectAddFluid.GE.1 ) facMass = mass2rUnit |
|
./model/src/integrate_for_w.F |
81 |
INTEGRATE_FOR_W |
IF ( selectAddFluid.GE.1 ) THEN |
|
./model/src/load_fields_driver.F |
94 |
LOAD_FIELDS_DRIVER |
IF ( selectAddFluid.NE.0 .AND. addMassFile.EQ.' ' ) THEN |
|
./model/src/read_pickup.F |
401 |
READ_PICKUP |
IF ( selectAddFluid.GE.1 ) THEN |
|
./verification/rotating_tank/code/apply_forcing.F |
516 |
APPLY_FORCING_T |
IF ( selectAddFluid.NE.0 .AND. temp_addMass.NE.UNSET_RL ) THEN |
|
./verification/rotating_tank/code/apply_forcing.F |
517 |
APPLY_FORCING_T |
IF ( ( selectAddFluid.GE.1 .AND. nonlinFreeSurf.GT.0 ) |
|
./verification/rotating_tank/code/apply_forcing.F |
936 |
APPLY_FORCING_S |
IF ( selectAddFluid.NE.0 .AND. salt_addMass.NE.UNSET_RL ) THEN |
|
./verification/rotating_tank/code/apply_forcing.F |
937 |
APPLY_FORCING_S |
IF ( ( selectAddFluid.GE.1 .AND. nonlinFreeSurf.GT.0 ) |
|
./model/src/set_defaults.F |
259 |
SET_DEFAULTS |
selectAddFluid = 0 |
|
./model/src/write_pickup.F |
277 |
WRITE_PICKUP |
IF ( selectAddFluid.NE.0 ) THEN |