double precision bmin(10),bmax(10),cicameas(1000),
     &    pco2ambient(1000)
      common /cicadble/bmin,bmax,cicameas,
     &    pco2ambient
      
      integer nobs,imodel
      common /cicaint/nobs,imodel