* Higgs mass or vituality DATA (xc(l),l= 1,156)/100.0d0,110.0d0,120.0d0,130.0d0,140.0d0, # 145.0d0,150.0d0,151.0d0,152.0d0,153.0d0,154.0d0,155.0d0, # 156.0d0,157.0d0,158.0d0,159.0d0,160.0d0,161.0d0,162.0d0, # 163.0d0,164.0d0,165.0d0,166.0d0,167.0d0,168.0d0,169.0d0, # 170.0d0,171.0d0,172.0d0,173.0d0,174.0d0,175.0d0,176.0d0, # 177.0d0,178.0d0,179.0d0,180.0d0,181.0d0,182.0d0,183.0d0, # 184.0d0,185.0d0,186.0d0,187.0d0,188.0d0, # 189.0d0,190.0d0,195.0d0,197.0d0,200.0d0, # 210.0d0,220.0d0,230.0d0,240.0d0,250.0d0, # 260.0d0,270.0d0,280.0d0,290.0d0,300.0d0, # 320.0d0,330.0d0,335.0d0,340.0d0,341.0d0, # 342.0d0,343.0d0,344.0d0,345.0d0,345.3d0, # 345.5d0,345.8d0,346.0d0,347.0d0,348.0d0, # 349.0d0,350.0d0,351.0d0,352.0d0,353.0d0, # 354.0d0,355.0d0,356.0d0,357.0d0,358.0d0, # 359.0d0,360.0d0,370.0d0,380.0d0,390.0d0, # 400.0d0,410.0d0,420.0d0,430.0d0,440.0d0, # 450.0d0,460.0d0,470.0d0,480.0d0,490.0d0, # 500.0d0,510.0d0,520.0d0,530.0d0,540.0d0, # 550.0d0,560.0d0,570.0d0,580.0d0,590.0d0, # 600.0d0,610.0d0,620.0d0,630.0d0,640.0d0, # 650.0d0,660.0d0,670.0d0,680.0d0,690.0d0, # 700.0d0,710.0d0,720.0d0,730.0d0,740.0d0, # 750.0d0,760.0d0,770.0d0,780.0d0,790.0d0, # 800.0d0,810.0d0,820.0d0,830.0d0,840.0d0, # 850.0d0,860.0d0,870.0d0,880.0d0,890.0d0, # 900.0d0,910.0d0,920.0d0,930.0d0,940.0d0, # 950.0d0,960.0d0,970.0d0,980.0d0,990.0d0,1000.0d0, # 1250.d0,1500.d0,1750.d0,2000.d0,2500.d0/ * * delta_EW [%] DATA (yc(l),l= 1,156)/4.183581334d0,4.545978356d0, # 4.941666452d0,5.338524432d0, # 5.710552332d0,5.871305639d0,5.980798334d0,5.989325219d0, # 5.989771990d0,5.979384655d0,5.953749466d0,5.906497163d0, # 5.827835443d0,5.702202128d0,5.507427195d0,5.221327470d0, # 4.861849085d0,4.526867019d0,4.220897196d0,3.877727401d0, # 3.525995801d0,3.200170282d0,2.911100907d0,2.657698720d0, # 2.435102574d0,2.238185021d0,2.061849416d0,1.901483110d0, # 1.753411931d0,1.614301638d0,1.480965572d0,1.348997661d0, # 1.215803604d0,1.074412250d0,0.919019083d0,0.740332966d0, # 0.530749433d0,0.298400521d0,0.077023976d0,-0.102260900d0, # -0.270062463d0,-0.453870620d0,-0.643469731d0,-0.822931558d0, # -0.987443985d0,-1.138691526d0,-1.275416891d0,-1.770985289d0, # -1.910067996d0,-2.073780511d0,-2.387106650d0,-2.506786934d0, # -2.507793900d0,-2.451529121d0,-2.379171774d0,-2.280179838d0, # -2.173130895d0,-2.052273974d0,-1.953341364d0,-1.870193084d0, # -1.795179493d0,-1.874006942d0,-1.991907667d0,-2.212751797d0, # -2.281770963d0,-2.366744787d0,-2.479318144d0,-2.637428316d0, # -2.936192030d0,-3.392136424d0,-3.518873910d0,-3.682965171d0, # -3.718363034d0,-3.872185129d0,-3.990484562d0,-4.003435184d0, # -4.047831469d0,-4.056871742d0,-4.096278566d0,-4.096147175d0, # -4.069660494d0,-4.092229117d0,-4.050384852d0,-4.043310923d0, # -4.021791606d0,-4.007601020d0,-3.922141199d0,-3.576132878d0, # -3.231059452d0,-2.868110119d0,-2.588448565d0,-2.286823317d0, # -1.981203740d0,-1.697922238d0,-1.465949078d0,-1.221405908d0, # -0.997896019d0,-0.787814864d0,-0.603630999d0,-0.385428569d0, # -0.191489219d0,0.012545468d0,0.180344393d0,0.350524042d0, # 0.535367220d0,0.686993292d0,0.894786143d0,1.012194233d0, # 1.192054257d0,1.364029746d0,1.515391057d0,1.655859873d0, # 1.814367096d0,1.961412767d0,2.115811847d0,2.260602653d0, # 2.429881738d0,2.579117247d0,2.705063788d0,2.852512294d0, # 3.013412959d0,3.190250179d0,3.334985916d0,3.458011579d0, # 3.596519369d0,3.772420987d0,3.927207591d0,4.083443432d0, # 4.220565084d0,4.367619511d0,4.540226035d0,4.671279216d0, # 4.822978517d0,5.004941301d0,5.133890543d0,5.317216628d0, # 5.516475363d0,5.649275363d0,5.771911413d0,5.988071980d0, # 6.100250110d0,6.265613527d0,6.437260016d0,6.622288364d0, # 6.781564747d0,6.953709972d0,7.135417771d0,7.291456432d0, # 7.475317109d0,7.623304078d0,7.829501710d0, # 13.64d0,19.37d0,26.44d0,34.53d0,53.90d0/ *