real frac,fracn07,fracsb2
c
      common/fracs/frac(12),fracn07(12),fracsb2(12)