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


File Line number Procedure Code
./model/inc/PARAMS.h 340 NO PROCEDURE 
     & fluidIsAir, fluidIsWater,
./model/inc/PARAMS.h 410 NO PROCEDURE 
      LOGICAL fluidIsWater
./pkg/diagnostics/diagnostics_main_init.F 185 DIAGNOSTICS_MAIN_INIT 
      IF ( fluidIsWater ) THEN
./pkg/diagnostics/diagnostics_main_init.F 229 DIAGNOSTICS_MAIN_INIT 
      IF ( fluidIsWater ) THEN
./pkg/diagnostics/diagnostics_fill_state.F 461 DIAGNOSTICS_FILL_STATE 
        IF ( fluidIsWater .AND.
./model/src/ini_eos.F 40 INI_EOS 
      IF ( .NOT.fluidIsWater ) RETURN
./model/src/ini_parms.F 416 INI_PARMS 
      fluidIsWater    = .FALSE.
./model/src/ini_parms.F 422 INI_PARMS 
        fluidIsWater  = .TRUE.
./model/src/ini_parms.F 425 INI_PARMS 
        fluidIsWater  = .TRUE.
./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
./model/src/config_summary.F 87 CONFIG_SUMMARY 
      CALL WRITE_0D_L( fluidIsWater, INDEX_NONE,
./model/src/set_parms.F 112 SET_PARMS 
      useDynP_inEos_Zc = ( fluidIsWater .AND. usingZCoords
./model/src/do_oceanic_phys.F 123 DO_OCEANIC_PHYS 
      IF ( useDiagnostics .AND. fluidIsWater ) THEN
./model/src/do_oceanic_phys.F 166 DO_OCEANIC_PHYS 
      IF ( useThSIce .AND. fluidIsWater ) THEN
./model/src/do_oceanic_phys.F 180 DO_OCEANIC_PHYS 
      IF ( useShelfIce .AND. fluidIsWater ) THEN
./model/src/do_oceanic_phys.F 422 DO_OCEANIC_PHYS 
        IF ( fluidIsWater ) THEN
./model/src/do_oceanic_phys.F 562 DO_OCEANIC_PHYS 
        IF ( taveFreq.GT. 0. _d 0 .AND. fluidIsWater ) THEN
./model/src/do_oceanic_phys.F 576 DO_OCEANIC_PHYS 
      IF ( fluidIsWater .AND. useDiagnostics ) THEN
./pkg/timeave/timeave_statv_write.F 169 TIMEAVE_STATV_WRITE 
          IF ( fluidIsWater ) THEN
./pkg/timeave/timeave_statv_write.F 262 TIMEAVE_STATV_WRITE 
          IF ( fluidIsWater ) THEN
./pkg/monitor/mon_solution.F 51 MON_SOLUTION 
     .            (fluidIsWater .and. (tMax-tMin.GT.1.e3) )  ) THEN
./pkg/thsice/thsice_ave.F 137 THSICE_AVE 
       IF ( fluidIsWater ) THEN
./pkg/thsice/thsice_ave.F 91 THSICE_AVE 
      IF ( fluidIsWater ) THEN
./pkg/thsice/thsice_output.F 126 THSICE_OUTPUT 
         IF ( fluidIsWater ) THEN
./pkg/thsice/thsice_output.F 215 THSICE_OUTPUT 
         IF ( fluidIsWater ) THEN
./pkg/thsice/thsice_output.F 270 THSICE_OUTPUT 
         IF ( fluidIsWater ) THEN