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

      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/  noff, minorig, nl, nlp, nlm                                 &
       &                ,  sigdz, spfac                                              &
       &                ,flag_epKEorig                                               &
       &                ,pbcrit, ptcrit                                              &
       &                ,elcrit, tlcrit                                              &
       &                ,omtrain                                                     &
       &                ,dtovsh, dpbase, dttrig                                      &
       &                ,dtcrit, tau, beta, alpha, alpha1                            &
       &                ,flag_wb,wbmax                                               &
       &                ,delta, betad
!$OMP THREADPRIVATE(/cv3param/)