*     -*-fortran-*-

      double precision Sin2ThetaW
      character*4 InSin2ThetaW
*
      common / Sin2ThetaWAPFEL / Sin2ThetaW,InSin2ThetaW