c Contains various cloud parameters that we wish to be able to read from
c namelist input.
c SJP 2004/09/24

      real rcritl
      real rcrits
      real refac1
      real refac2
      common /cloudpar/ rcritl, rcrits, refac1, refac2