Module ModQset

  use ModSize

  real, dimension(mcoef, mcoef) :: cu, ccu
  real, dimension(mcoef)        :: cuid, ccuid
  real, dimension(nqs, 0:ithmx) :: qsclr
  real, dimension(nqs)          :: wnt2s, wnp2s

  real, dimension(lonmx)        :: sl, cl
  real, dimension(-mmx:mmx)     :: ff
  integer, dimension(-mmx:mmx)  :: ibm, iem

  real, dimension(mcoef,ncoef)  :: ax
  real, dimension(mcoef)        :: qs, dqs

  real, dimension(nq, 0:ithmx)  :: q, dq
  real, dimension(0:ithmx)      :: st, ct

  real, dimension(nqs, mxnmx)   :: vfmps, zfmps
  integer, dimension(0:mmx)     :: ns, nmx, nss

  real, dimension(nq)           :: wnt2, wnp2, qnorm

  real, dimension(-mmx:mmx,lonmx) :: amie_f
  integer, dimension(mcoef)       :: mi

  integer :: imx

  real    :: xlonmx

end Module ModQset