double precision facscale 
      common/facscale/facscale