Symbol Description Uses
cheaphgrid 2



File Line number Procedure Code
./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)