Symbol Description Uses
gamma_blk adiabatic lapse rate 29



File Line number Procedure Code
./pkg/exf/EXF_CONSTANTS.h 141 NO PROCEDURE
      _RL    gamma_blk
./pkg/exf/EXF_CONSTANTS.h 172 NO PROCEDURE
     &       gamma_blk,
./pkg/exf/exf_bulkformulae.F 307 EXF_BULKFORMULAE
           deltap(i,j) = atemp(i,j,bi,bj) + gamma_blk*ht - Tsf
./pkg/exf/exf_readparms.F 352 EXF_READPARMS
      gamma_blk      =        0.010  _d 0
./pkg/exf/exf_readparms.F 95 EXF_READPARMS
     & humid_fac, gamma_blk, saltsat, sstExtrapol, psim_fac
./pkg/exf/exf_summary.F 145 EXF_SUMMARY
      CALL WRITE_0D_RL( gamma_blk, INDEX_NONE, 'gamma_blk =',
./pkg/thsice/thsice_get_exf.F 257 THSICE_GET_EXF
         deltap(i,j) = atemp(i,j,bi,bj) + gamma_blk*ht - Tsf
./pkg/bulk_force/BULKF_PARAMS.h 78 NO PROCEDURE
      _RL  gamma_blk
./pkg/bulk_force/BULKF_PARAMS.h 95 NO PROCEDURE
     &  umin, humid_fac, saltQsFac, gamma_blk,
./pkg/bulk_force/bulkf_formula_lanl.F 153 BULKF_FORMULA_LANL
              deltap = ta  - tsf + gamma_blk*ht
./pkg/bulk_force/bulkf_formula_lay.F 168 BULKF_FORMULA_LAY
              delth  = Ta + gamma_blk*zth - Tsf
./pkg/bulk_force/bulkf_readparms.F 112 BULKF_READPARMS
      gamma_blk =  0.010 _d 0
./pkg/bulk_force/bulkf_readparms.F 238 BULKF_READPARMS
      WRITE(iUnit,*) 'BlkF: gamma_blk=',gamma_blk
./pkg/bulk_force/bulkf_readparms.F 43 BULKF_READPARMS
     &  umin, humid_fac, saltQsFac, gamma_blk,
./pkg/cheapaml/CHEAPAML.h 101 NO PROCEDURE
      _RL    xphaseinit, gamma_blk, humid_fac, p0
./pkg/cheapaml/CHEAPAML.h 87 NO PROCEDURE
     &       xphaseinit, gamma_blk, humid_fac, p0,
./pkg/cheapaml/cheapaml.F 417 CHEAPAML
           ttt = Tair(i,j,bi,bj)-gamma_blk*(CheapHgrid(i,j,bi,bj)-zt)
./pkg/cheapaml/cheapaml.F 476 CHEAPAML
            ts=Tair(i,j,bi,bj)+gamma_blk*zt+celsius2K
./pkg/cheapaml/cheapaml.F 477 CHEAPAML
            pt=p0*(1-gamma_blk*CheapHgrid(i,j,bi,bj)/ts)
./pkg/cheapaml/cheapaml.F 478 CHEAPAML
     &          **(gravity/gamma_blk/gasR)
./pkg/cheapaml/cheapaml_coare3_flux.F 126 CHEAPAML_COARE3_FLUX
      Dt=tsw-Tas-gamma_blk*zt  !potential temperature difference.
./pkg/cheapaml/cheapaml_lanl_flux.F 131 CHEAPAML_LANL_FLUX
        ttas=tta+gamma_blk*zref
./pkg/cheapaml/cheapaml_lanl_flux.F 132 CHEAPAML_LANL_FLUX
        ttt=tta-( cheaphgrid(i,j,bi,bj)- zref)*gamma_blk
./pkg/cheapaml/cheapaml_lanl_flux.F 133 CHEAPAML_LANL_FLUX
        pt=p0*(1-gamma_blk*cheaphgrid(i,j,bi,bj)/ttas)
./pkg/cheapaml/cheapaml_lanl_flux.F 134 CHEAPAML_LANL_FLUX
     &     **(gravity/gamma_blk/gasR)
./pkg/cheapaml/cheapaml_lanl_flux.F 149 CHEAPAML_LANL_FLUX
            deltap = t  - to + gamma_blk*(zref-ht)
./pkg/cheapaml/cheapaml_lanl_flux.F 151 CHEAPAML_LANL_FLUX
            ttas   = tta+gamma_blk*(zref-ht)
./pkg/cheapaml/cheapaml_readparms.F 129 CHEAPAML_READPARMS
      gamma_blk=0.0098 _d 0
./pkg/cheapaml/cheapaml_readparms.F 40 CHEAPAML_READPARMS
     &   xphaseinit,gamma_blk,humid_fac,p0,