!------------------------------------------------------------
! Parameters for convectL, iflag_con=3:
! (includes - microphysical parameters,
!			- parameters that control the rate of approach
!               to quasi-equilibrium)
!			- noff & minorig (previously in input of convect1)
!------------------------------------------------------------

      integer noff, minorig, nl, nlp, nlm
      real sigdz, spfac
      integer flag_epKEorig,flag_wb
      real pbcrit, ptcrit
      real elcrit, tlcrit
      real omtrain
      real dtovsh, dpbase, dttrig
      real dtcrit, tau, beta, alpha, alpha1
      real wbmax
      real delta
      real betad

      COMMON /cv3param/ sigdz, spfac &
                      ,pbcrit, ptcrit &
                      ,elcrit, tlcrit &
                      ,omtrain &
                      ,dtovsh, dpbase, dttrig &
                      ,dtcrit, tau, beta, alpha, alpha1 &
                      ,wbmax &
                      ,delta, betad  &
                      ,flag_epKEorig &
                      ,flag_wb &
                      ,noff, minorig, nl, nlp, nlm
!$OMP THREADPRIVATE(/cv3param/)