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


File Line number Procedure Code
./model/src/ini_eos.F 42 INI_EOS 
      IF ( .NOT.fluidIsWater ) RETURN
./model/src/do_oceanic_phys.F 103 DO_OCEANIC_PHYS 
      IF ( useDiagnostics .AND. fluidIsWater ) THEN
./model/src/do_oceanic_phys.F 114 DO_OCEANIC_PHYS 
      IF ( useThSIce .AND. fluidIsWater ) THEN
./model/src/do_oceanic_phys.F 349 DO_OCEANIC_PHYS 
        IF ( fluidIsWater ) THEN
./model/src/do_oceanic_phys.F 473 DO_OCEANIC_PHYS 
      IF ( fluidIsWater .AND. useDiagnostics ) THEN
./pkg/thsice/thsice_ave.F 124 THSICE_AVE 
     &     .AND. fluidIsWater ) THEN
./pkg/thsice/thsice_ave.F 140 THSICE_AVE 
       IF ( fluidIsWater ) THEN
./pkg/thsice/thsice_ave.F 92 THSICE_AVE 
      IF ( fluidIsWater ) THEN
./pkg/thsice/thsice_step_fwd.F 106 THSICE_STEP_FWD 
      IF ( fluidIsWater ) THEN
./pkg/thsice/thsice_output.F 125 THSICE_OUTPUT 
         IF ( fluidIsWater ) THEN
./pkg/thsice/thsice_output.F 214 THSICE_OUTPUT 
         IF ( fluidIsWater ) THEN
./pkg/thsice/thsice_output.F 254 THSICE_OUTPUT 
         IF ( fluidIsWater ) THEN
./pkg/timeave/timeave_statv_write.F 187 TIMEAVE_STATV_WRITE 
          IF ( fluidIsWater ) THEN
./pkg/timeave/timeave_statv_write.F 279 TIMEAVE_STATV_WRITE 
          IF ( fluidIsWater ) THEN
./model/src/config_summary.F 87 CONFIG_SUMMARY 
      CALL WRITE_0D_L( fluidIsWater, INDEX_NONE,
./model/src/ini_parms.F 1123 INI_PARMS 
      useDynP_inEos_Zc = ( fluidIsWater .AND. usingZCoords
./model/src/ini_parms.F 382 INI_PARMS 
      fluidIsWater    = .FALSE.
./model/src/ini_parms.F 388 INI_PARMS 
        fluidIsWater  = .TRUE.
./model/src/ini_parms.F 391 INI_PARMS 
        fluidIsWater  = .TRUE.
./model/src/thermodynamics.F 637 THERMODYNAMICS 
        IF ( taveFreq.GT. 0. _d 0 .AND. fluidIsWater ) THEN
./model/inc/PARAMS.h 316 NO PROCEDURE 
     & fluidIsAir, fluidIsWater,
./model/inc/PARAMS.h 381 NO PROCEDURE 
      LOGICAL fluidIsWater
./model/src/write_state.F 133 WRITE_STATE 
          IF ( fluidIsWater .AND. (myIter.NE.nIter0) ) THEN
./model/src/write_state.F 176 WRITE_STATE 
          IF ( fluidIsWater .AND. (myIter .NE. nIter0) ) THEN