FHSetSMPara

       FHSetSMPara - set the FeynHiggs SM input parameters

       integer error
       double precision invAlfa0, invAlfaMZ, AlfasMZ, GF
       double precision ME, MU, MD, MM, MC, MS, ML, MB
       double precision MW, MZ, GammaW, GammaZ
       double precision CKMlambda, CKMA, CKMrhobar, CKMetabar

       subroutine FHSetSMPara(error,
         invAlfa0, invAlfaMZ, AlfasMZ, GF,
         ME, MU, MD, MM, MC, MS, ML, MB,
         MW, MZ, GammaW, GammaZ,
         CKMlambda, CKMA, CKMrhobar, CKMetabar)

       FHSetSMPara[invAlfa0, invAlfaMZ, AlfasMZ, GF,
         ME, MU, MD, MM, MC, MS, ML, MB,
         MW, MZ, GammaW, GammaZ,
         CKMlambda, CKMA, CKMrhobar, CKMetabar]

       FHSetSMPara  sets  up the SM inputs for FeynHiggs.  All of these parame-
       ters have default values so it is optional to call FHSetSMPara.  If  FH-
       SetSMPara is called, it must be called before FHSetPara.

       Substituting -1 for any argument uses its default value.

       error (output)
              zero  if  successful, otherwise the line number in SetPara.F from
              which the error message was emitted.

       invAlfa0, invAlfaMZ (input)
              the inverse electromagnetic coupling constant at q^2 = 0, MZ^2.

       AlfasMZ (input)
              the strong coupling constant at MZ.

       GF (input)
              the Fermi constant.

       ME, MM, ML (input)
              the on-shell electron, muon, tauon mass.

       MU, MD, MS (input)
              the up, down, and strange quark masses at 2 GeV.

       MC, MB (input)
              the charm mass at MC and bottom mass at MB.

       MW, MZ (input)
              the W and Z masses.

       GammaW, GammaZ (input)
              the W and Z widths.

       CKMlambda, CKMA, CKMrhobar, CKMetabar (input)
              the CKM input parameters in Wolfenstein parameterization.

       libFH(1)

                                  25-Jan-2017                    FHSETSMPARA(1)