13 use par_mod, only: nconvlevmax, na, nxmax, nymax, nxmaxn, nymaxn, maxnests
21 real :: pconv(nconvlevmax),phconv(na),dpr(nconvlevmax)
22 real :: pconv_hpa(nconvlevmax),phconv_hpa(na)
24 real :: ft(nconvlevmax), fq(nconvlevmax)
25 real :: fmass(nconvlevmax,nconvlevmax),sub(nconvlevmax)
26 real :: fmassfrac(nconvlevmax,nconvlevmax)
27 real :: cbaseflux(0:nxmax-1,0:nymax-1)
28 real :: cbasefluxn(0:nxmaxn-1,0:nymaxn-1,maxnests)
29 real :: tconv(na),qconv(na),qsconv(na)
30 real :: psconv,tt2conv,td2conv
32 integer :: nconvlev,nconvtop