Symbol Description Uses
lath 29


File Line number Procedure Code
./pkg/thsice/thsice_get_exf.F 116 THSICE_GET_EXF 
      _RL lath
./pkg/thsice/thsice_get_exf.F 161 THSICE_GET_EXF 
        lath  = flamb
./pkg/thsice/thsice_get_exf.F 165 THSICE_GET_EXF 
        lath  = flamb+flami
./pkg/thsice/thsice_get_exf.F 280 THSICE_GET_EXF 
           hlLocal = -lath*evapLoc
./pkg/thsice/thsice_get_exf.F 287 THSICE_GET_EXF 
           dflhdT = -lath*dEvdT
./pkg/thsice/thsice_get_exf.F 295 THSICE_GET_EXF 
           hlLocal = -lath*evapLoc
./pkg/thsice/thsice_get_exf.F 299 THSICE_GET_EXF 
           dflhdT = -lath*dEvdT
./pkg/bulk_force/bulkf_formula_lanl.F 136 BULKF_FORMULA_LANL 
              lath=Lvap
./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 151 BULKF_FORMULA_LANL 
              ssq = ssq0*exp( lath*(ssq1-ssq2/Tsf) ) / p0
./pkg/bulk_force/bulkf_formula_lanl.F 193 BULKF_FORMULA_LANL 
              clha  = rhoa*lath*us*re*rd
./pkg/bulk_force/bulkf_formula_lanl.F 197 BULKF_FORMULA_LANL 
              evp   = -flha/lath
./pkg/bulk_force/bulkf_formula_lanl.F 219 BULKF_FORMULA_LANL 
              dflhdT = -lath*dEvdT
./pkg/bulk_force/bulkf_formula_lanl.F 79 BULKF_FORMULA_LANL 
      _RL lath               ! latent heat of vaporization or sublimation
./pkg/bulk_force/bulkf_formula_lay.F 157 BULKF_FORMULA_LAY 
                lath=Lvap
./pkg/bulk_force/bulkf_formula_lay.F 161 BULKF_FORMULA_LAY 
                lath = Lvap+Lfresh
./pkg/bulk_force/bulkf_formula_lay.F 230 BULKF_FORMULA_LAY 
              clha  =  lath*tau*re
./pkg/bulk_force/bulkf_formula_lay.F 235 BULKF_FORMULA_LAY 
              evp   = -flha/lath
./pkg/bulk_force/bulkf_formula_lay.F 241 BULKF_FORMULA_LAY 
              dflhdT = -lath*dEvdT
./pkg/bulk_force/bulkf_formula_lay.F 88 BULKF_FORMULA_LAY 
      _RL lath               ! latent heat of vaporization or sublimation [J/kg]
./pkg/cheapaml/cheapaml.F 113 CHEAPAML 
        lath=2.5d6
./pkg/cheapaml/cheapaml.F 287 CHEAPAML 
              ssq = ssq0*exp( lath*(ssq1-ssq2/toa) ) / p0
./pkg/cheapaml/cheapaml.F 332 CHEAPAML 
                clha   = rhoa*lath*usm*re*rd
./pkg/cheapaml/cheapaml.F 336 CHEAPAML 
                evp   = -flha/lath
./pkg/cheapaml/cheapaml.F 85 CHEAPAML 
        _RL lath,p0,deltap,delq
./pkg/cheapaml/cheapaml_fields_load.F 143 CHEAPAML_FIELDS_LOAD 
              ssqa = ssq0*exp( lath*(ssq1-ssq2/local)) / p0
./pkg/cheapaml/cheapaml_fields_load.F 335 CHEAPAML_FIELDS_LOAD 
              ssqa = ssq0*exp( lath*(ssq1-ssq2/local)) / p0
./pkg/cheapaml/cheapaml_fields_load.F 74 CHEAPAML_FIELDS_LOAD 
      _RL ssq0,ssq1,ssq2,lath,p0,ssqa,q
./pkg/cheapaml/cheapaml_fields_load.F 84 CHEAPAML_FIELDS_LOAD 
      lath=2.5d6