Symbol Description Uses
fluidIsWater Set to indicate that the fluid major constituent 37


File Line number Procedure Code
./model/inc/PARAMS.h 363 NO PROCEDURE 
     & fluidIsAir, fluidIsWater,
./model/inc/PARAMS.h 404 NO PROCEDURE 
      LOGICAL fluidIsWater
./pkg/monitor/mon_init.F 44 MON_INIT 
      IF ( fluidIsWater ) monSolutionMaxRange = 1. _d +3
./model/src/config_check.F 385 CONFIG_CHECK 
       IF ( fluidIsWater ) THEN
./model/src/config_summary.F 87 CONFIG_SUMMARY 
      CALL WRITE_0D_L( fluidIsWater, INDEX_NONE,
./model/src/do_oceanic_phys.F 126 DO_OCEANIC_PHYS 
      IF ( useDiagnostics .AND. fluidIsWater ) THEN
./model/src/do_oceanic_phys.F 260 DO_OCEANIC_PHYS 
      IF ( useThSIce .AND. fluidIsWater ) THEN
./model/src/do_oceanic_phys.F 277 DO_OCEANIC_PHYS 
      IF ( useShelfIce .AND. fluidIsWater ) THEN
./model/src/do_oceanic_phys.F 292 DO_OCEANIC_PHYS 
      IF ( useICEFRONT .AND. fluidIsWater ) THEN
./model/src/do_oceanic_phys.F 358 DO_OCEANIC_PHYS 
        IF ( fluidIsWater ) THEN
./model/src/do_oceanic_phys.F 464 DO_OCEANIC_PHYS 
          IF ( fluidIsWater ) THEN
./model/src/do_oceanic_phys.F 790 DO_OCEANIC_PHYS 
      IF ( fluidIsWater .AND. useDiagnostics ) THEN
./pkg/thsice/thsice_ave.F 139 THSICE_AVE 
       IF ( fluidIsWater ) THEN
./pkg/thsice/thsice_ave.F 91 THSICE_AVE 
      IF ( fluidIsWater ) THEN
./pkg/thsice/thsice_output.F 130 THSICE_OUTPUT 
         IF ( fluidIsWater ) THEN
./pkg/thsice/thsice_output.F 203 THSICE_OUTPUT 
         IF ( fluidIsWater ) THEN
./pkg/thsice/thsice_output.F 255 THSICE_OUTPUT 
         IF ( fluidIsWater ) THEN
./pkg/timeave/timeave_statv_write.F 167 TIMEAVE_STATV_WRITE 
          IF ( fluidIsWater ) THEN
./pkg/timeave/timeave_statv_write.F 263 TIMEAVE_STATV_WRITE 
          IF ( fluidIsWater ) THEN
./verification/OpenAD/code_oad_all/write_state.F 136 WRITE_STATE 
          IF ( fluidIsWater .AND. (myIter.NE.nIter0) ) THEN
./verification/OpenAD/code_oad_all/write_state.F 186 WRITE_STATE 
          IF ( fluidIsWater .AND. (myIter .NE. nIter0) ) THEN
./model/src/ini_eos.F 44 INI_EOS 
      IF ( .NOT.fluidIsWater ) RETURN
./model/src/ini_parms.F 379 INI_PARMS 
      fluidIsWater    = .FALSE.
./model/src/ini_parms.F 385 INI_PARMS 
        fluidIsWater  = .TRUE.
./model/src/ini_parms.F 388 INI_PARMS 
        fluidIsWater  = .TRUE.
./model/src/ini_parms.F 964 INI_PARMS 
        IF ( fluidIsWater ) monitorSelect = 3
./model/src/integr_continuity.F 124 INTEGR_CONTINUITY 
     &       .AND. fluidIsWater .AND. useRealFreshWaterFlux ) THEN
./model/src/integr_continuity.F 236 INTEGR_CONTINUITY 
     &       .AND. fluidIsWater .AND. useRealFreshWaterFlux ) THEN
./model/src/integr_continuity.F 75 INTEGR_CONTINUITY 
       IF ( fluidIsWater.AND.useRealFreshWaterFlux ) facEmP=mass2rUnit
./model/src/pre_cg3d.F 81 PRE_CG3D 
        IF ( useRealFreshWaterFlux.AND.fluidIsWater ) THEN
./model/src/set_parms.F 149 SET_PARMS 
      useDynP_inEos_Zc = ( fluidIsWater .AND. usingZCoords
./model/src/solve_for_pressure.F 132 SOLVE_FOR_PRESSURE 
        IF (useRealFreshWaterFlux.AND.fluidIsWater) THEN
./model/src/write_state.F 136 WRITE_STATE 
          IF ( fluidIsWater .AND. (myIter.NE.nIter0) ) THEN
./model/src/write_state.F 186 WRITE_STATE 
          IF ( fluidIsWater .AND. (myIter .NE. nIter0) ) THEN
./pkg/diagnostics/diagnostics_fill_state.F 475 DIAGNOSTICS_FILL_STATE 
        IF ( fluidIsWater .AND.
./pkg/diagnostics/diagnostics_main_init.F 190 DIAGNOSTICS_MAIN_INIT 
      IF ( fluidIsWater ) THEN
./pkg/diagnostics/diagnostics_main_init.F 236 DIAGNOSTICS_MAIN_INIT 
      IF ( fluidIsWater ) THEN