cv30_uncompress Subroutine

public subroutine cv30_uncompress(nloc, len, ncum, nd, ntra, idcum, iflag, precip, vprecip, evap, ep, sig, w0, ft, fq, fu, fv, ftra, inb, ma, upwd, dnwd, dnwd0, qcondc, wd, cape, da, phi, mp, phi2, d1a, dam, sij, elij, clw, epmlmmm, eplamm, wdtraina, wdtrainm, epmax_diag, iflag1, precip1, vprecip1, evap1, ep1, sig1, w01, ft1, fq1, fu1, fv1, ftra1, inb1, ma1, upwd1, dnwd1, dnwd01, qcondc1, wd1, cape1, da1, phi1, mp1, phi21, d1a1, dam1, sij1, elij1, clw1, epmlmmm1, eplamm1, wdtraina1, wdtrainm1, epmax_diag1)

Arguments

Type IntentOptional Attributes Name
integer :: nloc
integer :: len
integer :: ncum
integer :: nd
integer :: ntra
integer :: idcum(nloc)
integer :: iflag(nloc)
real :: precip(nloc)
real :: vprecip(nloc,nd+1)
real :: evap(nloc,nd)
real :: ep(nloc,nd)
real :: sig(nloc,nd)
real :: w0(nloc,nd)
real :: ft(nloc,nd)
real :: fq(nloc,nd)
real :: fu(nloc,nd)
real :: fv(nloc,nd)
real :: ftra(nloc,nd,ntra)
integer :: inb(nloc)
real :: ma(nloc,nd)
real :: upwd(nloc,nd)
real :: dnwd(nloc,nd)
real :: dnwd0(nloc,nd)
real :: qcondc(nloc,nd)
real :: wd(nloc)
real :: cape(nloc)
real :: da(nloc,nd)
real :: phi(nloc,nd,nd)
real :: mp(nloc,nd)
real :: phi2(nloc,nd,nd)
real :: d1a(nloc,nd)
real :: dam(nloc,nd)
real :: sij(nloc,nd,nd)
real :: elij(nloc,nd,nd)
real :: clw(nloc,nd)
real :: epmlmmm(nloc,nd,nd)
real :: eplamm(nloc,nd)
real :: wdtraina(nloc,nd)
real :: wdtrainm(nloc,nd)
real :: epmax_diag(nloc)
integer :: iflag1(len)
real :: precip1(len)
real :: vprecip1(len,nd+1)
real :: evap1(len,nd)
real :: ep1(len,nd)
real :: sig1(len,nd)
real :: w01(len,nd)
real :: ft1(len,nd)
real :: fq1(len,nd)
real :: fu1(len,nd)
real :: fv1(len,nd)
real :: ftra1(len,nd,ntra)
integer :: inb1(len)
real :: ma1(len,nd)
real :: upwd1(len,nd)
real :: dnwd1(len,nd)
real :: dnwd01(len,nd)
real :: qcondc1(nloc,nd)
real :: wd1(nloc)
real :: cape1(nloc)
real :: da1(nloc,nd)
real :: phi1(nloc,nd,nd)
real :: mp1(nloc,nd)
real :: phi21(len,nd,nd)
real :: d1a1(len,nd)
real :: dam1(len,nd)
real :: sij1(len,nd,nd)
real :: elij1(len,nd,nd)
real :: clw1(len,nd)
real :: epmlmmm1(len,nd,nd)
real :: eplamm1(len,nd)
real :: wdtraina1(len,nd)
real :: wdtrainm1(len,nd)
real :: epmax_diag1(len)

Contents