Symbol Description Uses
iceornot 0=open water, 1=ice cover 34



File Line number Procedure Code
./pkg/thsice/thsice_get_bulkf.F 105 THSICE_GET_BULKF
     I               iceornot, myThid )
./pkg/thsice/thsice_get_bulkf.F 129 THSICE_GET_BULKF
     I          iceornot, myThid )
./pkg/thsice/thsice_get_bulkf.F 136 THSICE_GET_BULKF
     I          iceornot, i,j,bi,bj,myThid )
./pkg/thsice/thsice_get_bulkf.F 72 THSICE_GET_BULKF
      INTEGER iceornot
./pkg/thsice/thsice_get_bulkf.F 90 THSICE_GET_BULKF
          iceornot=2
./pkg/thsice/thsice_get_bulkf.F 92 THSICE_GET_BULKF
          iceornot=1
./pkg/bulk_force/bulkf_forcing.F 116 BULKF_FORCING
     I            iceornot, myThid )
./pkg/bulk_force/bulkf_forcing.F 132 BULKF_FORCING
     I            iceornot, i,j,bi,bj,myThid )
./pkg/bulk_force/bulkf_forcing.F 64 BULKF_FORCING
      INTEGER ks, iceornot
./pkg/bulk_force/bulkf_forcing.F 76 BULKF_FORCING
      iceornot = 0
./pkg/bulk_force/bulkf_forcing.F 93 BULKF_FORCING
     I            iceornot, myThid )
./pkg/bulk_force/bulkf_formula_aim.F 132 BULKF_FORMULA_AIM
      IF ( iceornot.GE.1 ) ALHevp = ALHC + ALHF
./pkg/bulk_force/bulkf_formula_aim.F 14 BULKF_FORMULA_AIM
     I                   iceornot, myThid )
./pkg/bulk_force/bulkf_formula_aim.F 78 BULKF_FORMULA_AIM
      INTEGER iceornot
./pkg/bulk_force/bulkf_formula_lanl.F 137 BULKF_FORMULA_LANL
              if (iceornot.gt.0) lath=Lvap+Lfresh
./pkg/bulk_force/bulkf_formula_lanl.F 13 BULKF_FORMULA_LANL
     I                           iceornot, myThid )
./pkg/bulk_force/bulkf_formula_lanl.F 205 BULKF_FORMULA_LANL
              if (iceornot.eq.0) then
./pkg/bulk_force/bulkf_formula_lanl.F 208 BULKF_FORMULA_LANL
              elseif (iceornot.eq.2) then
./pkg/bulk_force/bulkf_formula_lanl.F 51 BULKF_FORMULA_LANL
      INTEGER iceornot       ! 0=open water, 1=sea-ice, 2=sea-ice with snow
./pkg/bulk_force/bulkf_formula_lay.F 13 BULKF_FORMULA_LAY
     I                           iceornot, i,j,bi,bj,myThid )
./pkg/bulk_force/bulkf_formula_lay.F 156 BULKF_FORMULA_LAY
              IF ( iceornot.EQ.0 ) THEN
./pkg/bulk_force/bulkf_formula_lay.F 245 BULKF_FORMULA_LAY
              IF ( iceornot.EQ.0 ) THEN
./pkg/bulk_force/bulkf_formula_lay.F 248 BULKF_FORMULA_LAY
              ELSEIF (iceornot.EQ.2) THEN
./pkg/bulk_force/bulkf_formula_lay.F 56 BULKF_FORMULA_LAY
      INTEGER iceornot       ! 0=open water, 1=sea-ice, 2=sea-ice with snow
./pkg/cheapaml/cheapaml_coare3_flux.F 250 CHEAPAML_COARE3_FLUX
      if (iceornot.EQ.0) THEN
./pkg/cheapaml/cheapaml_coare3_flux.F 253 CHEAPAML_COARE3_FLUX
      ELSEIF (iceornot.EQ.2) THEN
./pkg/cheapaml/cheapaml_coare3_flux.F 256 CHEAPAML_COARE3_FLUX
      ELSEIF (iceornot.EQ.1) THEN
./pkg/cheapaml/cheapaml_lanl_flux.F 102 CHEAPAML_LANL_FLUX
                   iceornot=2
./pkg/cheapaml/cheapaml_lanl_flux.F 104 CHEAPAML_LANL_FLUX
                   iceornot=1
./pkg/cheapaml/cheapaml_lanl_flux.F 107 CHEAPAML_LANL_FLUX
                 iceornot=0
./pkg/cheapaml/cheapaml_lanl_flux.F 110 CHEAPAML_LANL_FLUX
               iceornot=0
./pkg/cheapaml/cheapaml_lanl_flux.F 59 CHEAPAML_LANL_FLUX
      INTEGER iceornot
./pkg/cheapaml/cheapaml_seaice.F 191 CHEAPAML_SEAICE
             iceornot=2
./pkg/cheapaml/cheapaml_seaice.F 193 CHEAPAML_SEAICE
             iceornot=1