common /guang/a,b,eps1,c1,c2,c3,tfreez
      real a
      real b
      real eps1
      real c1
      real c2
      real c3
      real tfreez