quadrature.f90

module quadrature
! Numerical quadrature related routines/constants
! J.E. Pask, LLNL, 4/07
use types, only: dp
use utils, only: stop_error
implicit none
private
public gauss_pts, gauss_wts, max_gauss_pts, lobatto_pts, lobatto_wts, &
    max_lobatto_pts

integer, parameter:: max_gauss_pts=64, max_lobatto_pts=64

contains

function gauss_pts(n)
! returns Gauss points for n-point quadrature
integer, intent(in):: n ! number of Gauss points
real(dp) gauss_pts(n)    ! Gauss points for n-point quadrature
real(dp) xi(n)
select case(n)
   case(1)
      xi(1)=0.0_dp
   case(2)
      xi(1)=-0.57735026918962576_dp
      xi(2)=0.57735026918962576_dp
   case(3)
      xi(1)=-0.77459666924148338_dp
      xi(2)=0.0_dp
      xi(3)=0.77459666924148338_dp
   case(4)
      xi(1)=-0.86113631159405258_dp
      xi(2)=-0.33998104358485626_dp
      xi(3)=0.33998104358485626_dp
      xi(4)=0.86113631159405258_dp
   case(5)
      xi(1)=-0.90617984593866399_dp
      xi(2)=-0.53846931010568309_dp
      xi(3)=0.0_dp
      xi(4)=0.53846931010568309_dp
      xi(5)=0.90617984593866399_dp
   case(6)
      xi(1)=-0.93246951420315203_dp
      xi(2)=-0.66120938646626451_dp
      xi(3)=-0.23861918608319691_dp
      xi(4)=0.23861918608319691_dp
      xi(5)=0.66120938646626451_dp
      xi(6)=0.93246951420315203_dp
   case(7)
      xi(1)=-0.94910791234275852_dp
      xi(2)=-0.74153118559939444_dp
      xi(3)=-0.40584515137739717_dp
      xi(4)=0.0_dp
      xi(5)=0.40584515137739717_dp
      xi(6)=0.74153118559939444_dp
      xi(7)=0.94910791234275852_dp
   case(8)
      xi(1)=-0.96028985649753623_dp
      xi(2)=-0.79666647741362674_dp
      xi(3)=-0.52553240991632899_dp
      xi(4)=-0.18343464249564980_dp
      xi(5)=0.18343464249564980_dp
      xi(6)=0.52553240991632899_dp
      xi(7)=0.79666647741362674_dp
      xi(8)=0.96028985649753623_dp
   case(9)
      xi(1)=-0.96816023950762609_dp
      xi(2)=-0.83603110732663579_dp
      xi(3)=-0.61337143270059040_dp
      xi(4)=-0.32425342340380893_dp
      xi(5)=0.0_dp
      xi(6)=0.32425342340380893_dp
      xi(7)=0.61337143270059040_dp
      xi(8)=0.83603110732663579_dp
      xi(9)=0.96816023950762609_dp
   case(10)
      xi(1)=-0.97390652851717172_dp
      xi(2)=-0.86506336668898451_dp
      xi(3)=-0.67940956829902441_dp
      xi(4)=-0.43339539412924719_dp
      xi(5)=-0.14887433898163121_dp
      xi(6)=0.14887433898163121_dp
      xi(7)=0.43339539412924719_dp
      xi(8)=0.67940956829902441_dp
      xi(9)=0.86506336668898451_dp
      xi(10)=0.97390652851717172_dp
   case(11)
      xi(1)=-0.97822865814605699_dp
      xi(2)=-0.88706259976809530_dp
      xi(3)=-0.73015200557404932_dp
      xi(4)=-0.51909612920681182_dp
      xi(5)=-0.26954315595234497_dp
      xi(6)=0.0_dp
      xi(7)=0.26954315595234497_dp
      xi(8)=0.51909612920681182_dp
      xi(9)=0.73015200557404932_dp
      xi(10)=0.88706259976809530_dp
      xi(11)=0.97822865814605699_dp
   case(12)
      xi(1)=-0.98156063424671925_dp
      xi(2)=-0.90411725637047486_dp
      xi(3)=-0.76990267419430469_dp
      xi(4)=-0.58731795428661745_dp
      xi(5)=-0.36783149899818019_dp
      xi(6)=-0.12523340851146892_dp
      xi(7)=0.12523340851146892_dp
      xi(8)=0.36783149899818019_dp
      xi(9)=0.58731795428661745_dp
      xi(10)=0.76990267419430469_dp
      xi(11)=0.90411725637047486_dp
      xi(12)=0.98156063424671925_dp
   case(13)
      xi(1)=-0.98418305471858815_dp
      xi(2)=-0.91759839922297797_dp
      xi(3)=-0.80157809073330991_dp
      xi(4)=-0.64234933944034022_dp
      xi(5)=-0.44849275103644685_dp
      xi(6)=-0.23045831595513479_dp
      xi(7)=0.0_dp
      xi(8)=0.23045831595513479_dp
      xi(9)=0.44849275103644685_dp
      xi(10)=0.64234933944034022_dp
      xi(11)=0.80157809073330991_dp
      xi(12)=0.91759839922297797_dp
      xi(13)=0.98418305471858815_dp
   case(14)
      xi(1)=-0.98628380869681234_dp
      xi(2)=-0.92843488366357352_dp
      xi(3)=-0.82720131506976499_dp
      xi(4)=-0.68729290481168547_dp
      xi(5)=-0.51524863635815409_dp
      xi(6)=-0.31911236892788976_dp
      xi(7)=-0.10805494870734366_dp
      xi(8)=0.10805494870734366_dp
      xi(9)=0.31911236892788976_dp
      xi(10)=0.51524863635815409_dp
      xi(11)=0.68729290481168547_dp
      xi(12)=0.82720131506976499_dp
      xi(13)=0.92843488366357352_dp
      xi(14)=0.98628380869681234_dp
   case(15)
      xi(1)=-0.98799251802048543_dp
      xi(2)=-0.93727339240070590_dp
      xi(3)=-0.84820658341042722_dp
      xi(4)=-0.72441773136017005_dp
      xi(5)=-0.57097217260853885_dp
      xi(6)=-0.39415134707756337_dp
      xi(7)=-0.20119409399743452_dp
      xi(8)=0.0_dp
      xi(9)=0.20119409399743452_dp
      xi(10)=0.39415134707756337_dp
      xi(11)=0.57097217260853885_dp
      xi(12)=0.72441773136017005_dp
      xi(13)=0.84820658341042722_dp
      xi(14)=0.93727339240070590_dp
      xi(15)=0.98799251802048543_dp
   case(16)
      xi(1)=-0.98940093499164993_dp
      xi(2)=-0.94457502307323258_dp
      xi(3)=-0.86563120238783174_dp
      xi(4)=-0.75540440835500303_dp
      xi(5)=-0.61787624440264375_dp
      xi(6)=-0.45801677765722739_dp
      xi(7)=-0.28160355077925891_dp
      xi(8)=-0.095012509837637440_dp
      xi(9)=0.095012509837637440_dp
      xi(10)=0.28160355077925891_dp
      xi(11)=0.45801677765722739_dp
      xi(12)=0.61787624440264375_dp
      xi(13)=0.75540440835500303_dp
      xi(14)=0.86563120238783174_dp
      xi(15)=0.94457502307323258_dp
      xi(16)=0.98940093499164993_dp
   case(17)
      xi(1)=-0.99057547531441734_dp
      xi(2)=-0.95067552176876776_dp
      xi(3)=-0.88023915372698590_dp
      xi(4)=-0.78151400389680141_dp
      xi(5)=-0.65767115921669077_dp
      xi(6)=-0.51269053708647697_dp
      xi(7)=-0.35123176345387632_dp
      xi(8)=-0.17848418149584786_dp
      xi(9)=0.0_dp
      xi(10)=0.17848418149584786_dp
      xi(11)=0.35123176345387632_dp
      xi(12)=0.51269053708647697_dp
      xi(13)=0.65767115921669077_dp
      xi(14)=0.78151400389680141_dp
      xi(15)=0.88023915372698590_dp
      xi(16)=0.95067552176876776_dp
      xi(17)=0.99057547531441734_dp
   case(18)
      xi(1)=-0.99156516842093095_dp
      xi(2)=-0.95582394957139776_dp
      xi(3)=-0.89260246649755574_dp
      xi(4)=-0.80370495897252312_dp
      xi(5)=-0.69168704306035321_dp
      xi(6)=-0.55977083107394753_dp
      xi(7)=-0.41175116146284265_dp
      xi(8)=-0.25188622569150551_dp
      xi(9)=-0.084775013041735301_dp
      xi(10)=0.084775013041735301_dp
      xi(11)=0.25188622569150551_dp
      xi(12)=0.41175116146284265_dp
      xi(13)=0.55977083107394753_dp
      xi(14)=0.69168704306035321_dp
      xi(15)=0.80370495897252312_dp
      xi(16)=0.89260246649755574_dp
      xi(17)=0.95582394957139776_dp
      xi(18)=0.99156516842093095_dp
   case(19)
      xi(1)=-0.99240684384358440_dp
      xi(2)=-0.96020815213483003_dp
      xi(3)=-0.90315590361481790_dp
      xi(4)=-0.82271465653714282_dp
      xi(5)=-0.72096617733522938_dp
      xi(6)=-0.60054530466168102_dp
      xi(7)=-0.46457074137596095_dp
      xi(8)=-0.31656409996362983_dp
      xi(9)=-0.16035864564022538_dp
      xi(10)=0.0_dp
      xi(11)=0.16035864564022538_dp
      xi(12)=0.31656409996362983_dp
      xi(13)=0.46457074137596095_dp
      xi(14)=0.60054530466168102_dp
      xi(15)=0.72096617733522938_dp
      xi(16)=0.82271465653714282_dp
      xi(17)=0.90315590361481790_dp
      xi(18)=0.96020815213483003_dp
      xi(19)=0.99240684384358440_dp
   case(20)
      xi(1)=-0.99312859918509492_dp
      xi(2)=-0.96397192727791379_dp
      xi(3)=-0.91223442825132591_dp
      xi(4)=-0.83911697182221882_dp
      xi(5)=-0.74633190646015079_dp
      xi(6)=-0.63605368072651503_dp
      xi(7)=-0.51086700195082710_dp
      xi(8)=-0.37370608871541956_dp
      xi(9)=-0.22778585114164508_dp
      xi(10)=-0.076526521133497334_dp
      xi(11)=0.076526521133497334_dp
      xi(12)=0.22778585114164508_dp
      xi(13)=0.37370608871541956_dp
      xi(14)=0.51086700195082710_dp
      xi(15)=0.63605368072651503_dp
      xi(16)=0.74633190646015079_dp
      xi(17)=0.83911697182221882_dp
      xi(18)=0.91223442825132591_dp
      xi(19)=0.96397192727791379_dp
      xi(20)=0.99312859918509492_dp
   case(21)
      xi(1)=-0.99375217062038950_dp
      xi(2)=-0.96722683856630629_dp
      xi(3)=-0.92009933415040083_dp
      xi(4)=-0.85336336458331728_dp
      xi(5)=-0.76843996347567791_dp
      xi(6)=-0.66713880419741232_dp
      xi(7)=-0.55161883588721981_dp
      xi(8)=-0.42434212020743878_dp
      xi(9)=-0.28802131680240110_dp
      xi(10)=-0.14556185416089509_dp
      xi(11)=0.0_dp
      xi(12)=0.14556185416089509_dp
      xi(13)=0.28802131680240110_dp
      xi(14)=0.42434212020743878_dp
      xi(15)=0.55161883588721981_dp
      xi(16)=0.66713880419741232_dp
      xi(17)=0.76843996347567791_dp
      xi(18)=0.85336336458331728_dp
      xi(19)=0.92009933415040083_dp
      xi(20)=0.96722683856630629_dp
      xi(21)=0.99375217062038950_dp
   case(22)
      xi(1)=-0.99429458548239929_dp
      xi(2)=-0.97006049783542873_dp
      xi(3)=-0.92695677218717400_dp
      xi(4)=-0.86581257772030014_dp
      xi(5)=-0.78781680597920816_dp
      xi(6)=-0.69448726318668278_dp
      xi(7)=-0.58764040350691159_dp
      xi(8)=-0.46935583798675703_dp
      xi(9)=-0.34193582089208423_dp
      xi(10)=-0.20786042668822129_dp
      xi(11)=-0.069739273319722221_dp
      xi(12)=0.069739273319722221_dp
      xi(13)=0.20786042668822129_dp
      xi(14)=0.34193582089208423_dp
      xi(15)=0.46935583798675703_dp
      xi(16)=0.58764040350691159_dp
      xi(17)=0.69448726318668278_dp
      xi(18)=0.78781680597920816_dp
      xi(19)=0.86581257772030014_dp
      xi(20)=0.92695677218717400_dp
      xi(21)=0.97006049783542873_dp
      xi(22)=0.99429458548239929_dp
   case(23)
      xi(1)=-0.99476933499755212_dp
      xi(2)=-0.97254247121811523_dp
      xi(3)=-0.93297108682601610_dp
      xi(4)=-0.87675235827044167_dp
      xi(5)=-0.80488840161883989_dp
      xi(6)=-0.71866136313195019_dp
      xi(7)=-0.61960987576364616_dp
      xi(8)=-0.50950147784600755_dp
      xi(9)=-0.39030103803029083_dp
      xi(10)=-0.26413568097034493_dp
      xi(11)=-0.13325682429846611_dp
      xi(12)=0.0_dp
      xi(13)=0.13325682429846611_dp
      xi(14)=0.26413568097034493_dp
      xi(15)=0.39030103803029083_dp
      xi(16)=0.50950147784600755_dp
      xi(17)=0.61960987576364616_dp
      xi(18)=0.71866136313195019_dp
      xi(19)=0.80488840161883989_dp
      xi(20)=0.87675235827044167_dp
      xi(21)=0.93297108682601610_dp
      xi(22)=0.97254247121811523_dp
      xi(23)=0.99476933499755212_dp
   case(24)
      xi(1)=-0.99518721999702136_dp
      xi(2)=-0.97472855597130950_dp
      xi(3)=-0.93827455200273276_dp
      xi(4)=-0.88641552700440103_dp
      xi(5)=-0.82000198597390292_dp
      xi(6)=-0.74012419157855436_dp
      xi(7)=-0.64809365193697557_dp
      xi(8)=-0.54542147138883954_dp
      xi(9)=-0.43379350762604514_dp
      xi(10)=-0.31504267969616337_dp
      xi(11)=-0.19111886747361631_dp
      xi(12)=-0.064056892862605626_dp
      xi(13)=0.064056892862605626_dp
      xi(14)=0.19111886747361631_dp
      xi(15)=0.31504267969616337_dp
      xi(16)=0.43379350762604514_dp
      xi(17)=0.54542147138883954_dp
      xi(18)=0.64809365193697557_dp
      xi(19)=0.74012419157855436_dp
      xi(20)=0.82000198597390292_dp
      xi(21)=0.88641552700440103_dp
      xi(22)=0.93827455200273276_dp
      xi(23)=0.97472855597130950_dp
      xi(24)=0.99518721999702136_dp
   case(25)
      xi(1)=-0.99555696979049810_dp
      xi(2)=-0.97666392145951751_dp
      xi(3)=-0.94297457122897434_dp
      xi(4)=-0.89499199787827537_dp
      xi(5)=-0.83344262876083400_dp
      xi(6)=-0.75925926303735763_dp
      xi(7)=-0.67356636847346836_dp
      xi(8)=-0.57766293024122297_dp
      xi(9)=-0.47300273144571496_dp
      xi(10)=-0.36117230580938784_dp
      xi(11)=-0.24386688372098843_dp
      xi(12)=-0.12286469261071040_dp
      xi(13)=0.0_dp
      xi(14)=0.12286469261071040_dp
      xi(15)=0.24386688372098843_dp
      xi(16)=0.36117230580938784_dp
      xi(17)=0.47300273144571496_dp
      xi(18)=0.57766293024122297_dp
      xi(19)=0.67356636847346836_dp
      xi(20)=0.75925926303735763_dp
      xi(21)=0.83344262876083400_dp
      xi(22)=0.89499199787827537_dp
      xi(23)=0.94297457122897434_dp
      xi(24)=0.97666392145951751_dp
      xi(25)=0.99555696979049810_dp
   case(26)
      xi(1)=-0.99588570114561693_dp
      xi(2)=-0.97838544595647099_dp
      xi(3)=-0.94715906666171425_dp
      xi(4)=-0.90263786198430707_dp
      xi(5)=-0.84544594278849802_dp
      xi(6)=-0.77638594882067886_dp
      xi(7)=-0.69642726041995726_dp
      xi(8)=-0.60669229301761806_dp
      xi(9)=-0.50844071482450572_dp
      xi(10)=-0.40305175512348631_dp
      xi(11)=-0.29200483948595690_dp
      xi(12)=-0.17685882035689018_dp
      xi(13)=-0.059230093429313207_dp
      xi(14)=0.059230093429313207_dp
      xi(15)=0.17685882035689018_dp
      xi(16)=0.29200483948595690_dp
      xi(17)=0.40305175512348631_dp
      xi(18)=0.50844071482450572_dp
      xi(19)=0.60669229301761806_dp
      xi(20)=0.69642726041995726_dp
      xi(21)=0.77638594882067886_dp
      xi(22)=0.84544594278849802_dp
      xi(23)=0.90263786198430707_dp
      xi(24)=0.94715906666171425_dp
      xi(25)=0.97838544595647099_dp
      xi(26)=0.99588570114561693_dp
   case(27)
      xi(1)=-0.99617926288898857_dp
      xi(2)=-0.97992347596150122_dp
      xi(3)=-0.95090055781470501_dp
      xi(4)=-0.90948232067749110_dp
      xi(5)=-0.85620790801829449_dp
      xi(6)=-0.79177163907050823_dp
      xi(7)=-0.71701347373942370_dp
      xi(8)=-0.63290797194649514_dp
      xi(9)=-0.54055156457945689_dp
      xi(10)=-0.44114825175002688_dp
      xi(11)=-0.33599390363850890_dp
      xi(12)=-0.22645936543953686_dp
      xi(13)=-0.11397258560952997_dp
      xi(14)=0.0_dp
      xi(15)=0.11397258560952997_dp
      xi(16)=0.22645936543953686_dp
      xi(17)=0.33599390363850890_dp
      xi(18)=0.44114825175002688_dp
      xi(19)=0.54055156457945689_dp
      xi(20)=0.63290797194649514_dp
      xi(21)=0.71701347373942370_dp
      xi(22)=0.79177163907050823_dp
      xi(23)=0.85620790801829449_dp
      xi(24)=0.90948232067749110_dp
      xi(25)=0.95090055781470501_dp
      xi(26)=0.97992347596150122_dp
      xi(27)=0.99617926288898857_dp
   case(28)
      xi(1)=-0.99644249757395445_dp
      xi(2)=-0.98130316537087275_dp
      xi(3)=-0.95425928062893820_dp
      xi(4)=-0.91563302639213207_dp
      xi(5)=-0.86589252257439505_dp
      xi(6)=-0.80564137091717917_dp
      xi(7)=-0.73561087801363177_dp
      xi(8)=-0.65665109403886496_dp
      xi(9)=-0.56972047181140172_dp
      xi(10)=-0.47587422495511826_dp
      xi(11)=-0.37625151608907871_dp
      xi(12)=-0.27206162763517808_dp
      xi(13)=-0.16456928213338077_dp
      xi(14)=-0.055079289884034270_dp
      xi(15)=0.055079289884034270_dp
      xi(16)=0.16456928213338077_dp
      xi(17)=0.27206162763517808_dp
      xi(18)=0.37625151608907871_dp
      xi(19)=0.47587422495511826_dp
      xi(20)=0.56972047181140172_dp
      xi(21)=0.65665109403886496_dp
      xi(22)=0.73561087801363177_dp
      xi(23)=0.80564137091717917_dp
      xi(24)=0.86589252257439505_dp
      xi(25)=0.91563302639213207_dp
      xi(26)=0.95425928062893820_dp
      xi(27)=0.98130316537087275_dp
      xi(28)=0.99644249757395445_dp
   case(29)
      xi(1)=-0.99667944226059659_dp
      xi(2)=-0.98254550526141317_dp
      xi(3)=-0.95728559577808773_dp
      xi(4)=-0.92118023295305879_dp
      xi(5)=-0.87463780492010279_dp
      xi(6)=-0.81818548761525244_dp
      xi(7)=-0.75246285173447713_dp
      xi(8)=-0.67821453760268652_dp
      xi(9)=-0.59628179713822782_dp
      xi(10)=-0.50759295512422764_dp
      xi(11)=-0.41315288817400866_dp
      xi(12)=-0.31403163786763993_dp
      xi(13)=-0.21135228616600107_dp
      xi(14)=-0.10627823013267923_dp
      xi(15)=0.0_dp
      xi(16)=0.10627823013267923_dp
      xi(17)=0.21135228616600107_dp
      xi(18)=0.31403163786763993_dp
      xi(19)=0.41315288817400866_dp
      xi(20)=0.50759295512422764_dp
      xi(21)=0.59628179713822782_dp
      xi(22)=0.67821453760268652_dp
      xi(23)=0.75246285173447713_dp
      xi(24)=0.81818548761525244_dp
      xi(25)=0.87463780492010279_dp
      xi(26)=0.92118023295305879_dp
      xi(27)=0.95728559577808773_dp
      xi(28)=0.98254550526141317_dp
      xi(29)=0.99667944226059659_dp
   case(30)
      xi(1)=-0.99689348407464954_dp
      xi(2)=-0.98366812327974721_dp
      xi(3)=-0.96002186496830751_dp
      xi(4)=-0.92620004742927433_dp
      xi(5)=-0.88256053579205268_dp
      xi(6)=-0.82956576238276840_dp
      xi(7)=-0.76777743210482619_dp
      xi(8)=-0.69785049479331580_dp
      xi(9)=-0.62052618298924286_dp
      xi(10)=-0.53662414814201990_dp
      xi(11)=-0.44703376953808918_dp
      xi(12)=-0.35270472553087811_dp
      xi(13)=-0.25463692616788985_dp
      xi(14)=-0.15386991360858355_dp
      xi(15)=-0.051471842555317696_dp
      xi(16)=0.051471842555317696_dp
      xi(17)=0.15386991360858355_dp
      xi(18)=0.25463692616788985_dp
      xi(19)=0.35270472553087811_dp
      xi(20)=0.44703376953808918_dp
      xi(21)=0.53662414814201990_dp
      xi(22)=0.62052618298924286_dp
      xi(23)=0.69785049479331580_dp
      xi(24)=0.76777743210482619_dp
      xi(25)=0.82956576238276840_dp
      xi(26)=0.88256053579205268_dp
      xi(27)=0.92620004742927433_dp
      xi(28)=0.96002186496830751_dp
      xi(29)=0.98366812327974721_dp
      xi(30)=0.99689348407464954_dp
   case(31)
      xi(1)=-0.99708748181947707_dp
      xi(2)=-0.98468590966515248_dp
      xi(3)=-0.96250392509294966_dp
      xi(4)=-0.93075699789664816_dp
      xi(5)=-0.88976002994827104_dp
      xi(6)=-0.83992032014626734_dp
      xi(7)=-0.78173314841662494_dp
      xi(8)=-0.71577678458685328_dp
      xi(9)=-0.64270672292426035_dp
      xi(10)=-0.56324916140714926_dp
      xi(11)=-0.47819378204490248_dp
      xi(12)=-0.38838590160823294_dp
      xi(13)=-0.29471806998170162_dp
      xi(14)=-0.19812119933557063_dp
      xi(15)=-0.099555312152341520_dp
      xi(16)=0.0_dp
      xi(17)=0.099555312152341520_dp
      xi(18)=0.19812119933557063_dp
      xi(19)=0.29471806998170162_dp
      xi(20)=0.38838590160823294_dp
      xi(21)=0.47819378204490248_dp
      xi(22)=0.56324916140714926_dp
      xi(23)=0.64270672292426035_dp
      xi(24)=0.71577678458685328_dp
      xi(25)=0.78173314841662494_dp
      xi(26)=0.83992032014626734_dp
      xi(27)=0.88976002994827104_dp
      xi(28)=0.93075699789664816_dp
      xi(29)=0.96250392509294966_dp
      xi(30)=0.98468590966515248_dp
      xi(31)=0.99708748181947707_dp
   case(32)
      xi(1)=-0.99726386184948156_dp
      xi(2)=-0.98561151154526834_dp
      xi(3)=-0.96476225558750643_dp
      xi(4)=-0.93490607593773969_dp
      xi(5)=-0.89632115576605212_dp
      xi(6)=-0.84936761373256997_dp
      xi(7)=-0.79448379596794241_dp
      xi(8)=-0.73218211874028968_dp
      xi(9)=-0.66304426693021520_dp
      xi(10)=-0.58771575724076233_dp
      xi(11)=-0.50689990893222939_dp
      xi(12)=-0.42135127613063535_dp
      xi(13)=-0.33186860228212765_dp
      xi(14)=-0.23928736225213707_dp
      xi(15)=-0.14447196158279649_dp
      xi(16)=-0.048307665687738316_dp
      xi(17)=0.048307665687738316_dp
      xi(18)=0.14447196158279649_dp
      xi(19)=0.23928736225213707_dp
      xi(20)=0.33186860228212765_dp
      xi(21)=0.42135127613063535_dp
      xi(22)=0.50689990893222939_dp
      xi(23)=0.58771575724076233_dp
      xi(24)=0.66304426693021520_dp
      xi(25)=0.73218211874028968_dp
      xi(26)=0.79448379596794241_dp
      xi(27)=0.84936761373256997_dp
      xi(28)=0.89632115576605212_dp
      xi(29)=0.93490607593773969_dp
      xi(30)=0.96476225558750643_dp
      xi(31)=0.98561151154526834_dp
      xi(32)=0.99726386184948156_dp
   case(33)
      xi(1)=-0.99742469424645522_dp
      xi(2)=-0.98645572623064249_dp
      xi(3)=-0.96682290968999277_dp
      xi(4)=-0.93869437261116835_dp
      xi(5)=-0.90231676774343358_dp
      xi(6)=-0.85800965267650406_dp
      xi(7)=-0.80616235627416659_dp
      xi(8)=-0.74723049644956216_dp
      xi(9)=-0.68173195996974279_dp
      xi(10)=-0.61024234583637903_dp
      xi(11)=-0.53338990478634764_dp
      xi(12)=-0.45185001727245070_dp
      xi(13)=-0.36633925774807334_dp
      xi(14)=-0.27760909715249703_dp
      xi(15)=-0.18643929882799157_dp
      xi(16)=-0.093631065854733386_dp
      xi(17)=0.0_dp
      xi(18)=0.093631065854733386_dp
      xi(19)=0.18643929882799157_dp
      xi(20)=0.27760909715249703_dp
      xi(21)=0.36633925774807334_dp
      xi(22)=0.45185001727245070_dp
      xi(23)=0.53338990478634764_dp
      xi(24)=0.61024234583637903_dp
      xi(25)=0.68173195996974279_dp
      xi(26)=0.74723049644956216_dp
      xi(27)=0.80616235627416659_dp
      xi(28)=0.85800965267650406_dp
      xi(29)=0.90231676774343358_dp
      xi(30)=0.93869437261116835_dp
      xi(31)=0.96682290968999277_dp
      xi(32)=0.98645572623064249_dp
      xi(33)=0.99742469424645522_dp
   case(34)
      xi(1)=-0.99757175379084192_dp
      xi(2)=-0.98722781640630949_dp
      xi(3)=-0.96870826253334428_dp
      xi(4)=-0.94216239740510709_dp
      xi(5)=-0.90780967771832447_dp
      xi(6)=-0.86593463833456447_dp
      xi(7)=-0.81688422790093366_dp
      xi(8)=-0.76106487662987301_dp
      xi(9)=-0.69893911321626291_dp
      xi(10)=-0.63102172708052855_dp
      xi(11)=-0.55787550066974664_dp
      xi(12)=-0.48010654519032703_dp
      xi(13)=-0.39835927775864594_dp
      xi(14)=-0.31331108133946325_dp
      xi(15)=-0.22566669161644948_dp
      xi(16)=-0.13615235725918298_dp
      xi(17)=-0.045509821953102543_dp
      xi(18)=0.045509821953102543_dp
      xi(19)=0.13615235725918298_dp
      xi(20)=0.22566669161644948_dp
      xi(21)=0.31331108133946325_dp
      xi(22)=0.39835927775864594_dp
      xi(23)=0.48010654519032703_dp
      xi(24)=0.55787550066974664_dp
      xi(25)=0.63102172708052855_dp
      xi(26)=0.69893911321626291_dp
      xi(27)=0.76106487662987301_dp
      xi(28)=0.81688422790093366_dp
      xi(29)=0.86593463833456447_dp
      xi(30)=0.90780967771832447_dp
      xi(31)=0.94216239740510709_dp
      xi(32)=0.96870826253334428_dp
      xi(33)=0.98722781640630949_dp
      xi(34)=0.99757175379084192_dp
   case(35)
      xi(1)=-0.99770656909960030_dp
      xi(2)=-0.98793576444385150_dp
      xi(3)=-0.97043761603922983_dp
      xi(4)=-0.94534514820782733_dp
      xi(5)=-0.91285426135931761_dp
      xi(6)=-0.87321912502522233_dp
      xi(7)=-0.82674989909222541_dp
      xi(8)=-0.77381025228691256_dp
      xi(9)=-0.71481450155662878_dp
      xi(10)=-0.65022436466589039_dp
      xi(11)=-0.58054534474976451_dp
      xi(12)=-0.50632277324148862_dp
      xi(13)=-0.42813754151781425_dp
      xi(14)=-0.34660155443081395_dp
      xi(15)=-0.26235294120929606_dp
      xi(16)=-0.17605106116598957_dp
      xi(17)=-0.088371343275659264_dp
      xi(18)=0.0_dp
      xi(19)=0.088371343275659264_dp
      xi(20)=0.17605106116598957_dp
      xi(21)=0.26235294120929606_dp
      xi(22)=0.34660155443081395_dp
      xi(23)=0.42813754151781425_dp
      xi(24)=0.50632277324148862_dp
      xi(25)=0.58054534474976451_dp
      xi(26)=0.65022436466589039_dp
      xi(27)=0.71481450155662878_dp
      xi(28)=0.77381025228691256_dp
      xi(29)=0.82674989909222541_dp
      xi(30)=0.87321912502522233_dp
      xi(31)=0.91285426135931761_dp
      xi(32)=0.94534514820782733_dp
      xi(33)=0.97043761603922983_dp
      xi(34)=0.98793576444385150_dp
      xi(35)=0.99770656909960030_dp
   case(36)
      xi(1)=-0.99783046248408584_dp
      xi(2)=-0.98858647890221224_dp
      xi(3)=-0.97202769104969795_dp
      xi(4)=-0.94827298439950755_dp
      xi(5)=-0.91749777451565907_dp
      xi(6)=-0.87992980089039713_dp
      xi(7)=-0.83584716699247531_dp
      xi(8)=-0.78557623013220651_dp
      xi(9)=-0.72948917159355658_dp
      xi(10)=-0.66800123658552106_dp
      xi(11)=-0.60156765813598054_dp
      xi(12)=-0.53068028592624516_dp
      xi(13)=-0.45586394443342027_dp
      xi(14)=-0.37767254711968922_dp
      xi(15)=-0.29668499534402827_dp
      xi(16)=-0.21350089231686558_dp
      xi(17)=-0.12873610380938479_dp
      xi(18)=-0.043018198473708607_dp
      xi(19)=0.043018198473708607_dp
      xi(20)=0.12873610380938479_dp
      xi(21)=0.21350089231686558_dp
      xi(22)=0.29668499534402827_dp
      xi(23)=0.37767254711968922_dp
      xi(24)=0.45586394443342027_dp
      xi(25)=0.53068028592624516_dp
      xi(26)=0.60156765813598054_dp
      xi(27)=0.66800123658552106_dp
      xi(28)=0.72948917159355658_dp
      xi(29)=0.78557623013220651_dp
      xi(30)=0.83584716699247531_dp
      xi(31)=0.87992980089039713_dp
      xi(32)=0.91749777451565907_dp
      xi(33)=0.94827298439950755_dp
      xi(34)=0.97202769104969795_dp
      xi(35)=0.98858647890221224_dp
      xi(36)=0.99783046248408584_dp
   case(37)
      xi(1)=-0.99794458247791365_dp
      xi(2)=-0.98918596321431919_dp
      xi(3)=-0.97349303005648574_dp
      xi(4)=-0.95097234326209482_dp
      xi(5)=-0.92178143741246374_dp
      xi(6)=-0.88612496215548608_dp
      xi(7)=-0.84425298734055597_dp
      xi(8)=-0.79645920050990229_dp
      xi(9)=-0.74307883398196526_dp
      xi(10)=-0.68448630913095936_dp
      xi(11)=-0.62109260840892448_dp
      xi(12)=-0.55334239186158178_dp
      xi(13)=-0.48171087780320555_dp
      xi(14)=-0.40670050931832611_dp
      xi(15)=-0.32883742988370700_dp
      xi(16)=-0.24866779279136576_dp
      xi(17)=-0.16675393023985198_dp
      xi(18)=-0.083670408954769902_dp
      xi(19)=0.0_dp
      xi(20)=0.083670408954769902_dp
      xi(21)=0.16675393023985198_dp
      xi(22)=0.24866779279136576_dp
      xi(23)=0.32883742988370700_dp
      xi(24)=0.40670050931832611_dp
      xi(25)=0.48171087780320555_dp
      xi(26)=0.55334239186158178_dp
      xi(27)=0.62109260840892448_dp
      xi(28)=0.68448630913095936_dp
      xi(29)=0.74307883398196526_dp
      xi(30)=0.79645920050990229_dp
      xi(31)=0.84425298734055597_dp
      xi(32)=0.88612496215548608_dp
      xi(33)=0.92178143741246374_dp
      xi(34)=0.95097234326209482_dp
      xi(35)=0.97349303005648574_dp
      xi(36)=0.98918596321431919_dp
      xi(37)=0.99794458247791365_dp
   case(38)
      xi(1)=-0.99804993053568762_dp
      xi(2)=-0.98973945426638557_dp
      xi(3)=-0.97484632859015351_dp
      xi(4)=-0.95346633093352960_dp
      xi(5)=-0.92574133204858440_dp
      xi(6)=-0.89185573900463222_dp
      xi(7)=-0.85203502193236219_dp
      xi(8)=-0.80654416760531682_dp
      xi(9)=-0.75568590375397068_dp
      xi(10)=-0.69979868037918436_dp
      xi(11)=-0.63925441582968171_dp
      xi(12)=-0.57445602104780708_dp
      xi(13)=-0.50583471792793110_dp
      xi(14)=-0.43384716943237648_dp
      xi(15)=-0.35897244047943501_dp
      xi(16)=-0.28170880979016526_dp
      xi(17)=-0.20257045389211670_dp
      xi(18)=-0.12208402533786742_dp
      xi(19)=-0.040785147904578240_dp
      xi(20)=0.040785147904578240_dp
      xi(21)=0.12208402533786742_dp
      xi(22)=0.20257045389211670_dp
      xi(23)=0.28170880979016526_dp
      xi(24)=0.35897244047943501_dp
      xi(25)=0.43384716943237648_dp
      xi(26)=0.50583471792793110_dp
      xi(27)=0.57445602104780708_dp
      xi(28)=0.63925441582968171_dp
      xi(29)=0.69979868037918436_dp
      xi(30)=0.75568590375397068_dp
      xi(31)=0.80654416760531682_dp
      xi(32)=0.85203502193236219_dp
      xi(33)=0.89185573900463222_dp
      xi(34)=0.92574133204858440_dp
      xi(35)=0.95346633093352960_dp
      xi(36)=0.97484632859015351_dp
      xi(37)=0.98973945426638557_dp
      xi(38)=0.99804993053568762_dp
   case(39)
      xi(1)=-0.99814738306643291_dp
      xi(2)=-0.99025153685468598_dp
      xi(3)=-0.97609870933347105_dp
      xi(4)=-0.95577521232465228_dp
      xi(5)=-0.92940914848673823_dp
      xi(6)=-0.89716711929299289_dp
      xi(7)=-0.85925293799990615_dp
      xi(8)=-0.81590629743014310_dp
      xi(9)=-0.76740124293106350_dp
      xi(10)=-0.71404443589453468_dp
      xi(11)=-0.65617321343201091_dp
      xi(12)=-0.59415345495727799_dp
      xi(13)=-0.52837726866043747_dp
      xi(14)=-0.45926051230913605_dp
      xi(15)=-0.38724016397156146_dp
      xi(16)=-0.31277155924818592_dp
      xi(17)=-0.23632551246183577_dp
      xi(18)=-0.15838533999783780_dp
      xi(19)=-0.079443804608755478_dp
      xi(20)=0.0_dp
      xi(21)=0.079443804608755478_dp
      xi(22)=0.15838533999783780_dp
      xi(23)=0.23632551246183577_dp
      xi(24)=0.31277155924818592_dp
      xi(25)=0.38724016397156146_dp
      xi(26)=0.45926051230913605_dp
      xi(27)=0.52837726866043747_dp
      xi(28)=0.59415345495727799_dp
      xi(29)=0.65617321343201091_dp
      xi(30)=0.71404443589453468_dp
      xi(31)=0.76740124293106350_dp
      xi(32)=0.81590629743014310_dp
      xi(33)=0.85925293799990615_dp
      xi(34)=0.89716711929299289_dp
      xi(35)=0.92940914848673823_dp
      xi(36)=0.95577521232465228_dp
      xi(37)=0.97609870933347105_dp
      xi(38)=0.99025153685468598_dp
      xi(39)=0.99814738306643291_dp
   case(40)
      xi(1)=-0.99823770971055920_dp
      xi(2)=-0.99072623869945701_dp
      xi(3)=-0.97725994998377426_dp
      xi(4)=-0.95791681921379166_dp
      xi(5)=-0.93281280827867653_dp
      xi(6)=-0.90209880696887430_dp
      xi(7)=-0.86595950321225950_dp
      xi(8)=-0.82461223083331166_dp
      xi(9)=-0.77830565142651939_dp
      xi(10)=-0.72731825518992710_dp
      xi(11)=-0.67195668461417955_dp
      xi(12)=-0.61255388966798024_dp
      xi(13)=-0.54946712509512820_dp
      xi(14)=-0.48307580168617871_dp
      xi(15)=-0.41377920437160500_dp
      xi(16)=-0.34199409082575847_dp
      xi(17)=-0.26815218500725368_dp
      xi(18)=-0.19269758070137110_dp
      xi(19)=-0.11608407067525521_dp
      xi(20)=-0.038772417506050822_dp
      xi(21)=0.038772417506050822_dp
      xi(22)=0.11608407067525521_dp
      xi(23)=0.19269758070137110_dp
      xi(24)=0.26815218500725368_dp
      xi(25)=0.34199409082575847_dp
      xi(26)=0.41377920437160500_dp
      xi(27)=0.48307580168617871_dp
      xi(28)=0.54946712509512820_dp
      xi(29)=0.61255388966798024_dp
      xi(30)=0.67195668461417955_dp
      xi(31)=0.72731825518992710_dp
      xi(32)=0.77830565142651939_dp
      xi(33)=0.82461223083331166_dp
      xi(34)=0.86595950321225950_dp
      xi(35)=0.90209880696887430_dp
      xi(36)=0.93281280827867653_dp
      xi(37)=0.95791681921379166_dp
      xi(38)=0.97725994998377426_dp
      xi(39)=0.99072623869945701_dp
      xi(40)=0.99823770971055920_dp
   case(41)
      xi(1)=-0.99832158857477144_dp
      xi(2)=-0.99116710969901631_dp
      xi(3)=-0.97833867356108338_dp
      xi(4)=-0.95990689173034623_dp
      xi(5)=-0.93597698749785383_dp
      xi(6)=-0.90668594475810117_dp
      xi(7)=-0.87220151169244141_dp
      xi(8)=-0.83272120040136133_dp
      xi(9)=-0.78847114504740937_dp
      xi(10)=-0.73970480306992618_dp
      xi(11)=-0.68670150203495129_dp
      xi(12)=-0.62976483907219632_dp
      xi(13)=-0.56922094161021587_dp
      xi(14)=-0.50541659919940603_dp
      xi(15)=-0.43871727705140709_dp
      xi(16)=-0.36950502264048144_dp
      xi(17)=-0.29817627734182487_dp
      xi(18)=-0.22513960563342278_dp
      xi(19)=-0.15081335486399216_dp
      xi(20)=-0.075623258989162997_dp
      xi(21)=0.0_dp
      xi(22)=0.075623258989162997_dp
      xi(23)=0.15081335486399216_dp
      xi(24)=0.22513960563342278_dp
      xi(25)=0.29817627734182487_dp
      xi(26)=0.36950502264048144_dp
      xi(27)=0.43871727705140709_dp
      xi(28)=0.50541659919940603_dp
      xi(29)=0.56922094161021587_dp
      xi(30)=0.62976483907219632_dp
      xi(31)=0.68670150203495129_dp
      xi(32)=0.73970480306992618_dp
      xi(33)=0.78847114504740937_dp
      xi(34)=0.83272120040136133_dp
      xi(35)=0.87220151169244141_dp
      xi(36)=0.90668594475810117_dp
      xi(37)=0.93597698749785383_dp
      xi(38)=0.95990689173034623_dp
      xi(39)=0.97833867356108338_dp
      xi(40)=0.99116710969901631_dp
      xi(41)=0.99832158857477144_dp
   case(42)
      xi(1)=-0.99839961899006242_dp
      xi(2)=-0.99157728834086092_dp
      xi(3)=-0.97934250806374819_dp
      xi(4)=-0.96175936533820449_dp
      xi(5)=-0.93892355735498818_dp
      xi(6)=-0.91095972490412745_dp
      xi(7)=-0.87802056981217274_dp
      xi(8)=-0.84028598326181690_dp
      xi(9)=-0.79796205325548741_dp
      xi(10)=-0.75127993568948049_dp
      xi(11)=-0.70049459055617121_dp
      xi(12)=-0.64588338886924783_dp
      xi(13)=-0.58774459748510932_dp
      xi(14)=-0.52639574993119229_dp
      xi(15)=-0.46217191207042193_dp
      xi(16)=-0.39542385204297506_dp
      xi(17)=-0.32651612446541151_dp
      xi(18)=-0.25582507934287908_dp
      xi(19)=-0.18373680656485455_dp
      xi(20)=-0.11064502720851987_dp
      xi(21)=-0.036948943165351776_dp
      xi(22)=0.036948943165351776_dp
      xi(23)=0.11064502720851987_dp
      xi(24)=0.18373680656485455_dp
      xi(25)=0.25582507934287908_dp
      xi(26)=0.32651612446541151_dp
      xi(27)=0.39542385204297506_dp
      xi(28)=0.46217191207042193_dp
      xi(29)=0.52639574993119229_dp
      xi(30)=0.58774459748510932_dp
      xi(31)=0.64588338886924783_dp
      xi(32)=0.70049459055617121_dp
      xi(33)=0.75127993568948049_dp
      xi(34)=0.79796205325548741_dp
      xi(35)=0.84028598326181690_dp
      xi(36)=0.87802056981217274_dp
      xi(37)=0.91095972490412745_dp
      xi(38)=0.93892355735498818_dp
      xi(39)=0.96175936533820449_dp
      xi(40)=0.97934250806374819_dp
      xi(41)=0.99157728834086092_dp
      xi(42)=0.99839961899006242_dp
   case(43)
      xi(1)=-0.99847233224250771_dp
      xi(2)=-0.99195955759324415_dp
      xi(3)=-0.98027822098025533_dp
      xi(4)=-0.96348661301407999_dp
      xi(5)=-0.94167195684763786_dp
      xi(6)=-0.91494790720613873_dp
      xi(7)=-0.88345376521861686_dp
      xi(8)=-0.84735371620931505_dp
      xi(9)=-0.80683596413693864_dp
      xi(10)=-0.76211174719495512_dp
      xi(11)=-0.71341423526895705_dp
      xi(12)=-0.66099731375149813_dp
      xi(13)=-0.60513425963960094_dp
      xi(14)=-0.54611631666008472_dp
      xi(15)=-0.48425117678573472_dp
      xi(16)=-0.41986137602926925_dp
      xi(17)=-0.35328261286430381_dp
      xi(18)=-0.28486199803291363_dp
      xi(19)=-0.21495624486051821_dp
      xi(20)=-0.14392980951071331_dp
      xi(21)=-0.072152990874586235_dp
      xi(22)=0.0_dp
      xi(23)=0.072152990874586235_dp
      xi(24)=0.14392980951071331_dp
      xi(25)=0.21495624486051821_dp
      xi(26)=0.28486199803291363_dp
      xi(27)=0.35328261286430381_dp
      xi(28)=0.41986137602926925_dp
      xi(29)=0.48425117678573472_dp
      xi(30)=0.54611631666008472_dp
      xi(31)=0.60513425963960094_dp
      xi(32)=0.66099731375149813_dp
      xi(33)=0.71341423526895705_dp
      xi(34)=0.76211174719495512_dp
      xi(35)=0.80683596413693864_dp
      xi(36)=0.84735371620931505_dp
      xi(37)=0.88345376521861686_dp
      xi(38)=0.91494790720613873_dp
      xi(39)=0.94167195684763786_dp
      xi(40)=0.96348661301407999_dp
      xi(41)=0.98027822098025533_dp
      xi(42)=0.99195955759324415_dp
      xi(43)=0.99847233224250771_dp
   case(44)
      xi(1)=-0.99854020063677422_dp
      xi(2)=-0.99231639213851581_dp
      xi(3)=-0.98115183307791397_dp
      xi(4)=-0.96509965042249314_dp
      xi(5)=-0.94423950911819410_dp
      xi(6)=-0.91867525998417577_dp
      xi(7)=-0.88853423828604320_dp
      xi(8)=-0.85396659500471038_dp
      xi(9)=-0.81514453964513501_dp
      xi(10)=-0.77226147924875590_dp
      xi(11)=-0.72553105366071700_dp
      xi(12)=-0.67518607066612237_dp
      xi(13)=-0.62147734590357585_dp
      xi(14)=-0.56467245318547077_dp
      xi(15)=-0.50505439138820232_dp
      xi(16)=-0.44292017452541148_dp
      xi(17)=-0.37857935201470713_dp
      xi(18)=-0.31235246650278581_dp
      xi(19)=-0.24456945692820125_dp
      xi(20)=-0.17556801477551679_dp
      xi(21)=-0.10569190170865325_dp
      xi(22)=-0.035289236964135359_dp
      xi(23)=0.035289236964135359_dp
      xi(24)=0.10569190170865325_dp
      xi(25)=0.17556801477551679_dp
      xi(26)=0.24456945692820125_dp
      xi(27)=0.31235246650278581_dp
      xi(28)=0.37857935201470713_dp
      xi(29)=0.44292017452541148_dp
      xi(30)=0.50505439138820232_dp
      xi(31)=0.56467245318547077_dp
      xi(32)=0.62147734590357585_dp
      xi(33)=0.67518607066612237_dp
      xi(34)=0.72553105366071700_dp
      xi(35)=0.77226147924875590_dp
      xi(36)=0.81514453964513501_dp
      xi(37)=0.85396659500471038_dp
      xi(38)=0.88853423828604320_dp
      xi(39)=0.91867525998417577_dp
      xi(40)=0.94423950911819410_dp
      xi(41)=0.96509965042249314_dp
      xi(42)=0.98115183307791397_dp
      xi(43)=0.99231639213851581_dp
      xi(44)=0.99854020063677422_dp
   case(45)
      xi(1)=-0.99860364518193664_dp
      xi(2)=-0.99264999844720374_dp
      xi(3)=-0.98196871503454057_dp
      xi(4)=-0.96660831039689460_dp
      xi(5)=-0.94664169099562906_dp
      xi(6)=-0.92216393671900039_dp
      xi(7)=-0.89329167175324174_dp
      xi(8)=-0.86016247596066423_dp
      xi(9)=-0.82293422050208634_dp
      xi(10)=-0.78178431259390629_dp
      xi(11)=-0.73690884894549035_dp
      xi(12)=-0.68852168077120053_dp
      xi(13)=-0.63685339445322336_dp
      xi(14)=-0.58215021256935319_dp
      xi(15)=-0.52467282046291607_dp
      xi(16)=-0.46469512391963510_dp
      xi(17)=-0.40250294385854191_dp
      xi(18)=-0.33839265425060216_dp
      xi(19)=-0.27266976975237756_dp
      xi(20)=-0.20564748978326375_dp
      xi(21)=-0.13764520598325303_dp
      xi(22)=-0.068986980163144172_dp
      xi(23)=0.0_dp
      xi(24)=0.068986980163144172_dp
      xi(25)=0.13764520598325303_dp
      xi(26)=0.20564748978326375_dp
      xi(27)=0.27266976975237756_dp
      xi(28)=0.33839265425060216_dp
      xi(29)=0.40250294385854191_dp
      xi(30)=0.46469512391963510_dp
      xi(31)=0.52467282046291607_dp
      xi(32)=0.58215021256935319_dp
      xi(33)=0.63685339445322336_dp
      xi(34)=0.68852168077120053_dp
      xi(35)=0.73690884894549035_dp
      xi(36)=0.78178431259390629_dp
      xi(37)=0.82293422050208634_dp
      xi(38)=0.86016247596066423_dp
      xi(39)=0.89329167175324174_dp
      xi(40)=0.92216393671900039_dp
      xi(41)=0.94664169099562906_dp
      xi(42)=0.96660831039689460_dp
      xi(43)=0.98196871503454057_dp
      xi(44)=0.99264999844720374_dp
      xi(45)=0.99860364518193664_dp
   case(46)
      xi(1)=-0.99866304213381798_dp
      xi(2)=-0.99296234890617436_dp
      xi(3)=-0.98273366980416686_dp
      xi(4)=-0.96802139185399194_dp
      xi(5)=-0.94889236344608980_dp
      xi(6)=-0.92543379880675395_dp
      xi(7)=-0.89775271153394197_dp
      xi(8)=-0.86597539486685806_dp
      xi(9)=-0.83024683706606605_dp
      xi(10)=-0.79073005707527426_dp
      xi(11)=-0.74760535961566605_dp
      xi(12)=-0.70106951202040570_dp
      xi(13)=-0.65133484620199772_dp
      xi(14)=-0.59862828971271515_dp
      xi(15)=-0.54319033026180264_dp
      xi(16)=-0.48527391838816466_dp
      xi(17)=-0.42514331328282840_dp
      xi(18)=-0.36307287702099571_dp
      xi(19)=-0.29934582270187002_dp
      xi(20)=-0.23425292220626977_dp
      xi(21)=-0.16809117946710353_dp
      xi(22)=-0.10116247530558424_dp
      xi(23)=-0.033772190016052042_dp
      xi(24)=0.033772190016052042_dp
      xi(25)=0.10116247530558424_dp
      xi(26)=0.16809117946710353_dp
      xi(27)=0.23425292220626977_dp
      xi(28)=0.29934582270187002_dp
      xi(29)=0.36307287702099571_dp
      xi(30)=0.42514331328282840_dp
      xi(31)=0.48527391838816466_dp
      xi(32)=0.54319033026180264_dp
      xi(33)=0.59862828971271515_dp
      xi(34)=0.65133484620199772_dp
      xi(35)=0.70106951202040570_dp
      xi(36)=0.74760535961566605_dp
      xi(37)=0.79073005707527426_dp
      xi(38)=0.83024683706606605_dp
      xi(39)=0.86597539486685806_dp
      xi(40)=0.89775271153394197_dp
      xi(41)=0.92543379880675395_dp
      xi(42)=0.94889236344608980_dp
      xi(43)=0.96802139185399194_dp
      xi(44)=0.98273366980416686_dp
      xi(45)=0.99296234890617436_dp
      xi(46)=0.99866304213381798_dp
   case(47)
      xi(1)=-0.99871872858421211_dp
      xi(2)=-0.99325521098776863_dp
      xi(3)=-0.98345100307162371_dp
      xi(4)=-0.96934678732656450_dp
      xi(5)=-0.95100396925770844_dp
      xi(6)=-0.92850269301236065_dp
      xi(7)=-0.90194132943852536_dp
      xi(8)=-0.87143601579689632_dp
      xi(9)=-0.83712013989990212_dp
      xi(10)=-0.79914375416774194_dp
      xi(11)=-0.75767291844543863_dp
      xi(12)=-0.71288897340906430_dp
      xi(13)=-0.66498774739033273_dp
      xi(14)=-0.61417869995637361_dp
      xi(15)=-0.56068400593466419_dp
      xi(16)=-0.50473758386357792_dp
      xi(17)=-0.44658407310485570_dp
      xi(18)=-0.38647776408466714_dp
      xi(19)=-0.32468148633773590_dp
      xi(20)=-0.26146545921497457_dp
      xi(21)=-0.19710611027911181_dp
      xi(22)=-0.13188486655451490_dp
      xi(23)=-0.066086923916355675_dp
      xi(24)=0.0_dp
      xi(25)=0.066086923916355675_dp
      xi(26)=0.13188486655451490_dp
      xi(27)=0.19710611027911181_dp
      xi(28)=0.26146545921497457_dp
      xi(29)=0.32468148633773590_dp
      xi(30)=0.38647776408466714_dp
      xi(31)=0.44658407310485570_dp
      xi(32)=0.50473758386357792_dp
      xi(33)=0.56068400593466419_dp
      xi(34)=0.61417869995637361_dp
      xi(35)=0.66498774739033273_dp
      xi(36)=0.71288897340906430_dp
      xi(37)=0.75767291844543863_dp
      xi(38)=0.79914375416774194_dp
      xi(39)=0.83712013989990212_dp
      xi(40)=0.87143601579689632_dp
      xi(41)=0.90194132943852536_dp
      xi(42)=0.92850269301236065_dp
      xi(43)=0.95100396925770844_dp
      xi(44)=0.96934678732656450_dp
      xi(45)=0.98345100307162371_dp
      xi(46)=0.99325521098776863_dp
      xi(47)=0.99871872858421211_dp
   case(48)
      xi(1)=-0.99877100725242612_dp
      xi(2)=-0.99353017226635076_dp
      xi(3)=-0.98412458372282686_dp
      xi(4)=-0.97059159254624725_dp
      xi(5)=-0.95298770316043086_dp
      xi(6)=-0.93138669070655433_dp
      xi(7)=-0.90587913671556967_dp
      xi(8)=-0.87657202027424789_dp
      xi(9)=-0.84358826162439353_dp
      xi(10)=-0.80706620402944263_dp
      xi(11)=-0.76715903251574034_dp
      xi(12)=-0.72403413092381465_dp
      xi(13)=-0.67787237963266391_dp
      xi(14)=-0.62886739677651362_dp
      xi(15)=-0.57722472608397270_dp
      xi(16)=-0.52316097472223303_dp
      xi(17)=-0.46690290475095840_dp
      xi(18)=-0.40868648199071673_dp
      xi(19)=-0.34875588629216074_dp
      xi(20)=-0.28736248735545558_dp
      xi(21)=-0.22476379039468906_dp
      xi(22)=-0.16122235606889172_dp
      xi(23)=-0.097004699209462699_dp
      xi(24)=-0.032380170962869362_dp
      xi(25)=0.032380170962869362_dp
      xi(26)=0.097004699209462699_dp
      xi(27)=0.16122235606889172_dp
      xi(28)=0.22476379039468906_dp
      xi(29)=0.28736248735545558_dp
      xi(30)=0.34875588629216074_dp
      xi(31)=0.40868648199071673_dp
      xi(32)=0.46690290475095840_dp
      xi(33)=0.52316097472223303_dp
      xi(34)=0.57722472608397270_dp
      xi(35)=0.62886739677651362_dp
      xi(36)=0.67787237963266391_dp
      xi(37)=0.72403413092381465_dp
      xi(38)=0.76715903251574034_dp
      xi(39)=0.80706620402944263_dp
      xi(40)=0.84358826162439353_dp
      xi(41)=0.87657202027424789_dp
      xi(42)=0.90587913671556967_dp
      xi(43)=0.93138669070655433_dp
      xi(44)=0.95298770316043086_dp
      xi(45)=0.97059159254624725_dp
      xi(46)=0.98412458372282686_dp
      xi(47)=0.99353017226635076_dp
      xi(48)=0.99877100725242612_dp
   case(49)
      xi(1)=-0.99882015060663538_dp
      xi(2)=-0.99378866194416779_dp
      xi(3)=-0.98475789591421300_dp
      xi(4)=-0.97176220090155538_dp
      xi(5)=-0.95485365867413723_dp
      xi(6)=-0.93410029475581015_dp
      xi(7)=-0.90958565582807329_dp
      xi(8)=-0.88140844557300891_dp
      xi(9)=-0.84968211984416570_dp
      xi(10)=-0.81453442735985543_dp
      xi(11)=-0.77610689434544664_dp
      xi(12)=-0.73455425423740270_dp
      xi(13)=-0.69004382442513211_dp
      xi(14)=-0.64275483241923766_dp
      xi(15)=-0.59287769410890071_dp
      xi(16)=-0.54061324699172607_dp
      xi(17)=-0.48617194145249204_dp
      xi(18)=-0.42977299334157652_dp
      xi(19)=-0.37164350126228489_dp
      xi(20)=-0.31201753211974876_dp
      xi(21)=-0.25113517861257727_dp
      xi(22)=-0.18924159246181359_dp
      xi(23)=-0.12658599726967205_dp
      xi(24)=-0.063420684982686786_dp
      xi(25)=0.0_dp
      xi(26)=0.063420684982686786_dp
      xi(27)=0.12658599726967205_dp
      xi(28)=0.18924159246181359_dp
      xi(29)=0.25113517861257727_dp
      xi(30)=0.31201753211974876_dp
      xi(31)=0.37164350126228489_dp
      xi(32)=0.42977299334157652_dp
      xi(33)=0.48617194145249204_dp
      xi(34)=0.54061324699172607_dp
      xi(35)=0.59287769410890071_dp
      xi(36)=0.64275483241923766_dp
      xi(37)=0.69004382442513211_dp
      xi(38)=0.73455425423740270_dp
      xi(39)=0.77610689434544664_dp
      xi(40)=0.81453442735985543_dp
      xi(41)=0.84968211984416570_dp
      xi(42)=0.88140844557300891_dp
      xi(43)=0.90958565582807329_dp
      xi(44)=0.93410029475581015_dp
      xi(45)=0.95485365867413723_dp
      xi(46)=0.97176220090155538_dp
      xi(47)=0.98475789591421300_dp
      xi(48)=0.99378866194416779_dp
      xi(49)=0.99882015060663538_dp
   case(50)
      xi(1)=-0.99886640442007105_dp
      xi(2)=-0.99403196943209071_dp
      xi(3)=-0.98535408404800588_dp
      xi(4)=-0.97286438510669207_dp
      xi(5)=-0.95661095524280794_dp
      xi(6)=-0.93665661894487793_dp
      xi(7)=-0.91307855665579189_dp
      xi(8)=-0.88596797952361305_dp
      xi(9)=-0.85542976942994608_dp
      xi(10)=-0.82158207085933595_dp
      xi(11)=-0.78455583290039926_dp
      xi(12)=-0.74449430222606854_dp
      xi(13)=-0.70155246870682225_dp
      xi(14)=-0.65589646568543936_dp
      xi(15)=-0.60770292718495024_dp
      xi(16)=-0.55715830451465005_dp
      xi(17)=-0.50445814490746420_dp
      xi(18)=-0.44980633497403879_dp
      xi(19)=-0.39341431189756513_dp
      xi(20)=-0.33550024541943736_dp
      xi(21)=-0.27628819377953199_dp
      xi(22)=-0.21600723687604176_dp
      xi(23)=-0.15489058999814590_dp
      xi(24)=-0.093174701560086141_dp
      xi(25)=-0.031098338327188876_dp
      xi(26)=0.031098338327188876_dp
      xi(27)=0.093174701560086141_dp
      xi(28)=0.15489058999814590_dp
      xi(29)=0.21600723687604176_dp
      xi(30)=0.27628819377953199_dp
      xi(31)=0.33550024541943736_dp
      xi(32)=0.39341431189756513_dp
      xi(33)=0.44980633497403879_dp
      xi(34)=0.50445814490746420_dp
      xi(35)=0.55715830451465005_dp
      xi(36)=0.60770292718495024_dp
      xi(37)=0.65589646568543936_dp
      xi(38)=0.70155246870682225_dp
      xi(39)=0.74449430222606854_dp
      xi(40)=0.78455583290039926_dp
      xi(41)=0.82158207085933595_dp
      xi(42)=0.85542976942994608_dp
      xi(43)=0.88596797952361305_dp
      xi(44)=0.91307855665579189_dp
      xi(45)=0.93665661894487793_dp
      xi(46)=0.95661095524280794_dp
      xi(47)=0.97286438510669207_dp
      xi(48)=0.98535408404800588_dp
      xi(49)=0.99403196943209071_dp
      xi(50)=0.99886640442007105_dp
   case(51)
      xi(1)=-0.99890999084890350_dp
      xi(2)=-0.99426126043675257_dp
      xi(3)=-0.98591599173590300_dp
      xi(4)=-0.97390336801932387_dp
      xi(5)=-0.95826784861390819_dp
      xi(6)=-0.93906754400296238_dp
      xi(7)=-0.91637386230978023_dp
      xi(8)=-0.89027121802952730_dp
      xi(9)=-0.86085671118229237_dp
      xi(10)=-0.82823976382306483_dp
      xi(11)=-0.79254171209938121_dp
      xi(12)=-0.75389535448537553_dp
      xi(13)=-0.71244445757703664_dp
      xi(14)=-0.66834322117537009_dp
      xi(15)=-0.62175570460072327_dp
      xi(16)=-0.57285521635130384_dp
      xi(17)=-0.52182366936618584_dp
      xi(18)=-0.46885090428604106_dp
      xi(19)=-0.41413398322630388_dp
      xi(20)=-0.35787645668840951_dp
      xi(21)=-0.30028760633533194_dp
      xi(22)=-0.24158166644779870_dp
      xi(23)=-0.18197702695707755_dp
      xi(24)=-0.12169542101888877_dp
      xi(25)=-0.060961100150578725_dp
      xi(26)=0.0_dp
      xi(27)=0.060961100150578725_dp
      xi(28)=0.12169542101888877_dp
      xi(29)=0.18197702695707755_dp
      xi(30)=0.24158166644779870_dp
      xi(31)=0.30028760633533194_dp
      xi(32)=0.35787645668840951_dp
      xi(33)=0.41413398322630388_dp
      xi(34)=0.46885090428604106_dp
      xi(35)=0.52182366936618584_dp
      xi(36)=0.57285521635130384_dp
      xi(37)=0.62175570460072327_dp
      xi(38)=0.66834322117537009_dp
      xi(39)=0.71244445757703664_dp
      xi(40)=0.75389535448537553_dp
      xi(41)=0.79254171209938121_dp
      xi(42)=0.82823976382306483_dp
      xi(43)=0.86085671118229237_dp
      xi(44)=0.89027121802952730_dp
      xi(45)=0.91637386230978023_dp
      xi(46)=0.93906754400296238_dp
      xi(47)=0.95826784861390819_dp
      xi(48)=0.97390336801932387_dp
      xi(49)=0.98591599173590300_dp
      xi(50)=0.99426126043675257_dp
      xi(51)=0.99890999084890350_dp
   case(52)
      xi(1)=-0.99895111110395028_dp
      xi(2)=-0.99447759092921603_dp
      xi(3)=-0.98644619565154984_dp
      xi(4)=-0.97488388422174450_dp
      xi(5)=-0.95983182693308655_dp
      xi(6)=-0.94134385364135906_dp
      xi(7)=-0.91948612891642454_dp
      xi(8)=-0.89433689053449532_dp
      xi(9)=-0.86598616284606759_dp
      xi(10)=-0.83453543232673453_dp
      xi(11)=-0.80009728343046832_dp
      xi(12)=-0.76279499519374496_dp
      xi(13)=-0.72276209974998319_dp
      xi(14)=-0.68014190422716770_dp
      xi(15)=-0.63508697769524592_dp
      xi(16)=-0.58775860497957907_dp
      xi(17)=-0.53832620928582744_dp
      xi(18)=-0.48696674569809608_dp
      xi(19)=-0.43386406771876167_dp
      xi(20)=-0.37920826911609367_dp
      xi(21)=-0.32319500343480783_dp
      xi(22)=-0.26602478360500183_dp
      xi(23)=-0.20790226415636606_dp
      xi(24)=-0.14903550860694918_dp
      xi(25)=-0.089635244648900565_dp
      xi(26)=-0.029914109797338766_dp
      xi(27)=0.029914109797338766_dp
      xi(28)=0.089635244648900565_dp
      xi(29)=0.14903550860694918_dp
      xi(30)=0.20790226415636606_dp
      xi(31)=0.26602478360500183_dp
      xi(32)=0.32319500343480783_dp
      xi(33)=0.37920826911609367_dp
      xi(34)=0.43386406771876167_dp
      xi(35)=0.48696674569809608_dp
      xi(36)=0.53832620928582744_dp
      xi(37)=0.58775860497957907_dp
      xi(38)=0.63508697769524592_dp
      xi(39)=0.68014190422716770_dp
      xi(40)=0.72276209974998319_dp
      xi(41)=0.76279499519374496_dp
      xi(42)=0.80009728343046832_dp
      xi(43)=0.83453543232673453_dp
      xi(44)=0.86598616284606759_dp
      xi(45)=0.89433689053449532_dp
      xi(46)=0.91948612891642454_dp
      xi(47)=0.94134385364135906_dp
      xi(48)=0.95983182693308655_dp
      xi(49)=0.97488388422174450_dp
      xi(50)=0.98644619565154984_dp
      xi(51)=0.99447759092921603_dp
      xi(52)=0.99895111110395028_dp
   case(53)
      xi(1)=-0.99898994777632823_dp
      xi(2)=-0.99468191930800708_dp
      xi(3)=-0.98694703502337152_dp
      xi(4)=-0.97581023371498458_dp
      xi(5)=-0.96130969462313633_dp
      xi(6)=-0.94349535346444188_dp
      xi(7)=-0.92242860304281213_dp
      xi(8)=-0.89818205787542663_dp
      xi(9)=-0.87083929755824135_dp
      xi(10)=-0.84049457654580138_dp
      xi(11)=-0.80725249841689548_dp
      xi(12)=-0.77122765492553231_dp
      xi(13)=-0.73254423080751025_dp
      xi(14)=-0.69133557560136672_dp
      xi(15)=-0.64774374391651007_dp
      xi(16)=-0.60191900571376933_dp
      xi(17)=-0.55401932827706788_dp
      xi(18)=-0.50420983165713344_dp
      xi(19)=-0.45266221946184579_dp
      xi(20)=-0.39955418695395298_dp
      xi(21)=-0.34506880849572236_dp
      xi(22)=-0.28939390645162621_dp
      xi(23)=-0.23272140372427259_dp
      xi(24)=-0.17524666215532575_dp
      xi(25)=-0.11716780907195515_dp
      xi(26)=-0.058685054300259465_dp
      xi(27)=0.0_dp
      xi(28)=0.058685054300259465_dp
      xi(29)=0.11716780907195515_dp
      xi(30)=0.17524666215532575_dp
      xi(31)=0.23272140372427259_dp
      xi(32)=0.28939390645162621_dp
      xi(33)=0.34506880849572236_dp
      xi(34)=0.39955418695395298_dp
      xi(35)=0.45266221946184579_dp
      xi(36)=0.50420983165713344_dp
      xi(37)=0.55401932827706788_dp
      xi(38)=0.60191900571376933_dp
      xi(39)=0.64774374391651007_dp
      xi(40)=0.69133557560136672_dp
      xi(41)=0.73254423080751025_dp
      xi(42)=0.77122765492553231_dp
      xi(43)=0.80725249841689548_dp
      xi(44)=0.84049457654580138_dp
      xi(45)=0.87083929755824135_dp
      xi(46)=0.89818205787542663_dp
      xi(47)=0.92242860304281213_dp
      xi(48)=0.94349535346444188_dp
      xi(49)=0.96130969462313633_dp
      xi(50)=0.97581023371498458_dp
      xi(51)=0.98694703502337152_dp
      xi(52)=0.99468191930800708_dp
      xi(53)=0.99898994777632823_dp
   case(54)
      xi(1)=-0.99902666686734098_dp
      xi(2)=-0.99487511701833888_dp
      xi(3)=-0.98742063739734356_dp
      xi(4)=-0.97668632885790324_dp
      xi(5)=-0.96270764578592358_dp
      xi(6)=-0.94553097516499585_dp
      xi(7)=-0.92521335986665149_dp
      xi(8)=-0.90182228628470158_dp
      xi(9)=-0.87543545406556894_dp
      xi(10)=-0.84614051597077295_dp
      xi(11)=-0.81403478591356784_dp
      xi(12)=-0.77922491534625402_dp
      xi(13)=-0.74182653880918432_dp
      xi(14)=-0.70196388971917292_dp
      xi(15)=-0.65976938763198312_dp
      xi(16)=-0.61538319833112737_dp
      xi(17)=-0.56895276819520943_dp
      xi(18)=-0.52063233438593307_dp
      xi(19)=-0.47058241248138228_dp
      xi(20)=-0.41896926325520453_dp
      xi(21)=-0.36596434037219118_dp
      xi(22)=-0.31174372083446823_dp
      xi(23)=-0.25648752006999730_dp
      xi(24)=-0.20037929360621357_dp
      xi(25)=-0.14360542731625615_dp
      xi(26)=-0.086354518263248215_dp
      xi(27)=-0.028816748199341778_dp
      xi(28)=0.028816748199341778_dp
      xi(29)=0.086354518263248215_dp
      xi(30)=0.14360542731625615_dp
      xi(31)=0.20037929360621357_dp
      xi(32)=0.25648752006999730_dp
      xi(33)=0.31174372083446823_dp
      xi(34)=0.36596434037219118_dp
      xi(35)=0.41896926325520453_dp
      xi(36)=0.47058241248138228_dp
      xi(37)=0.52063233438593307_dp
      xi(38)=0.56895276819520943_dp
      xi(39)=0.61538319833112737_dp
      xi(40)=0.65976938763198312_dp
      xi(41)=0.70196388971917292_dp
      xi(42)=0.74182653880918432_dp
      xi(43)=0.77922491534625402_dp
      xi(44)=0.81403478591356784_dp
      xi(45)=0.84614051597077295_dp
      xi(46)=0.87543545406556894_dp
      xi(47)=0.90182228628470158_dp
      xi(48)=0.92521335986665149_dp
      xi(49)=0.94553097516499585_dp
      xi(50)=0.96270764578592358_dp
      xi(51)=0.97668632885790324_dp
      xi(52)=0.98742063739734356_dp
      xi(53)=0.99487511701833888_dp
      xi(54)=0.99902666686734098_dp
   case(55)
      xi(1)=-0.99906141956481854_dp
      xi(2)=-0.99505797784741188_dp
      xi(3)=-0.98786894119888920_dp
      xi(4)=-0.97751573550398921_dp
      xi(5)=-0.96403132859313520_dp
      xi(6)=-0.94745886804121074_dp
      xi(7)=-0.92785142472079170_dp
      xi(8)=-0.90527180074400003_dp
      xi(9)=-0.87979232241989551_dp
      xi(10)=-0.85149460661715447_dp
      xi(11)=-0.82046929855932091_dp
      xi(12)=-0.78681578112762237_dp
      xi(13)=-0.75064185634802191_dp
      xi(14)=-0.71206339998663784_dp
      xi(15)=-0.67120399031982640_dp
      xi(16)=-0.62819451224992814_dp
      xi(17)=-0.58317273802603210_dp
      xi(18)=-0.53628288590834330_dp
      xi(19)=-0.48767515818747410_dp
      xi(20)=-0.43750526003717459_dp
      xi(21)=-0.38593390074097943_dp
      xi(22)=-0.33312627889002389_dp
      xi(23)=-0.27925155320080654_dp
      xi(24)=-0.22448230064784548_dp
      xi(25)=-0.16899396364687321_dp
      xi(26)=-0.11296428805932927_dp
      xi(27)=-0.056572753818336776_dp
      xi(28)=0.0_dp
      xi(29)=0.056572753818336776_dp
      xi(30)=0.11296428805932927_dp
      xi(31)=0.16899396364687321_dp
      xi(32)=0.22448230064784548_dp
      xi(33)=0.27925155320080654_dp
      xi(34)=0.33312627889002389_dp
      xi(35)=0.38593390074097943_dp
      xi(36)=0.43750526003717459_dp
      xi(37)=0.48767515818747410_dp
      xi(38)=0.53628288590834330_dp
      xi(39)=0.58317273802603210_dp
      xi(40)=0.62819451224992814_dp
      xi(41)=0.67120399031982640_dp
      xi(42)=0.71206339998663784_dp
      xi(43)=0.75064185634802191_dp
      xi(44)=0.78681578112762237_dp
      xi(45)=0.82046929855932091_dp
      xi(46)=0.85149460661715447_dp
      xi(47)=0.87979232241989551_dp
      xi(48)=0.90527180074400003_dp
      xi(49)=0.92785142472079170_dp
      xi(50)=0.94745886804121074_dp
      xi(51)=0.96403132859313520_dp
      xi(52)=0.97751573550398921_dp
      xi(53)=0.98786894119888920_dp
      xi(54)=0.99505797784741188_dp
      xi(55)=0.99906141956481854_dp
   case(56)
      xi(1)=-0.99909434380146558_dp
      xi(2)=-0.99523122608106975_dp
      xi(3)=-0.98829371554016151_dp
      xi(4)=-0.97830170914025638_dp
      xi(5)=-0.96528590190549018_dp
      xi(6)=-0.94928647956196264_dp
      xi(7)=-0.93035288024749630_dp
      xi(8)=-0.90854362042065549_dp
      xi(9)=-0.88392610832782754_dp
      xi(10)=-0.85657643376274864_dp
      xi(11)=-0.82657913214288165_dp
      xi(12)=-0.79402692289386650_dp
      xi(13)=-0.75902042270512890_dp
      xi(14)=-0.72166783445018808_dp
      xi(15)=-0.68208461269447046_dp
      xi(16)=-0.64039310680700689_dp
      xi(17)=-0.59672218277066332_dp
      xi(18)=-0.55120682485553462_dp
      xi(19)=-0.50398771838438171_dp
      xi(20)=-0.45521081487845958_dp
      xi(21)=-0.40502688092709128_dp
      xi(22)=-0.35359103217495452_dp
      xi(23)=-0.30106225386722067_dp
      xi(24)=-0.24760290943433720_dp
      xi(25)=-0.19337823863527526_dp
      xi(26)=-0.13855584681037624_dp
      xi(27)=-0.083305186822435374_dp
      xi(28)=-0.027797035287275437_dp
      xi(29)=0.027797035287275437_dp
      xi(30)=0.083305186822435374_dp
      xi(31)=0.13855584681037624_dp
      xi(32)=0.19337823863527526_dp
      xi(33)=0.24760290943433720_dp
      xi(34)=0.30106225386722067_dp
      xi(35)=0.35359103217495452_dp
      xi(36)=0.40502688092709128_dp
      xi(37)=0.45521081487845958_dp
      xi(38)=0.50398771838438171_dp
      xi(39)=0.55120682485553462_dp
      xi(40)=0.59672218277066332_dp
      xi(41)=0.64039310680700689_dp
      xi(42)=0.68208461269447046_dp
      xi(43)=0.72166783445018808_dp
      xi(44)=0.75902042270512890_dp
      xi(45)=0.79402692289386650_dp
      xi(46)=0.82657913214288165_dp
      xi(47)=0.85657643376274864_dp
      xi(48)=0.88392610832782754_dp
      xi(49)=0.90854362042065549_dp
      xi(50)=0.93035288024749630_dp
      xi(51)=0.94928647956196264_dp
      xi(52)=0.96528590190549018_dp
      xi(53)=0.97830170914025638_dp
      xi(54)=0.98829371554016151_dp
      xi(55)=0.99523122608106975_dp
      xi(56)=0.99909434380146558_dp
   case(57)
      xi(1)=-0.99912556562526285_dp
      xi(2)=-0.99539552367843031_dp
      xi(3)=-0.98869657765022205_dp
      xi(4)=-0.97904722670946871_dp
      xi(5)=-0.96647608517188668_dp
      xi(6)=-0.95102062644787674_dp
      xi(7)=-0.93272696106710170_dp
      xi(8)=-0.91164967852139121_dp
      xi(9)=-0.88785167888222133_dp
      xi(10)=-0.86140398326204694_dp
      xi(11)=-0.83238552115043912_dp
      xi(12)=-0.80088289454721824_dp
      xi(13)=-0.76699011935945020_dp
      xi(14)=-0.73080834474452332_dp
      xi(15)=-0.69244555119951774_dp
      xi(16)=-0.65201622828097689_dp
      xi(17)=-0.60964103290871537_dp
      xi(18)=-0.56544642926923676_dp
      xi(19)=-0.51956431139118761_dp
      xi(20)=-0.47213160951797571_dp
      xi(21)=-0.42328988145156395_dp
      xi(22)=-0.37318489008659446_dp
      xi(23)=-0.32196616839537864_dp
      xi(24)=-0.26978657316183877_dp
      xi(25)=-0.21680182879612404_dp
      xi(26)=-0.16317006259126425_dp
      xi(27)=-0.10905133280878780_dp
      xi(28)=-0.054607151001646824_dp
      xi(29)=0.0_dp
      xi(30)=0.054607151001646824_dp
      xi(31)=0.10905133280878780_dp
      xi(32)=0.16317006259126425_dp
      xi(33)=0.21680182879612404_dp
      xi(34)=0.26978657316183877_dp
      xi(35)=0.32196616839537864_dp
      xi(36)=0.37318489008659446_dp
      xi(37)=0.42328988145156395_dp
      xi(38)=0.47213160951797571_dp
      xi(39)=0.51956431139118761_dp
      xi(40)=0.56544642926923676_dp
      xi(41)=0.60964103290871537_dp
      xi(42)=0.65201622828097689_dp
      xi(43)=0.69244555119951774_dp
      xi(44)=0.73080834474452332_dp
      xi(45)=0.76699011935945020_dp
      xi(46)=0.80088289454721824_dp
      xi(47)=0.83238552115043912_dp
      xi(48)=0.86140398326204694_dp
      xi(49)=0.88785167888222133_dp
      xi(50)=0.91164967852139121_dp
      xi(51)=0.93272696106710170_dp
      xi(52)=0.95102062644787674_dp
      xi(53)=0.96647608517188668_dp
      xi(54)=0.97904722670946871_dp
      xi(55)=0.98869657765022205_dp
      xi(56)=0.99539552367843031_dp
      xi(57)=0.99912556562526285_dp
   case(58)
      xi(1)=-0.99915520040738661_dp
      xi(2)=-0.99555147659729090_dp
      xi(3)=-0.98907900824844264_dp
      xi(4)=-0.97975501469435031_dp
      xi(5)=-0.96760620250292409_dp
      xi(6)=-0.95266755751886909_dp
      xi(7)=-0.93498213758825935_dp
      xi(8)=-0.91460092856435254_dp
      xi(9)=-0.89158269202203018_dp
      xi(10)=-0.86599379407480748_dp
      xi(11)=-0.83790801333937332_dp
      xi(12)=-0.80740632791308814_dp
      xi(13)=-0.77457668174965275_dp
      xi(14)=-0.73951373102004227_dp
      xi(15)=-0.70231857115390811_dp
      xi(16)=-0.66309844533212527_dp
      xi(17)=-0.62196643526307911_dp
      xi(18)=-0.57904113513022503_dp
      xi(19)=-0.53444630964884759_dp
      xi(20)=-0.48831053721671846_dp
      xi(21)=-0.44076683918683957_dp
      xi(22)=-0.39195229633075315_dp
      xi(23)=-0.34200765359799526_dp
      xi(24)=-0.29107691431110919_dp
      xi(25)=-0.23930692496615345_dp
      xi(26)=-0.18684695183576132_dp
      xi(27)=-0.13384825059546686_dp
      xi(28)=-0.080463630214142729_dp
      xi(29)=-0.026847012365942356_dp
      xi(30)=0.026847012365942356_dp
      xi(31)=0.080463630214142729_dp
      xi(32)=0.13384825059546686_dp
      xi(33)=0.18684695183576132_dp
      xi(34)=0.23930692496615345_dp
      xi(35)=0.29107691431110919_dp
      xi(36)=0.34200765359799526_dp
      xi(37)=0.39195229633075315_dp
      xi(38)=0.44076683918683957_dp
      xi(39)=0.48831053721671846_dp
      xi(40)=0.53444630964884759_dp
      xi(41)=0.57904113513022503_dp
      xi(42)=0.62196643526307911_dp
      xi(43)=0.66309844533212527_dp
      xi(44)=0.70231857115390811_dp
      xi(45)=0.73951373102004227_dp
      xi(46)=0.77457668174965275_dp
      xi(47)=0.80740632791308814_dp
      xi(48)=0.83790801333937332_dp
      xi(49)=0.86599379407480748_dp
      xi(50)=0.89158269202203018_dp
      xi(51)=0.91460092856435254_dp
      xi(52)=0.93498213758825935_dp
      xi(53)=0.95266755751886909_dp
      xi(54)=0.96760620250292409_dp
      xi(55)=0.97975501469435031_dp
      xi(56)=0.98907900824844264_dp
      xi(57)=0.99555147659729090_dp
      xi(58)=0.99915520040738661_dp
   case(59)
      xi(1)=-0.99918335390929468_dp
      xi(2)=-0.99569964038324596_dp
      xi(3)=-0.98944236513373093_dp
      xi(4)=-0.98042757395671569_dp
      xi(5)=-0.96868022168178153_dp
      xi(6)=-0.95423300937695106_dp
      xi(7)=-0.93712619035345386_dp
      xi(8)=-0.91740743878815528_dp
      xi(9)=-0.89513171174347209_dp
      xi(10)=-0.87036109429288226_dp
      xi(11)=-0.84316462581687220_dp
      xi(12)=-0.81361810728821157_dp
      xi(13)=-0.78180388986236091_dp
      xi(14)=-0.74781064527864023_dp
      xi(15)=-0.71173311867719773_dp
      xi(16)=-0.67367186450493723_dp
      xi(17)=-0.63373296623885010_dp
      xi(18)=-0.59202774070403014_dp
      xi(19)=-0.54867242780839638_dp
      xi(20)=-0.50378786655771798_dp
      xi(21)=-0.45749915825326669_dp
      xi(22)=-0.40993531781041897_dp
      xi(23)=-0.36122891416979481_dp
      xi(24)=-0.31151570080301370_dp
      xi(25)=-0.26093423734281171_dp
      xi(26)=-0.20962550339203654_dp
      xi(27)=-0.15773250558785797_dp
      xi(28)=-0.10539987901634414_dp
      xi(29)=-0.052773484088310004_dp
      xi(30)=0.0_dp
      xi(31)=0.052773484088310004_dp
      xi(32)=0.10539987901634414_dp
      xi(33)=0.15773250558785797_dp
      xi(34)=0.20962550339203654_dp
      xi(35)=0.26093423734281171_dp
      xi(36)=0.31151570080301370_dp
      xi(37)=0.36122891416979481_dp
      xi(38)=0.40993531781041897_dp
      xi(39)=0.45749915825326669_dp
      xi(40)=0.50378786655771798_dp
      xi(41)=0.54867242780839638_dp
      xi(42)=0.59202774070403014_dp
      xi(43)=0.63373296623885010_dp
      xi(44)=0.67367186450493723_dp
      xi(45)=0.71173311867719773_dp
      xi(46)=0.74781064527864023_dp
      xi(47)=0.78180388986236091_dp
      xi(48)=0.81361810728821157_dp
      xi(49)=0.84316462581687220_dp
      xi(50)=0.87036109429288226_dp
      xi(51)=0.89513171174347209_dp
      xi(52)=0.91740743878815528_dp
      xi(53)=0.93712619035345386_dp
      xi(54)=0.95423300937695106_dp
      xi(55)=0.96868022168178153_dp
      xi(56)=0.98042757395671569_dp
      xi(57)=0.98944236513373093_dp
      xi(58)=0.99569964038324596_dp
      xi(59)=0.99918335390929468_dp
   case(60)
      xi(1)=-0.99921012322743602_dp
      xi(2)=-0.99584052511883817_dp
      xi(3)=-0.98978789522222172_dp
      xi(4)=-0.98106720175259819_dp
      xi(5)=-0.96970178876505273_dp
      xi(6)=-0.95572225583999611_dp
      xi(7)=-0.93916627611642325_dp
      xi(8)=-0.92007847617762755_dp
      xi(9)=-0.89851031081004594_dp
      xi(10)=-0.87451992264689832_dp
      xi(11)=-0.84817198478592963_dp
      xi(12)=-0.81953752616214576_dp
      xi(13)=-0.78869373993226405_dp
      xi(14)=-0.75572377530658569_dp
      xi(15)=-0.72071651335573040_dp
      xi(16)=-0.68376632738135544_dp
      xi(17)=-0.64497282848947707_dp
      xi(18)=-0.60444059704851036_dp
      xi(19)=-0.56227890075394454_dp
      xi(20)=-0.51860140005856975_dp
      xi(21)=-0.47352584176170711_dp
      xi(22)=-0.42717374158307839_dp
      xi(23)=-0.37967005657679798_dp
      xi(24)=-0.33114284826844819_dp
      xi(25)=-0.28172293742326169_dp
      xi(26)=-0.23154355137602934_dp
      xi(27)=-0.18073996487342542_dp
      xi(28)=-0.12944913539694500_dp
      xi(29)=-0.077809333949536569_dp
      xi(30)=-0.025959772301247799_dp
      xi(31)=0.025959772301247799_dp
      xi(32)=0.077809333949536569_dp
      xi(33)=0.12944913539694500_dp
      xi(34)=0.18073996487342542_dp
      xi(35)=0.23154355137602934_dp
      xi(36)=0.28172293742326169_dp
      xi(37)=0.33114284826844819_dp
      xi(38)=0.37967005657679798_dp
      xi(39)=0.42717374158307839_dp
      xi(40)=0.47352584176170711_dp
      xi(41)=0.51860140005856975_dp
      xi(42)=0.56227890075394454_dp
      xi(43)=0.60444059704851036_dp
      xi(44)=0.64497282848947707_dp
      xi(45)=0.68376632738135544_dp
      xi(46)=0.72071651335573040_dp
      xi(47)=0.75572377530658569_dp
      xi(48)=0.78869373993226405_dp
      xi(49)=0.81953752616214576_dp
      xi(50)=0.84817198478592963_dp
      xi(51)=0.87451992264689832_dp
      xi(52)=0.89851031081004594_dp
      xi(53)=0.92007847617762755_dp
      xi(54)=0.93916627611642325_dp
      xi(55)=0.95572225583999611_dp
      xi(56)=0.96970178876505273_dp
      xi(57)=0.98106720175259819_dp
      xi(58)=0.98978789522222172_dp
      xi(59)=0.99584052511883817_dp
      xi(60)=0.99921012322743602_dp
   case(61)
      xi(1)=-0.99923559763136347_dp
      xi(2)=-0.99597459981512023_dp
      xi(3)=-0.99011674523251705_dp
      xi(4)=-0.98167601128403708_dp
      xi(5)=-0.97067425883318291_dp
      xi(6)=-0.95714015191298409_dp
      xi(7)=-0.94110898668136115_dp
      xi(8)=-0.92262258138295526_dp
      xi(9)=-0.90172916247400117_dp
      xi(10)=-0.87848323721488103_dp
      xi(11)=-0.85294545084766345_dp
      xi(12)=-0.82518242810865995_dp
      xi(13)=-0.79526659928235965_dp
      xi(14)=-0.76327601117231220_dp
      xi(15)=-0.72929412344946511_dp
      xi(16)=-0.69340959089449116_dp
      xi(17)=-0.65571603209507087_dp
      xi(18)=-0.61631178519792172_dp
      xi(19)=-0.57529965135083062_dp
      xi(20)=-0.53278662650292527_dp
      xi(21)=-0.48888362226225212_dp
      xi(22)=-0.44370517653853160_dp
      xi(23)=-0.39736915472575661_dp
      xi(24)=-0.34999644220406683_dp
      xi(25)=-0.30171062896303071_dp
      xi(26)=-0.25263768716905350_dp
      xi(27)=-0.20290564251805850_dp
      xi(28)=-0.15264424023081530_dp
      xi(29)=-0.10198460656227407_dp
      xi(30)=-0.051058906707974349_dp
      xi(31)=0.0_dp
      xi(32)=0.051058906707974349_dp
      xi(33)=0.10198460656227407_dp
      xi(34)=0.15264424023081530_dp
      xi(35)=0.20290564251805850_dp
      xi(36)=0.25263768716905350_dp
      xi(37)=0.30171062896303071_dp
      xi(38)=0.34999644220406683_dp
      xi(39)=0.39736915472575661_dp
      xi(40)=0.44370517653853160_dp
      xi(41)=0.48888362226225212_dp
      xi(42)=0.53278662650292527_dp
      xi(43)=0.57529965135083062_dp
      xi(44)=0.61631178519792172_dp
      xi(45)=0.65571603209507087_dp
      xi(46)=0.69340959089449116_dp
      xi(47)=0.72929412344946511_dp
      xi(48)=0.76327601117231220_dp
      xi(49)=0.79526659928235965_dp
      xi(50)=0.82518242810865995_dp
      xi(51)=0.85294545084766345_dp
      xi(52)=0.87848323721488103_dp
      xi(53)=0.90172916247400117_dp
      xi(54)=0.92262258138295526_dp
      xi(55)=0.94110898668136115_dp
      xi(56)=0.95714015191298409_dp
      xi(57)=0.97067425883318291_dp
      xi(58)=0.98167601128403708_dp
      xi(59)=0.99011674523251705_dp
      xi(60)=0.99597459981512023_dp
      xi(61)=0.99923559763136347_dp
   case(62)
      xi(1)=-0.99925985930877703_dp
      xi(2)=-0.99610229631626713_dp
      xi(3)=-0.99042997118929035_dp
      xi(4)=-0.98225594909723665_dp
      xi(5)=-0.97160072337165181_dp
      xi(6)=-0.95849117297392709_dp
      xi(7)=-0.94296040139232850_dp
      xi(8)=-0.92504763563620376_dp
      xi(9)=-0.90479812252109347_dp
      xi(10)=-0.88226301283189736_dp
      xi(11)=-0.85749923151207092_dp
      xi(12)=-0.83056933360400485_dp
      xi(13)=-0.80154134610397637_dp
      xi(14)=-0.77048859605541932_dp
      xi(15)=-0.73748952528315675_dp
      xi(16)=-0.70262749222229706_dp
      xi(17)=-0.66599056133547945_dp
      xi(18)=-0.62767128064688518_dp
      xi(19)=-0.58776644795308734_dp
      xi(20)=-0.54637686630025110_dp
      xi(21)=-0.50360708934475596_dp
      xi(22)=-0.45956515724011340_dp
      xi(23)=-0.41436232371712605_dp
      xi(24)=-0.36811277504656453_dp
      xi(25)=-0.32093334159419400_dp
      xi(26)=-0.27294320269672634_dp
      xi(27)=-0.22426358560416553_dp
      xi(28)=-0.17501745924901563_dp
      xi(29)=-0.12532922361589681_dp
      xi(30)=-0.075324395496234333_dp
      xi(31)=-0.025129291421820615_dp
      xi(32)=0.025129291421820615_dp
      xi(33)=0.075324395496234333_dp
      xi(34)=0.12532922361589681_dp
      xi(35)=0.17501745924901563_dp
      xi(36)=0.22426358560416553_dp
      xi(37)=0.27294320269672634_dp
      xi(38)=0.32093334159419400_dp
      xi(39)=0.36811277504656453_dp
      xi(40)=0.41436232371712605_dp
      xi(41)=0.45956515724011340_dp
      xi(42)=0.50360708934475596_dp
      xi(43)=0.54637686630025110_dp
      xi(44)=0.58776644795308734_dp
      xi(45)=0.62767128064688518_dp
      xi(46)=0.66599056133547945_dp
      xi(47)=0.70262749222229706_dp
      xi(48)=0.73748952528315675_dp
      xi(49)=0.77048859605541932_dp
      xi(50)=0.80154134610397637_dp
      xi(51)=0.83056933360400485_dp
      xi(52)=0.85749923151207092_dp
      xi(53)=0.88226301283189736_dp
      xi(54)=0.90479812252109347_dp
      xi(55)=0.92504763563620376_dp
      xi(56)=0.94296040139232850_dp
      xi(57)=0.95849117297392709_dp
      xi(58)=0.97160072337165181_dp
      xi(59)=0.98225594909723665_dp
      xi(60)=0.99042997118929035_dp
      xi(61)=0.99610229631626713_dp
      xi(62)=0.99925985930877703_dp
   case(63)
      xi(1)=-0.99928298402912378_dp
      xi(2)=-0.99622401277797011_dp
      xi(3)=-0.99072854689218947_dp
      xi(4)=-0.98280881059372723_dp
      xi(5)=-0.97248403469757002_dp
      xi(6)=-0.95977944975894193_dp
      xi(7)=-0.94472613404100980_dp
      xi(8)=-0.92736092062184321_dp
      xi(9)=-0.90772630277853156_dp
      xi(10)=-0.88587032850785343_dp
      xi(11)=-0.86184648236412372_dp
      xi(12)=-0.83571355431950284_dp
      xi(13)=-0.80753549577345676_dp
      xi(14)=-0.77738126299037234_dp
      xi(15)=-0.74532464831784742_dp
      xi(16)=-0.71144409958484581_dp
      xi(17)=-0.67582252811498609_dp
      xi(18)=-0.63854710582136539_dp
      xi(19)=-0.59970905187762524_dp
      xi(20)=-0.55940340948628501_dp
      xi(21)=-0.51772881329003325_dp
      xi(22)=-0.47478724799480440_dp
      xi(23)=-0.43068379879511160_dp
      xi(24)=-0.38552639421224789_dp
      xi(25)=-0.33942554197458440_dp
      xi(26)=-0.29249405858625144_dp
      xi(27)=-0.24484679324595336_dp
      xi(28)=-0.19660034679150668_dp
      xi(29)=-0.14787278635787197_dp
      xi(30)=-0.098783356446945280_dp
      xi(31)=-0.049452187116159627_dp
      xi(32)=0.0_dp
      xi(33)=0.049452187116159627_dp
      xi(34)=0.098783356446945280_dp
      xi(35)=0.14787278635787197_dp
      xi(36)=0.19660034679150668_dp
      xi(37)=0.24484679324595336_dp
      xi(38)=0.29249405858625144_dp
      xi(39)=0.33942554197458440_dp
      xi(40)=0.38552639421224789_dp
      xi(41)=0.43068379879511160_dp
      xi(42)=0.47478724799480440_dp
      xi(43)=0.51772881329003325_dp
      xi(44)=0.55940340948628501_dp
      xi(45)=0.59970905187762524_dp
      xi(46)=0.63854710582136539_dp
      xi(47)=0.67582252811498609_dp
      xi(48)=0.71144409958484581_dp
      xi(49)=0.74532464831784742_dp
      xi(50)=0.77738126299037234_dp
      xi(51)=0.80753549577345676_dp
      xi(52)=0.83571355431950284_dp
      xi(53)=0.86184648236412372_dp
      xi(54)=0.88587032850785343_dp
      xi(55)=0.90772630277853156_dp
      xi(56)=0.92736092062184321_dp
      xi(57)=0.94472613404100980_dp
      xi(58)=0.95977944975894193_dp
      xi(59)=0.97248403469757002_dp
      xi(60)=0.98280881059372723_dp
      xi(61)=0.99072854689218947_dp
      xi(62)=0.99622401277797011_dp
      xi(63)=0.99928298402912378_dp
   case(64)
      xi(1)=-0.99930504173577214_dp
      xi(2)=-0.99634011677195528_dp
      xi(3)=-0.99101337147674432_dp
      xi(4)=-0.98333625388462596_dp
      xi(5)=-0.97332682778991096_dp
      xi(6)=-0.96100879965205372_dp
      xi(7)=-0.94641137485840282_dp
      xi(8)=-0.92956917213193958_dp
      xi(9)=-0.91052213707850281_dp
      xi(10)=-0.88931544599511411_dp
      xi(11)=-0.86599939815409282_dp
      xi(12)=-0.84062929625258036_dp
      xi(13)=-0.81326531512279756_dp
      xi(14)=-0.78397235894334141_dp
      xi(15)=-0.75281990726053190_dp
      xi(16)=-0.71988185017161083_dp
      xi(17)=-0.68523631305423324_dp
      xi(18)=-0.64896547125465734_dp
      xi(19)=-0.61115535517239325_dp
      xi(20)=-0.57189564620263403_dp
      xi(21)=-0.53127946401989455_dp
      xi(22)=-0.48940314570705296_dp
      xi(23)=-0.44636601725346409_dp
      xi(24)=-0.40227015796399160_dp
      xi(25)=-0.35722015833766812_dp
      xi(26)=-0.31132287199021096_dp
      xi(27)=-0.26468716220876742_dp
      xi(28)=-0.21742364374000708_dp
      xi(29)=-0.16964442042399282_dp
      xi(30)=-0.12146281929612055_dp
      xi(31)=-0.072993121787799039_dp
      xi(32)=-0.024350292663424433_dp
      xi(33)=0.024350292663424433_dp
      xi(34)=0.072993121787799039_dp
      xi(35)=0.12146281929612055_dp
      xi(36)=0.16964442042399282_dp
      xi(37)=0.21742364374000708_dp
      xi(38)=0.26468716220876742_dp
      xi(39)=0.31132287199021096_dp
      xi(40)=0.35722015833766812_dp
      xi(41)=0.40227015796399160_dp
      xi(42)=0.44636601725346409_dp
      xi(43)=0.48940314570705296_dp
      xi(44)=0.53127946401989455_dp
      xi(45)=0.57189564620263403_dp
      xi(46)=0.61115535517239325_dp
      xi(47)=0.64896547125465734_dp
      xi(48)=0.68523631305423324_dp
      xi(49)=0.71988185017161083_dp
      xi(50)=0.75281990726053190_dp
      xi(51)=0.78397235894334141_dp
      xi(52)=0.81326531512279756_dp
      xi(53)=0.84062929625258036_dp
      xi(54)=0.86599939815409282_dp
      xi(55)=0.88931544599511411_dp
      xi(56)=0.91052213707850281_dp
      xi(57)=0.92956917213193958_dp
      xi(58)=0.94641137485840282_dp
      xi(59)=0.96100879965205372_dp
      xi(60)=0.97332682778991096_dp
      xi(61)=0.98333625388462596_dp
      xi(62)=0.99101337147674432_dp
      xi(63)=0.99634011677195528_dp
      xi(64)=0.99930504173577214_dp
   case default
      write(*,*) "gauss_pts ERROR: Exceeded maximum Gauss points = ", max_gauss_pts;
      call stop_error("")
end select
gauss_pts=xi
end function

!-------------------------------------------------------------------------------------------------!

function gauss_wts(n)
! returns Gauss weights for n-point quadrature
integer, intent(in):: n ! number of Gauss weights
real(dp) gauss_wts(n)    ! Gauss weights for n-point quadrature
real(dp) w(n)
select case(n)
   case(1)
      w(1)=2.0000000000000000_dp
   case(2)
      w(1)=1.0000000000000000_dp
      w(2)=1.0000000000000000_dp
   case(3)
      w(1)=0.55555555555555556_dp
      w(2)=0.88888888888888889_dp
      w(3)=0.55555555555555556_dp
   case(4)
      w(1)=0.34785484513745386_dp
      w(2)=0.65214515486254614_dp
      w(3)=0.65214515486254614_dp
      w(4)=0.34785484513745386_dp
   case(5)
      w(1)=0.23692688505618909_dp
      w(2)=0.47862867049936647_dp
      w(3)=0.56888888888888889_dp
      w(4)=0.47862867049936647_dp
      w(5)=0.23692688505618909_dp
   case(6)
      w(1)=0.17132449237917035_dp
      w(2)=0.36076157304813861_dp
      w(3)=0.46791393457269105_dp
      w(4)=0.46791393457269105_dp
      w(5)=0.36076157304813861_dp
      w(6)=0.17132449237917035_dp
   case(7)
      w(1)=0.12948496616886969_dp
      w(2)=0.27970539148927667_dp
      w(3)=0.38183005050511894_dp
      w(4)=0.41795918367346939_dp
      w(5)=0.38183005050511894_dp
      w(6)=0.27970539148927667_dp
      w(7)=0.12948496616886969_dp
   case(8)
      w(1)=0.10122853629037626_dp
      w(2)=0.22238103445337447_dp
      w(3)=0.31370664587788729_dp
      w(4)=0.36268378337836198_dp
      w(5)=0.36268378337836198_dp
      w(6)=0.31370664587788729_dp
      w(7)=0.22238103445337447_dp
      w(8)=0.10122853629037626_dp
   case(9)
      w(1)=0.081274388361574412_dp
      w(2)=0.18064816069485740_dp
      w(3)=0.26061069640293546_dp
      w(4)=0.31234707704000284_dp
      w(5)=0.33023935500125976_dp
      w(6)=0.31234707704000284_dp
      w(7)=0.26061069640293546_dp
      w(8)=0.18064816069485740_dp
      w(9)=0.081274388361574412_dp
   case(10)
      w(1)=0.066671344308688138_dp
      w(2)=0.14945134915058059_dp
      w(3)=0.21908636251598204_dp
      w(4)=0.26926671930999636_dp
      w(5)=0.29552422471475287_dp
      w(6)=0.29552422471475287_dp
      w(7)=0.26926671930999636_dp
      w(8)=0.21908636251598204_dp
      w(9)=0.14945134915058059_dp
      w(10)=0.066671344308688138_dp
   case(11)
      w(1)=0.055668567116173666_dp
      w(2)=0.12558036946490462_dp
      w(3)=0.18629021092773425_dp
      w(4)=0.23319376459199048_dp
      w(5)=0.26280454451024666_dp
      w(6)=0.27292508677790063_dp
      w(7)=0.26280454451024666_dp
      w(8)=0.23319376459199048_dp
      w(9)=0.18629021092773425_dp
      w(10)=0.12558036946490462_dp
      w(11)=0.055668567116173666_dp
   case(12)
      w(1)=0.047175336386511827_dp
      w(2)=0.10693932599531843_dp
      w(3)=0.16007832854334623_dp
      w(4)=0.20316742672306592_dp
      w(5)=0.23349253653835481_dp
      w(6)=0.24914704581340279_dp
      w(7)=0.24914704581340279_dp
      w(8)=0.23349253653835481_dp
      w(9)=0.20316742672306592_dp
      w(10)=0.16007832854334623_dp
      w(11)=0.10693932599531843_dp
      w(12)=0.047175336386511827_dp
   case(13)
      w(1)=0.040484004765315880_dp
      w(2)=0.092121499837728448_dp
      w(3)=0.13887351021978724_dp
      w(4)=0.17814598076194574_dp
      w(5)=0.20781604753688850_dp
      w(6)=0.22628318026289724_dp
      w(7)=0.23255155323087391_dp
      w(8)=0.22628318026289724_dp
      w(9)=0.20781604753688850_dp
      w(10)=0.17814598076194574_dp
      w(11)=0.13887351021978724_dp
      w(12)=0.092121499837728448_dp
      w(13)=0.040484004765315880_dp
   case(14)
      w(1)=0.035119460331751863_dp
      w(2)=0.080158087159760210_dp
      w(3)=0.12151857068790318_dp
      w(4)=0.15720316715819353_dp
      w(5)=0.18553839747793781_dp
      w(6)=0.20519846372129560_dp
      w(7)=0.21526385346315779_dp
      w(8)=0.21526385346315779_dp
      w(9)=0.20519846372129560_dp
      w(10)=0.18553839747793781_dp
      w(11)=0.15720316715819353_dp
      w(12)=0.12151857068790318_dp
      w(13)=0.080158087159760210_dp
      w(14)=0.035119460331751863_dp
   case(15)
      w(1)=0.030753241996117268_dp
      w(2)=0.070366047488108125_dp
      w(3)=0.10715922046717194_dp
      w(4)=0.13957067792615431_dp
      w(5)=0.16626920581699393_dp
      w(6)=0.18616100001556221_dp
      w(7)=0.19843148532711158_dp
      w(8)=0.20257824192556127_dp
      w(9)=0.19843148532711158_dp
      w(10)=0.18616100001556221_dp
      w(11)=0.16626920581699393_dp
      w(12)=0.13957067792615431_dp
      w(13)=0.10715922046717194_dp
      w(14)=0.070366047488108125_dp
      w(15)=0.030753241996117268_dp
   case(16)
      w(1)=0.027152459411754095_dp
      w(2)=0.062253523938647893_dp
      w(3)=0.095158511682492785_dp
      w(4)=0.12462897125553387_dp
      w(5)=0.14959598881657673_dp
      w(6)=0.16915651939500254_dp
      w(7)=0.18260341504492359_dp
      w(8)=0.18945061045506850_dp
      w(9)=0.18945061045506850_dp
      w(10)=0.18260341504492359_dp
      w(11)=0.16915651939500254_dp
      w(12)=0.14959598881657673_dp
      w(13)=0.12462897125553387_dp
      w(14)=0.095158511682492785_dp
      w(15)=0.062253523938647893_dp
      w(16)=0.027152459411754095_dp
   case(17)
      w(1)=0.024148302868547932_dp
      w(2)=0.055459529373987201_dp
      w(3)=0.085036148317179181_dp
      w(4)=0.11188384719340397_dp
      w(5)=0.13513636846852547_dp
      w(6)=0.15404576107681029_dp
      w(7)=0.16800410215645004_dp
      w(8)=0.17656270536699265_dp
      w(9)=0.17944647035620653_dp
      w(10)=0.17656270536699265_dp
      w(11)=0.16800410215645004_dp
      w(12)=0.15404576107681029_dp
      w(13)=0.13513636846852547_dp
      w(14)=0.11188384719340397_dp
      w(15)=0.085036148317179181_dp
      w(16)=0.055459529373987201_dp
      w(17)=0.024148302868547932_dp
   case(18)
      w(1)=0.021616013526483310_dp
      w(2)=0.049714548894969796_dp
      w(3)=0.076425730254889057_dp
      w(4)=0.10094204410628717_dp
      w(5)=0.12255520671147846_dp
      w(6)=0.14064291467065065_dp
      w(7)=0.15468467512626524_dp
      w(8)=0.16427648374583272_dp
      w(9)=0.16914238296314359_dp
      w(10)=0.16914238296314359_dp
      w(11)=0.16427648374583272_dp
      w(12)=0.15468467512626524_dp
      w(13)=0.14064291467065065_dp
      w(14)=0.12255520671147846_dp
      w(15)=0.10094204410628717_dp
      w(16)=0.076425730254889057_dp
      w(17)=0.049714548894969796_dp
      w(18)=0.021616013526483310_dp
   case(19)
      w(1)=0.019461788229726477_dp
      w(2)=0.044814226765699600_dp
      w(3)=0.069044542737641227_dp
      w(4)=0.091490021622449999_dp
      w(5)=0.11156664554733399_dp
      w(6)=0.12875396253933623_dp
      w(7)=0.14260670217360661_dp
      w(8)=0.15276604206585967_dp
      w(9)=0.15896884339395435_dp
      w(10)=0.16105444984878370_dp
      w(11)=0.15896884339395435_dp
      w(12)=0.15276604206585967_dp
      w(13)=0.14260670217360661_dp
      w(14)=0.12875396253933623_dp
      w(15)=0.11156664554733399_dp
      w(16)=0.091490021622449999_dp
      w(17)=0.069044542737641227_dp
      w(18)=0.044814226765699600_dp
      w(19)=0.019461788229726477_dp
   case(20)
      w(1)=0.017614007139152118_dp
      w(2)=0.040601429800386941_dp
      w(3)=0.062672048334109064_dp
      w(4)=0.083276741576704749_dp
      w(5)=0.10193011981724044_dp
      w(6)=0.11819453196151842_dp
      w(7)=0.13168863844917663_dp
      w(8)=0.14209610931838205_dp
      w(9)=0.14917298647260375_dp
      w(10)=0.15275338713072585_dp
      w(11)=0.15275338713072585_dp
      w(12)=0.14917298647260375_dp
      w(13)=0.14209610931838205_dp
      w(14)=0.13168863844917663_dp
      w(15)=0.11819453196151842_dp
      w(16)=0.10193011981724044_dp
      w(17)=0.083276741576704749_dp
      w(18)=0.062672048334109064_dp
      w(19)=0.040601429800386941_dp
      w(20)=0.017614007139152118_dp
   case(21)
      w(1)=0.016017228257774333_dp
      w(2)=0.036953789770852494_dp
      w(3)=0.057134425426857208_dp
      w(4)=0.076100113628379302_dp
      w(5)=0.093444423456033862_dp
      w(6)=0.10879729916714838_dp
      w(7)=0.12183141605372853_dp
      w(8)=0.13226893863333746_dp
      w(9)=0.13988739479107315_dp
      w(10)=0.14452440398997006_dp
      w(11)=0.14608113364969043_dp
      w(12)=0.14452440398997006_dp
      w(13)=0.13988739479107315_dp
      w(14)=0.13226893863333746_dp
      w(15)=0.12183141605372853_dp
      w(16)=0.10879729916714838_dp
      w(17)=0.093444423456033862_dp
      w(18)=0.076100113628379302_dp
      w(19)=0.057134425426857208_dp
      w(20)=0.036953789770852494_dp
      w(21)=0.016017228257774333_dp
   case(22)
      w(1)=0.014627995298272201_dp
      w(2)=0.033774901584814155_dp
      w(3)=0.052293335152683286_dp
      w(4)=0.069796468424520488_dp
      w(5)=0.085941606217067727_dp
      w(6)=0.10041414444288096_dp
      w(7)=0.11293229608053922_dp
      w(8)=0.12325237681051242_dp
      w(9)=0.13117350478706237_dp
      w(10)=0.13654149834601517_dp
      w(11)=0.13925187285563199_dp
      w(12)=0.13925187285563199_dp
      w(13)=0.13654149834601517_dp
      w(14)=0.13117350478706237_dp
      w(15)=0.12325237681051242_dp
      w(16)=0.11293229608053922_dp
      w(17)=0.10041414444288096_dp
      w(18)=0.085941606217067727_dp
      w(19)=0.069796468424520488_dp
      w(20)=0.052293335152683286_dp
      w(21)=0.033774901584814155_dp
      w(22)=0.014627995298272201_dp
   case(23)
      w(1)=0.013411859487141772_dp
      w(2)=0.030988005856979444_dp
      w(3)=0.048037671731084669_dp
      w(4)=0.064232421408525852_dp
      w(5)=0.079281411776718955_dp
      w(6)=0.092915766060035147_dp
      w(7)=0.10489209146454141_dp
      w(8)=0.11499664022241136_dp
      w(9)=0.12304908430672953_dp
      w(10)=0.12890572218808215_dp
      w(11)=0.13246203940469662_dp
      w(12)=0.13365457218610618_dp
      w(13)=0.13246203940469662_dp
      w(14)=0.12890572218808215_dp
      w(15)=0.12304908430672953_dp
      w(16)=0.11499664022241136_dp
      w(17)=0.10489209146454141_dp
      w(18)=0.092915766060035147_dp
      w(19)=0.079281411776718955_dp
      w(20)=0.064232421408525852_dp
      w(21)=0.048037671731084669_dp
      w(22)=0.030988005856979444_dp
      w(23)=0.013411859487141772_dp
   case(24)
      w(1)=0.012341229799987200_dp
      w(2)=0.028531388628933663_dp
      w(3)=0.044277438817419806_dp
      w(4)=0.059298584915436781_dp
      w(5)=0.073346481411080306_dp
      w(6)=0.086190161531953276_dp
      w(7)=0.097618652104113888_dp
      w(8)=0.10744427011596563_dp
      w(9)=0.11550566805372560_dp
      w(10)=0.12167047292780339_dp
      w(11)=0.12583745634682830_dp
      w(12)=0.12793819534675216_dp
      w(13)=0.12793819534675216_dp
      w(14)=0.12583745634682830_dp
      w(15)=0.12167047292780339_dp
      w(16)=0.11550566805372560_dp
      w(17)=0.10744427011596563_dp
      w(18)=0.097618652104113888_dp
      w(19)=0.086190161531953276_dp
      w(20)=0.073346481411080306_dp
      w(21)=0.059298584915436781_dp
      w(22)=0.044277438817419806_dp
      w(23)=0.028531388628933663_dp
      w(24)=0.012341229799987200_dp
   case(25)
      w(1)=0.011393798501026288_dp
      w(2)=0.026354986615032137_dp
      w(3)=0.040939156701306313_dp
      w(4)=0.054904695975835192_dp
      w(5)=0.068038333812356917_dp
      w(6)=0.080140700335001018_dp
      w(7)=0.091028261982963650_dp
      w(8)=0.10053594906705064_dp
      w(9)=0.10851962447426365_dp
      w(10)=0.11485825914571165_dp
      w(11)=0.11945576353578477_dp
      w(12)=0.12224244299031004_dp
      w(13)=0.12317605372671545_dp
      w(14)=0.12224244299031004_dp
      w(15)=0.11945576353578477_dp
      w(16)=0.11485825914571165_dp
      w(17)=0.10851962447426365_dp
      w(18)=0.10053594906705064_dp
      w(19)=0.091028261982963650_dp
      w(20)=0.080140700335001018_dp
      w(21)=0.068038333812356917_dp
      w(22)=0.054904695975835192_dp
      w(23)=0.040939156701306313_dp
      w(24)=0.026354986615032137_dp
      w(25)=0.011393798501026288_dp
   case(26)
      w(1)=0.010551372617343007_dp
      w(2)=0.024417851092631909_dp
      w(3)=0.037962383294362764_dp
      w(4)=0.050975825297147812_dp
      w(5)=0.063274046329574836_dp
      w(6)=0.074684149765659746_dp
      w(7)=0.085045894313485239_dp
      w(8)=0.094213800355914148_dp
      w(9)=0.10205916109442542_dp
      w(10)=0.10847184052857659_dp
      w(11)=0.11336181654631967_dp
      w(12)=0.11666044348529658_dp
      w(13)=0.11832141527926228_dp
      w(14)=0.11832141527926228_dp
      w(15)=0.11666044348529658_dp
      w(16)=0.11336181654631967_dp
      w(17)=0.10847184052857659_dp
      w(18)=0.10205916109442542_dp
      w(19)=0.094213800355914148_dp
      w(20)=0.085045894313485239_dp
      w(21)=0.074684149765659746_dp
      w(22)=0.063274046329574836_dp
      w(23)=0.050975825297147812_dp
      w(24)=0.037962383294362764_dp
      w(25)=0.024417851092631909_dp
      w(26)=0.010551372617343007_dp
   case(27)
      w(1)=0.0097989960512943603_dp
      w(2)=0.022686231596180623_dp
      w(3)=0.035297053757419711_dp
      w(4)=0.047449412520615063_dp
      w(5)=0.058983536859833599_dp
      w(6)=0.069748823766245593_dp
      w(7)=0.079604867773057771_dp
      w(8)=0.088423158543756950_dp
      w(9)=0.096088727370028508_dp
      w(10)=0.10250163781774580_dp
      w(11)=0.10757828578853319_dp
      w(12)=0.11125248835684519_dp
      w(13)=0.11347634610896515_dp
      w(14)=0.11422086737895699_dp
      w(15)=0.11347634610896515_dp
      w(16)=0.11125248835684519_dp
      w(17)=0.10757828578853319_dp
      w(18)=0.10250163781774580_dp
      w(19)=0.096088727370028508_dp
      w(20)=0.088423158543756950_dp
      w(21)=0.079604867773057771_dp
      w(22)=0.069748823766245593_dp
      w(23)=0.058983536859833599_dp
      w(24)=0.047449412520615063_dp
      w(25)=0.035297053757419711_dp
      w(26)=0.022686231596180623_dp
      w(27)=0.0097989960512943603_dp
   case(28)
      w(1)=0.0091242825930945177_dp
      w(2)=0.021132112592771260_dp
      w(3)=0.032901427782304380_dp
      w(4)=0.044272934759004228_dp
      w(5)=0.055107345675716745_dp
      w(6)=0.065272923966999596_dp
      w(7)=0.074646214234568779_dp
      w(8)=0.083113417228901218_dp
      w(9)=0.090571744393032841_dp
      w(10)=0.096930657997929916_dp
      w(11)=0.10211296757806077_dp
      w(12)=0.10605576592284642_dp
      w(13)=0.10871119225829414_dp
      w(14)=0.11004701301647520_dp
      w(15)=0.11004701301647520_dp
      w(16)=0.10871119225829414_dp
      w(17)=0.10605576592284642_dp
      w(18)=0.10211296757806077_dp
      w(19)=0.096930657997929916_dp
      w(20)=0.090571744393032841_dp
      w(21)=0.083113417228901218_dp
      w(22)=0.074646214234568779_dp
      w(23)=0.065272923966999596_dp
      w(24)=0.055107345675716745_dp
      w(25)=0.044272934759004228_dp
      w(26)=0.032901427782304380_dp
      w(27)=0.021132112592771260_dp
      w(28)=0.0091242825930945177_dp
   case(29)
      w(1)=0.0085169038787464097_dp
      w(2)=0.019732085056122706_dp
      w(3)=0.030740492202093623_dp
      w(4)=0.041402062518682836_dp
      w(5)=0.051594826902497924_dp
      w(6)=0.061203090657079139_dp
      w(7)=0.070117933255051279_dp
      w(8)=0.078238327135763784_dp
      w(9)=0.085472257366172528_dp
      w(10)=0.091737757139258763_dp
      w(11)=0.096963834094408606_dp
      w(12)=0.10109127375991497_dp
      w(13)=0.10407331007772937_dp
      w(14)=0.10587615509732094_dp
      w(15)=0.10647938171831424_dp
      w(16)=0.10587615509732094_dp
      w(17)=0.10407331007772937_dp
      w(18)=0.10109127375991497_dp
      w(19)=0.096963834094408606_dp
      w(20)=0.091737757139258763_dp
      w(21)=0.085472257366172528_dp
      w(22)=0.078238327135763784_dp
      w(23)=0.070117933255051279_dp
      w(24)=0.061203090657079139_dp
      w(25)=0.051594826902497924_dp
      w(26)=0.041402062518682836_dp
      w(27)=0.030740492202093623_dp
      w(28)=0.019732085056122706_dp
      w(29)=0.0085169038787464097_dp
   case(30)
      w(1)=0.0079681924961666056_dp
      w(2)=0.018466468311090959_dp
      w(3)=0.028784707883323369_dp
      w(4)=0.038799192569627050_dp
      w(5)=0.048402672830594053_dp
      w(6)=0.057493156217619066_dp
      w(7)=0.065974229882180495_dp
      w(8)=0.073755974737705206_dp
      w(9)=0.080755895229420215_dp
      w(10)=0.086899787201082980_dp
      w(11)=0.092122522237786129_dp
      w(12)=0.096368737174644260_dp
      w(13)=0.099593420586795267_dp
      w(14)=0.10176238974840550_dp
      w(15)=0.10285265289355884_dp
      w(16)=0.10285265289355884_dp
      w(17)=0.10176238974840550_dp
      w(18)=0.099593420586795267_dp
      w(19)=0.096368737174644260_dp
      w(20)=0.092122522237786129_dp
      w(21)=0.086899787201082980_dp
      w(22)=0.080755895229420215_dp
      w(23)=0.073755974737705206_dp
      w(24)=0.065974229882180495_dp
      w(25)=0.057493156217619066_dp
      w(26)=0.048402672830594053_dp
      w(27)=0.038799192569627050_dp
      w(28)=0.028784707883323369_dp
      w(29)=0.018466468311090959_dp
      w(30)=0.0079681924961666056_dp
   case(31)
      w(1)=0.0074708315792487759_dp
      w(2)=0.017318620790310582_dp
      w(3)=0.027009019184979422_dp
      w(4)=0.036432273912385464_dp
      w(5)=0.045493707527201103_dp
      w(6)=0.054103082424916854_dp
      w(7)=0.062174786561028427_dp
      w(8)=0.069628583235410366_dp
      w(9)=0.076390386598776616_dp
      w(10)=0.082392991761589264_dp
      w(11)=0.087576740608477876_dp
      w(12)=0.091890113893641478_dp
      w(13)=0.095290242912319513_dp
      w(14)=0.097743335386328725_dp
      w(15)=0.099225011226672308_dp
      w(16)=0.099720544793426451_dp
      w(17)=0.099225011226672308_dp
      w(18)=0.097743335386328725_dp
      w(19)=0.095290242912319513_dp
      w(20)=0.091890113893641478_dp
      w(21)=0.087576740608477876_dp
      w(22)=0.082392991761589264_dp
      w(23)=0.076390386598776616_dp
      w(24)=0.069628583235410366_dp
      w(25)=0.062174786561028427_dp
      w(26)=0.054103082424916854_dp
      w(27)=0.045493707527201103_dp
      w(28)=0.036432273912385464_dp
      w(29)=0.027009019184979422_dp
      w(30)=0.017318620790310582_dp
      w(31)=0.0074708315792487759_dp
   case(32)
      w(1)=0.0070186100094700966_dp
      w(2)=0.016274394730905671_dp
      w(3)=0.025392065309262059_dp
      w(4)=0.034273862913021433_dp
      w(5)=0.042835898022226681_dp
      w(6)=0.050998059262376176_dp
      w(7)=0.058684093478535547_dp
      w(8)=0.065822222776361847_dp
      w(9)=0.072345794108848506_dp
      w(10)=0.078193895787070306_dp
      w(11)=0.083311924226946755_dp
      w(12)=0.087652093004403811_dp
      w(13)=0.091173878695763885_dp
      w(14)=0.093844399080804566_dp
      w(15)=0.095638720079274859_dp
      w(16)=0.096540088514727801_dp
      w(17)=0.096540088514727801_dp
      w(18)=0.095638720079274859_dp
      w(19)=0.093844399080804566_dp
      w(20)=0.091173878695763885_dp
      w(21)=0.087652093004403811_dp
      w(22)=0.083311924226946755_dp
      w(23)=0.078193895787070306_dp
      w(24)=0.072345794108848506_dp
      w(25)=0.065822222776361847_dp
      w(26)=0.058684093478535547_dp
      w(27)=0.050998059262376176_dp
      w(28)=0.042835898022226681_dp
      w(29)=0.034273862913021433_dp
      w(30)=0.025392065309262059_dp
      w(31)=0.016274394730905671_dp
      w(32)=0.0070186100094700966_dp
   case(33)
      w(1)=0.0066062278475873781_dp
      w(2)=0.015321701512934676_dp
      w(3)=0.023915548101749480_dp
      w(4)=0.032300358632328953_dp
      w(5)=0.040401541331669592_dp
      w(6)=0.048147742818711696_dp
      w(7)=0.055470846631663561_dp
      w(8)=0.062306482530317480_dp
      w(9)=0.068594572818656713_dp
      w(10)=0.074279854843954149_dp
      w(11)=0.079312364794886738_dp
      w(12)=0.083647876067038708_dp
      w(13)=0.087248287618844338_dp
      w(14)=0.090081958660638577_dp
      w(15)=0.092123986643316846_dp
      w(16)=0.093356426065596116_dp
      w(17)=0.093768446160209997_dp
      w(18)=0.093356426065596116_dp
      w(19)=0.092123986643316846_dp
      w(20)=0.090081958660638577_dp
      w(21)=0.087248287618844338_dp
      w(22)=0.083647876067038708_dp
      w(23)=0.079312364794886738_dp
      w(24)=0.074279854843954149_dp
      w(25)=0.068594572818656713_dp
      w(26)=0.062306482530317480_dp
      w(27)=0.055470846631663561_dp
      w(28)=0.048147742818711696_dp
      w(29)=0.040401541331669592_dp
      w(30)=0.032300358632328953_dp
      w(31)=0.023915548101749480_dp
      w(32)=0.015321701512934676_dp
      w(33)=0.0066062278475873781_dp
   case(34)
      w(1)=0.0062291405559086847_dp
      w(2)=0.014450162748595035_dp
      w(3)=0.022563721985494970_dp
      w(4)=0.030491380638446132_dp
      w(5)=0.038166593796387516_dp
      w(6)=0.045525611523353272_dp
      w(7)=0.052507414572678106_dp
      w(8)=0.059054135827524493_dp
      w(9)=0.065111521554076411_dp
      w(10)=0.070629375814255725_dp
      w(11)=0.075561974660031931_dp
      w(12)=0.079868444339771845_dp
      w(13)=0.083513099699845655_dp
      w(14)=0.086465739747035750_dp
      w(15)=0.088701897835693869_dp
      w(16)=0.090203044370640730_dp
      w(17)=0.090956740330259874_dp
      w(18)=0.090956740330259874_dp
      w(19)=0.090203044370640730_dp
      w(20)=0.088701897835693869_dp
      w(21)=0.086465739747035750_dp
      w(22)=0.083513099699845655_dp
      w(23)=0.079868444339771845_dp
      w(24)=0.075561974660031931_dp
      w(25)=0.070629375814255725_dp
      w(26)=0.065111521554076411_dp
      w(27)=0.059054135827524493_dp
      w(28)=0.052507414572678106_dp
      w(29)=0.045525611523353272_dp
      w(30)=0.038166593796387516_dp
      w(31)=0.030491380638446132_dp
      w(32)=0.022563721985494970_dp
      w(33)=0.014450162748595035_dp
      w(34)=0.0062291405559086847_dp
   case(35)
      w(1)=0.0058834334204430850_dp
      w(2)=0.013650828348361492_dp
      w(3)=0.021322979911483581_dp
      w(4)=0.028829260108894254_dp
      w(5)=0.036110115863463381_dp
      w(6)=0.043108422326170219_dp
      w(7)=0.049769370401353530_dp
      w(8)=0.056040816212370129_dp
      w(9)=0.061873671966080189_dp
      w(10)=0.067222285269086904_dp
      w(11)=0.072044794772560065_dp
      w(12)=0.076303457155442054_dp
      w(13)=0.079964942242324263_dp
      w(14)=0.083000593728856588_dp
      w(15)=0.085386653392099125_dp
      w(16)=0.087104446997183534_dp
      w(17)=0.088140530430275463_dp
      w(18)=0.088486794907104291_dp
      w(19)=0.088140530430275463_dp
      w(20)=0.087104446997183534_dp
      w(21)=0.085386653392099125_dp
      w(22)=0.083000593728856588_dp
      w(23)=0.079964942242324263_dp
      w(24)=0.076303457155442054_dp
      w(25)=0.072044794772560065_dp
      w(26)=0.067222285269086904_dp
      w(27)=0.061873671966080189_dp
      w(28)=0.056040816212370129_dp
      w(29)=0.049769370401353530_dp
      w(30)=0.043108422326170219_dp
      w(31)=0.036110115863463381_dp
      w(32)=0.028829260108894254_dp
      w(33)=0.021322979911483581_dp
      w(34)=0.013650828348361492_dp
      w(35)=0.0058834334204430850_dp
   case(36)
      w(1)=0.0055657196642450454_dp
      w(2)=0.012915947284065574_dp
      w(3)=0.020181515297735472_dp
      w(4)=0.027298621498568779_dp
      w(5)=0.034213810770307230_dp
      w(6)=0.040875750923644895_dp
      w(7)=0.047235083490265978_dp
      w(8)=0.053244713977759919_dp
      w(9)=0.058860144245324817_dp
      w(10)=0.064039797355015490_dp
      w(11)=0.068745323835736443_dp
      w(12)=0.072941885005653061_dp
      w(13)=0.076598410645870675_dp
      w(14)=0.079687828912071602_dp
      w(15)=0.082187266704339710_dp
      w(16)=0.084078218979661935_dp
      w(17)=0.085346685739338627_dp
      w(18)=0.085983275670394747_dp
      w(19)=0.085983275670394747_dp
      w(20)=0.085346685739338627_dp
      w(21)=0.084078218979661935_dp
      w(22)=0.082187266704339710_dp
      w(23)=0.079687828912071602_dp
      w(24)=0.076598410645870675_dp
      w(25)=0.072941885005653061_dp
      w(26)=0.068745323835736443_dp
      w(27)=0.064039797355015490_dp
      w(28)=0.058860144245324817_dp
      w(29)=0.053244713977759919_dp
      w(30)=0.047235083490265978_dp
      w(31)=0.040875750923644895_dp
      w(32)=0.034213810770307230_dp
      w(33)=0.027298621498568779_dp
      w(34)=0.020181515297735472_dp
      w(35)=0.012915947284065574_dp
      w(36)=0.0055657196642450454_dp
   case(37)
      w(1)=0.0052730572794979394_dp
      w(2)=0.012238780100307557_dp
      w(3)=0.019129044489083966_dp
      w(4)=0.025886036990558934_dp
      w(5)=0.032461639847521481_dp
      w(6)=0.038809602501934544_dp
      w(7)=0.044885364662437167_dp
      w(8)=0.050646297654824602_dp
      w(9)=0.056051987998274918_dp
      w(10)=0.061064516523225986_dp
      w(11)=0.065648722872751249_dp
      w(12)=0.069772451555700345_dp
      w(13)=0.073406777248488173_dp
      w(14)=0.076526207570529238_dp
      w(15)=0.079108861837529381_dp
      w(16)=0.081136624508465031_dp
      w(17)=0.082595272236437251_dp
      w(18)=0.083474573625862787_dp
      w(19)=0.083768360993138905_dp
      w(20)=0.083474573625862787_dp
      w(21)=0.082595272236437251_dp
      w(22)=0.081136624508465031_dp
      w(23)=0.079108861837529381_dp
      w(24)=0.076526207570529238_dp
      w(25)=0.073406777248488173_dp
      w(26)=0.069772451555700345_dp
      w(27)=0.065648722872751249_dp
      w(28)=0.061064516523225986_dp
      w(29)=0.056051987998274918_dp
      w(30)=0.050646297654824602_dp
      w(31)=0.044885364662437167_dp
      w(32)=0.038809602501934544_dp
      w(33)=0.032461639847521481_dp
      w(34)=0.025886036990558934_dp
      w(35)=0.019129044489083966_dp
      w(36)=0.012238780100307557_dp
      w(37)=0.0052730572794979394_dp
   case(38)
      w(1)=0.0050028807496393457_dp
      w(2)=0.011613444716468674_dp
      w(3)=0.018156577709613237_dp
      w(4)=0.024579739738232376_dp
      w(5)=0.030839500545175055_dp
      w(6)=0.036894081594024738_dp
      w(7)=0.042703158504674434_dp
      w(8)=0.048228061860758683_dp
      w(9)=0.053432019910332320_dp
      w(10)=0.058280399146997206_dp
      w(11)=0.062740933392133054_dp
      w(12)=0.066783937979140412_dp
      w(13)=0.070382507066898955_dp
      w(14)=0.073512692584743457_dp
      w(15)=0.076153663548446396_dp
      w(16)=0.078287844658210948_dp
      w(17)=0.079901033243527822_dp
      w(18)=0.080982493770597101_dp
      w(19)=0.081525029280385787_dp
      w(20)=0.081525029280385787_dp
      w(21)=0.080982493770597101_dp
      w(22)=0.079901033243527822_dp
      w(23)=0.078287844658210948_dp
      w(24)=0.076153663548446396_dp
      w(25)=0.073512692584743457_dp
      w(26)=0.070382507066898955_dp
      w(27)=0.066783937979140412_dp
      w(28)=0.062740933392133054_dp
      w(29)=0.058280399146997206_dp
      w(30)=0.053432019910332320_dp
      w(31)=0.048228061860758683_dp
      w(32)=0.042703158504674434_dp
      w(33)=0.036894081594024738_dp
      w(34)=0.030839500545175055_dp
      w(35)=0.024579739738232376_dp
      w(36)=0.018156577709613237_dp
      w(37)=0.011613444716468674_dp
      w(38)=0.0050028807496393457_dp
   case(39)
      w(1)=0.0047529446916351014_dp
      w(2)=0.011034788939164594_dp
      w(3)=0.017256229093724919_dp
      w(4)=0.023369384832178165_dp
      w(5)=0.029334955983903379_dp
      w(6)=0.035115111498131331_dp
      w(7)=0.040673276847933844_dp
      w(8)=0.045974301108916632_dp
      w(9)=0.050984665292129405_dp
      w(10)=0.055672690340916300_dp
      w(11)=0.060008736088596150_dp
      w(12)=0.063965388138682389_dp
      w(13)=0.067517630966231265_dp
      w(14)=0.070643005970608761_dp
      w(15)=0.073321753414268617_dp
      w(16)=0.075536937322836058_dp
      w(17)=0.077274552544682017_dp
      w(18)=0.078523613287371177_dp
      w(19)=0.079276222568368471_dp
      w(20)=0.079527622139442852_dp
      w(21)=0.079276222568368471_dp
      w(22)=0.078523613287371177_dp
      w(23)=0.077274552544682017_dp
      w(24)=0.075536937322836058_dp
      w(25)=0.073321753414268617_dp
      w(26)=0.070643005970608761_dp
      w(27)=0.067517630966231265_dp
      w(28)=0.063965388138682389_dp
      w(29)=0.060008736088596150_dp
      w(30)=0.055672690340916300_dp
      w(31)=0.050984665292129405_dp
      w(32)=0.045974301108916632_dp
      w(33)=0.040673276847933844_dp
      w(34)=0.035115111498131331_dp
      w(35)=0.029334955983903379_dp
      w(36)=0.023369384832178165_dp
      w(37)=0.017256229093724919_dp
      w(38)=0.011034788939164594_dp
      w(39)=0.0047529446916351014_dp
   case(40)
      w(1)=0.0045212770985331913_dp
      w(2)=0.010498284531152814_dp
      w(3)=0.016421058381907889_dp
      w(4)=0.022245849194166957_dp
      w(5)=0.027937006980023401_dp
      w(6)=0.033460195282547847_dp
      w(7)=0.038782167974472018_dp
      w(8)=0.043870908185673272_dp
      w(9)=0.048695807635072232_dp
      w(10)=0.053227846983936824_dp
      w(11)=0.057439769099391551_dp
      w(12)=0.061306242492928939_dp
      w(13)=0.064804013456601038_dp
      w(14)=0.067912045815233904_dp
      w(15)=0.070611647391286780_dp
      w(16)=0.072886582395804059_dp
      w(17)=0.074723169057968264_dp
      w(18)=0.076110361900626242_dp
      w(19)=0.077039818164247966_dp
      w(20)=0.077505947978424811_dp
      w(21)=0.077505947978424811_dp
      w(22)=0.077039818164247966_dp
      w(23)=0.076110361900626242_dp
      w(24)=0.074723169057968264_dp
      w(25)=0.072886582395804059_dp
      w(26)=0.070611647391286780_dp
      w(27)=0.067912045815233904_dp
      w(28)=0.064804013456601038_dp
      w(29)=0.061306242492928939_dp
      w(30)=0.057439769099391551_dp
      w(31)=0.053227846983936824_dp
      w(32)=0.048695807635072232_dp
      w(33)=0.043870908185673272_dp
      w(34)=0.038782167974472018_dp
      w(35)=0.033460195282547847_dp
      w(36)=0.027937006980023401_dp
      w(37)=0.022245849194166957_dp
      w(38)=0.016421058381907889_dp
      w(39)=0.010498284531152814_dp
      w(40)=0.0045212770985331913_dp
   case(41)
      w(1)=0.0043061403581648877_dp
      w(2)=0.0099999387739059453_dp
      w(3)=0.015644938407818589_dp
      w(4)=0.021201063368779553_dp
      w(5)=0.026635899207110445_dp
      w(6)=0.031918211731699282_dp
      w(7)=0.037017716703507988_dp
      w(8)=0.041905195195909689_dp
      w(9)=0.046552648369014342_dp
      w(10)=0.050933454294617495_dp
      w(11)=0.055022519242578742_dp
      w(12)=0.058796420949871945_dp
      w(13)=0.062233542580966316_dp
      w(14)=0.065314196453527410_dp
      w(15)=0.068020736760876767_dp
      w(16)=0.070337660620817497_dp
      w(17)=0.072251696861023073_dp
      w(18)=0.073751882027223470_dp
      w(19)=0.074829623176221552_dp
      w(20)=0.075478747092715824_dp
      w(21)=0.075695535647298372_dp
      w(22)=0.075478747092715824_dp
      w(23)=0.074829623176221552_dp
      w(24)=0.073751882027223470_dp
      w(25)=0.072251696861023073_dp
      w(26)=0.070337660620817497_dp
      w(27)=0.068020736760876767_dp
      w(28)=0.065314196453527410_dp
      w(29)=0.062233542580966316_dp
      w(30)=0.058796420949871945_dp
      w(31)=0.055022519242578742_dp
      w(32)=0.050933454294617495_dp
      w(33)=0.046552648369014342_dp
      w(34)=0.041905195195909689_dp
      w(35)=0.037017716703507988_dp
      w(36)=0.031918211731699282_dp
      w(37)=0.026635899207110445_dp
      w(38)=0.021201063368779553_dp
      w(39)=0.015644938407818589_dp
      w(40)=0.0099999387739059453_dp
      w(41)=0.0043061403581648877_dp
   case(42)
      w(1)=0.0041059986046490846_dp
      w(2)=0.0095362203017485024_dp
      w(3)=0.014922443697357494_dp
      w(4)=0.020227869569052645_dp
      w(5)=0.025422959526113048_dp
      w(6)=0.030479240699603468_dp
      w(7)=0.035369071097592111_dp
      w(8)=0.040065735180692262_dp
      w(9)=0.044543577771965878_dp
      w(10)=0.048778140792803245_dp
      w(11)=0.052746295699174070_dp
      w(12)=0.056426369358018382_dp
      w(13)=0.059798262227586654_dp
      w(14)=0.062843558045002576_dp
      w(15)=0.065545624364908979_dp
      w(16)=0.067889703376521945_dp
      w(17)=0.069862992492594160_dp
      w(18)=0.071454714265170983_dp
      w(19)=0.072656175243804105_dp
      w(20)=0.073460813453467528_dp
      w(21)=0.073864234232172880_dp
      w(22)=0.073864234232172880_dp
      w(23)=0.073460813453467528_dp
      w(24)=0.072656175243804105_dp
      w(25)=0.071454714265170983_dp
      w(26)=0.069862992492594160_dp
      w(27)=0.067889703376521945_dp
      w(28)=0.065545624364908979_dp
      w(29)=0.062843558045002576_dp
      w(30)=0.059798262227586654_dp
      w(31)=0.056426369358018382_dp
      w(32)=0.052746295699174070_dp
      w(33)=0.048778140792803245_dp
      w(34)=0.044543577771965878_dp
      w(35)=0.040065735180692262_dp
      w(36)=0.035369071097592111_dp
      w(37)=0.030479240699603468_dp
      w(38)=0.025422959526113048_dp
      w(39)=0.020227869569052645_dp
      w(40)=0.014922443697357494_dp
      w(41)=0.0095362203017485024_dp
      w(42)=0.0041059986046490846_dp
   case(43)
      w(1)=0.0039194902538441273_dp
      w(2)=0.0091039966374014033_dp
      w(3)=0.014248756431576486_dp
      w(4)=0.019319901423683900_dp
      w(5)=0.024290456613838816_dp
      w(6)=0.029134413261498495_dp
      w(7)=0.033826492086860292_dp
      w(8)=0.038342222194132658_dp
      w(9)=0.042658057197982084_dp
      w(10)=0.046751494754346580_dp
      w(11)=0.050601192784390157_dp
      w(12)=0.054187080318881787_dp
      w(13)=0.057490461956910519_dp
      w(14)=0.060494115249991295_dp
      w(15)=0.063182380449396112_dp
      w(16)=0.065541242126322797_dp
      w(17)=0.067558402229365169_dp
      w(18)=0.069223344193656684_dp
      w(19)=0.070527387765085028_dp
      w(20)=0.071463734252514141_dp
      w(21)=0.072027501971421974_dp
      w(22)=0.072215751693798988_dp
      w(23)=0.072027501971421974_dp
      w(24)=0.071463734252514141_dp
      w(25)=0.070527387765085028_dp
      w(26)=0.069223344193656684_dp
      w(27)=0.067558402229365169_dp
      w(28)=0.065541242126322797_dp
      w(29)=0.063182380449396112_dp
      w(30)=0.060494115249991295_dp
      w(31)=0.057490461956910519_dp
      w(32)=0.054187080318881787_dp
      w(33)=0.050601192784390157_dp
      w(34)=0.046751494754346580_dp
      w(35)=0.042658057197982084_dp
      w(36)=0.038342222194132658_dp
      w(37)=0.033826492086860292_dp
      w(38)=0.029134413261498495_dp
      w(39)=0.024290456613838816_dp
      w(40)=0.019319901423683900_dp
      w(41)=0.014248756431576486_dp
      w(42)=0.0091039966374014033_dp
      w(43)=0.0039194902538441273_dp
   case(44)
      w(1)=0.0037454048031127775_dp
      w(2)=0.0087004813675248441_dp
      w(3)=0.013619586755579986_dp
      w(4)=0.018471481736814749_dp
      w(5)=0.023231481902019211_dp
      w(6)=0.027875782821281010_dp
      w(7)=0.032381222812069821_dp
      w(8)=0.036725347813808874_dp
      w(9)=0.040886512310346219_dp
      w(10)=0.044843984081970031_dp
      w(11)=0.048578046448352038_dp
      w(12)=0.052070096091704462_dp
      w(13)=0.055302735563728053_dp
      w(14)=0.058259859877595495_dp
      w(15)=0.060926736701561968_dp
      w(16)=0.063290079733203855_dp
      w(17)=0.065338114879181435_dp
      w(18)=0.067060638906293652_dp
      w(19)=0.068449070269366661_dp
      w(20)=0.069496491861572578_dp
      w(21)=0.070197685473558213_dp
      w(22)=0.070549157789354069_dp
      w(23)=0.070549157789354069_dp
      w(24)=0.070197685473558213_dp
      w(25)=0.069496491861572578_dp
      w(26)=0.068449070269366661_dp
      w(27)=0.067060638906293652_dp
      w(28)=0.065338114879181435_dp
      w(29)=0.063290079733203855_dp
      w(30)=0.060926736701561968_dp
      w(31)=0.058259859877595495_dp
      w(32)=0.055302735563728053_dp
      w(33)=0.052070096091704462_dp
      w(34)=0.048578046448352038_dp
      w(35)=0.044843984081970031_dp
      w(36)=0.040886512310346219_dp
      w(37)=0.036725347813808874_dp
      w(38)=0.032381222812069821_dp
      w(39)=0.027875782821281010_dp
      w(40)=0.023231481902019211_dp
      w(41)=0.018471481736814749_dp
      w(42)=0.013619586755579986_dp
      w(43)=0.0087004813675248441_dp
      w(44)=0.0037454048031127775_dp
   case(45)
      w(1)=0.0035826631552835589_dp
      w(2)=0.0083231892962182416_dp
      w(3)=0.013031104991582784_dp
      w(4)=0.017677535257937591_dp
      w(5)=0.022239847550578732_dp
      w(6)=0.026696213967577665_dp
      w(7)=0.031025374934515467_dp
      w(8)=0.035206692201609016_dp
      w(9)=0.039220236729302448_dp
      w(10)=0.043046880709164971_dp
      w(11)=0.046668387718373365_dp
      w(12)=0.050067499237952030_dp
      w(13)=0.053228016731268952_dp
      w(14)=0.056134878759786477_dp
      w(15)=0.058774232718841739_dp
      w(16)=0.061133500831066523_dp
      w(17)=0.063201440073819938_dp
      w(18)=0.064968195750723431_dp
      w(19)=0.066425348449842528_dp
      w(20)=0.067565954163607536_dp
      w(21)=0.068384577378669675_dp
      w(22)=0.068877316977661323_dp
      w(23)=0.069041824829232020_dp
      w(24)=0.068877316977661323_dp
      w(25)=0.068384577378669675_dp
      w(26)=0.067565954163607536_dp
      w(27)=0.066425348449842528_dp
      w(28)=0.064968195750723431_dp
      w(29)=0.063201440073819938_dp
      w(30)=0.061133500831066523_dp
      w(31)=0.058774232718841739_dp
      w(32)=0.056134878759786477_dp
      w(33)=0.053228016731268952_dp
      w(34)=0.050067499237952030_dp
      w(35)=0.046668387718373365_dp
      w(36)=0.043046880709164971_dp
      w(37)=0.039220236729302448_dp
      w(38)=0.035206692201609016_dp
      w(39)=0.031025374934515467_dp
      w(40)=0.026696213967577665_dp
      w(41)=0.022239847550578732_dp
      w(42)=0.017677535257937591_dp
      w(43)=0.013031104991582784_dp
      w(44)=0.0083231892962182416_dp
      w(45)=0.0035826631552835589_dp
   case(46)
      w(1)=0.0034303008681070483_dp
      w(2)=0.0079698982297246225_dp
      w(3)=0.012479883770988684_dp
      w(4)=0.016933514007836238_dp
      w(5)=0.021309998754136501_dp
      w(6)=0.025589286397130011_dp
      w(7)=0.029751829552202756_dp
      w(8)=0.033778627999106897_dp
      w(9)=0.037651305357386071_dp
      w(10)=0.041352190109678730_dp
      w(11)=0.044864395277318127_dp
      w(12)=0.048171895101712201_dp
      w(13)=0.051259598007143021_dp
      w(14)=0.054113415385856754_dp
      w(15)=0.056720325843991236_dp
      w(16)=0.059068434595546315_dp
      w(17)=0.061147027724650481_dp
      w(18)=0.062946621064394508_dp
      w(19)=0.064459003467139070_dp
      w(20)=0.065677274267781207_dp
      w(21)=0.066595874768454887_dp
      w(22)=0.067210613600678176_dp
      w(23)=0.067518685849036459_dp
      w(24)=0.067518685849036459_dp
      w(25)=0.067210613600678176_dp
      w(26)=0.066595874768454887_dp
      w(27)=0.065677274267781207_dp
      w(28)=0.064459003467139070_dp
      w(29)=0.062946621064394508_dp
      w(30)=0.061147027724650481_dp
      w(31)=0.059068434595546315_dp
      w(32)=0.056720325843991236_dp
      w(33)=0.054113415385856754_dp
      w(34)=0.051259598007143021_dp
      w(35)=0.048171895101712201_dp
      w(36)=0.044864395277318127_dp
      w(37)=0.041352190109678730_dp
      w(38)=0.037651305357386071_dp
      w(39)=0.033778627999106897_dp
      w(40)=0.029751829552202756_dp
      w(41)=0.025589286397130011_dp
      w(42)=0.021309998754136501_dp
      w(43)=0.016933514007836238_dp
      w(44)=0.012479883770988684_dp
      w(45)=0.0079698982297246225_dp
      w(46)=0.0034303008681070483_dp
   case(47)
      w(1)=0.0032874538425280149_dp
      w(2)=0.0076386162958488336_dp
      w(3)=0.011962848464312321_dp
      w(4)=0.016235333146433060_dp
      w(5)=0.020436938147668428_dp
      w(6)=0.024549211659658819_dp
      w(7)=0.028554150700643387_dp
      w(8)=0.032434235515184757_dp
      w(9)=0.036172496584174952_dp
      w(10)=0.039752586122531004_dp
      w(11)=0.043158848648479538_dp
      w(12)=0.046376389086505911_dp
      w(13)=0.049391137747361170_dp
      w(14)=0.052189911780057145_dp
      w(15)=0.054760472781530226_dp
      w(16)=0.057091580293231540_dp
      w(17)=0.059173040942338876_dp
      w(18)=0.060995753008739645_dp
      w(19)=0.062551746220921663_dp
      w(20)=0.063834216605717031_dp
      w(21)=0.064837556238945727_dp
      w(22)=0.065557377766549740_dp
      w(23)=0.065990533588810475_dp
      w(24)=0.066135129623655480_dp
      w(25)=0.065990533588810475_dp
      w(26)=0.065557377766549740_dp
      w(27)=0.064837556238945727_dp
      w(28)=0.063834216605717031_dp
      w(29)=0.062551746220921663_dp
      w(30)=0.060995753008739645_dp
      w(31)=0.059173040942338876_dp
      w(32)=0.057091580293231540_dp
      w(33)=0.054760472781530226_dp
      w(34)=0.052189911780057145_dp
      w(35)=0.049391137747361170_dp
      w(36)=0.046376389086505911_dp
      w(37)=0.043158848648479538_dp
      w(38)=0.039752586122531004_dp
      w(39)=0.036172496584174952_dp
      w(40)=0.032434235515184757_dp
      w(41)=0.028554150700643387_dp
      w(42)=0.024549211659658819_dp
      w(43)=0.020436938147668428_dp
      w(44)=0.016235333146433060_dp
      w(45)=0.011962848464312321_dp
      w(46)=0.0076386162958488336_dp
      w(47)=0.0032874538425280149_dp
   case(48)
      w(1)=0.0031533460523058386_dp
      w(2)=0.0073275539012762621_dp
      w(3)=0.011477234579234539_dp
      w(4)=0.015579315722943849_dp
      w(5)=0.019616160457355528_dp
      w(6)=0.023570760839324379_dp
      w(7)=0.027426509708356948_dp
      w(8)=0.031167227832798089_dp
      w(9)=0.034777222564770439_dp
      w(10)=0.038241351065830706_dp
      w(11)=0.041545082943464749_dp
      w(12)=0.044674560856694280_dp
      w(13)=0.047616658492490475_dp
      w(14)=0.050359035553854475_dp
      w(15)=0.052890189485193667_dp
      w(16)=0.055199503699984163_dp
      w(17)=0.057277292100403216_dp
      w(18)=0.059114839698395636_dp
      w(19)=0.060704439165893880_dp
      w(20)=0.062039423159892664_dp
      w(21)=0.063114192286254026_dp
      w(22)=0.063924238584648187_dp
      w(23)=0.064466164435950082_dp
      w(24)=0.064737696812683923_dp
      w(25)=0.064737696812683923_dp
      w(26)=0.064466164435950082_dp
      w(27)=0.063924238584648187_dp
      w(28)=0.063114192286254026_dp
      w(29)=0.062039423159892664_dp
      w(30)=0.060704439165893880_dp
      w(31)=0.059114839698395636_dp
      w(32)=0.057277292100403216_dp
      w(33)=0.055199503699984163_dp
      w(34)=0.052890189485193667_dp
      w(35)=0.050359035553854475_dp
      w(36)=0.047616658492490475_dp
      w(37)=0.044674560856694280_dp
      w(38)=0.041545082943464749_dp
      w(39)=0.038241351065830706_dp
      w(40)=0.034777222564770439_dp
      w(41)=0.031167227832798089_dp
      w(42)=0.027426509708356948_dp
      w(43)=0.023570760839324379_dp
      w(44)=0.019616160457355528_dp
      w(45)=0.015579315722943849_dp
      w(46)=0.011477234579234539_dp
      w(47)=0.0073275539012762621_dp
      w(48)=0.0031533460523058386_dp
   case(49)
      w(1)=0.0030272789889229051_dp
      w(2)=0.0070350995900864515_dp
      w(3)=0.011020551031593580_dp
      w(4)=0.014962144935624651_dp
      w(5)=0.018843595853089458_dp
      w(6)=0.022649201587446676_dp
      w(7)=0.026363618927066017_dp
      w(8)=0.029971884620583825_dp
      w(9)=0.033459466791622174_dp
      w(10)=0.036812320963000690_dp
      w(11)=0.040016945766373021_dp
      w(12)=0.043060436981259598_dp
      w(13)=0.045930539355595854_dp
      w(14)=0.048615695887828240_dp
      w(15)=0.051105094330144591_dp
      w(16)=0.053388710708258969_dp
      w(17)=0.055457349674803589_dp
      w(18)=0.057302681530187475_dp
      w(19)=0.058917275760027266_dp
      w(20)=0.060294630953152017_dp
      w(21)=0.061429200979192936_dp
      w(22)=0.062316417320057267_dp
      w(23)=0.062952707465195699_dp
      w(24)=0.063335509296491749_dp
      w(25)=0.063463281404790598_dp
      w(26)=0.063335509296491749_dp
      w(27)=0.062952707465195699_dp
      w(28)=0.062316417320057267_dp
      w(29)=0.061429200979192936_dp
      w(30)=0.060294630953152017_dp
      w(31)=0.058917275760027266_dp
      w(32)=0.057302681530187475_dp
      w(33)=0.055457349674803589_dp
      w(34)=0.053388710708258969_dp
      w(35)=0.051105094330144591_dp
      w(36)=0.048615695887828240_dp
      w(37)=0.045930539355595854_dp
      w(38)=0.043060436981259598_dp
      w(39)=0.040016945766373021_dp
      w(40)=0.036812320963000690_dp
      w(41)=0.033459466791622174_dp
      w(42)=0.029971884620583825_dp
      w(43)=0.026363618927066017_dp
      w(44)=0.022649201587446676_dp
      w(45)=0.018843595853089458_dp
      w(46)=0.014962144935624651_dp
      w(47)=0.011020551031593580_dp
      w(48)=0.0070350995900864515_dp
      w(49)=0.0030272789889229051_dp
   case(50)
      w(1)=0.0029086225531551410_dp
      w(2)=0.0067597991957454015_dp
      w(3)=0.010590548383650969_dp
      w(4)=0.014380822761485574_dp
      w(5)=0.018115560713489390_dp
      w(6)=0.021780243170124793_dp
      w(7)=0.025360673570012390_dp
      w(8)=0.028842993580535198_dp
      w(9)=0.032213728223578017_dp
      w(10)=0.035459835615146154_dp
      w(11)=0.038568756612587675_dp
      w(12)=0.041528463090147697_dp
      w(13)=0.044327504338803275_dp
      w(14)=0.046955051303948433_dp
      w(15)=0.049400938449466315_dp
      w(16)=0.051655703069581138_dp
      w(17)=0.053710621888996247_dp
      w(18)=0.055557744806212518_dp
      w(19)=0.057189925647728384_dp
      w(20)=0.058600849813222446_dp
      w(21)=0.059785058704265458_dp
      w(22)=0.060737970841770216_dp
      w(23)=0.061455899590316664_dp
      w(24)=0.061936067420683243_dp
      w(25)=0.062176616655347262_dp
      w(26)=0.062176616655347262_dp
      w(27)=0.061936067420683243_dp
      w(28)=0.061455899590316664_dp
      w(29)=0.060737970841770216_dp
      w(30)=0.059785058704265458_dp
      w(31)=0.058600849813222446_dp
      w(32)=0.057189925647728384_dp
      w(33)=0.055557744806212518_dp
      w(34)=0.053710621888996247_dp
      w(35)=0.051655703069581138_dp
      w(36)=0.049400938449466315_dp
      w(37)=0.046955051303948433_dp
      w(38)=0.044327504338803275_dp
      w(39)=0.041528463090147697_dp
      w(40)=0.038568756612587675_dp
      w(41)=0.035459835615146154_dp
      w(42)=0.032213728223578017_dp
      w(43)=0.028842993580535198_dp
      w(44)=0.025360673570012390_dp
      w(45)=0.021780243170124793_dp
      w(46)=0.018115560713489390_dp
      w(47)=0.014380822761485574_dp
      w(48)=0.010590548383650969_dp
      w(49)=0.0067597991957454015_dp
      w(50)=0.0029086225531551410_dp
   case(51)
      w(1)=0.0027968071710898956_dp
      w(2)=0.0065003377832526003_dp
      w(3)=0.010185191297821730_dp
      w(4)=0.013832634006477822_dp
      w(5)=0.017428714723401052_dp
      w(6)=0.020959988401703211_dp
      w(7)=0.024413300573781434_dp
      w(8)=0.027775798594162477_dp
      w(9)=0.031034971290160008_dp
      w(10)=0.034178693204188336_dp
      w(11)=0.037195268923260293_dp
      w(12)=0.040073476285496453_dp
      w(13)=0.042802607997880087_dp
      w(14)=0.045372511407650069_dp
      w(15)=0.047773626240623102_dp
      w(16)=0.049997020150057410_dp
      w(17)=0.052034421936697088_dp
      w(18)=0.053878252313045561_dp
      w(19)=0.055521652095738693_dp
      w(20)=0.056958507720258662_dp
      w(21)=0.058183473982592141_dp
      w(22)=0.059191993922961544_dp
      w(23)=0.059980315777503252_dp
      w(24)=0.060545506934737795_dp
      w(25)=0.060885464844856344_dp
      w(26)=0.060998924841205880_dp
      w(27)=0.060885464844856344_dp
      w(28)=0.060545506934737795_dp
      w(29)=0.059980315777503252_dp
      w(30)=0.059191993922961544_dp
      w(31)=0.058183473982592141_dp
      w(32)=0.056958507720258662_dp
      w(33)=0.055521652095738693_dp
      w(34)=0.053878252313045561_dp
      w(35)=0.052034421936697088_dp
      w(36)=0.049997020150057410_dp
      w(37)=0.047773626240623102_dp
      w(38)=0.045372511407650069_dp
      w(39)=0.042802607997880087_dp
      w(40)=0.040073476285496453_dp
      w(41)=0.037195268923260293_dp
      w(42)=0.034178693204188336_dp
      w(43)=0.031034971290160008_dp
      w(44)=0.027775798594162477_dp
      w(45)=0.024413300573781434_dp
      w(46)=0.020959988401703211_dp
      w(47)=0.017428714723401052_dp
      w(48)=0.013832634006477822_dp
      w(49)=0.010185191297821730_dp
      w(50)=0.0065003377832526003_dp
      w(51)=0.0027968071710898956_dp
   case(52)
      w(1)=0.0026913169500471111_dp
      w(2)=0.0062555239629732769_dp
      w(3)=0.0098026345794627521_dp
      w(4)=0.013315114982340961_dp
      w(5)=0.016780023396300736_dp
      w(6)=0.020184891507980792_dp
      w(7)=0.023517513553984462_dp
      w(8)=0.026765953746504013_dp
      w(9)=0.029918581147143947_dp
      w(10)=0.032964109089718798_dp
      w(11)=0.035891634835097233_dp
      w(12)=0.038690678310423979_dp
      w(13)=0.041351219500560272_dp
      w(14)=0.043863734259000408_dp
      w(15)=0.046219228372784794_dp
      w(16)=0.048409269744074897_dp
      w(17)=0.050426018566342377_dp
      w(18)=0.052262255383906993_dp
      w(19)=0.053911406932757265_dp
      w(20)=0.055367569669302653_dp
      w(21)=0.056625530902368597_dp
      w(22)=0.057680787452526828_dp
      w(23)=0.058529561771813869_dp
      w(24)=0.059168815466042970_dp
      w(25)=0.059596260171248158_dp
      w(26)=0.059810365745291860_dp
      w(27)=0.059810365745291860_dp
      w(28)=0.059596260171248158_dp
      w(29)=0.059168815466042970_dp
      w(30)=0.058529561771813869_dp
      w(31)=0.057680787452526828_dp
      w(32)=0.056625530902368597_dp
      w(33)=0.055367569669302653_dp
      w(34)=0.053911406932757265_dp
      w(35)=0.052262255383906993_dp
      w(36)=0.050426018566342377_dp
      w(37)=0.048409269744074897_dp
      w(38)=0.046219228372784794_dp
      w(39)=0.043863734259000408_dp
      w(40)=0.041351219500560272_dp
      w(41)=0.038690678310423979_dp
      w(42)=0.035891634835097233_dp
      w(43)=0.032964109089718798_dp
      w(44)=0.029918581147143947_dp
      w(45)=0.026765953746504013_dp
      w(46)=0.023517513553984462_dp
      w(47)=0.020184891507980792_dp
      w(48)=0.016780023396300736_dp
      w(49)=0.013315114982340961_dp
      w(50)=0.0098026345794627521_dp
      w(51)=0.0062555239629732769_dp
      w(52)=0.0026913169500471111_dp
   case(53)
      w(1)=0.0025916837205670318_dp
      w(2)=0.0060242762269486733_dp
      w(3)=0.0094412022849403444_dp
      w(4)=0.012826026144240379_dp
      w(5)=0.016166725256687464_dp
      w(6)=0.019451721107636895_dp
      w(7)=0.022669673057070208_dp
      w(8)=0.025809482510757518_dp
      w(9)=0.028860323617823736_dp
      w(10)=0.031811678459019323_dp
      w(11)=0.034653372583534238_dp
      w(12)=0.037375609803482916_dp
      w(13)=0.039969005843540382_dp
      w(14)=0.042424620634520014_dp
      w(15)=0.044733989103672810_dp
      w(16)=0.046889150340750314_dp
      w(17)=0.048882675032699140_dp
      w(18)=0.050707691069292715_dp
      w(19)=0.052357907229872718_dp
      w(20)=0.053827634868731029_dp
      w(21)=0.055111807523933599_dp
      w(22)=0.056205998381739710_dp
      w(23)=0.057106435536267192_dp
      w(24)=0.057810014991713196_dp
      w(25)=0.058314311362256008_dp
      w(26)=0.058617586232720263_dp
      w(27)=0.058718794151164365_dp
      w(28)=0.058617586232720263_dp
      w(29)=0.058314311362256008_dp
      w(30)=0.057810014991713196_dp
      w(31)=0.057106435536267192_dp
      w(32)=0.056205998381739710_dp
      w(33)=0.055111807523933599_dp
      w(34)=0.053827634868731029_dp
      w(35)=0.052357907229872718_dp
      w(36)=0.050707691069292715_dp
      w(37)=0.048882675032699140_dp
      w(38)=0.046889150340750314_dp
      w(39)=0.044733989103672810_dp
      w(40)=0.042424620634520014_dp
      w(41)=0.039969005843540382_dp
      w(42)=0.037375609803482916_dp
      w(43)=0.034653372583534238_dp
      w(44)=0.031811678459019323_dp
      w(45)=0.028860323617823736_dp
      w(46)=0.025809482510757518_dp
      w(47)=0.022669673057070208_dp
      w(48)=0.019451721107636895_dp
      w(49)=0.016166725256687464_dp
      w(50)=0.012826026144240379_dp
      w(51)=0.0094412022849403444_dp
      w(52)=0.0060242762269486733_dp
      w(53)=0.0025916837205670318_dp
   case(54)
      w(1)=0.0024974818357615858_dp
      w(2)=0.0058056110152399849_dp
      w(3)=0.0090993694555093969_dp
      w(4)=0.012363328128847644_dp
      w(5)=0.015586303035924132_dp
      w(6)=0.018757527621469378_dp
      w(7)=0.021866451422853086_dp
      w(8)=0.024902741467208773_dp
      w(9)=0.027856309310595870_dp
      w(10)=0.030717342497870676_dp
      w(11)=0.033476336464372646_dp
      w(12)=0.036124125840383553_dp
      w(13)=0.038651914782102517_dp
      w(14)=0.041051306136644974_dp
      w(15)=0.043314329309597015_dp
      w(16)=0.045433466728276714_dp
      w(17)=0.047401678806444991_dp
      w(18)=0.049212427324528886_dp
      w(19)=0.050859697146188144_dp
      w(20)=0.052338016198298745_dp
      w(21)=0.053642473647553611_dp
      w(22)=0.054768736213057986_dp
      w(23)=0.055713062560589988_dp
      w(24)=0.056472315730625965_dp
      w(25)=0.057043973558794599_dp
      w(26)=0.057426137054112115_dp
      w(27)=0.057617536707147025_dp
      w(28)=0.057617536707147025_dp
      w(29)=0.057426137054112115_dp
      w(30)=0.057043973558794599_dp
      w(31)=0.056472315730625965_dp
      w(32)=0.055713062560589988_dp
      w(33)=0.054768736213057986_dp
      w(34)=0.053642473647553611_dp
      w(35)=0.052338016198298745_dp
      w(36)=0.050859697146188144_dp
      w(37)=0.049212427324528886_dp
      w(38)=0.047401678806444991_dp
      w(39)=0.045433466728276714_dp
      w(40)=0.043314329309597015_dp
      w(41)=0.041051306136644974_dp
      w(42)=0.038651914782102517_dp
      w(43)=0.036124125840383553_dp
      w(44)=0.033476336464372646_dp
      w(45)=0.030717342497870676_dp
      w(46)=0.027856309310595870_dp
      w(47)=0.024902741467208773_dp
      w(48)=0.021866451422853086_dp
      w(49)=0.018757527621469378_dp
      w(50)=0.015586303035924132_dp
      w(51)=0.012363328128847644_dp
      w(52)=0.0090993694555093969_dp
      w(53)=0.0058056110152399849_dp
      w(54)=0.0024974818357615858_dp
   case(55)
      w(1)=0.0024083236199797888_dp
      w(2)=0.0055986322665607674_dp
      w(3)=0.0087757461070585282_dp
      w(4)=0.011925160719848612_dp
      w(5)=0.015036458333511788_dp
      w(6)=0.018099614520729062_dp
      w(7)=0.021104801668016454_dp
      w(8)=0.024042388009725622_dp
      w(9)=0.026902961456396271_dp
      w(10)=0.029677357765161041_dp
      w(11)=0.032356689226185832_dp
      w(12)=0.034932372873589887_dp
      w(13)=0.037396157867965545_dp
      w(14)=0.039740151874337180_dp
      w(15)=0.041956846317718762_dp
      w(16)=0.044039140421606590_dp
      w(17)=0.045980363946283838_dp
      w(18)=0.047774298551200696_dp
      w(19)=0.049415197711551739_dp
      w(20)=0.050897805124493979_dp
      w(21)=0.052217371545632085_dp
      w(22)=0.053369670001605473_dp
      w(23)=0.054351009329911102_dp
      w(24)=0.055158246002508688_dp
      w(25)=0.055788794195284087_dp
      w(26)=0.056240634071084368_dp
      w(27)=0.056512318249772001_dp
      w(28)=0.056602976444560425_dp
      w(29)=0.056512318249772001_dp
      w(30)=0.056240634071084368_dp
      w(31)=0.055788794195284087_dp
      w(32)=0.055158246002508688_dp
      w(33)=0.054351009329911102_dp
      w(34)=0.053369670001605473_dp
      w(35)=0.052217371545632085_dp
      w(36)=0.050897805124493979_dp
      w(37)=0.049415197711551739_dp
      w(38)=0.047774298551200696_dp
      w(39)=0.045980363946283838_dp
      w(40)=0.044039140421606590_dp
      w(41)=0.041956846317718762_dp
      w(42)=0.039740151874337180_dp
      w(43)=0.037396157867965545_dp
      w(44)=0.034932372873589887_dp
      w(45)=0.032356689226185832_dp
      w(46)=0.029677357765161041_dp
      w(47)=0.026902961456396271_dp
      w(48)=0.024042388009725622_dp
      w(49)=0.021104801668016454_dp
      w(50)=0.018099614520729062_dp
      w(51)=0.015036458333511788_dp
      w(52)=0.011925160719848612_dp
      w(53)=0.0087757461070585282_dp
      w(54)=0.0055986322665607674_dp
      w(55)=0.0024083236199797888_dp
   case(56)
      w(1)=0.0023238553757732155_dp
      w(2)=0.0054025222460153378_dp
      w(3)=0.0084690631633078877_dp
      w(4)=0.011509824340383382_dp
      w(5)=0.014515089278021472_dp
      w(6)=0.017475512911400947_dp
      w(7)=0.020381929882402573_dp
      w(8)=0.023225351562565317_dp
      w(9)=0.025996987058391952_dp
      w(10)=0.028688268473822742_dp
      w(11)=0.031290876747310448_dp
      w(12)=0.033796767115611761_dp
      w(13)=0.036198193872315186_dp
      w(14)=0.038487734259247662_dp
      w(15)=0.040658311384744518_dp
      w(16)=0.042703216084667087_dp
      w(17)=0.044616127652692283_dp
      w(18)=0.046391133373001897_dp
      w(19)=0.048022746793600258_dp
      w(20)=0.049505924683047579_dp
      w(21)=0.050836082617798481_dp
      w(22)=0.052009109151741400_dp
      w(23)=0.053021378524010764_dp
      w(24)=0.053869761865714486_dp
      w(25)=0.054551636870889421_dp
      w(26)=0.055064895901762426_dp
      w(27)=0.055407952503245123_dp
      w(28)=0.055579746306514396_dp
      w(29)=0.055579746306514396_dp
      w(30)=0.055407952503245123_dp
      w(31)=0.055064895901762426_dp
      w(32)=0.054551636870889421_dp
      w(33)=0.053869761865714486_dp
      w(34)=0.053021378524010764_dp
      w(35)=0.052009109151741400_dp
      w(36)=0.050836082617798481_dp
      w(37)=0.049505924683047579_dp
      w(38)=0.048022746793600258_dp
      w(39)=0.046391133373001897_dp
      w(40)=0.044616127652692283_dp
      w(41)=0.042703216084667087_dp
      w(42)=0.040658311384744518_dp
      w(43)=0.038487734259247662_dp
      w(44)=0.036198193872315186_dp
      w(45)=0.033796767115611761_dp
      w(46)=0.031290876747310448_dp
      w(47)=0.028688268473822742_dp
      w(48)=0.025996987058391952_dp
      w(49)=0.023225351562565317_dp
      w(50)=0.020381929882402573_dp
      w(51)=0.017475512911400947_dp
      w(52)=0.014515089278021472_dp
      w(53)=0.011509824340383382_dp
      w(54)=0.0084690631633078877_dp
      w(55)=0.0054025222460153378_dp
      w(56)=0.0023238553757732155_dp
   case(57)
      w(1)=0.0022437538722506629_dp
      w(2)=0.0052165334747187794_dp
      w(3)=0.0081781600678212326_dp
      w(4)=0.011115763732335990_dp
      w(5)=0.014020270790753556_dp
      w(6)=0.016882959023441549_dp
      w(7)=0.019695270699488520_dp
      w(8)=0.022448807890776438_dp
      w(9)=0.025135350990918123_dp
      w(10)=0.027746881402180192_dp
      w(11)=0.030275604842693999_dp
      w(12)=0.032713974366371569_dp
      w(13)=0.035054712782312618_dp
      w(14)=0.037290834324417317_dp
      w(15)=0.039415665475480114_dp
      w(16)=0.041422864870801110_dp
      w(17)=0.043306442216215197_dp
      w(18)=0.045060776161381158_dp
      w(19)=0.046680631073641504_dp
      w(20)=0.048161172661687751_dp
      w(21)=0.049497982402019679_dp
      w(22)=0.050687070724927409_dp
      w(23)=0.051724888920517825_dp
      w(24)=0.052608339729177432_dp
      w(25)=0.053334786584819158_dp
      w(26)=0.053902061483298575_dp
      w(27)=0.054308471452498643_dp
      w(28)=0.054552803604761886_dp
      w(29)=0.054634328756584024_dp
      w(30)=0.054552803604761886_dp
      w(31)=0.054308471452498643_dp
      w(32)=0.053902061483298575_dp
      w(33)=0.053334786584819158_dp
      w(34)=0.052608339729177432_dp
      w(35)=0.051724888920517825_dp
      w(36)=0.050687070724927409_dp
      w(37)=0.049497982402019679_dp
      w(38)=0.048161172661687751_dp
      w(39)=0.046680631073641504_dp
      w(40)=0.045060776161381158_dp
      w(41)=0.043306442216215197_dp
      w(42)=0.041422864870801110_dp
      w(43)=0.039415665475480114_dp
      w(44)=0.037290834324417317_dp
      w(45)=0.035054712782312618_dp
      w(46)=0.032713974366371569_dp
      w(47)=0.030275604842693999_dp
      w(48)=0.027746881402180192_dp
      w(49)=0.025135350990918123_dp
      w(50)=0.022448807890776438_dp
      w(51)=0.019695270699488520_dp
      w(52)=0.016882959023441549_dp
      w(53)=0.014020270790753556_dp
      w(54)=0.011115763732335990_dp
      w(55)=0.0081781600678212326_dp
      w(56)=0.0052165334747187794_dp
      w(57)=0.0022437538722506629_dp
   case(58)
      w(1)=0.0021677232496274499_dp
      w(2)=0.0050399816126502431_dp
      w(3)=0.0079019738499986748_dp
      w(4)=0.010741553532878774_dp
      w(5)=0.013550237112988812_dp
      w(6)=0.016319874234970965_dp
      w(7)=0.019042465461893409_dp
      w(8)=0.021710156140146236_dp
      w(9)=0.024315252724963953_dp
      w(10)=0.026850243181981868_dp
      w(11)=0.029307818044160491_dp
      w(12)=0.031680891253809327_dp
      w(13)=0.033962620493416011_dp
      w(14)=0.036146426867087271_dp
      w(15)=0.038226013845858433_dp
      w(16)=0.040195385409867797_dp
      w(17)=0.042048863329582126_dp
      w(18)=0.043781103533640251_dp
      w(19)=0.045387111514819803_dp
      w(20)=0.046862256729026347_dp
      w(21)=0.048202285945417748_dp
      w(22)=0.049403335508962393_dp
      w(23)=0.050461942479953125_dp
      w(24)=0.051375054618285725_dp
      w(25)=0.052140039183669819_dp
      w(26)=0.052754690526370833_dp
      w(27)=0.053217236446579014_dp
      w(28)=0.053526343304058252_dp
      w(29)=0.053681119863334849_dp
      w(30)=0.053681119863334849_dp
      w(31)=0.053526343304058252_dp
      w(32)=0.053217236446579014_dp
      w(33)=0.052754690526370833_dp
      w(34)=0.052140039183669819_dp
      w(35)=0.051375054618285725_dp
      w(36)=0.050461942479953125_dp
      w(37)=0.049403335508962393_dp
      w(38)=0.048202285945417748_dp
      w(39)=0.046862256729026347_dp
      w(40)=0.045387111514819803_dp
      w(41)=0.043781103533640251_dp
      w(42)=0.042048863329582126_dp
      w(43)=0.040195385409867797_dp
      w(44)=0.038226013845858433_dp
      w(45)=0.036146426867087271_dp
      w(46)=0.033962620493416011_dp
      w(47)=0.031680891253809327_dp
      w(48)=0.029307818044160491_dp
      w(49)=0.026850243181981868_dp
      w(50)=0.024315252724963953_dp
      w(51)=0.021710156140146236_dp
      w(52)=0.019042465461893409_dp
      w(53)=0.016319874234970965_dp
      w(54)=0.013550237112988812_dp
      w(55)=0.010741553532878774_dp
      w(56)=0.0079019738499986748_dp
      w(57)=0.0050399816126502431_dp
      w(58)=0.0021677232496274499_dp
   case(59)
      w(1)=0.0020954922845412234_dp
      w(2)=0.0048722391682652848_dp
      w(3)=0.0076395294534875751_dp
      w(4)=0.010385885500995862_dp
      w(5)=0.013103366306345191_dp
      w(6)=0.015784347313081466_dp
      w(7)=0.018421342753610029_dp
      w(8)=0.021006998288437187_dp
      w(9)=0.023534105393713363_dp
      w(10)=0.025995619731298500_dp
      w(11)=0.028384680200534798_dp
      w(12)=0.030694627836111683_dp
      w(13)=0.032919024271045278_dp
      w(14)=0.035051669636400109_dp
      w(15)=0.037086619818870923_dp
      w(16)=0.039018203016160010_dp
      w(17)=0.040841035538686708_dp
      w(18)=0.042550036811067639_dp
      w(19)=0.044140443530297381_dp
      w(20)=0.045607822940509770_dp
      w(21)=0.046948085186962019_dp
      w(22)=0.048157494714606440_dp
      w(23)=0.049232680679361986_dp
      w(24)=0.050170646342996903_dp
      w(25)=0.050968777425393917_dp
      w(26)=0.051624849390891482_dp
      w(27)=0.052137033648375391_dp
      w(28)=0.052503902647828739_dp
      w(29)=0.052724433859127932_dp
      w(30)=0.052798012621990421_dp
      w(31)=0.052724433859127932_dp
      w(32)=0.052503902647828739_dp
      w(33)=0.052137033648375391_dp
      w(34)=0.051624849390891482_dp
      w(35)=0.050968777425393917_dp
      w(36)=0.050170646342996903_dp
      w(37)=0.049232680679361986_dp
      w(38)=0.048157494714606440_dp
      w(39)=0.046948085186962019_dp
      w(40)=0.045607822940509770_dp
      w(41)=0.044140443530297381_dp
      w(42)=0.042550036811067639_dp
      w(43)=0.040841035538686708_dp
      w(44)=0.039018203016160010_dp
      w(45)=0.037086619818870923_dp
      w(46)=0.035051669636400109_dp
      w(47)=0.032919024271045278_dp
      w(48)=0.030694627836111683_dp
      w(49)=0.028384680200534798_dp
      w(50)=0.025995619731298500_dp
      w(51)=0.023534105393713363_dp
      w(52)=0.021006998288437187_dp
      w(53)=0.018421342753610029_dp
      w(54)=0.015784347313081466_dp
      w(55)=0.013103366306345191_dp
      w(56)=0.010385885500995862_dp
      w(57)=0.0076395294534875751_dp
      w(58)=0.0048722391682652848_dp
      w(59)=0.0020954922845412234_dp
   case(60)
      w(1)=0.0020268119688737585_dp
      w(2)=0.0047127299269535686_dp
      w(3)=0.0073899311633454555_dp
      w(4)=0.010047557182287984_dp
      w(5)=0.012678166476815960_dp
      w(6)=0.015274618596784799_dp
      w(7)=0.017829901014207720_dp
      w(8)=0.020337120729457287_dp
      w(9)=0.022789516943997820_dp
      w(10)=0.025180477621521248_dp
      w(11)=0.027503556749924792_dp
      w(12)=0.029752491500788945_dp
      w(13)=0.031921219019296329_dp
      w(14)=0.034003892724946423_dp
      w(15)=0.035994898051084503_dp
      w(16)=0.037888867569243444_dp
      w(17)=0.039680695452380799_dp
      w(18)=0.041365551235584756_dp
      w(19)=0.042938892835935642_dp
      w(20)=0.044396478795787113_dp
      w(21)=0.045734379716114487_dp
      w(22)=0.046948988848912205_dp
      w(23)=0.048037031819971181_dp
      w(24)=0.048995575455756835_dp
      w(25)=0.049822035690550181_dp
      w(26)=0.050514184532509375_dp
      w(27)=0.051070156069855627_dp
      w(28)=0.051488451500980934_dp
      w(29)=0.051767943174910188_dp
      w(30)=0.051907877631220640_dp
      w(31)=0.051907877631220640_dp
      w(32)=0.051767943174910188_dp
      w(33)=0.051488451500980934_dp
      w(34)=0.051070156069855627_dp
      w(35)=0.050514184532509375_dp
      w(36)=0.049822035690550181_dp
      w(37)=0.048995575455756835_dp
      w(38)=0.048037031819971181_dp
      w(39)=0.046948988848912205_dp
      w(40)=0.045734379716114487_dp
      w(41)=0.044396478795787113_dp
      w(42)=0.042938892835935642_dp
      w(43)=0.041365551235584756_dp
      w(44)=0.039680695452380799_dp
      w(45)=0.037888867569243444_dp
      w(46)=0.035994898051084503_dp
      w(47)=0.034003892724946423_dp
      w(48)=0.031921219019296329_dp
      w(49)=0.029752491500788945_dp
      w(50)=0.027503556749924792_dp
      w(51)=0.025180477621521248_dp
      w(52)=0.022789516943997820_dp
      w(53)=0.020337120729457287_dp
      w(54)=0.017829901014207720_dp
      w(55)=0.015274618596784799_dp
      w(56)=0.012678166476815960_dp
      w(57)=0.010047557182287984_dp
      w(58)=0.0073899311633454555_dp
      w(59)=0.0047127299269535686_dp
      w(60)=0.0020268119688737585_dp
   case(61)
      w(1)=0.0019614533616702827_dp
      w(2)=0.0045609240060124172_dp
      w(3)=0.0071523549917490896_dp
      w(4)=0.0097254618303561337_dp
      w(5)=0.012273263507812105_dp
      w(6)=0.014789065884937915_dp
      w(7)=0.017266292987613744_dp
      w(8)=0.019698477746101181_dp
      w(9)=0.022079273148319044_dp
      w(10)=0.024402467187544203_dp
      w(11)=0.026661998524150890_dp
      w(12)=0.028851972088183402_dp
      w(13)=0.030966674368397395_dp
      w(14)=0.033000588275907411_dp
      w(15)=0.034948407516533351_dp
      w(16)=0.036805050423154817_dp
      w(17)=0.038565673207008173_dp
      w(18)=0.040225682590998247_dp
      w(19)=0.041780747790888492_dp
      w(20)=0.043226811812496098_dp
      w(21)=0.044560102035083488_dp
      w(22)=0.045777140053145959_dp
      w(23)=0.046874750750809066_dp
      w(24)=0.047850070585095607_dp
      w(25)=0.048700555056411526_dp
      w(26)=0.049423985346735590_dp
      w(27)=0.050018474108178253_dp
      w(28)=0.050482470386797405_dp
      w(29)=0.050814763668818343_dp
      w(30)=0.051014487038697264_dp
      w(31)=0.051081119440786218_dp
      w(32)=0.051014487038697264_dp
      w(33)=0.050814763668818343_dp
      w(34)=0.050482470386797405_dp
      w(35)=0.050018474108178253_dp
      w(36)=0.049423985346735590_dp
      w(37)=0.048700555056411526_dp
      w(38)=0.047850070585095607_dp
      w(39)=0.046874750750809066_dp
      w(40)=0.045777140053145959_dp
      w(41)=0.044560102035083488_dp
      w(42)=0.043226811812496098_dp
      w(43)=0.041780747790888492_dp
      w(44)=0.040225682590998247_dp
      w(45)=0.038565673207008173_dp
      w(46)=0.036805050423154817_dp
      w(47)=0.034948407516533351_dp
      w(48)=0.033000588275907411_dp
      w(49)=0.030966674368397395_dp
      w(50)=0.028851972088183402_dp
      w(51)=0.026661998524150890_dp
      w(52)=0.024402467187544203_dp
      w(53)=0.022079273148319044_dp
      w(54)=0.019698477746101181_dp
      w(55)=0.017266292987613744_dp
      w(56)=0.014789065884937915_dp
      w(57)=0.012273263507812105_dp
      w(58)=0.0097254618303561337_dp
      w(59)=0.0071523549917490896_dp
      w(60)=0.0045609240060124172_dp
      w(61)=0.0019614533616702827_dp
   case(62)
      w(1)=0.0018992056795136905_dp
      w(2)=0.0044163334569309048_dp
      w(3)=0.0069260419018309609_dp
      w(4)=0.0094185794284203876_dp
      w(5)=0.011887390117010502_dp
      w(6)=0.014326191823806518_dp
      w(7)=0.016728811790177316_dp
      w(8)=0.019089176658573199_dp
      w(9)=0.021401322277669969_dp
      w(10)=0.023659407208682793_dp
      w(11)=0.025857726954024698_dp
      w(12)=0.027990728163314638_dp
      w(13)=0.030053022573989870_dp
      w(14)=0.032039400581624678_dp
      w(15)=0.033944844379410545_dp
      w(16)=0.035764540622768141_dp
      w(17)=0.037493892582280030_dp
      w(18)=0.039128531751963084_dp
      w(19)=0.040664328882417441_dp
      w(20)=0.042097404410385097_dp
      w(21)=0.043424138258047420_dp
      w(22)=0.044641178977124414_dp
      w(23)=0.045745452214570181_dp
      w(24)=0.046734168478415525_dp
      w(25)=0.047604830184101232_dp
      w(26)=0.048355237963477673_dp
      w(27)=0.048983496220517837_dp
      w(28)=0.049488017919699293_dp
      w(29)=0.049867528594952394_dp
      w(30)=0.050121069569043288_dp
      w(31)=0.050248000375256282_dp
      w(32)=0.050248000375256282_dp
      w(33)=0.050121069569043288_dp
      w(34)=0.049867528594952394_dp
      w(35)=0.049488017919699293_dp
      w(36)=0.048983496220517837_dp
      w(37)=0.048355237963477673_dp
      w(38)=0.047604830184101232_dp
      w(39)=0.046734168478415525_dp
      w(40)=0.045745452214570181_dp
      w(41)=0.044641178977124414_dp
      w(42)=0.043424138258047420_dp
      w(43)=0.042097404410385097_dp
      w(44)=0.040664328882417441_dp
      w(45)=0.039128531751963084_dp
      w(46)=0.037493892582280030_dp
      w(47)=0.035764540622768141_dp
      w(48)=0.033944844379410545_dp
      w(49)=0.032039400581624678_dp
      w(50)=0.030053022573989870_dp
      w(51)=0.027990728163314638_dp
      w(52)=0.025857726954024698_dp
      w(53)=0.023659407208682793_dp
      w(54)=0.021401322277669969_dp
      w(55)=0.019089176658573199_dp
      w(56)=0.016728811790177316_dp
      w(57)=0.014326191823806518_dp
      w(58)=0.011887390117010502_dp
      w(59)=0.0094185794284203876_dp
      w(60)=0.0069260419018309609_dp
      w(61)=0.0044163334569309048_dp
      w(62)=0.0018992056795136905_dp
   case(63)
      w(1)=0.0018398745955770841_dp
      w(2)=0.0042785083468637619_dp
      w(3)=0.0067102917659601363_dp
      w(4)=0.0091259686763266564_dp
      w(5)=0.011519376076880042_dp
      w(6)=0.013884612616115611_dp
      w(7)=0.016215878410338339_dp
      w(8)=0.018507464460161270_dp
      w(9)=0.020753761258039091_dp
      w(10)=0.022949271004889933_dp
      w(11)=0.025088620553344987_dp
      w(12)=0.027166574359097933_dp
      w(13)=0.029178047208280527_dp
      w(14)=0.031118116622219818_dp
      w(15)=0.032982034883779342_dp
      w(16)=0.034765240645355878_dp
      w(17)=0.036463370085457290_dp
      w(18)=0.038072267584349557_dp
      w(19)=0.039587995891544094_dp
      w(20)=0.041006845759666399_dp
      w(21)=0.042325345020815823_dp
      w(22)=0.043540267083027591_dp
      w(23)=0.044648638825941395_dp
      w(24)=0.045647747876292609_dp
      w(25)=0.046535149245383697_dp
      w(26)=0.047308671312268919_dp
      w(27)=0.047966421137995131_dp
      w(28)=0.048506789097883848_dp
      w(29)=0.048928452820511990_dp
      w(30)=0.049230380423747561_dp
      w(31)=0.049411833039918179_dp
      w(32)=0.049472366623931021_dp
      w(33)=0.049411833039918179_dp
      w(34)=0.049230380423747561_dp
      w(35)=0.048928452820511990_dp
      w(36)=0.048506789097883848_dp
      w(37)=0.047966421137995131_dp
      w(38)=0.047308671312268919_dp
      w(39)=0.046535149245383697_dp
      w(40)=0.045647747876292609_dp
      w(41)=0.044648638825941395_dp
      w(42)=0.043540267083027591_dp
      w(43)=0.042325345020815823_dp
      w(44)=0.041006845759666399_dp
      w(45)=0.039587995891544094_dp
      w(46)=0.038072267584349557_dp
      w(47)=0.036463370085457290_dp
      w(48)=0.034765240645355878_dp
      w(49)=0.032982034883779342_dp
      w(50)=0.031118116622219818_dp
      w(51)=0.029178047208280527_dp
      w(52)=0.027166574359097933_dp
      w(53)=0.025088620553344987_dp
      w(54)=0.022949271004889933_dp
      w(55)=0.020753761258039091_dp
      w(56)=0.018507464460161270_dp
      w(57)=0.016215878410338339_dp
      w(58)=0.013884612616115611_dp
      w(59)=0.011519376076880042_dp
      w(60)=0.0091259686763266564_dp
      w(61)=0.0067102917659601363_dp
      w(62)=0.0042785083468637619_dp
      w(63)=0.0018398745955770841_dp
   case(64)
      w(1)=0.0017832807216964329_dp
      w(2)=0.0041470332605624676_dp
      w(3)=0.0065044579689783629_dp
      w(4)=0.0088467598263639477_dp
      w(5)=0.011168139460131129_dp
      w(6)=0.013463047896718643_dp
      w(7)=0.015726030476024719_dp
      w(8)=0.017951715775697343_dp
      w(9)=0.020134823153530209_dp
      w(10)=0.022270173808383254_dp
      w(11)=0.024352702568710873_dp
      w(12)=0.026377469715054659_dp
      w(13)=0.028339672614259483_dp
      w(14)=0.030234657072402479_dp
      w(15)=0.032057928354851554_dp
      w(16)=0.033805161837141609_dp
      w(17)=0.035472213256882384_dp
      w(18)=0.037055128540240046_dp
      w(19)=0.038550153178615629_dp
      w(20)=0.039953741132720341_dp
      w(21)=0.041262563242623529_dp
      w(22)=0.042473515123653589_dp
      w(23)=0.043583724529323453_dp
      w(24)=0.044590558163756563_dp
      w(25)=0.045491627927418144_dp
      w(26)=0.046284796581314417_dp
      w(27)=0.046968182816210017_dp
      w(28)=0.047540165714830309_dp
      w(29)=0.047999388596458308_dp
      w(30)=0.048344762234802957_dp
      w(31)=0.048575467441503427_dp
      w(32)=0.048690957009139720_dp
      w(33)=0.048690957009139720_dp
      w(34)=0.048575467441503427_dp
      w(35)=0.048344762234802957_dp
      w(36)=0.047999388596458308_dp
      w(37)=0.047540165714830309_dp
      w(38)=0.046968182816210017_dp
      w(39)=0.046284796581314417_dp
      w(40)=0.045491627927418144_dp
      w(41)=0.044590558163756563_dp
      w(42)=0.043583724529323453_dp
      w(43)=0.042473515123653589_dp
      w(44)=0.041262563242623529_dp
      w(45)=0.039953741132720341_dp
      w(46)=0.038550153178615629_dp
      w(47)=0.037055128540240046_dp
      w(48)=0.035472213256882384_dp
      w(49)=0.033805161837141609_dp
      w(50)=0.032057928354851554_dp
      w(51)=0.030234657072402479_dp
      w(52)=0.028339672614259483_dp
      w(53)=0.026377469715054659_dp
      w(54)=0.024352702568710873_dp
      w(55)=0.022270173808383254_dp
      w(56)=0.020134823153530209_dp
      w(57)=0.017951715775697343_dp
      w(58)=0.015726030476024719_dp
      w(59)=0.013463047896718643_dp
      w(60)=0.011168139460131129_dp
      w(61)=0.0088467598263639477_dp
      w(62)=0.0065044579689783629_dp
      w(63)=0.0041470332605624676_dp
      w(64)=0.0017832807216964329_dp
   case default
      write(*,*) "gauss_wts ERROR: Exceeded maximum Gauss weights = ", max_gauss_pts;
      call stop_error("")
end select
gauss_wts=w
end function

!--------------------------------------------------------------------------------------------------!

function lobatto_pts(n)
! returns Lobatto points for n-point quadrature (n>=2)
integer, intent(in):: n ! number of Lobatto points
real(dp) lobatto_pts(n)  ! Lobatto points for n-point quadrature
real(dp) xi(n)
select case(n)
   case(2)
      xi(1)=-1.0000000000000000_dp
      xi(2)=1.0000000000000000_dp
   case(3)
      xi(1)=-1.0000000000000000_dp
      xi(2)=0.0_dp
      xi(3)=1.0000000000000000_dp
   case(4)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.44721359549995794_dp
      xi(3)=0.44721359549995794_dp
      xi(4)=1.0000000000000000_dp
   case(5)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.65465367070797714_dp
      xi(3)=0.0_dp
      xi(4)=0.65465367070797714_dp
      xi(5)=1.0000000000000000_dp
   case(6)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.76505532392946469_dp
      xi(3)=-0.28523151648064510_dp
      xi(4)=0.28523151648064510_dp
      xi(5)=0.76505532392946469_dp
      xi(6)=1.0000000000000000_dp
   case(7)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.83022389627856693_dp
      xi(3)=-0.46884879347071421_dp
      xi(4)=0.0_dp
      xi(5)=0.46884879347071421_dp
      xi(6)=0.83022389627856693_dp
      xi(7)=1.0000000000000000_dp
   case(8)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.87174014850960662_dp
      xi(3)=-0.59170018143314230_dp
      xi(4)=-0.20929921790247887_dp
      xi(5)=0.20929921790247887_dp
      xi(6)=0.59170018143314230_dp
      xi(7)=0.87174014850960662_dp
      xi(8)=1.0000000000000000_dp
   case(9)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.89975799541146016_dp
      xi(3)=-0.67718627951073775_dp
      xi(4)=-0.36311746382617816_dp
      xi(5)=0.0_dp
      xi(6)=0.36311746382617816_dp
      xi(7)=0.67718627951073775_dp
      xi(8)=0.89975799541146016_dp
      xi(9)=1.0000000000000000_dp
   case(10)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.91953390816645881_dp
      xi(3)=-0.73877386510550508_dp
      xi(4)=-0.47792494981044450_dp
      xi(5)=-0.16527895766638702_dp
      xi(6)=0.16527895766638702_dp
      xi(7)=0.47792494981044450_dp
      xi(8)=0.73877386510550508_dp
      xi(9)=0.91953390816645881_dp
      xi(10)=1.0000000000000000_dp
   case(11)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.93400143040805913_dp
      xi(3)=-0.78448347366314442_dp
      xi(4)=-0.56523532699620501_dp
      xi(5)=-0.29575813558693939_dp
      xi(6)=0.0_dp
      xi(7)=0.29575813558693939_dp
      xi(8)=0.56523532699620501_dp
      xi(9)=0.78448347366314442_dp
      xi(10)=0.93400143040805913_dp
      xi(11)=1.0000000000000000_dp
   case(12)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.94489927222288222_dp
      xi(3)=-0.81927932164400668_dp
      xi(4)=-0.63287615303186068_dp
      xi(5)=-0.39953094096534893_dp
      xi(6)=-0.13655293285492755_dp
      xi(7)=0.13655293285492755_dp
      xi(8)=0.39953094096534893_dp
      xi(9)=0.63287615303186068_dp
      xi(10)=0.81927932164400668_dp
      xi(11)=0.94489927222288222_dp
      xi(12)=1.0000000000000000_dp
   case(13)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.95330984664216391_dp
      xi(3)=-0.84634756465187232_dp
      xi(4)=-0.68618846908175743_dp
      xi(5)=-0.48290982109133620_dp
      xi(6)=-0.24928693010623999_dp
      xi(7)=0.0_dp
      xi(8)=0.24928693010623999_dp
      xi(9)=0.48290982109133620_dp
      xi(10)=0.68618846908175743_dp
      xi(11)=0.84634756465187232_dp
      xi(12)=0.95330984664216391_dp
      xi(13)=1.0000000000000000_dp
   case(14)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.95993504526726090_dp
      xi(3)=-0.86780105383034725_dp
      xi(4)=-0.72886859909132614_dp
      xi(5)=-0.55063940292864706_dp
      xi(6)=-0.34272401334271285_dp
      xi(7)=-0.11633186888370387_dp
      xi(8)=0.11633186888370387_dp
      xi(9)=0.34272401334271285_dp
      xi(10)=0.55063940292864706_dp
      xi(11)=0.72886859909132614_dp
      xi(12)=0.86780105383034725_dp
      xi(13)=0.95993504526726090_dp
      xi(14)=1.0000000000000000_dp
   case(15)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.96524592650383857_dp
      xi(3)=-0.88508204422297630_dp
      xi(4)=-0.76351968995181520_dp
      xi(5)=-0.60625320546984571_dp
      xi(6)=-0.42063805471367248_dp
      xi(7)=-0.21535395536379424_dp
      xi(8)=0.0_dp
      xi(9)=0.21535395536379424_dp
      xi(10)=0.42063805471367248_dp
      xi(11)=0.60625320546984571_dp
      xi(12)=0.76351968995181520_dp
      xi(13)=0.88508204422297630_dp
      xi(14)=0.96524592650383857_dp
      xi(15)=1.0000000000000000_dp
   case(16)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.96956804627021793_dp
      xi(3)=-0.89920053309347209_dp
      xi(4)=-0.79200829186181506_dp
      xi(5)=-0.65238870288249309_dp
      xi(6)=-0.48605942188713761_dp
      xi(7)=-0.29983046890076321_dp
      xi(8)=-0.10132627352194945_dp
      xi(9)=0.10132627352194945_dp
      xi(10)=0.29983046890076321_dp
      xi(11)=0.48605942188713761_dp
      xi(12)=0.65238870288249309_dp
      xi(13)=0.79200829186181506_dp
      xi(14)=0.89920053309347209_dp
      xi(15)=0.96956804627021793_dp
      xi(16)=1.0000000000000000_dp
   case(17)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.97313217663141831_dp
      xi(3)=-0.91087999591557360_dp
      xi(4)=-0.81569625122177031_dp
      xi(5)=-0.69102898062768471_dp
      xi(6)=-0.54138539933010154_dp
      xi(7)=-0.37217443356547704_dp
      xi(8)=-0.18951197351831739_dp
      xi(9)=0.0_dp
      xi(10)=0.18951197351831739_dp
      xi(11)=0.37217443356547704_dp
      xi(12)=0.54138539933010154_dp
      xi(13)=0.69102898062768471_dp
      xi(14)=0.81569625122177031_dp
      xi(15)=0.91087999591557360_dp
      xi(16)=0.97313217663141831_dp
      xi(17)=1.0000000000000000_dp
   case(18)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.97610555741219854_dp
      xi(3)=-0.92064918534753387_dp
      xi(4)=-0.83559353521809021_dp
      xi(5)=-0.72367932928324268_dp
      xi(6)=-0.58850483431866176_dp
      xi(7)=-0.43441503691212398_dp
      xi(8)=-0.26636265287828098_dp
      xi(9)=-0.089749093484652111_dp
      xi(10)=0.089749093484652111_dp
      xi(11)=0.26636265287828098_dp
      xi(12)=0.43441503691212398_dp
      xi(13)=0.58850483431866176_dp
      xi(14)=0.72367932928324268_dp
      xi(15)=0.83559353521809021_dp
      xi(16)=0.92064918534753387_dp
      xi(17)=0.97610555741219854_dp
      xi(18)=1.0000000000000000_dp
   case(19)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.97861176622208010_dp
      xi(3)=-0.92890152815258624_dp
      xi(4)=-0.85246057779664609_dp
      xi(5)=-0.75149420255261301_dp
      xi(6)=-0.62890813726522050_dp
      xi(7)=-0.48822928568071350_dp
      xi(8)=-0.33350484782449861_dp
      xi(9)=-0.16918602340928157_dp
      xi(10)=0.0_dp
      xi(11)=0.16918602340928157_dp
      xi(12)=0.33350484782449861_dp
      xi(13)=0.48822928568071350_dp
      xi(14)=0.62890813726522050_dp
      xi(15)=0.75149420255261301_dp
      xi(16)=0.85246057779664609_dp
      xi(17)=0.92890152815258624_dp
      xi(18)=0.97861176622208010_dp
      xi(19)=1.0000000000000000_dp
   case(20)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.98074370489391417_dp
      xi(3)=-0.93593449881266544_dp
      xi(4)=-0.86687797808995014_dp
      xi(5)=-0.77536826095205587_dp
      xi(6)=-0.66377640229031129_dp
      xi(7)=-0.53499286403188626_dp
      xi(8)=-0.39235318371390930_dp
      xi(9)=-0.23955170592298650_dp
      xi(10)=-0.080545937238821838_dp
      xi(11)=0.080545937238821838_dp
      xi(12)=0.23955170592298650_dp
      xi(13)=0.39235318371390930_dp
      xi(14)=0.53499286403188626_dp
      xi(15)=0.66377640229031129_dp
      xi(16)=0.77536826095205587_dp
      xi(17)=0.86687797808995014_dp
      xi(18)=0.93593449881266544_dp
      xi(19)=0.98074370489391417_dp
      xi(20)=1.0000000000000000_dp
   case(21)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.98257229660454803_dp
      xi(3)=-0.94197629695974553_dp
      xi(4)=-0.87929475532359046_dp
      xi(5)=-0.79600192607771240_dp
      xi(6)=-0.69405102606222323_dp
      xi(7)=-0.57583196026183069_dp
      xi(8)=-0.44411578327900210_dp
      xi(9)=-0.30198985650876489_dp
      xi(10)=-0.15278551580218547_dp
      xi(11)=0.0_dp
      xi(12)=0.15278551580218547_dp
      xi(13)=0.30198985650876489_dp
      xi(14)=0.44411578327900210_dp
      xi(15)=0.57583196026183069_dp
      xi(16)=0.69405102606222323_dp
      xi(17)=0.79600192607771240_dp
      xi(18)=0.87929475532359046_dp
      xi(19)=0.94197629695974553_dp
      xi(20)=0.98257229660454803_dp
      xi(21)=1.0000000000000000_dp
   case(22)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.98415243845764618_dp
      xi(3)=-0.94720428399922868_dp
      xi(4)=-0.89006229019090447_dp
      xi(5)=-0.81394892761192114_dp
      xi(6)=-0.72048723996120216_dp
      xi(7)=-0.61166943828425897_dp
      xi(8)=-0.48981487518990235_dp
      xi(9)=-0.35752071013891954_dp
      xi(10)=-0.21760658515928504_dp
      xi(11)=-0.073054540010898335_dp
      xi(12)=0.073054540010898335_dp
      xi(13)=0.21760658515928504_dp
      xi(14)=0.35752071013891954_dp
      xi(15)=0.48981487518990235_dp
      xi(16)=0.61166943828425897_dp
      xi(17)=0.72048723996120216_dp
      xi(18)=0.81394892761192114_dp
      xi(19)=0.89006229019090447_dp
      xi(20)=0.94720428399922868_dp
      xi(21)=0.98415243845764618_dp
      xi(22)=1.0000000000000000_dp
   case(23)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.98552715587873258_dp
      xi(3)=-0.95175795571071020_dp
      xi(4)=-0.89945855804034501_dp
      xi(5)=-0.82965109665128589_dp
      xi(6)=-0.74369504117206068_dp
      xi(7)=-0.64326364446013621_dp
      xi(8)=-0.53031177113684417_dp
      xi(9)=-0.40703793791447483_dp
      xi(10)=-0.27584154894579307_dp
      xi(11)=-0.13927620404066840_dp
      xi(12)=0.0_dp
      xi(13)=0.13927620404066840_dp
      xi(14)=0.27584154894579307_dp
      xi(15)=0.40703793791447483_dp
      xi(16)=0.53031177113684417_dp
      xi(17)=0.64326364446013621_dp
      xi(18)=0.74369504117206068_dp
      xi(19)=0.82965109665128589_dp
      xi(20)=0.89945855804034501_dp
      xi(21)=0.95175795571071020_dp
      xi(22)=0.98552715587873258_dp
      xi(23)=1.0000000000000000_dp
   case(24)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.98673055350516088_dp
      xi(3)=-0.95574822092988636_dp
      xi(4)=-0.90770567511350652_dp
      xi(5)=-0.84346407015487204_dp
      xi(6)=-0.76417048242049331_dp
      xi(7)=-0.67124010526412870_dp
      xi(8)=-0.56633135797929531_dp
      xi(9)=-0.45131637321432262_dp
      xi(10)=-0.32824761337551091_dp
      xi(11)=-0.19932125339083267_dp
      xi(12)=-0.066837993737228578_dp
      xi(13)=0.066837993737228578_dp
      xi(14)=0.19932125339083267_dp
      xi(15)=0.32824761337551091_dp
      xi(16)=0.45131637321432262_dp
      xi(17)=0.56633135797929531_dp
      xi(18)=0.67124010526412870_dp
      xi(19)=0.76417048242049331_dp
      xi(20)=0.84346407015487204_dp
      xi(21)=0.90770567511350652_dp
      xi(22)=0.95574822092988636_dp
      xi(23)=0.98673055350516088_dp
      xi(24)=1.0000000000000000_dp
   case(25)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.98778994493149371_dp
      xi(3)=-0.95926413825253448_dp
      xi(4)=-0.91498277073462258_dp
      xi(5)=-0.85567646583531658_dp
      xi(6)=-0.78231965924071678_dp
      xi(7)=-0.69611704881513437_dp
      xi(8)=-0.59848414727999327_dp
      xi(9)=-0.49102411481887838_dp
      xi(10)=-0.37550145785922723_dp
      xi(11)=-0.25381306416887658_dp
      xi(12)=-0.12795705948310697_dp
      xi(13)=0.0_dp
      xi(14)=0.12795705948310697_dp
      xi(15)=0.25381306416887658_dp
      xi(16)=0.37550145785922723_dp
      xi(17)=0.49102411481887838_dp
      xi(18)=0.59848414727999327_dp
      xi(19)=0.69611704881513437_dp
      xi(20)=0.78231965924071678_dp
      xi(21)=0.85567646583531658_dp
      xi(22)=0.91498277073462258_dp
      xi(23)=0.95926413825253448_dp
      xi(24)=0.98778994493149371_dp
      xi(25)=1.0000000000000000_dp
   case(26)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.98872741231147565_dp
      xi(3)=-0.96237787476771733_dp
      xi(4)=-0.92143554681755734_dp
      xi(5)=-0.86652432395912357_dp
      xi(6)=-0.79847718310743744_dp
      xi(7)=-0.71832581636266508_dp
      xi(8)=-0.62728529949231689_dp
      xi(9)=-0.52673574202987855_dp
      xi(10)=-0.41820138706624679_dp
      xi(11)=-0.30332751285925272_dp
      xi(12)=-0.18385549527005490_dp
      xi(13)=-0.061596411781919728_dp
      xi(14)=0.061596411781919728_dp
      xi(15)=0.18385549527005490_dp
      xi(16)=0.30332751285925272_dp
      xi(17)=0.41820138706624679_dp
      xi(18)=0.52673574202987855_dp
      xi(19)=0.62728529949231689_dp
      xi(20)=0.71832581636266508_dp
      xi(21)=0.79847718310743744_dp
      xi(22)=0.86652432395912357_dp
      xi(23)=0.92143554681755734_dp
      xi(24)=0.96237787476771733_dp
      xi(25)=0.98872741231147565_dp
      xi(26)=1.0000000000000000_dp
   case(27)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.98956096372855062_dp
      xi(3)=-0.96514840245081892_dp
      xi(4)=-0.92718345872511578_dp
      xi(5)=-0.87620208621452248_dp
      xi(6)=-0.81292048689581229_dp
      xi(7)=-0.73822714984645991_dp
      xi(8)=-0.65317066369680952_dp
      xi(9)=-0.55894506094256118_dp
      xi(10)=-0.45687307561408240_dp
      xi(11)=-0.34838758198902867_dp
      xi(12)=-0.23501148310291813_dp
      xi(13)=-0.11833633389852105_dp
      xi(14)=0.0_dp
      xi(15)=0.11833633389852105_dp
      xi(16)=0.23501148310291813_dp
      xi(17)=0.34838758198902867_dp
      xi(18)=0.45687307561408240_dp
      xi(19)=0.55894506094256118_dp
      xi(20)=0.65317066369680952_dp
      xi(21)=0.73822714984645991_dp
      xi(22)=0.81292048689581229_dp
      xi(23)=0.87620208621452248_dp
      xi(24)=0.92718345872511578_dp
      xi(25)=0.96514840245081892_dp
      xi(26)=0.98956096372855062_dp
      xi(27)=1.0000000000000000_dp
   case(28)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99030540261845413_dp
      xi(3)=-0.96762428585713130_dp
      xi(4)=-0.93232516712155852_dp
      xi(5)=-0.88487101721130284_dp
      xi(6)=-0.82588097005633820_dp
      xi(7)=-0.75612419400556977_dp
      xi(8)=-0.67651012892957332_dp
      xi(9)=-0.58807668983717561_dp
      xi(10)=-0.49197675393157938_dp
      xi(11)=-0.38946313757636281_dp
      xi(12)=-0.28187226662160237_dp
      xi(13)=-0.17060675530800436_dp
      xi(14)=-0.057117121693512898_dp
      xi(15)=0.057117121693512898_dp
      xi(16)=0.17060675530800436_dp
      xi(17)=0.28187226662160237_dp
      xi(18)=0.38946313757636281_dp
      xi(19)=0.49197675393157938_dp
      xi(20)=0.58807668983717561_dp
      xi(21)=0.67651012892957332_dp
      xi(22)=0.75612419400556977_dp
      xi(23)=0.82588097005633820_dp
      xi(24)=0.88487101721130284_dp
      xi(25)=0.93232516712155852_dp
      xi(26)=0.96762428585713130_dp
      xi(27)=0.99030540261845413_dp
      xi(28)=1.0000000000000000_dp
   case(29)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99097298826856982_dp
      xi(3)=-0.96984580728793629_dp
      xi(4)=-0.93694271852098251_dp
      xi(5)=-0.89266571997608828_dp
      xi(6)=-0.83755273628178657_dp
      xi(7)=-0.77227289720646874_dp
      xi(8)=-0.69761866135636799_dp
      xi(9)=-0.61449625220343295_dp
      xi(10)=-0.52391467437196908_dp
      xi(11)=-0.42697347171349439_dp
      xi(12)=-0.32484938284191101_dp
      xi(13)=-0.21878205828426102_dp
      xi(14)=-0.11005901339559211_dp
      xi(15)=0.0_dp
      xi(16)=0.11005901339559211_dp
      xi(17)=0.21878205828426102_dp
      xi(18)=0.32484938284191101_dp
      xi(19)=0.42697347171349439_dp
      xi(20)=0.52391467437196908_dp
      xi(21)=0.61449625220343295_dp
      xi(22)=0.69761866135636799_dp
      xi(23)=0.77227289720646874_dp
      xi(24)=0.83755273628178657_dp
      xi(25)=0.89266571997608828_dp
      xi(26)=0.93694271852098251_dp
      xi(27)=0.96984580728793629_dp
      xi(28)=0.99097298826856982_dp
      xi(29)=1.0000000000000000_dp
   case(30)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99157394284050029_dp
      xi(3)=-0.97184660316626924_dp
      xi(4)=-0.94110478095105708_dp
      xi(5)=-0.89969921819927686_dp
      xi(6)=-0.84809948718019811_dp
      xi(7)=-0.78689035723754708_dp
      xi(8)=-0.71676539863708513_dp
      xi(9)=-0.63851917580755841_dp
      xi(10)=-0.55303826009505285_dp
      xi(11)=-0.46129119016824069_dp
      xi(12)=-0.36431750042244900_dp
      xi(13)=-0.26321594371957379_dp
      xi(14)=-0.15913204262585047_dp
      xi(15)=-0.053245110485486669_dp
      xi(16)=0.053245110485486669_dp
      xi(17)=0.15913204262585047_dp
      xi(18)=0.26321594371957379_dp
      xi(19)=0.36431750042244900_dp
      xi(20)=0.46129119016824069_dp
      xi(21)=0.55303826009505285_dp
      xi(22)=0.63851917580755841_dp
      xi(23)=0.71676539863708513_dp
      xi(24)=0.78689035723754708_dp
      xi(25)=0.84809948718019811_dp
      xi(26)=0.89969921819927686_dp
      xi(27)=0.94110478095105708_dp
      xi(28)=0.97184660316626924_dp
      xi(29)=0.99157394284050029_dp
      xi(30)=1.0000000000000000_dp
   case(31)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99211684434648109_dp
      xi(3)=-0.97365493581573647_dp
      xi(4)=-0.94486917020803923_dp
      xi(5)=-0.90606695144126981_dp
      xi(6)=-0.85765999529745561_dp
      xi(7)=-0.80016154319246299_dp
      xi(8)=-0.73418113630907524_dp
      xi(9)=-0.66041820261152552_dp
      xi(10)=-0.57965465720800191_dp
      xi(11)=-0.49274661909883241_dp
      xi(12)=-0.40061533828056181_dp
      xi(13)=-0.30423743127287262_dp
      xi(14)=-0.20463452924752450_dp
      xi(15)=-0.10286244876068228_dp
      xi(16)=0.0_dp
      xi(17)=0.10286244876068228_dp
      xi(18)=0.20463452924752450_dp
      xi(19)=0.30423743127287262_dp
      xi(20)=0.40061533828056181_dp
      xi(21)=0.49274661909883241_dp
      xi(22)=0.57965465720800191_dp
      xi(23)=0.66041820261152552_dp
      xi(24)=0.73418113630907524_dp
      xi(25)=0.80016154319246299_dp
      xi(26)=0.85765999529745561_dp
      xi(27)=0.90606695144126981_dp
      xi(28)=0.94486917020803923_dp
      xi(29)=0.97365493581573647_dp
      xi(30)=0.99211684434648109_dp
      xi(31)=1.0000000000000000_dp
   case(32)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99260893397276136_dp
      xi(3)=-0.97529469048270923_dp
      xi(4)=-0.94828483841723238_dp
      xi(5)=-0.91184993906373190_dp
      xi(6)=-0.86635247601267552_dp
      xi(7)=-0.81224473177744234_dp
      xi(8)=-0.75006449393667480_dp
      xi(9)=-0.68042975561555082_dp
      xi(10)=-0.60403258714842113_dp
      xi(11)=-0.52163226288156529_dp
      xi(12)=-0.43404771720184694_dp
      xi(13)=-0.34214940653888149_dp
      xi(14)=-0.24685065885020530_dp
      xi(15)=-0.14909859681364749_dp
      xi(16)=-0.049864725046593252_dp
      xi(17)=0.049864725046593252_dp
      xi(18)=0.14909859681364749_dp
      xi(19)=0.24685065885020530_dp
      xi(20)=0.34214940653888149_dp
      xi(21)=0.43404771720184694_dp
      xi(22)=0.52163226288156529_dp
      xi(23)=0.60403258714842113_dp
      xi(24)=0.68042975561555082_dp
      xi(25)=0.75006449393667480_dp
      xi(26)=0.81224473177744234_dp
      xi(27)=0.86635247601267552_dp
      xi(28)=0.91184993906373190_dp
      xi(29)=0.94828483841723238_dp
      xi(30)=0.97529469048270923_dp
      xi(31)=0.99260893397276136_dp
      xi(32)=1.0000000000000000_dp
   case(33)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99305635843365834_dp
      xi(3)=-0.97678616331690630_dp
      xi(4)=-0.95139345139699574_dp
      xi(5)=-0.91711730345094124_dp
      xi(6)=-0.87427810075056222_dp
      xi(7)=-0.82327592300406747_dp
      xi(8)=-0.76458700179352863_dp
      xi(9)=-0.69875931661816260_dp
      xi(10)=-0.62640749128126826_dp
      xi(11)=-0.54820705991911162_dp
      xi(12)=-0.46488816163210676_dp
      xi(13)=-0.37722872425339364_dp
      xi(14)=-0.28604720148767404_dp
      xi(15)=-0.19219493146747723_dp
      xi(16)=-0.096548188176107006_dp
      xi(17)=0.0_dp
      xi(18)=0.096548188176107006_dp
      xi(19)=0.19219493146747723_dp
      xi(20)=0.28604720148767404_dp
      xi(21)=0.37722872425339364_dp
      xi(22)=0.46488816163210676_dp
      xi(23)=0.54820705991911162_dp
      xi(24)=0.62640749128126826_dp
      xi(25)=0.69875931661816260_dp
      xi(26)=0.76458700179352863_dp
      xi(27)=0.82327592300406747_dp
      xi(28)=0.87427810075056222_dp
      xi(29)=0.91711730345094124_dp
      xi(30)=0.95139345139699574_dp
      xi(31)=0.97678616331690630_dp
      xi(32)=0.99305635843365834_dp
      xi(33)=1.0000000000000000_dp
   case(34)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99346436258751620_dp
      xi(3)=-0.97814668887993795_dp
      xi(4)=-0.95423064891280753_dp
      xi(5)=-0.92192829567744892_dp
      xi(6)=-0.88152383651227326_dp
      xi(7)=-0.83337244280314261_dp
      xi(8)=-0.77789730643186741_dp
      xi(9)=-0.71558596072021901_dp
      xi(10)=-0.64698600793601462_dp
      xi(11)=-0.57270031127492284_dp
      xi(12)=-0.49338169867327096_dp
      xi(13)=-0.40972722655959274_dp
      xi(14)=-0.32247205451148899_dp
      xi(15)=-0.23238298486911684_dp
      xi(16)=-0.14025172417619386_dp
      xi(17)=-0.046887925712970680_dp
      xi(18)=0.046887925712970680_dp
      xi(19)=0.14025172417619386_dp
      xi(20)=0.23238298486911684_dp
      xi(21)=0.32247205451148899_dp
      xi(22)=0.40972722655959274_dp
      xi(23)=0.49338169867327096_dp
      xi(24)=0.57270031127492284_dp
      xi(25)=0.64698600793601462_dp
      xi(26)=0.71558596072021901_dp
      xi(27)=0.77789730643186741_dp
      xi(28)=0.83337244280314261_dp
      xi(29)=0.88152383651227326_dp
      xi(30)=0.92192829567744892_dp
      xi(31)=0.95423064891280753_dp
      xi(32)=0.97814668887993795_dp
      xi(33)=0.99346436258751620_dp
      xi(34)=1.0000000000000000_dp
   case(35)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99383744364438655_dp
      xi(3)=-0.97939114342992062_dp
      xi(4)=-0.95682705843698788_dp
      xi(5)=-0.92633393201608194_dp
      xi(6)=-0.88816475371795046_dp
      xi(7)=-0.84263589538219978_dp
      xi(8)=-0.79012465708479562_dp
      xi(9)=-0.73106617837876524_dp
      xi(10)=-0.66594984386577596_dp
      xi(11)=-0.59531523208008327_dp
      xi(12)=-0.51974764606220166_dp
      xi(13)=-0.43987326413171700_dp
      xi(14)=-0.35635395156545408_dp
      xi(15)=-0.26988177638172079_dp
      xi(16)=-0.18117327476560167_dp
      xi(17)=-0.090963513696700411_dp
      xi(18)=0.0_dp
      xi(19)=0.090963513696700411_dp
      xi(20)=0.18117327476560167_dp
      xi(21)=0.26988177638172079_dp
      xi(22)=0.35635395156545408_dp
      xi(23)=0.43987326413171700_dp
      xi(24)=0.51974764606220166_dp
      xi(25)=0.59531523208008327_dp
      xi(26)=0.66594984386577596_dp
      xi(27)=0.73106617837876524_dp
      xi(28)=0.79012465708479562_dp
      xi(29)=0.84263589538219978_dp
      xi(30)=0.88816475371795046_dp
      xi(31)=0.92633393201608194_dp
      xi(32)=0.95682705843698788_dp
      xi(33)=0.97939114342992062_dp
      xi(34)=0.99383744364438655_dp
      xi(35)=1.0000000000000000_dp
   case(36)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99417947547312393_dp
      xi(3)=-0.98053235128252973_dp
      xi(4)=-0.95920911586873529_dp
      xi(5)=-0.93037832398293916_dp
      xi(6)=-0.89426591198561636_dp
      xi(7)=-0.85115459340254209_dp
      xi(8)=-0.80138180446457147_dp
      xi(9)=-0.74533709877172902_dp
      xi(10)=-0.68345910915004600_dp
      xi(11)=-0.61623211860391232_dp
      xi(12)=-0.54418227174041531_dp
      xi(13)=-0.46787345770807006_dp
      xi(14)=-0.38790289736603624_dp
      xi(15)=-0.30489646941705439_dp
      xi(16)=-0.21950381216926856_dp
      xi(17)=-0.13239323930266103_dp
      xi(18)=-0.044246509451450338_dp
      xi(19)=0.044246509451450338_dp
      xi(20)=0.13239323930266103_dp
      xi(21)=0.21950381216926856_dp
      xi(22)=0.30489646941705439_dp
      xi(23)=0.38790289736603624_dp
      xi(24)=0.46787345770807006_dp
      xi(25)=0.54418227174041531_dp
      xi(26)=0.61623211860391232_dp
      xi(27)=0.68345910915004600_dp
      xi(28)=0.74533709877172902_dp
      xi(29)=0.80138180446457147_dp
      xi(30)=0.85115459340254209_dp
      xi(31)=0.89426591198561636_dp
      xi(32)=0.93037832398293916_dp
      xi(33)=0.95920911586873529_dp
      xi(34)=0.98053235128252973_dp
      xi(35)=0.99417947547312393_dp
      xi(36)=1.0000000000000000_dp
   case(37)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99449380945326185_dp
      xi(3)=-0.98158141498697708_dp
      xi(4)=-0.96139973400684809_dp
      xi(5)=-0.93409976546970499_dp
      xi(6)=-0.89988390897660705_dp
      xi(7)=-0.85900556704651452_dp
      xi(8)=-0.81176741858365508_dp
      xi(9)=-0.75851921157356838_dp
      xi(10)=-0.69965518373232943_dp
      xi(11)=-0.63561114734643405_dp
      xi(12)=-0.56686126417869968_dp
      xi(13)=-0.49391453563342083_dp
      xi(14)=-0.41731103463383077_dp
      xi(15)=-0.33761790729576472_dp
      xi(16)=-0.25542517408079675_dp
      xi(17)=-0.17134136155372540_dp
      xi(18)=-0.085988997104455260_dp
      xi(19)=0.0_dp
      xi(20)=0.085988997104455260_dp
      xi(21)=0.17134136155372540_dp
      xi(22)=0.25542517408079675_dp
      xi(23)=0.33761790729576472_dp
      xi(24)=0.41731103463383077_dp
      xi(25)=0.49391453563342083_dp
      xi(26)=0.56686126417869968_dp
      xi(27)=0.63561114734643405_dp
      xi(28)=0.69965518373232943_dp
      xi(29)=0.75851921157356838_dp
      xi(30)=0.81176741858365508_dp
      xi(31)=0.85900556704651452_dp
      xi(32)=0.89988390897660705_dp
      xi(33)=0.93409976546970499_dp
      xi(34)=0.96139973400684809_dp
      xi(35)=0.98158141498697708_dp
      xi(36)=0.99449380945326185_dp
      xi(37)=1.0000000000000000_dp
   case(38)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99478335679545231_dp
      xi(3)=-0.98254798519853056_dp
      xi(4)=-0.96341885014356088_dp
      xi(5)=-0.93753162613981967_dp
      xi(6)=-0.90506815879723055_dp
      xi(7)=-0.86625623202567186_dp
      xi(8)=-0.82136811196148726_dp
      xi(9)=-0.77071866905969283_dp
      xi(10)=-0.71466317903038072_dp
      xi(11)=-0.65359483427890922_dp
      xi(12)=-0.58794198737053420_dp
      xi(13)=-0.51816514710053656_dp
      xi(14)=-0.44475374868284343_dp
      xi(15)=-0.36822272088804714_dp
      xi(16)=-0.28910887428658497_dp
      xi(17)=-0.20796713596695980_dp
      xi(18)=-0.12536665715776862_dp
      xi(19)=-0.041886821065351953_dp
      xi(20)=0.041886821065351953_dp
      xi(21)=0.12536665715776862_dp
      xi(22)=0.20796713596695980_dp
      xi(23)=0.28910887428658497_dp
      xi(24)=0.36822272088804714_dp
      xi(25)=0.44475374868284343_dp
      xi(26)=0.51816514710053656_dp
      xi(27)=0.58794198737053420_dp
      xi(28)=0.65359483427890922_dp
      xi(29)=0.71466317903038072_dp
      xi(30)=0.77071866905969283_dp
      xi(31)=0.82136811196148726_dp
      xi(32)=0.86625623202567186_dp
      xi(33)=0.90506815879723055_dp
      xi(34)=0.93753162613981967_dp
      xi(35)=0.96341885014356088_dp
      xi(36)=0.98254798519853056_dp
      xi(37)=0.99478335679545231_dp
      xi(38)=1.0000000000000000_dp
   case(39)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99505065612147838_dp
      xi(3)=-0.98344048250285422_dp
      xi(4)=-0.96528387707647646_dp
      xi(5)=-0.94070308939531743_dp
      xi(6)=-0.90986195218028517_dp
      xi(7)=-0.87296578017958785_dp
      xi(8)=-0.83026013820709261_dp
      xi(9)=-0.78202923714946893_dp
      xi(10)=-0.72859405162312974_dp
      xi(11)=-0.67031018720635344_dp
      xi(12)=-0.60756551529529641_dp
      xi(13)=-0.54077759250507820_dp
      xi(14)=-0.47039088220905567_dp
      xi(15)=-0.39687379687342755_dp
      xi(16)=-0.32071558094263836_dp
      xi(17)=-0.24242305505356218_dp
      xi(18)=-0.16251724326222406_dp
      xi(19)=-0.081529905737327456_dp
      xi(20)=0.0_dp
      xi(21)=0.081529905737327456_dp
      xi(22)=0.16251724326222406_dp
      xi(23)=0.24242305505356218_dp
      xi(24)=0.32071558094263836_dp
      xi(25)=0.39687379687342755_dp
      xi(26)=0.47039088220905567_dp
      xi(27)=0.54077759250507820_dp
      xi(28)=0.60756551529529641_dp
      xi(29)=0.67031018720635344_dp
      xi(30)=0.72859405162312974_dp
      xi(31)=0.78202923714946893_dp
      xi(32)=0.83026013820709261_dp
      xi(33)=0.87296578017958785_dp
      xi(34)=0.90986195218028517_dp
      xi(35)=0.94070308939531743_dp
      xi(36)=0.96528387707647646_dp
      xi(37)=0.98344048250285422_dp
      xi(38)=0.99505065612147838_dp
      xi(39)=1.0000000000000000_dp
   case(40)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99529792924434890_dp
      xi(3)=-0.98426628071750335_dp
      xi(4)=-0.96701007648798852_dp
      xi(5)=-0.94363976494360164_dp
      xi(6)=-0.91430333969020945_dp
      xi(7)=-0.87918634347933984_dp
      xi(8)=-0.83851082277810644_dp
      xi(9)=-0.79253395260155189_dp
      xi(10)=-0.74154641914738442_dp
      xi(11)=-0.68587058508431371_dp
      xi(12)=-0.62585845275525751_dp
      xi(13)=-0.56188943929472265_dp
      xi(14)=-0.49436797812525361_dp
      xi(15)=-0.42372096215555098_dp
      xi(16)=-0.35039504491418088_dp
      xi(17)=-0.27485381671432437_dp
      xi(18)=-0.19757487371891077_dp
      xi(19)=-0.11904679844497109_dp
      xi(20)=-0.039766070802181900_dp
      xi(21)=0.039766070802181900_dp
      xi(22)=0.11904679844497109_dp
      xi(23)=0.19757487371891077_dp
      xi(24)=0.27485381671432437_dp
      xi(25)=0.35039504491418088_dp
      xi(26)=0.42372096215555098_dp
      xi(27)=0.49436797812525361_dp
      xi(28)=0.56188943929472265_dp
      xi(29)=0.62585845275525751_dp
      xi(30)=0.68587058508431371_dp
      xi(31)=0.74154641914738442_dp
      xi(32)=0.79253395260155189_dp
      xi(33)=0.83851082277810644_dp
      xi(34)=0.87918634347933984_dp
      xi(35)=0.91430333969020945_dp
      xi(36)=0.94363976494360164_dp
      xi(37)=0.96701007648798852_dp
      xi(38)=0.98426628071750335_dp
      xi(39)=0.99529792924434890_dp
      xi(40)=1.0000000000000000_dp
   case(41)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99552712744528436_dp
      xi(3)=-0.98503185912472478_dp
      xi(4)=-0.96861086956768183_dp
      xi(5)=-0.94636419964749212_dp
      xi(6)=-0.91842587069790381_dp
      xi(7)=-0.88496397216961512_dp
      xi(8)=-0.84617977210399184_dp
      xi(9)=-0.80230653395809178_dp
      xi(10)=-0.75360812188695136_dp
      xi(11)=-0.70037741678068296_dp
      xi(12)=-0.64293455606458542_dp
      xi(13)=-0.58162500891521269_dp
      xi(14)=-0.51681749884712932_dp
      xi(15)=-0.44890178631482850_dp
      xi(16)=-0.37828632473108320_dp
      xi(17)=-0.30539580402944574_dp
      xi(18)=-0.23066859655953026_dp
      xi(19)=-0.15455412068384000_dp
      xi(20)=-0.077510137936254276_dp
      xi(21)=0.0_dp
      xi(22)=0.077510137936254276_dp
      xi(23)=0.15455412068384000_dp
      xi(24)=0.23066859655953026_dp
      xi(25)=0.30539580402944574_dp
      xi(26)=0.37828632473108320_dp
      xi(27)=0.44890178631482850_dp
      xi(28)=0.51681749884712932_dp
      xi(29)=0.58162500891521269_dp
      xi(30)=0.64293455606458542_dp
      xi(31)=0.70037741678068296_dp
      xi(32)=0.75360812188695136_dp
      xi(33)=0.80230653395809178_dp
      xi(34)=0.84617977210399184_dp
      xi(35)=0.88496397216961512_dp
      xi(36)=0.91842587069790381_dp
      xi(37)=0.94636419964749212_dp
      xi(38)=0.96861086956768183_dp
      xi(39)=0.98503185912472478_dp
      xi(40)=0.99552712744528436_dp
      xi(41)=1.0000000000000000_dp
   case(42)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99573997005351628_dp
      xi(3)=-0.98574292950669961_dp
      xi(4)=-0.97009809662775762_dp
      xi(5)=-0.94889630544543449_dp
      xi(6)=-0.92225921425861618_dp
      xi(7)=-0.89033945983799152_dp
      xi(8)=-0.85331989872065034_dp
      xi(9)=-0.81141258579342214_dp
      xi(10)=-0.76485756742647515_dp
      xi(11)=-0.71392150931480154_dp
      xi(12)=-0.65889617020259553_dp
      xi(13)=-0.60009673124863919_dp
      xi(14)=-0.53785999096259329_dp
      xi(15)=-0.47254243619484758_dp
      xi(16)=-0.40451820029153577_dp
      xi(17)=-0.33417692013945935_dp
      xi(18)=-0.26192150439015027_dp
      xi(19)=-0.18816582565415141_dp
      xi(20)=-0.11333234988865410_dp
      xi(21)=-0.037849716559603623_dp
      xi(22)=0.037849716559603623_dp
      xi(23)=0.11333234988865410_dp
      xi(24)=0.18816582565415141_dp
      xi(25)=0.26192150439015027_dp
      xi(26)=0.33417692013945935_dp
      xi(27)=0.40451820029153577_dp
      xi(28)=0.47254243619484758_dp
      xi(29)=0.53785999096259329_dp
      xi(30)=0.60009673124863919_dp
      xi(31)=0.65889617020259553_dp
      xi(32)=0.71392150931480154_dp
      xi(33)=0.76485756742647515_dp
      xi(34)=0.81141258579342214_dp
      xi(35)=0.85331989872065034_dp
      xi(36)=0.89033945983799152_dp
      xi(37)=0.92225921425861618_dp
      xi(38)=0.94889630544543449_dp
      xi(39)=0.97009809662775762_dp
      xi(40)=0.98574292950669961_dp
      xi(41)=0.99573997005351628_dp
      xi(42)=1.0000000000000000_dp
   case(43)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99593797675777864_dp
      xi(3)=-0.98640454263597516_dp
      xi(4)=-0.97148223504768399_dp
      xi(5)=-0.95125371932737344_dp
      xi(6)=-0.92582968285309768_dp
      xi(7)=-0.89534904191295572_dp
      xi(8)=-0.85997829318375540_dp
      xi(9)=-0.81991062913895518_dp
      xi(10)=-0.77536489029935408_dp
      xi(11)=-0.72658437267562142_dp
      xi(12)=-0.67383550007645612_dp
      xi(13)=-0.61740636950196462_dp
      xi(14)=-0.55760517791055393_dp
      xi(15)=-0.49475853908846552_dp
      xi(16)=-0.42920969987409322_dp
      xi(17)=-0.36131666550730554_dp
      xi(18)=-0.29145024435634548_dp
      xi(19)=-0.21999202270862706_dp
      xi(20)=-0.14733228069044065_dp
      xi(21)=-0.073867860700411845_dp
      xi(22)=0.0_dp
      xi(23)=0.073867860700411845_dp
      xi(24)=0.14733228069044065_dp
      xi(25)=0.21999202270862706_dp
      xi(26)=0.29145024435634548_dp
      xi(27)=0.36131666550730554_dp
      xi(28)=0.42920969987409322_dp
      xi(29)=0.49475853908846552_dp
      xi(30)=0.55760517791055393_dp
      xi(31)=0.61740636950196462_dp
      xi(32)=0.67383550007645612_dp
      xi(33)=0.72658437267562142_dp
      xi(34)=0.77536489029935408_dp
      xi(35)=0.81991062913895518_dp
      xi(36)=0.85997829318375540_dp
      xi(37)=0.89534904191295572_dp
      xi(38)=0.92582968285309768_dp
      xi(39)=0.95125371932737344_dp
      xi(40)=0.97148223504768399_dp
      xi(41)=0.98640454263597516_dp
      xi(42)=0.99593797675777864_dp
      xi(43)=1.0000000000000000_dp
   case(44)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99612249478679133_dp
      xi(3)=-0.98702117792983320_dp
      xi(4)=-0.97277258300811034_dp
      xi(5)=-0.95345210738307754_dp
      xi(6)=-0.92916067588415350_dp
      xi(7)=-0.90002498909782005_dp
      xi(8)=-0.86619696797693570_dp
      xi(9)=-0.82785298541962516_dp
      xi(10)=-0.78519295380487929_dp
      xi(11)=-0.73843928529285849_dp
      xi(12)=-0.68783573332654418_dp
      xi(13)=-0.63364612229852887_dp
      xi(14)=-0.57615297233386485_dp
      xi(15)=-0.51565602648911494_dp
      xi(16)=-0.45247068810283818_dp
      xi(17)=-0.38692637647101079_dp
      xi(18)=-0.31936480943336471_dp
      xi(19)=-0.25013822183139490_dp
      xi(20)=-0.17960752912999624_dp
      xi(21)=-0.10814044577895656_dp
      xi(22)=-0.036109568125621550_dp
      xi(23)=0.036109568125621550_dp
      xi(24)=0.10814044577895656_dp
      xi(25)=0.17960752912999624_dp
      xi(26)=0.25013822183139490_dp
      xi(27)=0.31936480943336471_dp
      xi(28)=0.38692637647101079_dp
      xi(29)=0.45247068810283818_dp
      xi(30)=0.51565602648911494_dp
      xi(31)=0.57615297233386485_dp
      xi(32)=0.63364612229852887_dp
      xi(33)=0.68783573332654418_dp
      xi(34)=0.73843928529285849_dp
      xi(35)=0.78519295380487929_dp
      xi(36)=0.82785298541962516_dp
      xi(37)=0.86619696797693570_dp
      xi(38)=0.90002498909782005_dp
      xi(39)=0.92916067588415350_dp
      xi(40)=0.95345210738307754_dp
      xi(41)=0.97277258300811034_dp
      xi(42)=0.98702117792983320_dp
      xi(43)=0.99612249478679133_dp
      xi(44)=1.0000000000000000_dp
   case(45)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99629472186908847_dp
      xi(3)=-0.98759681924130657_dp
      xi(4)=-0.97397741500697187_dp
      xi(5)=-0.95550542260810310_dp
      xi(6)=-0.93227305660553581_dp
      xi(7)=-0.90439611326430657_dp
      xi(8)=-0.87201349414244826_dp
      xi(9)=-0.83528653665999118_dp
      xi(10)=-0.79439821707030105_dp
      xi(11)=-0.74955224131806391_dp
      xi(12)=-0.70097203119470627_dp
      xi(13)=-0.64889961172478486_dp
      xi(14)=-0.59359440563963434_dp
      xi(15)=-0.53533194106869201_dp
      xi(16)=-0.47440247894089582_dp
      xi(17)=-0.41110956695974320_dp
      xi(18)=-0.34576852736866931_dp
      xi(19)=-0.27870488604725412_dp
      xi(20)=-0.21025275076806848_dp
      xi(21)=-0.14075314669569341_dp
      xi(22)=-0.070552317421623827_dp
      xi(23)=0.0_dp
      xi(24)=0.070552317421623827_dp
      xi(25)=0.14075314669569341_dp
      xi(26)=0.21025275076806848_dp
      xi(27)=0.27870488604725412_dp
      xi(28)=0.34576852736866931_dp
      xi(29)=0.41110956695974320_dp
      xi(30)=0.47440247894089582_dp
      xi(31)=0.53533194106869201_dp
      xi(32)=0.59359440563963434_dp
      xi(33)=0.64889961172478486_dp
      xi(34)=0.70097203119470627_dp
      xi(35)=0.74955224131806391_dp
      xi(36)=0.79439821707030105_dp
      xi(37)=0.83528653665999118_dp
      xi(38)=0.87201349414244826_dp
      xi(39)=0.90439611326430657_dp
      xi(40)=0.93227305660553581_dp
      xi(41)=0.95550542260810310_dp
      xi(42)=0.97397741500697187_dp
      xi(43)=0.98759681924130657_dp
      xi(44)=0.99629472186908847_dp
      xi(45)=1.0000000000000000_dp
   case(46)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99645572570481590_dp
      xi(3)=-0.98813501918221039_dp
      xi(4)=-0.97510411399680680_dp
      xi(5)=-0.95742612431139476_dp
      xi(6)=-0.93518547360661386_dp
      xi(7)=-0.90848820013987512_dp
      xi(8)=-0.87746154772403538_dp
      xi(9)=-0.84225338093664278_dp
      xi(10)=-0.80303148692894623_dp
      xi(11)=-0.75998277817332868_dp
      xi(12)=-0.71331240270411199_dp
      xi(13)=-0.66324276693586212_dp
      xi(14)=-0.61001247601549343_dp
      xi(15)=-0.55387519687696027_dp
      xi(16)=-0.49509844946839524_dp
      xi(17)=-0.43396233193629911_dp
      xi(18)=-0.37075818585393543_dp
      xi(19)=-0.30578720786106098_dp
      xi(20)=-0.23935901433464160_dp
      xi(21)=-0.17179016593254402_dp
      xi(22)=-0.10340265904261187_dp
      xi(23)=-0.034522391326796098_dp
      xi(24)=0.034522391326796098_dp
      xi(25)=0.10340265904261187_dp
      xi(26)=0.17179016593254402_dp
      xi(27)=0.23935901433464160_dp
      xi(28)=0.30578720786106098_dp
      xi(29)=0.37075818585393543_dp
      xi(30)=0.43396233193629911_dp
      xi(31)=0.49509844946839524_dp
      xi(32)=0.55387519687696027_dp
      xi(33)=0.61001247601549343_dp
      xi(34)=0.66324276693586212_dp
      xi(35)=0.71331240270411199_dp
      xi(36)=0.75998277817332868_dp
      xi(37)=0.80303148692894623_dp
      xi(38)=0.84225338093664278_dp
      xi(39)=0.87746154772403538_dp
      xi(40)=0.90848820013987512_dp
      xi(41)=0.93518547360661386_dp
      xi(42)=0.95742612431139476_dp
      xi(43)=0.97510411399680680_dp
      xi(44)=0.98813501918221039_dp
      xi(45)=0.99645572570481590_dp
      xi(46)=1.0000000000000000_dp
   case(47)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99660646054212069_dp
      xi(3)=-0.98863895391808267_dp
      xi(4)=-0.97615928406971717_dp
      xi(5)=-0.95922536550699657_dp
      xi(6)=-0.93791463593864482_dp
      xi(7)=-0.91232438055863788_dp
      xi(8)=-0.88257138015534392_dp
      xi(9)=-0.84879139892918386_dp
      xi(10)=-0.81113857120658904_dp
      xi(11)=-0.76978470039008201_dp
      xi(12)=-0.72491847598114851_dp
      xi(13)=-0.67674461305635712_dp
      xi(14)=-0.62548291840984659_dp
      xi(15)=-0.57136728773713047_dp
      xi(16)=-0.51464463848540914_dp
      xi(17)=-0.45557378326275429_dp
      xi(18)=-0.39442424895809430_dp
      xi(19)=-0.33147504696614510_dp
      xi(20)=-0.26701340013179554_dp
      xi(21)=-0.20133343222451010_dp
      xi(22)=-0.13473482592350693_dp
      xi(23)=-0.067521455437714550_dp
      xi(24)=0.0_dp
      xi(25)=0.067521455437714550_dp
      xi(26)=0.13473482592350693_dp
      xi(27)=0.20133343222451010_dp
      xi(28)=0.26701340013179554_dp
      xi(29)=0.33147504696614510_dp
      xi(30)=0.39442424895809430_dp
      xi(31)=0.45557378326275429_dp
      xi(32)=0.51464463848540914_dp
      xi(33)=0.57136728773713047_dp
      xi(34)=0.62548291840984659_dp
      xi(35)=0.67674461305635712_dp
      xi(36)=0.72491847598114851_dp
      xi(37)=0.76978470039008201_dp
      xi(38)=0.81113857120658904_dp
      xi(39)=0.84879139892918386_dp
      xi(40)=0.88257138015534392_dp
      xi(41)=0.91232438055863788_dp
      xi(42)=0.93791463593864482_dp
      xi(43)=0.95922536550699657_dp
      xi(44)=0.97615928406971717_dp
      xi(45)=0.98863895391808267_dp
      xi(46)=0.99660646054212069_dp
      xi(47)=1.0000000000000000_dp
   case(48)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99674778133985746_dp
      xi(3)=-0.98911147001363573_dp
      xi(4)=-0.97714884689083677_dp
      xi(5)=-0.96091315350638159_dp
      xi(6)=-0.94047554933508130_dp
      xi(7)=-0.91592544997624642_dp
      xi(8)=-0.88737022431822010_dp
      xi(9)=-0.85493474483877407_dp
      xi(10)=-0.81876084748560587_dp
      xi(11)=-0.77900671359984382_dp
      xi(12)=-0.73584617911284837_dp
      xi(13)=-0.68946797481109071_dp
      xi(14)=-0.64007490126595714_dp
      xi(15)=-0.58788294214548518_dp
      xi(16)=-0.53312031983277696_dp
      xi(17)=-0.47602649750285708_dp
      xi(18)=-0.41685113203270267_dp
      xi(19)=-0.35585298232890604_dp
      xi(20)=-0.29329877784975927_dp
      xi(21)=-0.22946205227124457_dp
      xi(22)=-0.16462194739809063_dp
      xi(23)=-0.099061992550750112_dp
      xi(24)=-0.033068864766152911_dp
      xi(25)=0.033068864766152911_dp
      xi(26)=0.099061992550750112_dp
      xi(27)=0.16462194739809063_dp
      xi(28)=0.22946205227124457_dp
      xi(29)=0.29329877784975927_dp
      xi(30)=0.35585298232890604_dp
      xi(31)=0.41685113203270267_dp
      xi(32)=0.47602649750285708_dp
      xi(33)=0.53312031983277696_dp
      xi(34)=0.58788294214548518_dp
      xi(35)=0.64007490126595714_dp
      xi(36)=0.68946797481109071_dp
      xi(37)=0.73584617911284837_dp
      xi(38)=0.77900671359984382_dp
      xi(39)=0.81876084748560587_dp
      xi(40)=0.85493474483877407_dp
      xi(41)=0.88737022431822010_dp
      xi(42)=0.91592544997624642_dp
      xi(43)=0.94047554933508130_dp
      xi(44)=0.96091315350638159_dp
      xi(45)=0.97714884689083677_dp
      xi(46)=0.98911147001363573_dp
      xi(47)=0.99674778133985746_dp
      xi(48)=1.0000000000000000_dp
   case(49)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99688045591002293_dp
      xi(3)=-0.98955512461923074_dp
      xi(4)=-0.97807812450137202_dp
      xi(5)=-0.96249848799325273_dp
      xi(6)=-0.94288171966319976_dp
      xi(7)=-0.91931014427258449_dp
      xi(8)=-0.89188264602644243_dp
      xi(9)=-0.86071427280478949_dp
      xi(10)=-0.82593575928507074_dp
      xi(11)=-0.78769298064365401_dp
      xi(12)=-0.74614634155177968_dp
      xi(13)=-0.70147010377105295_dp
      xi(14)=-0.65385165543221247_dp
      xi(15)=-0.60349072516676650_dp
      xi(16)=-0.55059854443322801_dp
      xi(17)=-0.49539696157275240_dp
      xi(18)=-0.43811751132074184_dp
      xi(19)=-0.37900044368276887_dp
      xi(20)=-0.31829371625110156_dp
      xi(21)=-0.25625195419014619_dp
      xi(22)=-0.19313538225402071_dp
      xi(23)=-0.12920873331637993_dp
      xi(24)=-0.064740137990899129_dp
      xi(25)=0.0_dp
      xi(26)=0.064740137990899129_dp
      xi(27)=0.12920873331637993_dp
      xi(28)=0.19313538225402071_dp
      xi(29)=0.25625195419014619_dp
      xi(30)=0.31829371625110156_dp
      xi(31)=0.37900044368276887_dp
      xi(32)=0.43811751132074184_dp
      xi(33)=0.49539696157275240_dp
      xi(34)=0.55059854443322801_dp
      xi(35)=0.60349072516676650_dp
      xi(36)=0.65385165543221247_dp
      xi(37)=0.70147010377105295_dp
      xi(38)=0.74614634155177968_dp
      xi(39)=0.78769298064365401_dp
      xi(40)=0.82593575928507074_dp
      xi(41)=0.86071427280478949_dp
      xi(42)=0.89188264602644243_dp
      xi(43)=0.91931014427258449_dp
      xi(44)=0.94288171966319976_dp
      xi(45)=0.96249848799325273_dp
      xi(46)=0.97807812450137202_dp
      xi(47)=0.98955512461923074_dp
      xi(48)=0.99688045591002293_dp
      xi(49)=1.0000000000000000_dp
   case(50)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99700517536264359_dp
      xi(3)=-0.98997222005802080_dp
      xi(4)=-0.97895191064671981_dp
      xi(5)=-0.96398948010996861_dp
      xi(6)=-0.94514532868088141_dp
      xi(7)=-0.92249537850275275_dp
      xi(8)=-0.89613084907683263_dp
      xi(9)=-0.86615790817735331_dp
      xi(10)=-0.83269724979645795_dp
      xi(11)=-0.79588361011772847_dp
      xi(12)=-0.75586522579405304_dp
      xi(13)=-0.71280323742364586_dp
      xi(14)=-0.66687104087904482_dp
      xi(15)=-0.61825358920152917_dp
      xi(16)=-0.56714664791567043_dp
      xi(17)=-0.51375600678304874_dp
      xi(18)=-0.45829665117929976_dp
      xi(19)=-0.40099189643639848_dp
      xi(20)=-0.34207248863880384_dp
      xi(21)=-0.28177567549590951_dp
      xi(22)=-0.22034425103305648_dp
      xi(23)=-0.15802557794840290_dp
      xi(24)=-0.095070591572656648_dp
      xi(25)=-0.031732789442623713_dp
      xi(26)=0.031732789442623713_dp
      xi(27)=0.095070591572656648_dp
      xi(28)=0.15802557794840290_dp
      xi(29)=0.22034425103305648_dp
      xi(30)=0.28177567549590951_dp
      xi(31)=0.34207248863880384_dp
      xi(32)=0.40099189643639848_dp
      xi(33)=0.45829665117929976_dp
      xi(34)=0.51375600678304874_dp
      xi(35)=0.56714664791567043_dp
      xi(36)=0.61825358920152917_dp
      xi(37)=0.66687104087904482_dp
      xi(38)=0.71280323742364586_dp
      xi(39)=0.75586522579405304_dp
      xi(40)=0.79588361011772847_dp
      xi(41)=0.83269724979645795_dp
      xi(42)=0.86615790817735331_dp
      xi(43)=0.89613084907683263_dp
      xi(44)=0.92249537850275275_dp
      xi(45)=0.94514532868088141_dp
      xi(46)=0.96398948010996861_dp
      xi(47)=0.97895191064671981_dp
      xi(48)=0.98997222005802080_dp
      xi(49)=0.99700517536264359_dp
      xi(50)=1.0000000000000000_dp
   case(51)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99712256311898889_dp
      xi(3)=-0.99036483368751159_dp
      xi(4)=-0.97977453240959209_dp
      xi(5)=-0.96539345547588731_dp
      xi(6)=-0.94727738630889504_dp
      xi(7)=-0.92549645414410356_dp
      xi(8)=-0.90013494068322443_dp
      xi(9)=-0.87129097153120607_dp
      xi(10)=-0.83907614179777427_dp
      xi(11)=-0.80361508624564030_dp
      xi(12)=-0.76504499788356822_dp
      xi(13)=-0.72351509755119143_dp
      xi(14)=-0.67918605679051304_dp
      xi(15)=-0.63222937633339200_dp
      xi(16)=-0.58282672265148624_dp
      xi(17)=-0.53116922515504851_dp
      xi(18)=-0.47745673676934727_dp
      xi(19)=-0.42189706075452060_dp
      xi(20)=-0.36470514676295529_dp
      xi(21)=-0.30610225924609023_dp
      xi(22)=-0.24631512142886291_dp
      xi(23)=-0.18557503816417294_dp
      xi(24)=-0.12411700106123228_dp
      xi(25)=-0.062178779350124090_dp
      xi(26)=0.0_dp
      xi(27)=0.062178779350124090_dp
      xi(28)=0.12411700106123228_dp
      xi(29)=0.18557503816417294_dp
      xi(30)=0.24631512142886291_dp
      xi(31)=0.30610225924609023_dp
      xi(32)=0.36470514676295529_dp
      xi(33)=0.42189706075452060_dp
      xi(34)=0.47745673676934727_dp
      xi(35)=0.53116922515504851_dp
      xi(36)=0.58282672265148624_dp
      xi(37)=0.63222937633339200_dp
      xi(38)=0.67918605679051304_dp
      xi(39)=0.72351509755119143_dp
      xi(40)=0.76504499788356822_dp
      xi(41)=0.80361508624564030_dp
      xi(42)=0.83907614179777427_dp
      xi(43)=0.87129097153120607_dp
      xi(44)=0.90013494068322443_dp
      xi(45)=0.92549645414410356_dp
      xi(46)=0.94727738630889504_dp
      xi(47)=0.96539345547588731_dp
      xi(48)=0.97977453240959209_dp
      xi(49)=0.99036483368751159_dp
      xi(50)=0.99712256311898889_dp
      xi(51)=1.0000000000000000_dp
   case(52)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99723318271304205_dp
      xi(3)=-0.99073484375891583_dp
      xi(4)=-0.98054990362374447_dp
      xi(5)=-0.96671704356330543_dp
      xi(6)=-0.94928786292511367_dp
      xi(7)=-0.92832723947564709_dp
      xi(8)=-0.90391316301514563_dp
      xi(9)=-0.87613646208132719_dp
      xi(10)=-0.84510047108953041_dp
      xi(11)=-0.81092064773680268_dp
      xi(12)=-0.77372414424214125_dp
      xi(13)=-0.73364933467588237_dp
      xi(14)=-0.69084530037007209_dp
      xi(15)=-0.64547127541689242_dp
      xi(16)=-0.59769605435825718_dp
      xi(17)=-0.54769736428888484_dp
      xi(18)=-0.49566120371805634_dp
      xi(19)=-0.44178115065445764_dp
      xi(20)=-0.38625764249077466_dp
      xi(21)=-0.32929723036845564_dp
      xi(22)=-0.27111181079736081_dp
      xi(23)=-0.21191783738927865_dp
      xi(24)=-0.15193551563805963_dp
      xi(25)=-0.091387983742063984_dp
      xi(26)=-0.030500482516469938_dp
      xi(27)=0.030500482516469938_dp
      xi(28)=0.091387983742063984_dp
      xi(29)=0.15193551563805963_dp
      xi(30)=0.21191783738927865_dp
      xi(31)=0.27111181079736081_dp
      xi(32)=0.32929723036845564_dp
      xi(33)=0.38625764249077466_dp
      xi(34)=0.44178115065445764_dp
      xi(35)=0.49566120371805634_dp
      xi(36)=0.54769736428888484_dp
      xi(37)=0.59769605435825718_dp
      xi(38)=0.64547127541689242_dp
      xi(39)=0.69084530037007209_dp
      xi(40)=0.73364933467588237_dp
      xi(41)=0.77372414424214125_dp
      xi(42)=0.81092064773680268_dp
      xi(43)=0.84510047108953041_dp
      xi(44)=0.87613646208132719_dp
      xi(45)=0.90391316301514563_dp
      xi(46)=0.92832723947564709_dp
      xi(47)=0.94928786292511367_dp
      xi(48)=0.96671704356330543_dp
      xi(49)=0.98054990362374447_dp
      xi(50)=0.99073484375891583_dp
      xi(51)=0.99723318271304205_dp
      xi(52)=1.0000000000000000_dp
   case(53)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99733754456387330_dp
      xi(3)=-0.99108395187550601_dp
      xi(4)=-0.98128157129624554_dp
      xi(5)=-0.96796625545320974_dp
      xi(6)=-0.95118580461103959_dp
      xi(7)=-0.93100032697697855_dp
      xi(8)=-0.90748209565875475_dp
      xi(9)=-0.88071530613927323_dp
      xi(10)=-0.85079577971625058_dp
      xi(11)=-0.81783062223280438_dp
      xi(12)=-0.78193784138823007_dp
      xi(13)=-0.74324592463193927_dp
      xi(14)=-0.70189337937619972_dp
      xi(15)=-0.65802823726283817_dp
      xi(16)=-0.61180752429730074_dp
      xi(17)=-0.56339669876500717_dp
      xi(18)=-0.51296905895114477_dp
      xi(19)=-0.46070512278884455_dp
      xi(20)=-0.40679198165903270_dp
      xi(21)=-0.35142263065666472_dp
      xi(22)=-0.29479527772168797_dp
      xi(23)=-0.23711263410839591_dp
      xi(24)=-0.17858118873344295_dp
      xi(25)=-0.11941046900038129_dp
      xi(26)=-0.059812290746919925_dp
      xi(27)=0.0_dp
      xi(28)=0.059812290746919925_dp
      xi(29)=0.11941046900038129_dp
      xi(30)=0.17858118873344295_dp
      xi(31)=0.23711263410839591_dp
      xi(32)=0.29479527772168797_dp
      xi(33)=0.35142263065666472_dp
      xi(34)=0.40679198165903270_dp
      xi(35)=0.46070512278884455_dp
      xi(36)=0.51296905895114477_dp
      xi(37)=0.56339669876500717_dp
      xi(38)=0.61180752429730074_dp
      xi(39)=0.65802823726283817_dp
      xi(40)=0.70189337937619972_dp
      xi(41)=0.74324592463193927_dp
      xi(42)=0.78193784138823007_dp
      xi(43)=0.81783062223280438_dp
      xi(44)=0.85079577971625058_dp
      xi(45)=0.88071530613927323_dp
      xi(46)=0.90748209565875475_dp
      xi(47)=0.93100032697697855_dp
      xi(48)=0.95118580461103959_dp
      xi(49)=0.96796625545320974_dp
      xi(50)=0.98128157129624554_dp
      xi(51)=0.99108395187550601_dp
      xi(52)=0.99733754456387330_dp
      xi(53)=1.0000000000000000_dp
   case(54)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99743611187116656_dp
      xi(3)=-0.99141370255149031_dp
      xi(4)=-0.98197275606385098_dp
      xi(5)=-0.96914655166265036_dp
      xi(6)=-0.95297943380782947_dp
      xi(7)=-0.93352717101598469_dp
      xi(8)=-0.91085683306761773_dp
      xi(9)=-0.88504657539568750_dp
      xi(10)=-0.85618537432525421_dp
      xi(11)=-0.82437272203454896_dp
      xi(12)=-0.78971828427976608_dp
      xi(13)=-0.75234152267297620_dp
      xi(14)=-0.71237128303149402_dp
      xi(15)=-0.66994535130366150_dp
      xi(16)=-0.62520997863921178_dp
      xi(17)=-0.57831937725887015_dp
      xi(18)=-0.52943518886972742_dp
      xi(19)=-0.47872592746342395_dp
      xi(20)=-0.42636639842043081_dp
      xi(21)=-0.37253709592431877_dp
      xi(22)=-0.31742358076409221_dp
      xi(23)=-0.26121584066994287_dp
      xi(24)=-0.20410763538779868_dp
      xi(25)=-0.14629582875053768_dp
      xi(26)=-0.087979710048492691_dp
      xi(27)=-0.029360307038717604_dp
      xi(28)=0.029360307038717604_dp
      xi(29)=0.087979710048492691_dp
      xi(30)=0.14629582875053768_dp
      xi(31)=0.20410763538779868_dp
      xi(32)=0.26121584066994287_dp
      xi(33)=0.31742358076409221_dp
      xi(34)=0.37253709592431877_dp
      xi(35)=0.42636639842043081_dp
      xi(36)=0.47872592746342395_dp
      xi(37)=0.52943518886972742_dp
      xi(38)=0.57831937725887015_dp
      xi(39)=0.62520997863921178_dp
      xi(40)=0.66994535130366150_dp
      xi(41)=0.71237128303149402_dp
      xi(42)=0.75234152267297620_dp
      xi(43)=0.78971828427976608_dp
      xi(44)=0.82437272203454896_dp
      xi(45)=0.85618537432525421_dp
      xi(46)=0.88504657539568750_dp
      xi(47)=0.91085683306761773_dp
      xi(48)=0.93352717101598469_dp
      xi(49)=0.95297943380782947_dp
      xi(50)=0.96914655166265036_dp
      xi(51)=0.98197275606385098_dp
      xi(52)=0.99141370255149031_dp
      xi(53)=0.99743611187116656_dp
      xi(54)=1.0000000000000000_dp
   case(55)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99752930576127306_dp
      xi(3)=-0.99172550029128003_dp
      xi(4)=-0.98262638754302651_dp
      xi(5)=-0.97026290146392842_dp
      xi(6)=-0.95467623744892770_dp
      xi(7)=-0.93591820858327983_dp
      xi(8)=-0.91405114044717308_dp
      xi(9)=-0.88914767909967216_dp
      xi(10)=-0.86129055424330548_dp
      xi(11)=-0.83057230602371411_dp
      xi(12)=-0.79709497829006616_dp
      xi(13)=-0.76096977992244820_dp
      xi(14)=-0.72231671555961477_dp
      xi(15)=-0.68126418703655326_dp
      xi(16)=-0.63794856689182950_dp
      xi(17)=-0.59251374537831394_dp
      xi(18)=-0.54511065249044732_dp
      xi(19)=-0.49589675660021092_dp
      xi(20)=-0.44503554136968677_dp
      xi(21)=-0.39269596267922150_dp
      xi(22)=-0.33905188737603176_dp
      xi(23)=-0.28428151570816330_dp
      xi(24)=-0.22856678936272744_dp
      xi(25)=-0.17209278707505037_dp
      xi(26)=-0.11504710981659153_dp
      xi(27)=-0.057619257604064328_dp
      xi(28)=0.0_dp
      xi(29)=0.057619257604064328_dp
      xi(30)=0.11504710981659153_dp
      xi(31)=0.17209278707505037_dp
      xi(32)=0.22856678936272744_dp
      xi(33)=0.28428151570816330_dp
      xi(34)=0.33905188737603176_dp
      xi(35)=0.39269596267922150_dp
      xi(36)=0.44503554136968677_dp
      xi(37)=0.49589675660021092_dp
      xi(38)=0.54511065249044732_dp
      xi(39)=0.59251374537831394_dp
      xi(40)=0.63794856689182950_dp
      xi(41)=0.68126418703655326_dp
      xi(42)=0.72231671555961477_dp
      xi(43)=0.76096977992244820_dp
      xi(44)=0.79709497829006616_dp
      xi(45)=0.83057230602371411_dp
      xi(46)=0.86129055424330548_dp
      xi(47)=0.88914767909967216_dp
      xi(48)=0.91405114044717308_dp
      xi(49)=0.93591820858327983_dp
      xi(50)=0.95467623744892770_dp
      xi(51)=0.97026290146392842_dp
      xi(52)=0.98262638754302651_dp
      xi(53)=0.99172550029128003_dp
      xi(54)=0.99752930576127306_dp
      xi(55)=1.0000000000000000_dp
   case(56)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99761750979072414_dp
      xi(3)=-0.99202062454186291_dp
      xi(4)=-0.98324513529644732_dp
      xi(5)=-0.97131983489168455_dp
      xi(6)=-0.95628304431371464_dp
      xi(7)=-0.93818296540684856_dp
      xi(8)=-0.91707759099649916_dp
      xi(9)=-0.89303453360579361_dp
      xi(10)=-0.86613081319881179_dp
      xi(11)=-0.83645261202364929_dp
      xi(12)=-0.80409499919007531_dp
      xi(13)=-0.76916162643024718_dp
      xi(14)=-0.73176439621791932_dp
      xi(15)=-0.69202310338905910_dp
      xi(16)=-0.65006505144655318_dp
      xi(17)=-0.60602464479432402_dp
      xi(18)=-0.56004295821512520_dp
      xi(19)=-0.51226728497533721_dp
      xi(20)=-0.46285066500663766_dp
      xi(21)=-0.41195139467724202_dp
      xi(22)=-0.35973251972384400_dp
      xi(23)=-0.30636131296902025_dp
      xi(24)=-0.25200873849742429_dp
      xi(25)=-0.19684890400736454_dp
      xi(26)=-0.14105850309217494_dp
      xi(27)=-0.084816249238004037_dp
      xi(28)=-0.028302303351157747_dp
      xi(29)=0.028302303351157747_dp
      xi(30)=0.084816249238004037_dp
      xi(31)=0.14105850309217494_dp
      xi(32)=0.19684890400736454_dp
      xi(33)=0.25200873849742429_dp
      xi(34)=0.30636131296902025_dp
      xi(35)=0.35973251972384400_dp
      xi(36)=0.41195139467724202_dp
      xi(37)=0.46285066500663766_dp
      xi(38)=0.51226728497533721_dp
      xi(39)=0.56004295821512520_dp
      xi(40)=0.60602464479432402_dp
      xi(41)=0.65006505144655318_dp
      xi(42)=0.69202310338905910_dp
      xi(43)=0.73176439621791932_dp
      xi(44)=0.76916162643024718_dp
      xi(45)=0.80409499919007531_dp
      xi(46)=0.83645261202364929_dp
      xi(47)=0.86613081319881179_dp
      xi(48)=0.89303453360579361_dp
      xi(49)=0.91707759099649916_dp
      xi(50)=0.93818296540684856_dp
      xi(51)=0.95628304431371464_dp
      xi(52)=0.97131983489168455_dp
      xi(53)=0.98324513529644732_dp
      xi(54)=0.99202062454186291_dp
      xi(55)=0.99761750979072414_dp
      xi(56)=1.0000000000000000_dp
   case(57)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99770107389727442_dp
      xi(3)=-0.99230024281556363_dp
      xi(4)=-0.98383143602580359_dp
      xi(5)=-0.97232148844841170_dp
      xi(6)=-0.95780609307871620_dp
      xi(7)=-0.94033014942688033_dp
      xi(8)=-0.91994768699588015_dp
      xi(9)=-0.89672171225481712_dp
      xi(10)=-0.87072401806362860_dp
      xi(11)=-0.84203496327161098_dp
      xi(12)=-0.81074322495539116_dp
      xi(13)=-0.77694552460842600_dp
      xi(14)=-0.74074632932214912_dp
      xi(15)=-0.70225752895937906_dp
      xi(16)=-0.66159809035128811_dp
      xi(17)=-0.61889368960244277_dp
      xi(18)=-0.57427632364822552_dp
      xi(19)=-0.52788390226937085_dp
      xi(20)=-0.47985982182690984_dp
      xi(21)=-0.43035252203635713_dp
      xi(22)=-0.37951502715187628_dp
      xi(23)=-0.32750447297905277_dp
      xi(24)=-0.27448162117853637_dp
      xi(25)=-0.22061036236199506_dp
      xi(26)=-0.16605720951640288_dp
      xi(27)=-0.11099078332253917_dp
      xi(28)=-0.055581290958607086_dp
      xi(29)=0.0_dp
      xi(30)=0.055581290958607086_dp
      xi(31)=0.11099078332253917_dp
      xi(32)=0.16605720951640288_dp
      xi(33)=0.22061036236199506_dp
      xi(34)=0.27448162117853637_dp
      xi(35)=0.32750447297905277_dp
      xi(36)=0.37951502715187628_dp
      xi(37)=0.43035252203635713_dp
      xi(38)=0.47985982182690984_dp
      xi(39)=0.52788390226937085_dp
      xi(40)=0.57427632364822552_dp
      xi(41)=0.61889368960244277_dp
      xi(42)=0.66159809035128811_dp
      xi(43)=0.70225752895937906_dp
      xi(44)=0.74074632932214912_dp
      xi(45)=0.77694552460842600_dp
      xi(46)=0.81074322495539116_dp
      xi(47)=0.84203496327161098_dp
      xi(48)=0.87072401806362860_dp
      xi(49)=0.89672171225481712_dp
      xi(50)=0.91994768699588015_dp
      xi(51)=0.94033014942688033_dp
      xi(52)=0.95780609307871620_dp
      xi(53)=0.97232148844841170_dp
      xi(54)=0.98383143602580359_dp
      xi(55)=0.99230024281556363_dp
      xi(56)=0.99770107389727442_dp
      xi(57)=1.0000000000000000_dp
   case(58)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99778031787458834_dp
      xi(3)=-0.99256542223454881_dp
      xi(4)=-0.98438751750701768_dp
      xi(5)=-0.97327164536474062_dp
      xi(6)=-0.95925109231985554_dp
      xi(7)=-0.94236773331550370_dp
      xi(8)=-0.92267196686374356_dp
      xi(9)=-0.90022257812874863_dp
      xi(10)=-0.87508656751835803_dp
      xi(11)=-0.84733895218244656_dp
      xi(12)=-0.81706254273321484_dp
      xi(13)=-0.78434769638111196_dp
      xi(14)=-0.74929204741020489_dp
      xi(15)=-0.71200021587167419_dp
      xi(16)=-0.67258349539710870_dp
      xi(17)=-0.63115952107839627_dp
      xi(18)=-0.58785191841290205_dp
      xi(19)=-0.54278993436555689_dp
      xi(20)=-0.49610805165106813_dp
      xi(21)=-0.44794558738861453_dp
      xi(22)=-0.39844627732752141_dp
      xi(23)=-0.34775784688518990_dp
      xi(24)=-0.29603157027774645_dp
      xi(25)=-0.24342181905931608_dp
      xi(26)=-0.19008560141737133_dp
      xi(27)=-0.13618209359915839_dp
      xi(28)=-0.081872164867662033_dp
      xi(29)=-0.027317897404865879_dp
      xi(30)=0.027317897404865879_dp
      xi(31)=0.081872164867662033_dp
      xi(32)=0.13618209359915839_dp
      xi(33)=0.19008560141737133_dp
      xi(34)=0.24342181905931608_dp
      xi(35)=0.29603157027774645_dp
      xi(36)=0.34775784688518990_dp
      xi(37)=0.39844627732752141_dp
      xi(38)=0.44794558738861453_dp
      xi(39)=0.49610805165106813_dp
      xi(40)=0.54278993436555689_dp
      xi(41)=0.58785191841290205_dp
      xi(42)=0.63115952107839627_dp
      xi(43)=0.67258349539710870_dp
      xi(44)=0.71200021587167419_dp
      xi(45)=0.74929204741020489_dp
      xi(46)=0.78434769638111196_dp
      xi(47)=0.81706254273321484_dp
      xi(48)=0.84733895218244656_dp
      xi(49)=0.87508656751835803_dp
      xi(50)=0.90022257812874863_dp
      xi(51)=0.92267196686374356_dp
      xi(52)=0.94236773331550370_dp
      xi(53)=0.95925109231985554_dp
      xi(54)=0.97327164536474062_dp
      xi(55)=0.98438751750701768_dp
      xi(56)=0.99256542223454881_dp
      xi(57)=0.99778031787458834_dp
      xi(58)=1.0000000000000000_dp
   case(59)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99785553443508757_dp
      xi(3)=-0.99281713971025717_dp
      xi(4)=-0.98491541970597601_dp
      xi(5)=-0.97417377114232796_dp
      xi(6)=-0.96062327353287777_dp
      xi(7)=-0.94430302747874670_dp
      xi(8)=-0.92526009999966802_dp
      xi(9)=-0.90354940186116705_dp
      xi(10)=-0.87923353314506971_dp
      xi(11)=-0.85238260416163730_dp
      xi(12)=-0.82307403388383161_dp
      xi(13)=-0.79139232699429735_dp
      xi(14)=-0.75742883036859835_dp
      xi(15)=-0.72128146976860947_dp
      xi(16)=-0.68305446753644219_dp
      xi(17)=-0.64285804211745884_dp
      xi(18)=-0.60080809028598569_dp
      xi(19)=-0.55702585299375256_dp
      xi(20)=-0.51163756580658689_dp
      xi(21)=-0.46477409493842974_dp
      xi(22)=-0.41657055993278081_dp
      xi(23)=-0.36716594407990415_dp
      xi(24)=-0.31670269369332768_dp
      xi(25)=-0.26532630740119591_dp
      xi(26)=-0.21318491663676650_dp
      xi(27)=-0.16042885853768002_dp
      xi(28)=-0.10721024248549618_dp
      xi(29)=-0.053682511535311914_dp
      xi(30)=0.0_dp
      xi(31)=0.053682511535311914_dp
      xi(32)=0.10721024248549618_dp
      xi(33)=0.16042885853768002_dp
      xi(34)=0.21318491663676650_dp
      xi(35)=0.26532630740119591_dp
      xi(36)=0.31670269369332768_dp
      xi(37)=0.36716594407990415_dp
      xi(38)=0.41657055993278081_dp
      xi(39)=0.46477409493842974_dp
      xi(40)=0.51163756580658689_dp
      xi(41)=0.55702585299375256_dp
      xi(42)=0.60080809028598569_dp
      xi(43)=0.64285804211745884_dp
      xi(44)=0.68305446753644219_dp
      xi(45)=0.72128146976860947_dp
      xi(46)=0.75742883036859835_dp
      xi(47)=0.79139232699429735_dp
      xi(48)=0.82307403388383161_dp
      xi(49)=0.85238260416163730_dp
      xi(50)=0.87923353314506971_dp
      xi(51)=0.90354940186116705_dp
      xi(52)=0.92526009999966802_dp
      xi(53)=0.94430302747874670_dp
      xi(54)=0.96062327353287777_dp
      xi(55)=0.97417377114232796_dp
      xi(56)=0.98491541970597601_dp
      xi(57)=0.99281713971025717_dp
      xi(58)=0.99785553443508757_dp
      xi(59)=1.0000000000000000_dp
   case(60)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99792699191581100_dp
      xi(3)=-0.99305629093909094_dp
      xi(4)=-0.98541701344774733_dp
      xi(5)=-0.97503104499970188_dp
      xi(6)=-0.96192743808292472_dp
      xi(7)=-0.94614274477019813_dp
      xi(8)=-0.92772097097142251_dp
      xi(9)=-0.90671346637925973_dp
      xi(10)=-0.88317878511055611_dp
      xi(11)=-0.85718252386284242_dp
      xi(12)=-0.82879713964553597_dp
      xi(13)=-0.79810174808624472_dp
      xi(14)=-0.76518190304898655_dp
      xi(15)=-0.73012935824794150_dp
      xi(16)=-0.69304181155131330_dp
      xi(17)=-0.65402263270207389_dp
      xi(18)=-0.61318057522149572_dp
      xi(19)=-0.57062947330212210_dp
      xi(20)=-0.52648792453700162_dp
      xi(21)=-0.48087895937062309_dp
      xi(22)=-0.43392969819352550_dp
      xi(23)=-0.38577099703673222_dp
      xi(24)=-0.33653708285377834_dp
      xi(25)=-0.28636517940702952_dp
      xi(26)=-0.23539512480112160_dp
      xi(27)=-0.18376898172959577_dp
      xi(28)=-0.13163064152109121_dp
      xi(29)=-0.079125423088724234_dp
      xi(30)=-0.026399667900479247_dp
      xi(31)=0.026399667900479247_dp
      xi(32)=0.079125423088724234_dp
      xi(33)=0.13163064152109121_dp
      xi(34)=0.18376898172959577_dp
      xi(35)=0.23539512480112160_dp
      xi(36)=0.28636517940702952_dp
      xi(37)=0.33653708285377834_dp
      xi(38)=0.38577099703673222_dp
      xi(39)=0.43392969819352550_dp
      xi(40)=0.48087895937062309_dp
      xi(41)=0.52648792453700162_dp
      xi(42)=0.57062947330212210_dp
      xi(43)=0.61318057522149572_dp
      xi(44)=0.65402263270207389_dp
      xi(45)=0.69304181155131330_dp
      xi(46)=0.73012935824794150_dp
      xi(47)=0.76518190304898655_dp
      xi(48)=0.79810174808624472_dp
      xi(49)=0.82879713964553597_dp
      xi(50)=0.85718252386284242_dp
      xi(51)=0.88317878511055611_dp
      xi(52)=0.90671346637925973_dp
      xi(53)=0.92772097097142251_dp
      xi(54)=0.94614274477019813_dp
      xi(55)=0.96192743808292472_dp
      xi(56)=0.97503104499970188_dp
      xi(57)=0.98541701344774733_dp
      xi(58)=0.99305629093909094_dp
      xi(59)=0.99792699191581100_dp
      xi(60)=1.0000000000000000_dp
   case(61)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99799493667405561_dp
      xi(3)=-0.99328369836905810_dp
      xi(4)=-0.98589401695770227_dp
      xi(5)=-0.97584638775126687_dp
      xi(6)=-0.96316799886299801_dp
      xi(7)=-0.94789305797071807_dp
      xi(8)=-0.93006275438528710_dp
      xi(9)=-0.90972516019542822_dp
      xi(10)=-0.88693510431230385_dp
      xi(11)=-0.86175402597306930_dp
      xi(12)=-0.83424980965400529_dp
      xi(13)=-0.80449660231446317_dp
      xi(14)=-0.77257461363320754_dp
      xi(15)=-0.73856989984277235_dp
      xi(16)=-0.70257413177373082_dp
      xi(17)=-0.66468434774782819_dp
      xi(18)=-0.62500269199291517_dp
      xi(19)=-0.58363613928842133_dp
      xi(20)=-0.54069620658562127_dp
      xi(21)=-0.49629865238122188_dp
      xi(22)=-0.45056316465535920_dp
      xi(23)=-0.40361303821566519_dp
      xi(24)=-0.35557484231747500_dp
      xi(25)=-0.30657807945637038_dp
      xi(26)=-0.25675483625299750_dp
      xi(27)=-0.20623942737138156_dp
      xi(28)=-0.15516803343071876_dp
      xi(29)=-0.10367833388680467_dp
      xi(30)=-0.051909135872809846_dp
      xi(31)=0.0_dp
      xi(32)=0.051909135872809846_dp
      xi(33)=0.10367833388680467_dp
      xi(34)=0.15516803343071876_dp
      xi(35)=0.20623942737138156_dp
      xi(36)=0.25675483625299750_dp
      xi(37)=0.30657807945637038_dp
      xi(38)=0.35557484231747500_dp
      xi(39)=0.40361303821566519_dp
      xi(40)=0.45056316465535920_dp
      xi(41)=0.49629865238122188_dp
      xi(42)=0.54069620658562127_dp
      xi(43)=0.58363613928842133_dp
      xi(44)=0.62500269199291517_dp
      xi(45)=0.66468434774782819_dp
      xi(46)=0.70257413177373082_dp
      xi(47)=0.73856989984277235_dp
      xi(48)=0.77257461363320754_dp
      xi(49)=0.80449660231446317_dp
      xi(50)=0.83424980965400529_dp
      xi(51)=0.86175402597306930_dp
      xi(52)=0.88693510431230385_dp
      xi(53)=0.90972516019542822_dp
      xi(54)=0.93006275438528710_dp
      xi(55)=0.94789305797071807_dp
      xi(56)=0.96316799886299801_dp
      xi(57)=0.97584638775126687_dp
      xi(58)=0.98589401695770227_dp
      xi(59)=0.99328369836905810_dp
      xi(60)=0.99799493667405561_dp
      xi(61)=1.0000000000000000_dp
   case(62)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99805959521278575_dp
      xi(3)=-0.99350011826968709_dp
      xi(4)=-0.98634801054711078_dp
      xi(5)=-0.97662248657382009_dp
      xi(6)=-0.96434901733043250_dp
      xi(7)=-0.94955965094058909_dp
      xi(8)=-0.93229298159356270_dp
      xi(9)=-0.91259406064636951_dp
      xi(10)=-0.89051428261057124_dp
      xi(11)=-0.86611125233992362_dp
      xi(12)=-0.83944863527073700_dp
      xi(13)=-0.81059599156643540_dp
      xi(14)=-0.77962859476244838_dp
      xi(15)=-0.74662723544948445_dp
      xi(16)=-0.71167801053556382_dp
      xi(17)=-0.67487209864979593_dp
      xi(18)=-0.63630552228040885_dp
      xi(19)=-0.59607889727102145_dp
      xi(20)=-0.55429717033057627_dp
      xi(21)=-0.51106934524281111_dp
      xi(22)=-0.46650819849018894_dp
      xi(23)=-0.42072998503457407_dp
      xi(24)=-0.37385413502247847_dp
      xi(25)=-0.32600294220629245_dp
      xi(26)=-0.27730124489447329_dp
      xi(27)=-0.22787610026312319_dp
      xi(28)=-0.17785645287868616_dp
      xi(29)=-0.12737279829658212_dp
      xi(30)=-0.076556842613433868_dp
      xi(31)=-0.025541158861093044_dp
      xi(32)=0.025541158861093044_dp
      xi(33)=0.076556842613433868_dp
      xi(34)=0.12737279829658212_dp
      xi(35)=0.17785645287868616_dp
      xi(36)=0.22787610026312319_dp
      xi(37)=0.27730124489447329_dp
      xi(38)=0.32600294220629245_dp
      xi(39)=0.37385413502247847_dp
      xi(40)=0.42072998503457407_dp
      xi(41)=0.46650819849018894_dp
      xi(42)=0.51106934524281111_dp
      xi(43)=0.55429717033057627_dp
      xi(44)=0.59607889727102145_dp
      xi(45)=0.63630552228040885_dp
      xi(46)=0.67487209864979593_dp
      xi(47)=0.71167801053556382_dp
      xi(48)=0.74662723544948445_dp
      xi(49)=0.77962859476244838_dp
      xi(50)=0.81059599156643540_dp
      xi(51)=0.83944863527073700_dp
      xi(52)=0.86611125233992362_dp
      xi(53)=0.89051428261057124_dp
      xi(54)=0.91259406064636951_dp
      xi(55)=0.93229298159356270_dp
      xi(56)=0.94955965094058909_dp
      xi(57)=0.96434901733043250_dp
      xi(58)=0.97662248657382009_dp
      xi(59)=0.98634801054711078_dp
      xi(60)=0.99350011826968709_dp
      xi(61)=0.99805959521278575_dp
      xi(62)=1.0000000000000000_dp
   case(63)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99812117607009169_dp
      xi(3)=-0.99370624701870353_dp
      xi(4)=-0.98678044967716621_dp
      xi(5)=-0.97736181705093241_dp
      xi(6)=-0.96547423649700888_dp
      xi(7)=-0.95114776422516863_dp
      xi(8)=-0.93441860023572892_dp
      xi(9)=-0.91532900828999286_dp
      xi(10)=-0.89392721255682350_dp
      xi(11)=-0.87026727702376392_dp
      xi(12)=-0.84440896943479784_dp
      xi(13)=-0.81641761054456460_dp
      xi(14)=-0.78636390922805367_dp
      xi(15)=-0.75432378392514933_dp
      xi(16)=-0.72037817089838126_dp
      xi(17)=-0.68461281980101103_dp
      xi(18)=-0.64711807707821842_dp
      xi(19)=-0.60798865775186109_dp
      xi(20)=-0.56732340616712095_dp
      xi(21)=-0.52522504630644900_dp
      xi(22)=-0.48179992230214817_dp
      xi(23)=-0.43715772980345287_dp
      xi(24)=-0.39141123887692681_dp
      xi(25)=-0.34467600914030441_dp
      xi(26)=-0.29707009784946947_dp
      xi(27)=-0.24871376167603315_dp
      xi(28)=-0.19972915292889106_dp
      xi(29)=-0.15024001098716089_dp
      xi(30)=-0.10037134972398953_dp
      xi(31)=-0.050249141710840334_dp
      xi(32)=0.0_dp
      xi(33)=0.050249141710840334_dp
      xi(34)=0.10037134972398953_dp
      xi(35)=0.15024001098716089_dp
      xi(36)=0.19972915292889106_dp
      xi(37)=0.24871376167603315_dp
      xi(38)=0.29707009784946947_dp
      xi(39)=0.34467600914030441_dp
      xi(40)=0.39141123887692681_dp
      xi(41)=0.43715772980345287_dp
      xi(42)=0.48179992230214817_dp
      xi(43)=0.52522504630644900_dp
      xi(44)=0.56732340616712095_dp
      xi(45)=0.60798865775186109_dp
      xi(46)=0.64711807707821842_dp
      xi(47)=0.68461281980101103_dp
      xi(48)=0.72037817089838126_dp
      xi(49)=0.75432378392514933_dp
      xi(50)=0.78636390922805367_dp
      xi(51)=0.81641761054456460_dp
      xi(52)=0.84440896943479784_dp
      xi(53)=0.87026727702376392_dp
      xi(54)=0.89392721255682350_dp
      xi(55)=0.91532900828999286_dp
      xi(56)=0.93441860023572892_dp
      xi(57)=0.95114776422516863_dp
      xi(58)=0.96547423649700888_dp
      xi(59)=0.97736181705093241_dp
      xi(60)=0.98678044967716621_dp
      xi(61)=0.99370624701870353_dp
      xi(62)=0.99812117607009169_dp
      xi(63)=1.0000000000000000_dp
   case(64)
      xi(1)=-1.0000000000000000_dp
      xi(2)=-0.99817987150216322_dp
      xi(3)=-0.99390272670305729_dp
      xi(4)=-0.98719267660274024_dp
      xi(5)=-0.97806666283139607_dp
      xi(6)=-0.96654711036909923_dp
      xi(7)=-0.95266223578866292_dp
      xi(8)=-0.93644602747563416_dp
      xi(9)=-0.91793817351028163_dp
      xi(10)=-0.89718396784585004_dp
      xi(11)=-0.87423420065762749_dp
      xi(12)=-0.84914503454299099_dp
      xi(13)=-0.82197786730751705_dp
      xi(14)=-0.79279918182620814_dp
      xi(15)=-0.76168038340811997_dp
      xi(16)=-0.72869762508883694_dp
      xi(17)=-0.69393162129070484_dp
      xi(18)=-0.65746745031297650_dp
      xi(19)=-0.61939434613843155_dp
      xi(20)=-0.57980548006771842_dp
      xi(21)=-0.53879773271680044_dp
      xi(22)=-0.49647145693605775_dp
      xi(23)=-0.45293023223158118_dp
      xi(24)=-0.40828061128985404_dp
      xi(25)=-0.36263185922626182_dp
      xi(26)=-0.31609568619562581_dp
      xi(27)=-0.26878597401917000_dp
      xi(28)=-0.22081849749695350_dp
      xi(29)=-0.17231064108779297_dp
      xi(30)=-0.12338111165002799_dp
      xi(31)=-0.074149647946115919_dp
      xi(32)=-0.024736727621958728_dp
      xi(33)=0.024736727621958728_dp
      xi(34)=0.074149647946115919_dp
      xi(35)=0.12338111165002799_dp
      xi(36)=0.17231064108779297_dp
      xi(37)=0.22081849749695350_dp
      xi(38)=0.26878597401917000_dp
      xi(39)=0.31609568619562581_dp
      xi(40)=0.36263185922626182_dp
      xi(41)=0.40828061128985404_dp
      xi(42)=0.45293023223158118_dp
      xi(43)=0.49647145693605775_dp
      xi(44)=0.53879773271680044_dp
      xi(45)=0.57980548006771842_dp
      xi(46)=0.61939434613843155_dp
      xi(47)=0.65746745031297650_dp
      xi(48)=0.69393162129070484_dp
      xi(49)=0.72869762508883694_dp
      xi(50)=0.76168038340811997_dp
      xi(51)=0.79279918182620814_dp
      xi(52)=0.82197786730751705_dp
      xi(53)=0.84914503454299099_dp
      xi(54)=0.87423420065762749_dp
      xi(55)=0.89718396784585004_dp
      xi(56)=0.91793817351028163_dp
      xi(57)=0.93644602747563416_dp
      xi(58)=0.95266223578866292_dp
      xi(59)=0.96654711036909923_dp
      xi(60)=0.97806666283139607_dp
      xi(61)=0.98719267660274024_dp
      xi(62)=0.99390272670305729_dp
      xi(63)=0.99817987150216322_dp
      xi(64)=1.0000000000000000_dp
   case default
      write(*,*) "lobatto_pts ERROR: Number of points < 2 or > ", max_lobatto_pts;
      call stop_error("")
end select
lobatto_pts=xi
end function

!-------------------------------------------------------------------------------------------------!

function lobatto_wts(n)
! returns Lobatto weights for n-point quadrature
integer, intent(in):: n ! number of Lobatto weights
real(dp) lobatto_wts(n)  ! Lobatto weights for n-point quadrature
real(dp) w(n)
select case(n)
   case(2)
      w(1)=1.0000000000000000_dp
      w(2)=1.0000000000000000_dp
   case(3)
      w(1)=0.33333333333333333_dp
      w(2)=1.3333333333333333_dp
      w(3)=0.33333333333333333_dp
   case(4)
      w(1)=0.16666666666666667_dp
      w(2)=0.83333333333333333_dp
      w(3)=0.83333333333333333_dp
      w(4)=0.16666666666666667_dp
   case(5)
      w(1)=0.10000000000000000_dp
      w(2)=0.54444444444444444_dp
      w(3)=0.71111111111111111_dp
      w(4)=0.54444444444444444_dp
      w(5)=0.10000000000000000_dp
   case(6)
      w(1)=0.066666666666666667_dp
      w(2)=0.37847495629784698_dp
      w(3)=0.55485837703548635_dp
      w(4)=0.55485837703548635_dp
      w(5)=0.37847495629784698_dp
      w(6)=0.066666666666666667_dp
   case(7)
      w(1)=0.047619047619047619_dp
      w(2)=0.27682604736156595_dp
      w(3)=0.43174538120986262_dp
      w(4)=0.48761904761904762_dp
      w(5)=0.43174538120986262_dp
      w(6)=0.27682604736156595_dp
      w(7)=0.047619047619047619_dp
   case(8)
      w(1)=0.035714285714285714_dp
      w(2)=0.21070422714350604_dp
      w(3)=0.34112269248350436_dp
      w(4)=0.41245879465870388_dp
      w(5)=0.41245879465870388_dp
      w(6)=0.34112269248350436_dp
      w(7)=0.21070422714350604_dp
      w(8)=0.035714285714285714_dp
   case(9)
      w(1)=0.027777777777777778_dp
      w(2)=0.16549536156080553_dp
      w(3)=0.27453871250016174_dp
      w(4)=0.34642851097304635_dp
      w(5)=0.37151927437641723_dp
      w(6)=0.34642851097304635_dp
      w(7)=0.27453871250016174_dp
      w(8)=0.16549536156080553_dp
      w(9)=0.027777777777777778_dp
   case(10)
      w(1)=0.022222222222222222_dp
      w(2)=0.13330599085107011_dp
      w(3)=0.22488934206312645_dp
      w(4)=0.29204268367968376_dp
      w(5)=0.32753976118389746_dp
      w(6)=0.32753976118389746_dp
      w(7)=0.29204268367968376_dp
      w(8)=0.22488934206312645_dp
      w(9)=0.13330599085107011_dp
      w(10)=0.022222222222222222_dp
   case(11)
      w(1)=0.018181818181818182_dp
      w(2)=0.10961227326699486_dp
      w(3)=0.18716988178030520_dp
      w(4)=0.24804810426402831_dp
      w(5)=0.28687912477900809_dp
      w(6)=0.30021759545569069_dp
      w(7)=0.28687912477900809_dp
      w(8)=0.24804810426402831_dp
      w(9)=0.18716988178030520_dp
      w(10)=0.10961227326699486_dp
      w(11)=0.018181818181818182_dp
   case(12)
      w(1)=0.015151515151515152_dp
      w(2)=0.091684517413196131_dp
      w(3)=0.15797470556437012_dp
      w(4)=0.21250841776102115_dp
      w(5)=0.25127560319920128_dp
      w(6)=0.27140524091069618_dp
      w(7)=0.27140524091069618_dp
      w(8)=0.25127560319920128_dp
      w(9)=0.21250841776102115_dp
      w(10)=0.15797470556437012_dp
      w(11)=0.091684517413196131_dp
      w(12)=0.015151515151515152_dp
   case(13)
      w(1)=0.012820512820512821_dp
      w(2)=0.077801686746818928_dp
      w(3)=0.13498192668960835_dp
      w(4)=0.18364686520355009_dp
      w(5)=0.22076779356611009_dp
      w(6)=0.24401579030667636_dp
      w(7)=0.25193084933344674_dp
      w(8)=0.24401579030667636_dp
      w(9)=0.22076779356611009_dp
      w(10)=0.18364686520355009_dp
      w(11)=0.13498192668960835_dp
      w(12)=0.077801686746818928_dp
      w(13)=0.012820512820512821_dp
   case(14)
      w(1)=0.010989010989010989_dp
      w(2)=0.066837284497681285_dp
      w(3)=0.11658665589871165_dp
      w(4)=0.16002185176295214_dp
      w(5)=0.19482614937341612_dp
      w(6)=0.21912625300977075_dp
      w(7)=0.23161279446845706_dp
      w(8)=0.23161279446845706_dp
      w(9)=0.21912625300977075_dp
      w(10)=0.19482614937341612_dp
      w(11)=0.16002185176295214_dp
      w(12)=0.11658665589871165_dp
      w(13)=0.066837284497681285_dp
      w(14)=0.010989010989010989_dp
   case(15)
      w(1)=0.0095238095238095238_dp
      w(2)=0.058029893028601249_dp
      w(3)=0.10166007032571807_dp
      w(4)=0.14051169980242811_dp
      w(5)=0.17278964725360095_dp
      w(6)=0.19698723596461336_dp
      w(7)=0.21197358592682092_dp
      w(8)=0.21704811634881565_dp
      w(9)=0.21197358592682092_dp
      w(10)=0.19698723596461336_dp
      w(11)=0.17278964725360095_dp
      w(12)=0.14051169980242811_dp
      w(13)=0.10166007032571807_dp
      w(14)=0.058029893028601249_dp
      w(15)=0.0095238095238095238_dp
   case(16)
      w(1)=0.0083333333333333333_dp
      w(2)=0.050850361005919905_dp
      w(3)=0.089393697325930801_dp
      w(4)=0.12425538213251410_dp
      w(5)=0.15402698080716428_dp
      w(6)=0.17749191339170413_dp
      w(7)=0.19369002382520358_dp
      w(8)=0.20195830817822987_dp
      w(9)=0.20195830817822987_dp
      w(10)=0.19369002382520358_dp
      w(11)=0.17749191339170413_dp
      w(12)=0.15402698080716428_dp
      w(13)=0.12425538213251410_dp
      w(14)=0.089393697325930801_dp
      w(15)=0.050850361005919905_dp
      w(16)=0.0083333333333333333_dp
   case(17)
      w(1)=0.0073529411764705882_dp
      w(2)=0.044921940543254210_dp
      w(3)=0.079198270503687119_dp
      w(4)=0.11059290900702816_dp
      w(5)=0.13798774620192656_dp
      w(6)=0.16039466199762154_dp
      w(7)=0.17700425351565787_dp
      w(8)=0.18721633967761924_dp
      w(9)=0.19066187475346943_dp
      w(10)=0.18721633967761924_dp
      w(11)=0.17700425351565787_dp
      w(12)=0.16039466199762154_dp
      w(13)=0.13798774620192656_dp
      w(14)=0.11059290900702816_dp
      w(15)=0.079198270503687119_dp
      w(16)=0.044921940543254210_dp
      w(17)=0.0073529411764705882_dp
   case(18)
      w(1)=0.0065359477124183007_dp
      w(2)=0.039970628810914066_dp
      w(3)=0.070637166885633665_dp
      w(4)=0.099016271717502802_dp
      w(5)=0.12421053313296710_dp
      w(6)=0.14541196157380227_dp
      w(7)=0.16193951723760249_dp
      w(8)=0.17326210948945623_dp
      w(9)=0.17901586343970308_dp
      w(10)=0.17901586343970308_dp
      w(11)=0.17326210948945623_dp
      w(12)=0.16193951723760249_dp
      w(13)=0.14541196157380227_dp
      w(14)=0.12421053313296710_dp
      w(15)=0.099016271717502802_dp
      w(16)=0.070637166885633665_dp
      w(17)=0.039970628810914066_dp
      w(18)=0.0065359477124183007_dp
   case(19)
      w(1)=0.0058479532163742690_dp
      w(2)=0.035793365186176477_dp
      w(3)=0.063381891762629737_dp
      w(4)=0.089131757099207084_dp
      w(5)=0.11231534147730504_dp
      w(6)=0.13226728044875078_dp
      w(7)=0.14841394259593889_dp
      w(8)=0.16029092404406124_dp
      w(9)=0.16755658452714287_dp
      w(10)=0.17000191928482723_dp
      w(11)=0.16755658452714287_dp
      w(12)=0.16029092404406124_dp
      w(13)=0.14841394259593889_dp
      w(14)=0.13226728044875078_dp
      w(15)=0.11231534147730504_dp
      w(16)=0.089131757099207084_dp
      w(17)=0.063381891762629737_dp
      w(18)=0.035793365186176477_dp
      w(19)=0.0058479532163742690_dp
   case(20)
      w(1)=0.0052631578947368421_dp
      w(2)=0.032237123188488941_dp
      w(3)=0.057181802127566826_dp
      w(4)=0.080631763996119603_dp
      w(5)=0.10199149969945082_dp
      w(6)=0.12070922762867473_dp
      w(7)=0.13630048235872418_dp
      w(8)=0.14836155407091683_dp
      w(9)=0.15658010264747549_dp
      w(10)=0.16074328638784575_dp
      w(11)=0.16074328638784575_dp
      w(12)=0.15658010264747549_dp
      w(13)=0.14836155407091683_dp
      w(14)=0.13630048235872418_dp
      w(15)=0.12070922762867473_dp
      w(16)=0.10199149969945082_dp
      w(17)=0.080631763996119603_dp
      w(18)=0.057181802127566826_dp
      w(19)=0.032237123188488941_dp
      w(20)=0.0052631578947368421_dp
   case(21)
      w(1)=0.0047619047619047619_dp
      w(2)=0.029184840098505459_dp
      w(3)=0.051843169000849625_dp
      w(4)=0.073273918185074144_dp
      w(5)=0.092985467957886065_dp
      w(6)=0.11051708321912334_dp
      w(7)=0.12545812119086895_dp
      w(8)=0.13745846286004134_dp
      w(9)=0.14623686244797746_dp
      w(10)=0.15158757511168138_dp
      w(11)=0.15338519033217495_dp
      w(12)=0.15158757511168138_dp
      w(13)=0.14623686244797746_dp
      w(14)=0.13745846286004134_dp
      w(15)=0.12545812119086895_dp
      w(16)=0.11051708321912334_dp
      w(17)=0.092985467957886065_dp
      w(18)=0.073273918185074144_dp
      w(19)=0.051843169000849625_dp
      w(20)=0.029184840098505459_dp
      w(21)=0.0047619047619047619_dp
   case(22)
      w(1)=0.0043290043290043290_dp
      w(2)=0.026545747682501758_dp
      w(3)=0.047214465293740752_dp
      w(4)=0.066865605864553076_dp
      w(5)=0.085090060391838448_dp
      w(6)=0.10150057480164767_dp
      w(7)=0.11574764465393907_dp
      w(8)=0.12752769665343028_dp
      w(9)=0.13658968861374143_dp
      w(10)=0.14274049227136140_dp
      w(11)=0.14584901944424179_dp
      w(12)=0.14584901944424179_dp
      w(13)=0.14274049227136140_dp
      w(14)=0.13658968861374143_dp
      w(15)=0.12752769665343028_dp
      w(16)=0.11574764465393907_dp
      w(17)=0.10150057480164767_dp
      w(18)=0.085090060391838448_dp
      w(19)=0.066865605864553076_dp
      w(20)=0.047214465293740752_dp
      w(21)=0.026545747682501758_dp
      w(22)=0.0043290043290043290_dp
   case(23)
      w(1)=0.0039525691699604743_dp
      w(2)=0.024248600771531737_dp
      w(3)=0.043175871170241835_dp
      w(4)=0.061252477129554206_dp
      w(5)=0.078135449475569990_dp
      w(6)=0.093497246163512342_dp
      w(7)=0.10703910172433651_dp
      w(8)=0.11849751066274913_dp
      w(9)=0.12764947470175888_dp
      w(10)=0.13431687263860382_dp
      w(11)=0.13836993638580739_dp
      w(12)=0.13972978001274737_dp
      w(13)=0.13836993638580739_dp
      w(14)=0.13431687263860382_dp
      w(15)=0.12764947470175888_dp
      w(16)=0.11849751066274913_dp
      w(17)=0.10703910172433651_dp
      w(18)=0.093497246163512342_dp
      w(19)=0.078135449475569990_dp
      w(20)=0.061252477129554206_dp
      w(21)=0.043175871170241835_dp
      w(22)=0.024248600771531737_dp
      w(23)=0.0039525691699604743_dp
   case(24)
      w(1)=0.0036231884057971014_dp
      w(2)=0.022236853464711209_dp
      w(3)=0.039631681333467809_dp
      w(4)=0.056309848724646199_dp
      w(5)=0.071981862055293982_dp
      w(6)=0.086369029967929068_dp
      w(7)=0.099214827684083587_dp
      w(8)=0.11029008689296860_dp
      w(9)=0.11939719370249132_dp
      w(10)=0.12637364202802080_dp
      w(11)=0.13109494187360394_dp
      w(12)=0.13347684386698638_dp
      w(13)=0.13347684386698638_dp
      w(14)=0.13109494187360394_dp
      w(15)=0.12637364202802080_dp
      w(16)=0.11939719370249132_dp
      w(17)=0.11029008689296860_dp
      w(18)=0.099214827684083587_dp
      w(19)=0.086369029967929068_dp
      w(20)=0.071981862055293982_dp
      w(21)=0.056309848724646199_dp
      w(22)=0.039631681333467809_dp
      w(23)=0.022236853464711209_dp
      w(24)=0.0036231884057971014_dp
   case(25)
      w(1)=0.0033333333333333333_dp
      w(2)=0.020465168932974385_dp
      w(3)=0.036504738794271372_dp
      w(4)=0.051936228368491475_dp
      w(5)=0.066513728675312785_dp
      w(6)=0.079998774836292982_dp
      w(7)=0.092170139910620422_dp
      w(8)=0.10282803034795783_dp
      w(9)=0.11179746626832089_dp
      w(10)=0.11893117940681183_dp
      w(11)=0.12411203893795029_dp
      w(12)=0.12725497753833145_dp
      w(13)=0.12830838929866193_dp
      w(14)=0.12725497753833145_dp
      w(15)=0.12411203893795029_dp
      w(16)=0.11893117940681183_dp
      w(17)=0.11179746626832089_dp
      w(18)=0.10282803034795783_dp
      w(19)=0.092170139910620422_dp
      w(20)=0.079998774836292982_dp
      w(21)=0.066513728675312785_dp
      w(22)=0.051936228368491475_dp
      w(23)=0.036504738794271372_dp
      w(24)=0.020465168932974385_dp
      w(25)=0.0033333333333333333_dp
   case(26)
      w(1)=0.0030769230769230769_dp
      w(2)=0.018896858024263466_dp
      w(3)=0.033732303685955999_dp
      w(4)=0.048048399081180627_dp
      w(5)=0.061635025142547403_dp
      w(6)=0.074287050122291137_dp
      w(7)=0.085812863980004362_dp
      w(8)=0.096037802353901311_dp
      w(9)=0.10480688623073705_dp
      w(10)=0.11198719411986034_dp
      w(11)=0.11746988409380901_dp
      w(12)=0.12117184628844335_dp
      w(13)=0.12303696380008288_dp
      w(14)=0.12303696380008288_dp
      w(15)=0.12117184628844335_dp
      w(16)=0.11746988409380901_dp
      w(17)=0.11198719411986034_dp
      w(18)=0.10480688623073705_dp
      w(19)=0.096037802353901311_dp
      w(20)=0.085812863980004362_dp
      w(21)=0.074287050122291137_dp
      w(22)=0.061635025142547403_dp
      w(23)=0.048048399081180627_dp
      w(24)=0.033732303685955999_dp
      w(25)=0.018896858024263466_dp
      w(26)=0.0030769230769230769_dp
   case(27)
      w(1)=0.0028490028490028490_dp
      w(2)=0.017501974876065579_dp
      w(3)=0.031262951735202384_dp
      w(4)=0.044577657933061699_dp
      w(5)=0.057265569680162732_dp
      w(6)=0.069149342360043276_dp
      w(7)=0.080062321970538458_dp
      w(8)=0.089851365259290560_dp
      w(9)=0.098379074585952763_dp
      w(10)=0.10552574782125301_dp
      w(11)=0.11119106525743703_dp
      w(12)=0.11529550025465198_dp
      w(13)=0.11778143658595616_dp
      w(14)=0.11861397766276303_dp
      w(15)=0.11778143658595616_dp
      w(16)=0.11529550025465198_dp
      w(17)=0.11119106525743703_dp
      w(18)=0.10552574782125301_dp
      w(19)=0.098379074585952763_dp
      w(20)=0.089851365259290560_dp
      w(21)=0.080062321970538458_dp
      w(22)=0.069149342360043276_dp
      w(23)=0.057265569680162732_dp
      w(24)=0.044577657933061699_dp
      w(25)=0.031262951735202384_dp
      w(26)=0.017501974876065579_dp
      w(27)=0.0028490028490028490_dp
   case(28)
      w(1)=0.0026455026455026455_dp
      w(2)=0.016255883957504218_dp
      w(3)=0.029054220677979145_dp
      w(4)=0.041466915243006721_dp
      w(5)=0.053338077047327488_dp
      w(6)=0.064513658080354538_dp
      w(7)=0.074848123509707703_dp
      w(8)=0.084206795121510326_dp
      w(9)=0.092467685997712176_dp
      w(10)=0.099523110412495673_dp
      w(11)=0.10528109376105589_dp
      w(12)=0.10966657379597663_dp
      w(13)=0.11262238007723901_dp
      w(14)=0.11410997967262783_dp
      w(15)=0.11410997967262783_dp
      w(16)=0.11262238007723901_dp
      w(17)=0.10966657379597663_dp
      w(18)=0.10528109376105589_dp
      w(19)=0.099523110412495673_dp
      w(20)=0.092467685997712176_dp
      w(21)=0.084206795121510326_dp
      w(22)=0.074848123509707703_dp
      w(23)=0.064513658080354538_dp
      w(24)=0.053338077047327488_dp
      w(25)=0.041466915243006721_dp
      w(26)=0.029054220677979145_dp
      w(27)=0.016255883957504218_dp
      w(28)=0.0026455026455026455_dp
   case(29)
      w(1)=0.0024630541871921182_dp
      w(2)=0.015138169859967597_dp
      w(3)=0.027070806296824828_dp
      w(4)=0.038668439979712980_dp
      w(5)=0.049795809093237561_dp
      w(6)=0.060318503828522735_dp
      w(7)=0.070108938000597999_dp
      w(8)=0.079048313027885602_dp
      w(9)=0.087028133441135606_dp
      w(10)=0.093951542114796312_dp
      w(11)=0.099734501637149861_dp
      w(12)=0.10430681646367654_dp
      w(13)=0.10761298583356854_dp
      w(14)=0.10961287784589042_dp
      w(15)=0.11028221677968261_dp
      w(16)=0.10961287784589042_dp
      w(17)=0.10761298583356854_dp
      w(18)=0.10430681646367654_dp
      w(19)=0.099734501637149861_dp
      w(20)=0.093951542114796312_dp
      w(21)=0.087028133441135606_dp
      w(22)=0.079048313027885602_dp
      w(23)=0.070108938000597999_dp
      w(24)=0.060318503828522735_dp
      w(25)=0.049795809093237561_dp
      w(26)=0.038668439979712980_dp
      w(27)=0.027070806296824828_dp
      w(28)=0.015138169859967597_dp
      w(29)=0.0024630541871921182_dp
   case(30)
      w(1)=0.0022988505747126437_dp
      w(2)=0.014131799327905388_dp
      w(3)=0.025283166740551402_dp
      w(4)=0.036142094199408535_dp
      w(5)=0.046590694533142927_dp
      w(6)=0.056511197923080383_dp
      w(7)=0.065791336397790055_dp
      w(8)=0.074326003324718254_dp
      w(9)=0.082018512833406915_dp
      w(10)=0.088781712319765210_dp
      w(11)=0.094538975193860892_dp
      w(12)=0.099225071004299831_dp
      w(13)=0.10278690530723499_dp
      w(14)=0.10518412159645465_dp
      w(15)=0.10638955872366792_dp
      w(16)=0.10638955872366792_dp
      w(17)=0.10518412159645465_dp
      w(18)=0.10278690530723499_dp
      w(19)=0.099225071004299831_dp
      w(20)=0.094538975193860892_dp
      w(21)=0.088781712319765210_dp
      w(22)=0.082018512833406915_dp
      w(23)=0.074326003324718254_dp
      w(24)=0.065791336397790055_dp
      w(25)=0.056511197923080383_dp
      w(26)=0.046590694533142927_dp
      w(27)=0.036142094199408535_dp
      w(28)=0.025283166740551402_dp
      w(29)=0.014131799327905388_dp
      w(30)=0.0022988505747126437_dp
   case(31)
      w(1)=0.0021505376344086022_dp
      w(2)=0.013222471025464670_dp
      w(3)=0.023666433230270317_dp
      w(4)=0.033853940405224058_dp
      w(5)=0.043681818160066913_dp
      w(6)=0.053046465493448783_dp
      w(7)=0.061848741290454623_dp
      w(8)=0.069995377594100570_dp
      w(9)=0.077400032341475619_dp
      w(10)=0.083984220517529731_dp
      w(11)=0.089678151045260822_dp
      w(12)=0.094421468377857957_dp
      w(13)=0.098163893013712757_dp
      w(14)=0.10086575479865051_dp
      w(15)=0.10249841359547040_dp
      w(16)=0.10304456295320733_dp
      w(17)=0.10249841359547040_dp
      w(18)=0.10086575479865051_dp
      w(19)=0.098163893013712757_dp
      w(20)=0.094421468377857957_dp
      w(21)=0.089678151045260822_dp
      w(22)=0.083984220517529731_dp
      w(23)=0.077400032341475619_dp
      w(24)=0.069995377594100570_dp
      w(25)=0.061848741290454623_dp
      w(26)=0.053046465493448783_dp
      w(27)=0.043681818160066913_dp
      w(28)=0.033853940405224058_dp
      w(29)=0.023666433230270317_dp
      w(30)=0.013222471025464670_dp
      w(31)=0.0021505376344086022_dp
   case(32)
      w(1)=0.0020161290322580645_dp
      w(2)=0.012398106501373844_dp
      w(3)=0.022199552889291965_dp
      w(4)=0.031775135410915466_dp
      w(5)=0.041034201586062723_dp
      w(6)=0.049885271336221207_dp
      w(7)=0.058240497248055870_dp
      w(8)=0.066016877257154544_dp
      w(9)=0.073137139602679033_dp
      w(10)=0.079530525692106252_dp
      w(11)=0.085133497949668231_dp
      w(12)=0.089890372957357833_dp
      w(13)=0.093753875546813814_dp
      w(14)=0.096685608948002601_dp
      w(15)=0.098656436540761777_dp
      w(16)=0.099646771501276778_dp
      w(17)=0.099646771501276778_dp
      w(18)=0.098656436540761777_dp
      w(19)=0.096685608948002601_dp
      w(20)=0.093753875546813814_dp
      w(21)=0.089890372957357833_dp
      w(22)=0.085133497949668231_dp
      w(23)=0.079530525692106252_dp
      w(24)=0.073137139602679033_dp
      w(25)=0.066016877257154544_dp
      w(26)=0.058240497248055870_dp
      w(27)=0.049885271336221207_dp
      w(28)=0.041034201586062723_dp
      w(29)=0.031775135410915466_dp
      w(30)=0.022199552889291965_dp
      w(31)=0.012398106501373844_dp
      w(32)=0.0020161290322580645_dp
   case(33)
      w(1)=0.0018939393939393939_dp
      w(2)=0.011648448392267735_dp
      w(3)=0.020864609017603360_dp
      w(4)=0.029881045916746478_dp
      w(5)=0.038617814771813968_dp
      w(6)=0.046993850461024171_dp
      w(7)=0.054931059442626968_dp
      w(8)=0.062355367852465305_dp
      w(9)=0.069197469494016148_dp
      w(10)=0.075393486923973829_dp
      w(11)=0.080885572193455092_dp
      w(12)=0.085622448531813133_dp
      w(13)=0.089559889747077401_dp
      w(14)=0.092661133442241464_dp
      w(15)=0.094897224394591816_dp
      w(16)=0.096247284972985462_dp
      w(17)=0.096698710102716559_dp
      w(18)=0.096247284972985462_dp
      w(19)=0.094897224394591816_dp
      w(20)=0.092661133442241464_dp
      w(21)=0.089559889747077401_dp
      w(22)=0.085622448531813133_dp
      w(23)=0.080885572193455092_dp
      w(24)=0.075393486923973829_dp
      w(25)=0.069197469494016148_dp
      w(26)=0.062355367852465305_dp
      w(27)=0.054931059442626968_dp
      w(28)=0.046993850461024171_dp
      w(29)=0.038617814771813968_dp
      w(30)=0.029881045916746478_dp
      w(31)=0.020864609017603360_dp
      w(32)=0.011648448392267735_dp
      w(33)=0.0018939393939393939_dp
   case(34)
      w(1)=0.0017825311942959002_dp
      w(2)=0.010964740818306551_dp
      w(3)=0.019646278160713431_dp
      w(4)=0.028150536862243503_dp
      w(5)=0.036406770950782552_dp
      w(6)=0.044342902060244342_dp
      w(7)=0.051889291830927121_dp
      w(8)=0.058979654026745227_dp
      w(9)=0.065551690108265120_dp
      w(10)=0.071547649877072822_dp
      w(11)=0.076914843063590982_dp
      w(12)=0.081606103850422383_dp
      w(13)=0.085580205971977587_dp
      w(14)=0.088802225283584032_dp
      w(15)=0.091243846806914487_dp
      w(16)=0.092883613629610646_dp
      w(17)=0.093707115504303312_dp
      w(18)=0.093707115504303312_dp
      w(19)=0.092883613629610646_dp
      w(20)=0.091243846806914487_dp
      w(21)=0.088802225283584032_dp
      w(22)=0.085580205971977587_dp
      w(23)=0.081606103850422383_dp
      w(24)=0.076914843063590982_dp
      w(25)=0.071547649877072822_dp
      w(26)=0.065551690108265120_dp
      w(27)=0.058979654026745227_dp
      w(28)=0.051889291830927121_dp
      w(29)=0.044342902060244342_dp
      w(30)=0.036406770950782552_dp
      w(31)=0.028150536862243503_dp
      w(32)=0.019646278160713431_dp
      w(33)=0.010964740818306551_dp
      w(34)=0.0017825311942959002_dp
   case(35)
      w(1)=0.0016806722689075630_dp
      w(2)=0.010339473314540376_dp
      w(3)=0.018531393476282057_dp
      w(4)=0.026565395330778216_dp
      w(5)=0.034378667890410702_dp
      w(6)=0.041906918204587881_dp
      w(7)=0.049087863437218273_dp
      w(8)=0.055862029889036717_dp
      w(9)=0.062173295815379782_dp
      w(10)=0.067969368873298345_dp
      w(11)=0.073202223274018848_dp
      w(12)=0.077828499133511153_dp
      w(13)=0.081809862335847833_dp
      w(14)=0.085113322437326040_dp
      w(15)=0.087711506159071956_dp
      w(16)=0.089582884273716909_dp
      w(17)=0.090711950036822493_dp
      w(18)=0.091089347698489711_dp
      w(19)=0.090711950036822493_dp
      w(20)=0.089582884273716909_dp
      w(21)=0.087711506159071956_dp
      w(22)=0.085113322437326040_dp
      w(23)=0.081809862335847833_dp
      w(24)=0.077828499133511153_dp
      w(25)=0.073202223274018848_dp
      w(26)=0.067969368873298345_dp
      w(27)=0.062173295815379782_dp
      w(28)=0.055862029889036717_dp
      w(29)=0.049087863437218273_dp
      w(30)=0.041906918204587881_dp
      w(31)=0.034378667890410702_dp
      w(32)=0.026565395330778216_dp
      w(33)=0.018531393476282057_dp
      w(34)=0.010339473314540376_dp
      w(35)=0.0016806722689075630_dp
   case(36)
      w(1)=0.0015873015873015873_dp
      w(2)=0.0097661742710234637_dp
      w(3)=0.017508591322167710_dp
      w(4)=0.025109861490694849_dp
      w(5)=0.032514046428104876_dp
      w(6)=0.039663623505124961_dp
      w(7)=0.046502730682987541_dp
      w(8)=0.052977870870747266_dp
      w(9)=0.059038377820917483_dp
      w(10)=0.064636824372075272_dp
      w(11)=0.069729397256839425_dp
      w(12)=0.074276241315475397_dp
      w(13)=0.078241771954180374_dp
      w(14)=0.081594953883979393_dp
      w(15)=0.084309544130491856_dp
      w(16)=0.086364297480506396_dp
      w(17)=0.087743132786509786_dp
      w(18)=0.088435258840872366_dp
      w(19)=0.088435258840872366_dp
      w(20)=0.087743132786509786_dp
      w(21)=0.086364297480506396_dp
      w(22)=0.084309544130491856_dp
      w(23)=0.081594953883979393_dp
      w(24)=0.078241771954180374_dp
      w(25)=0.074276241315475397_dp
      w(26)=0.069729397256839425_dp
      w(27)=0.064636824372075272_dp
      w(28)=0.059038377820917483_dp
      w(29)=0.052977870870747266_dp
      w(30)=0.046502730682987541_dp
      w(31)=0.039663623505124961_dp
      w(32)=0.032514046428104876_dp
      w(33)=0.025109861490694849_dp
      w(34)=0.017508591322167710_dp
      w(35)=0.0097661742710234637_dp
      w(36)=0.0015873015873015873_dp
   case(37)
      w(1)=0.0015015015015015015_dp
      w(2)=0.0092392432428419297_dp
      w(3)=0.016568023462080861_dp
      w(4)=0.023770244581551459_dp
      w(5)=0.030795943408698084_dp
      w(6)=0.037593506203916828_dp
      w(7)=0.044112694216875664_dp
      w(8)=0.050305268315041557_dp
      w(9)=0.056125390773875630_dp
      w(10)=0.061529975716485609_dp
      w(11)=0.066479011534697336_dp
      w(12)=0.070935858364453644_dp
      w(13)=0.074867519862718237_dp
      w(14)=0.078244887728851382_dp
      w(15)=0.081042957322503717_dp
      w(16)=0.083241012845791744_dp
      w(17)=0.084822780746207937_dp
      w(18)=0.085776550217099386_dp
      w(19)=0.086095259909614985_dp
      w(20)=0.085776550217099386_dp
      w(21)=0.084822780746207937_dp
      w(22)=0.083241012845791744_dp
      w(23)=0.081042957322503717_dp
      w(24)=0.078244887728851382_dp
      w(25)=0.074867519862718237_dp
      w(26)=0.070935858364453644_dp
      w(27)=0.066479011534697336_dp
      w(28)=0.061529975716485609_dp
      w(29)=0.056125390773875630_dp
      w(30)=0.050305268315041557_dp
      w(31)=0.044112694216875664_dp
      w(32)=0.037593506203916828_dp
      w(33)=0.030795943408698084_dp
      w(34)=0.023770244581551459_dp
      w(35)=0.016568023462080861_dp
      w(36)=0.0092392432428419297_dp
      w(37)=0.0015015015015015015_dp
   case(38)
      w(1)=0.0014224751066856330_dp
      w(2)=0.0087538139943602259_dp
      w(3)=0.015701121356300385_dp
      w(4)=0.022534606874418875_dp
      w(5)=0.029209520950421724_dp
      w(6)=0.035679424686142199_dp
      w(7)=0.041899019716493156_dp
      w(8)=0.047824705288195613_dp
      w(9)=0.053414926372061171_dp
      w(10)=0.058630475628248270_dp
      w(11)=0.063434771663867566_dp
      w(12)=0.067794116802442773_dp
      w(13)=0.071677933929969966_dp
      w(14)=0.075058981187236439_dp
      w(15)=0.077913543156257632_dp
      w(16)=0.080221597260513986_dp
      w(17)=0.081966954237835648_dp
      w(18)=0.083137371712546614_dp
      w(19)=0.083724640076002125_dp
      w(20)=0.083724640076002125_dp
      w(21)=0.083137371712546614_dp
      w(22)=0.081966954237835648_dp
      w(23)=0.080221597260513986_dp
      w(24)=0.077913543156257632_dp
      w(25)=0.075058981187236439_dp
      w(26)=0.071677933929969966_dp
      w(27)=0.067794116802442773_dp
      w(28)=0.063434771663867566_dp
      w(29)=0.058630475628248270_dp
      w(30)=0.053414926372061171_dp
      w(31)=0.047824705288195613_dp
      w(32)=0.041899019716493156_dp
      w(33)=0.035679424686142199_dp
      w(34)=0.029209520950421724_dp
      w(35)=0.022534606874418875_dp
      w(36)=0.015701121356300385_dp
      w(37)=0.0087538139943602259_dp
      w(38)=0.0014224751066856330_dp
   case(39)
      w(1)=0.0013495276653171390_dp
      w(2)=0.0083056420077882969_dp
      w(3)=0.014900402058706223_dp
      w(4)=0.021392502271216359_dp
      w(5)=0.027741757700206937_dp
      w(6)=0.033906276321207935_dp
      w(7)=0.039845113337566719_dp
      w(8)=0.045518770698763460_dp
      w(9)=0.050889500060123479_dp
      w(10)=0.055921563937307437_dp
      w(11)=0.060581476611788700_dp
      w(12)=0.064838228089039192_dp
      w(13)=0.068663490921010460_dp
      w(14)=0.072031808925239212_dp
      w(15)=0.074920766690497159_dp
      w(16)=0.077311138798527092_dp
      w(17)=0.079187017793501901_dp
      w(18)=0.080535920058912584_dp
      w(19)=0.081348868902776146_dp
      w(20)=0.081620454301007138_dp
      w(21)=0.081348868902776146_dp
      w(22)=0.080535920058912584_dp
      w(23)=0.079187017793501901_dp
      w(24)=0.077311138798527092_dp
      w(25)=0.074920766690497159_dp
      w(26)=0.072031808925239212_dp
      w(27)=0.068663490921010460_dp
      w(28)=0.064838228089039192_dp
      w(29)=0.060581476611788700_dp
      w(30)=0.055921563937307437_dp
      w(31)=0.050889500060123479_dp
      w(32)=0.045518770698763460_dp
      w(33)=0.039845113337566719_dp
      w(34)=0.033906276321207935_dp
      w(35)=0.027741757700206937_dp
      w(36)=0.021392502271216359_dp
      w(37)=0.014900402058706223_dp
      w(38)=0.0083056420077882969_dp
      w(39)=0.0013495276653171390_dp
   case(40)
      w(1)=0.0012820512820512821_dp
      w(2)=0.0078910115886006138_dp
      w(3)=0.014159307549919773_dp
      w(4)=0.020334759063387162_dp
      w(5)=0.026381190653141486_dp
      w(6)=0.032260717927117395_dp
      w(7)=0.037936243700708447_dp
      w(8)=0.043371908194757981_dp
      w(9)=0.048533353845914325_dp
      w(10)=0.053387951971494183_dp
      w(11)=0.057905011981786083_dp
      w(12)=0.062055976475709525_dp
      w(13)=0.065814602222895903_dp
      w(14)=0.069157126276081134_dp
      w(15)=0.072062416302054295_dp
      w(16)=0.074512104235389339_dp
      w(17)=0.076490702433396506_dp
      w(18)=0.077985701608680581_dp
      w(19)=0.078987649925364344_dp
      w(20)=0.079490212761549641_dp
      w(21)=0.079490212761549641_dp
      w(22)=0.078987649925364344_dp
      w(23)=0.077985701608680581_dp
      w(24)=0.076490702433396506_dp
      w(25)=0.074512104235389339_dp
      w(26)=0.072062416302054295_dp
      w(27)=0.069157126276081134_dp
      w(28)=0.065814602222895903_dp
      w(29)=0.062055976475709525_dp
      w(30)=0.057905011981786083_dp
      w(31)=0.053387951971494183_dp
      w(32)=0.048533353845914325_dp
      w(33)=0.043371908194757981_dp
      w(34)=0.037936243700708447_dp
      w(35)=0.032260717927117395_dp
      w(36)=0.026381190653141486_dp
      w(37)=0.020334759063387162_dp
      w(38)=0.014159307549919773_dp
      w(39)=0.0078910115886006138_dp
      w(40)=0.0012820512820512821_dp
   case(41)
      w(1)=0.0012195121951219512_dp
      w(2)=0.0075066587628515885_dp
      w(3)=0.013472071094470607_dp
      w(4)=0.019353298566251680_dp
      w(5)=0.025117698393601087_dp
      w(6)=0.030730929097922459_dp
      w(7)=0.036159303444689513_dp
      w(8)=0.041370196155572641_dp
      w(9)=0.046332276348651614_dp
      w(10)=0.051015704947986513_dp
      w(11)=0.055392316918914311_dp
      w(12)=0.059435791663543656_dp
      w(13)=0.063121811727549795_dp
      w(14)=0.066428209232842706_dp
      w(15)=0.069335099287094895_dp
      w(16)=0.071824999619763970_dp
      w(17)=0.073882935747389606_dp
      w(18)=0.075496531045917973_dp
      w(19)=0.076656081193317471_dp
      w(20)=0.077354612537305549_dp
      w(21)=0.077587924038480832_dp
      w(22)=0.077354612537305549_dp
      w(23)=0.076656081193317471_dp
      w(24)=0.075496531045917973_dp
      w(25)=0.073882935747389606_dp
      w(26)=0.071824999619763970_dp
      w(27)=0.069335099287094895_dp
      w(28)=0.066428209232842706_dp
      w(29)=0.063121811727549795_dp
      w(30)=0.059435791663543656_dp
      w(31)=0.055392316918914311_dp
      w(32)=0.051015704947986513_dp
      w(33)=0.046332276348651614_dp
      w(34)=0.041370196155572641_dp
      w(35)=0.036159303444689513_dp
      w(36)=0.030730929097922459_dp
      w(37)=0.025117698393601087_dp
      w(38)=0.019353298566251680_dp
      w(39)=0.013472071094470607_dp
      w(40)=0.0075066587628515885_dp
      w(41)=0.0012195121951219512_dp
   case(42)
      w(1)=0.0011614401858304297_dp
      w(2)=0.0071497069724666474_dp
      w(3)=0.012833605558313825_dp
      w(4)=0.018440983044666175_dp
      w(5)=0.023942318410790524_dp
      w(6)=0.029306411216165702_dp
      w(7)=0.034502604399116891_dp
      w(8)=0.039501155201751501_dp
      w(9)=0.044273440030289172_dp
      w(10)=0.048792126960380732_dp
      w(11)=0.053031334938156929_dp
      w(12)=0.056966782983790267_dp
      w(13)=0.060575929662544088_dp
      w(14)=0.063838102375796549_dp
      w(15)=0.066734615856802646_dp
      w(16)=0.069248879241938954_dp
      w(17)=0.071366491125350074_dp
      w(18)=0.073075322062271661_dp
      w(19)=0.074365584053192821_dp
      w(20)=0.075229886613271169_dp
      w(21)=0.075663279107113244_dp
      w(22)=0.075663279107113244_dp
      w(23)=0.075229886613271169_dp
      w(24)=0.074365584053192821_dp
      w(25)=0.073075322062271661_dp
      w(26)=0.071366491125350074_dp
      w(27)=0.069248879241938954_dp
      w(28)=0.066734615856802646_dp
      w(29)=0.063838102375796549_dp
      w(30)=0.060575929662544088_dp
      w(31)=0.056966782983790267_dp
      w(32)=0.053031334938156929_dp
      w(33)=0.048792126960380732_dp
      w(34)=0.044273440030289172_dp
      w(35)=0.039501155201751501_dp
      w(36)=0.034502604399116891_dp
      w(37)=0.029306411216165702_dp
      w(38)=0.023942318410790524_dp
      w(39)=0.018440983044666175_dp
      w(40)=0.012833605558313825_dp
      w(41)=0.0071497069724666474_dp
      w(42)=0.0011614401858304297_dp
   case(43)
      w(1)=0.0011074197120708749_dp
      w(2)=0.0068176131980729019_dp
      w(3)=0.012239409664139599_dp
      w(4)=0.017591487668267929_dp
      w(5)=0.022847092559028574_dp
      w(6)=0.027977816257611358_dp
      w(7)=0.032955701327542518_dp
      w(8)=0.037753579888412150_dp
      w(9)=0.042345254883842159_dp
      w(10)=0.046705651312898934_dp
      w(11)=0.050810955703379603_dp
      w(12)=0.054638747086953436_dp
      w(13)=0.058168119828086677_dp
      w(14)=0.061379797970822128_dp
      w(15)=0.064256240598347203_dp
      w(16)=0.066781737677068673_dp
      w(17)=0.068942495881944087_dp
      w(18)=0.070726713943604274_dp
      w(19)=0.072124647110261263_dp
      w(20)=0.073128660374636310_dp
      w(21)=0.073733270176421774_dp
      w(22)=0.073935174353175154_dp
      w(23)=0.073733270176421774_dp
      w(24)=0.073128660374636310_dp
      w(25)=0.072124647110261263_dp
      w(26)=0.070726713943604274_dp
      w(27)=0.068942495881944087_dp
      w(28)=0.066781737677068673_dp
      w(29)=0.064256240598347203_dp
      w(30)=0.061379797970822128_dp
      w(31)=0.058168119828086677_dp
      w(32)=0.054638747086953436_dp
      w(33)=0.050810955703379603_dp
      w(34)=0.046705651312898934_dp
      w(35)=0.042345254883842159_dp
      w(36)=0.037753579888412150_dp
      w(37)=0.032955701327542518_dp
      w(38)=0.027977816257611358_dp
      w(39)=0.022847092559028574_dp
      w(40)=0.017591487668267929_dp
      w(41)=0.012239409664139599_dp
      w(42)=0.0068176131980729019_dp
      w(43)=0.0011074197120708749_dp
   case(44)
      w(1)=0.0010570824524312896_dp
      w(2)=0.0065081226214761116_dp
      w(3)=0.011685488970917215_dp
      w(4)=0.016799192269921775_dp
      w(5)=0.021824935857153264_dp
      w(6)=0.026736800540116417_dp
      w(7)=0.031509239967195059_dp
      w(8)=0.036117391552679906_dp
      w(9)=0.040537237485392991_dp
      w(10)=0.044745737726254162_dp
      w(11)=0.048720952535292530_dp
      w(12)=0.052442157727594373_dp
      w(13)=0.055889953075826156_dp
      w(14)=0.059046363613777589_dp
      w(15)=0.061894933426761269_dp
      w(16)=0.064420811484882629_dp
      w(17)=0.066610829090974536_dp
      w(18)=0.068453568548275647_dp
      w(19)=0.069939422694159255_dp
      w(20)=0.071060644991731396_dp
      w(21)=0.071811389919312993_dp
      w(22)=0.072187743447873438_dp
      w(23)=0.072187743447873438_dp
      w(24)=0.071811389919312993_dp
      w(25)=0.071060644991731396_dp
      w(26)=0.069939422694159255_dp
      w(27)=0.068453568548275647_dp
      w(28)=0.066610829090974536_dp
      w(29)=0.064420811484882629_dp
      w(30)=0.061894933426761269_dp
      w(31)=0.059046363613777589_dp
      w(32)=0.055889953075826156_dp
      w(33)=0.052442157727594373_dp
      w(34)=0.048720952535292530_dp
      w(35)=0.044745737726254162_dp
      w(36)=0.040537237485392991_dp
      w(37)=0.036117391552679906_dp
      w(38)=0.031509239967195059_dp
      w(39)=0.026736800540116417_dp
      w(40)=0.021824935857153264_dp
      w(41)=0.016799192269921775_dp
      w(42)=0.011685488970917215_dp
      w(43)=0.0065081226214761116_dp
      w(44)=0.0010570824524312896_dp
   case(45)
      w(1)=0.0010101010101010101_dp
      w(2)=0.0062192303157486595_dp
      w(3)=0.011168288996584964_dp
      w(4)=0.016059089495837321_dp
      w(5)=0.020869524716397265_dp
      w(6)=0.025575899418151971_dp
      w(7)=0.030154825753535939_dp
      w(8)=0.034583509607989823_dp
      w(9)=0.038839894146310448_dp
      w(10)=0.042902777131137508_dp
      w(11)=0.046751918850698062_dp
      w(12)=0.050368143785247742_dp
      w(13)=0.053733436478770827_dp
      w(14)=0.056831031443630642_dp
      w(15)=0.059645496759154214_dp
      w(16)=0.062162810990644116_dp
      w(17)=0.064370433064034661_dp
      w(18)=0.066257364756539747_dp
      w(19)=0.067814205496082611_dp
      w(20)=0.069033199198602262_dp
      w(21)=0.069908272911014881_dp
      w(22)=0.070435067067928044_dp
      w(23)=0.070610957211714566_dp
      w(24)=0.070435067067928044_dp
      w(25)=0.069908272911014881_dp
      w(26)=0.069033199198602262_dp
      w(27)=0.067814205496082611_dp
      w(28)=0.066257364756539747_dp
      w(29)=0.064370433064034661_dp
      w(30)=0.062162810990644116_dp
      w(31)=0.059645496759154214_dp
      w(32)=0.056831031443630642_dp
      w(33)=0.053733436478770827_dp
      w(34)=0.050368143785247742_dp
      w(35)=0.046751918850698062_dp
      w(36)=0.042902777131137508_dp
      w(37)=0.038839894146310448_dp
      w(38)=0.034583509607989823_dp
      w(39)=0.030154825753535939_dp
      w(40)=0.025575899418151971_dp
      w(41)=0.020869524716397265_dp
      w(42)=0.016059089495837321_dp
      w(43)=0.011168288996584964_dp
      w(44)=0.0062192303157486595_dp
      w(45)=0.0010101010101010101_dp
   case(46)
      w(1)=0.00096618357487922705_dp
      w(2)=0.0059491487454403582_dp
      w(3)=0.010684638400132986_dp
      w(4)=0.015366706580523117_dp
      w(5)=0.019975201401608783_dp
      w(6)=0.024488419616659377_dp
      w(7)=0.028884910179304030_dp
      w(8)=0.033143738893585783_dp
      w(9)=0.037244616854397545_dp
      w(10)=0.041168004241210667_dp
      w(11)=0.044895205632908467_dp
      w(12)=0.048408459896685135_dp
      w(13)=0.051691025153219682_dp
      w(14)=0.054727258705199018_dp
      w(15)=0.057502691652412540_dp
      w(16)=0.060004097878936433_dp
      w(17)=0.062219557101267637_dp
      w(18)=0.064138511685042370_dp
      w(19)=0.065751816963516746_dp
      w(20)=0.067051784820030349_dp
      w(21)=0.068032220327834335_dp
      w(22)=0.068688451273269447_dp
      w(23)=0.069017350421935967_dp
      w(24)=0.069017350421935967_dp
      w(25)=0.068688451273269447_dp
      w(26)=0.068032220327834335_dp
      w(27)=0.067051784820030349_dp
      w(28)=0.065751816963516746_dp
      w(29)=0.064138511685042370_dp
      w(30)=0.062219557101267637_dp
      w(31)=0.060004097878936433_dp
      w(32)=0.057502691652412540_dp
      w(33)=0.054727258705199018_dp
      w(34)=0.051691025153219682_dp
      w(35)=0.048408459896685135_dp
      w(36)=0.044895205632908467_dp
      w(37)=0.041168004241210667_dp
      w(38)=0.037244616854397545_dp
      w(39)=0.033143738893585783_dp
      w(40)=0.028884910179304030_dp
      w(41)=0.024488419616659377_dp
      w(42)=0.019975201401608783_dp
      w(43)=0.015366706580523117_dp
      w(44)=0.010684638400132986_dp
      w(45)=0.0059491487454403582_dp
      w(46)=0.00096618357487922705_dp
   case(47)
      w(1)=0.00092506938020351526_dp
      w(2)=0.0056962800915922655_dp
      w(3)=0.010231700532574725_dp
      w(4)=0.014718038492394862_dp
      w(5)=0.019136892105083802_dp
      w(6)=0.023468346462881329_dp
      w(7)=0.027692692211754887_dp
      w(8)=0.031790670982680378_dp
      w(9)=0.035743590718663317_dp
      w(10)=0.039533417766413467_dp
      w(11)=0.043142861264354087_dp
      w(12)=0.046555452799402833_dp
      w(13)=0.049755621859878705_dp
      w(14)=0.052728767019742943_dp
      w(15)=0.055461322629035284_dp
      w(16)=0.057940820745543195_dp
      w(17)=0.060155948041983030_dp
      w(18)=0.062096597436779087_dp
      w(19)=0.063753914216627273_dp
      w(20)=0.065120336442322086_dp
      w(21)=0.066189629454511169_dp
      w(22)=0.066956914322502747_dp
      w(23)=0.067418690106642322_dp
      w(24)=0.067572849832865381_dp
      w(25)=0.067418690106642322_dp
      w(26)=0.066956914322502747_dp
      w(27)=0.066189629454511169_dp
      w(28)=0.065120336442322086_dp
      w(29)=0.063753914216627273_dp
      w(30)=0.062096597436779087_dp
      w(31)=0.060155948041983030_dp
      w(32)=0.057940820745543195_dp
      w(33)=0.055461322629035284_dp
      w(34)=0.052728767019742943_dp
      w(35)=0.049755621859878705_dp
      w(36)=0.046555452799402833_dp
      w(37)=0.043142861264354087_dp
      w(38)=0.039533417766413467_dp
      w(39)=0.035743590718663317_dp
      w(40)=0.031790670982680378_dp
      w(41)=0.027692692211754887_dp
      w(42)=0.023468346462881329_dp
      w(43)=0.019136892105083802_dp
      w(44)=0.014718038492394862_dp
      w(45)=0.010231700532574725_dp
      w(46)=0.0056962800915922655_dp
      w(47)=0.00092506938020351526_dp
   case(48)
      w(1)=0.00088652482269503546_dp
      w(2)=0.0054591926002481192_dp
      w(3)=0.0098069319789003281_dp
      w(4)=0.014109490605488713_dp
      w(5)=0.018350036475219081_dp
      w(6)=0.022510263736936084_dp
      w(7)=0.026572032590911317_dp
      w(8)=0.030517597621303643_dp
      w(9)=0.034329711700673837_dp
      w(10)=0.037991707926728157_dp
      w(11)=0.041487574518847291_dp
      w(12)=0.044802025564071610_dp
      w(13)=0.047920568156735501_dp
      w(14)=0.050829565905944697_dp
      w(15)=0.053516298628674931_dp
      w(16)=0.055969018005148836_dp
      w(17)=0.058176998969274632_dp
      w(18)=0.060130586616844023_dp
      w(19)=0.061821238429979367_dp
      w(20)=0.063241561635037986_dp
      w(21)=0.064385345531601177_dp
      w(22)=0.065247588651725824_dp
      w(23)=0.065824520631008017_dp
      w(24)=0.066113618696001794_dp
      w(25)=0.066113618696001794_dp
      w(26)=0.065824520631008017_dp
      w(27)=0.065247588651725824_dp
      w(28)=0.064385345531601177_dp
      w(29)=0.063241561635037986_dp
      w(30)=0.061821238429979367_dp
      w(31)=0.060130586616844023_dp
      w(32)=0.058176998969274632_dp
      w(33)=0.055969018005148836_dp
      w(34)=0.053516298628674931_dp
      w(35)=0.050829565905944697_dp
      w(36)=0.047920568156735501_dp
      w(37)=0.044802025564071610_dp
      w(38)=0.041487574518847291_dp
      w(39)=0.037991707926728157_dp
      w(40)=0.034329711700673837_dp
      w(41)=0.030517597621303643_dp
      w(42)=0.026572032590911317_dp
      w(43)=0.022510263736936084_dp
      w(44)=0.018350036475219081_dp
      w(45)=0.014109490605488713_dp
      w(46)=0.0098069319789003281_dp
      w(47)=0.0054591926002481192_dp
      w(48)=0.00088652482269503546_dp
   case(49)
      w(1)=0.00085034013605442177_dp
      w(2)=0.0052366002997777452_dp
      w(3)=0.0094080469628555945_dp
      w(4)=0.013537829381581817_dp
      w(5)=0.017610526816783106_dp
      w(6)=0.021609284240822008_dp
      w(7)=0.025517379167136705_dp
      w(8)=0.029318434709843003_dp
      w(9)=0.032996513505725078_dp
      w(10)=0.036536190813376635_dp
      w(11)=0.039922621143590443_dp
      w(12)=0.043141601227016470_dp
      w(13)=0.046179629873557273_dp
      w(14)=0.049023964729225407_dp
      w(15)=0.051662675783964654_dp
      w(16)=0.054084695442135282_dp
      w(17)=0.056279864961135847_dp
      w(18)=0.058238977070491024_dp
      w(19)=0.059953814596105189_dp
      w(20)=0.061417184929446927_dp
      w(21)=0.062622950198032685_dp
      w(22)=0.063566053011186641_dp
      w(23)=0.064242537673388332_dp
      w(24)=0.064649566776405845_dp
      w(25)=0.064785433100723735_dp
      w(26)=0.064649566776405845_dp
      w(27)=0.064242537673388332_dp
      w(28)=0.063566053011186641_dp
      w(29)=0.062622950198032685_dp
      w(30)=0.061417184929446927_dp
      w(31)=0.059953814596105189_dp
      w(32)=0.058238977070491024_dp
      w(33)=0.056279864961135847_dp
      w(34)=0.054084695442135282_dp
      w(35)=0.051662675783964654_dp
      w(36)=0.049023964729225407_dp
      w(37)=0.046179629873557273_dp
      w(38)=0.043141601227016470_dp
      w(39)=0.039922621143590443_dp
      w(40)=0.036536190813376635_dp
      w(41)=0.032996513505725078_dp
      w(42)=0.029318434709843003_dp
      w(43)=0.025517379167136705_dp
      w(44)=0.021609284240822008_dp
      w(45)=0.017610526816783106_dp
      w(46)=0.013537829381581817_dp
      w(47)=0.0094080469628555945_dp
      w(48)=0.0052366002997777452_dp
      w(49)=0.00085034013605442177_dp
   case(50)
      w(1)=0.00081632653061224490_dp
      w(2)=0.0050273455497416577_dp
      w(3)=0.0090329866868996021_dp
      w(4)=0.013000139812211761_dp
      w(5)=0.016914655483863766_dp
      w(6)=0.020760989497015993_dp
      w(7)=0.024523701718169494_dp
      w(8)=0.028187655451060249_dp
      w(9)=0.031738102606570639_dp
      w(10)=0.035160749089347250_dp
      w(11)=0.038441814210997735_dp
      w(12)=0.041568086852368493_dp
      w(13)=0.044526978934472742_dp
      w(14)=0.047306576229236723_dp
      w(15)=0.049895686393343376_dp
      w(16)=0.052283884066433463_dp
      w(17)=0.054461552866930615_dp
      w(18)=0.056419924123210141_dp
      w(19)=0.058151112187474100_dp
      w(20)=0.059648146191833454_dp
      w(21)=0.060904998119632791_dp
      w(22)=0.061916607079486179_dp
      w(23)=0.062678899684568011_dp
      w(24)=0.063188806455266633_dp
      w(25)=0.063444274179252887_dp
      w(26)=0.063444274179252887_dp
      w(27)=0.063188806455266633_dp
      w(28)=0.062678899684568011_dp
      w(29)=0.061916607079486179_dp
      w(30)=0.060904998119632791_dp
      w(31)=0.059648146191833454_dp
      w(32)=0.058151112187474100_dp
      w(33)=0.056419924123210141_dp
      w(34)=0.054461552866930615_dp
      w(35)=0.052283884066433463_dp
      w(36)=0.049895686393343376_dp
      w(37)=0.047306576229236723_dp
      w(38)=0.044526978934472742_dp
      w(39)=0.041568086852368493_dp
      w(40)=0.038441814210997735_dp
      w(41)=0.035160749089347250_dp
      w(42)=0.031738102606570639_dp
      w(43)=0.028187655451060249_dp
      w(44)=0.024523701718169494_dp
      w(45)=0.020760989497015993_dp
      w(46)=0.016914655483863766_dp
      w(47)=0.013000139812211761_dp
      w(48)=0.0090329866868996021_dp
      w(49)=0.0050273455497416577_dp
      w(50)=0.00081632653061224490_dp
   case(51)
      w(1)=0.00078431372549019608_dp
      w(2)=0.0048303839785079999_dp
      w(3)=0.0086798928414219332_dp
      w(4)=0.012493788584867126_dp
      w(5)=0.016259069234618171_dp
      w(6)=0.019961377244536784_dp
      w(7)=0.023586434922498589_dp
      w(8)=0.027120231473672400_dp
      w(9)=0.030549100473198493_dp
      w(10)=0.033859778504004804_dp
      w(11)=0.037039458253170415_dp
      w(12)=0.040075838706706096_dp
      w(13)=0.042957173003353664_dp
      w(14)=0.045672313999034519_dp
      w(15)=0.048210757450078384_dp
      w(16)=0.050562682681471095_dp
      w(17)=0.052718990597057520_dp
      w(18)=0.054671338891197741_dp
      w(19)=0.056412174328837261_dp
      w(20)=0.057934761970736019_dp
      w(21)=0.059233211231659750_dp
      w(22)=0.060302498671201867_dp
      w(23)=0.061138487429338507_dp
      w(24)=0.061737943231686402_dp
      w(25)=0.062098546902639266_dp
      w(26)=0.062218903338029998_dp
      w(27)=0.062098546902639266_dp
      w(28)=0.061737943231686402_dp
      w(29)=0.061138487429338507_dp
      w(30)=0.060302498671201867_dp
      w(31)=0.059233211231659750_dp
      w(32)=0.057934761970736019_dp
      w(33)=0.056412174328837261_dp
      w(34)=0.054671338891197741_dp
      w(35)=0.052718990597057520_dp
      w(36)=0.050562682681471095_dp
      w(37)=0.048210757450078384_dp
      w(38)=0.045672313999034519_dp
      w(39)=0.042957173003353664_dp
      w(40)=0.040075838706706096_dp
      w(41)=0.037039458253170415_dp
      w(42)=0.033859778504004804_dp
      w(43)=0.030549100473198493_dp
      w(44)=0.027120231473672400_dp
      w(45)=0.023586434922498589_dp
      w(46)=0.019961377244536784_dp
      w(47)=0.016259069234618171_dp
      w(48)=0.012493788584867126_dp
      w(49)=0.0086798928414219332_dp
      w(50)=0.0048303839785079999_dp
      w(51)=0.00078431372549019608_dp
   case(52)
      w(1)=0.00075414781297134238_dp
      w(2)=0.0046447714432131169_dp
      w(3)=0.0083470846483311674_dp
      w(4)=0.012016392112302461_dp
      w(5)=0.015640729519941051_dp
      w(6)=0.019206815612478107_dp
      w(7)=0.022701428364924929_dp
      w(8)=0.026111580901739543_dp
      w(9)=0.029424592179455154_dp
      w(10)=0.032628139703563413_dp
      w(11)=0.035710307082888824_dp
      w(12)=0.038659628980130447_dp
      w(13)=0.041465134017019776_dp
      w(14)=0.044116385702106620_dp
      w(15)=0.046603521310066087_dp
      w(16)=0.048917288599910145_dp
      w(17)=0.051049080249230072_dp
      w(18)=0.052990965882670138_dp
      w(19)=0.054735721578548514_dp
      w(20)=0.056276856745425635_dp
      w(21)=0.057608638269473938_dp
      w(22)=0.058726111843282853_dp
      w(23)=0.059625120397019956_dp
      w(24)=0.060302319563539378_dp
      w(25)=0.060755190120000071_dp
      w(26)=0.060982047359767262_dp
      w(27)=0.060982047359767262_dp
      w(28)=0.060755190120000071_dp
      w(29)=0.060302319563539378_dp
      w(30)=0.059625120397019956_dp
      w(31)=0.058726111843282853_dp
      w(32)=0.057608638269473938_dp
      w(33)=0.056276856745425635_dp
      w(34)=0.054735721578548514_dp
      w(35)=0.052990965882670138_dp
      w(36)=0.051049080249230072_dp
      w(37)=0.048917288599910145_dp
      w(38)=0.046603521310066087_dp
      w(39)=0.044116385702106620_dp
      w(40)=0.041465134017019776_dp
      w(41)=0.038659628980130447_dp
      w(42)=0.035710307082888824_dp
      w(43)=0.032628139703563413_dp
      w(44)=0.029424592179455154_dp
      w(45)=0.026111580901739543_dp
      w(46)=0.022701428364924929_dp
      w(47)=0.019206815612478107_dp
      w(48)=0.015640729519941051_dp
      w(49)=0.012016392112302461_dp
      w(50)=0.0083470846483311674_dp
      w(51)=0.0046447714432131169_dp
      w(52)=0.00075414781297134238_dp
   case(53)
      w(1)=0.00072568940493468795_dp
      w(2)=0.0044696527076774915_dp
      w(3)=0.0080330389107423447_dp
      w(4)=0.011565788706571831_dp
      w(5)=0.015056877844866209_dp
      w(6)=0.018494003026789782_dp
      w(7)=0.021864902617516717_dp
      w(8)=0.025157522479674317_dp
      w(9)=0.028360080648519956_dp
      w(10)=0.031461114841032123_dp
      w(11)=0.034449525136823758_dp
      w(12)=0.037314614310195046_dp
      w(13)=0.040046126367143287_dp
      w(14)=0.042634283368374188_dp
      w(15)=0.045069820484567010_dp
      w(16)=0.047344019189206154_dp
      w(17)=0.049448738483356346_dp
      w(18)=0.051376444046663164_dp
      w(19)=0.053120235213173155_dp
      w(20)=0.054673869676914205_dp
      w(21)=0.056031785839601261_dp
      w(22)=0.057189122720914508_dp
      w(23)=0.058141737360331926_dp
      w(24)=0.058886219648372720_dp
      w(25)=0.059419904534250329_dp
      w(26)=0.059740881566290257_dp
      w(27)=0.059848001730994448_dp
      w(28)=0.059740881566290257_dp
      w(29)=0.059419904534250329_dp
      w(30)=0.058886219648372720_dp
      w(31)=0.058141737360331926_dp
      w(32)=0.057189122720914508_dp
      w(33)=0.056031785839601261_dp
      w(34)=0.054673869676914205_dp
      w(35)=0.053120235213173155_dp
      w(36)=0.051376444046663164_dp
      w(37)=0.049448738483356346_dp
      w(38)=0.047344019189206154_dp
      w(39)=0.045069820484567010_dp
      w(40)=0.042634283368374188_dp
      w(41)=0.040046126367143287_dp
      w(42)=0.037314614310195046_dp
      w(43)=0.034449525136823758_dp
      w(44)=0.031461114841032123_dp
      w(45)=0.028360080648519956_dp
      w(46)=0.025157522479674317_dp
      w(47)=0.021864902617516717_dp
      w(48)=0.018494003026789782_dp
      w(49)=0.015056877844866209_dp
      w(50)=0.011565788706571831_dp
      w(51)=0.0080330389107423447_dp
      w(52)=0.0044696527076774915_dp
      w(53)=0.00072568940493468795_dp
   case(54)
      w(1)=0.00069881201956673655_dp
      w(2)=0.0043042515844634804_dp
      w(3)=0.0077363726275994639_dp
      w(4)=0.011140014296305147_dp
      w(5)=0.014505005478884170_dp
      w(6)=0.017819933052124230_dp
      w(7)=0.021073410580106739_dp
      w(8)=0.024254234983220791_dp
      w(9)=0.027351445883033062_dp
      w(10)=0.030354368519553280_dp
      w(11)=0.033252652136918527_dp
      w(12)=0.036036306239565544_dp
      w(13)=0.038695735266165073_dp
      w(14)=0.041221771772643540_dp
      w(15)=0.043605708085066802_dp
      w(16)=0.045839326342925629_dp
      w(17)=0.047914926841964040_dp
      w(18)=0.049825354584678980_dp
      w(19)=0.051564023949803378_dp
      w(20)=0.053124941397182469_dp
      w(21)=0.054502726130549555_dp
      w(22)=0.055692628647401799_dp
      w(23)=0.056690547112276878_dp
      w(24)=0.057493041497133531_dp
      w(25)=0.058097345440178801_dp
      w(26)=0.058501375782315969_dp
      w(27)=0.058703739748372384_dp
      w(28)=0.058703739748372384_dp
      w(29)=0.058501375782315969_dp
      w(30)=0.058097345440178801_dp
      w(31)=0.057493041497133531_dp
      w(32)=0.056690547112276878_dp
      w(33)=0.055692628647401799_dp
      w(34)=0.054502726130549555_dp
      w(35)=0.053124941397182469_dp
      w(36)=0.051564023949803378_dp
      w(37)=0.049825354584678980_dp
      w(38)=0.047914926841964040_dp
      w(39)=0.045839326342925629_dp
      w(40)=0.043605708085066802_dp
      w(41)=0.041221771772643540_dp
      w(42)=0.038695735266165073_dp
      w(43)=0.036036306239565544_dp
      w(44)=0.033252652136918527_dp
      w(45)=0.030354368519553280_dp
      w(46)=0.027351445883033062_dp
      w(47)=0.024254234983220791_dp
      w(48)=0.021073410580106739_dp
      w(49)=0.017819933052124230_dp
      w(50)=0.014505005478884170_dp
      w(51)=0.011140014296305147_dp
      w(52)=0.0077363726275994639_dp
      w(53)=0.0043042515844634804_dp
      w(54)=0.00069881201956673655_dp
   case(55)
      w(1)=0.00067340067340067340_dp
      w(2)=0.0041478623286710431_dp
      w(3)=0.0074558278035213583_dp
      w(4)=0.010737281181964297_dp
      w(5)=0.013982826904940362_dp
      w(6)=0.017181863492228659_dp
      w(7)=0.020323803383333689_dp
      w(8)=0.023398221250648128_dp
      w(9)=0.026394908601620216_dp
      w(10)=0.029303912637618081_dp
      w(11)=0.032115570845726109_dp
      w(12)=0.034820543650590017_dp
      w(13)=0.037409845665582208_dp
      w(14)=0.039874875642630918_dp
      w(15)=0.042207445093640033_dp
      w(16)=0.044399805516991254_dp
      w(17)=0.046444674150926230_dp
      w(18)=0.048335258173876832_dp
      w(19)=0.050065277274085501_dp
      w(20)=0.051628984514939112_dp
      w(21)=0.053021185427449941_dp
      w(22)=0.054237255266874141_dp
      w(23)=0.055273154376380134_dp
      w(24)=0.056125441606870231_dp
      w(25)=0.056791285748460808_dp
      w(26)=0.057268474935698952_dp
      w(27)=0.057555423995304933_dp
      w(28)=0.057651179712052285_dp
      w(29)=0.057555423995304933_dp
      w(30)=0.057268474935698952_dp
      w(31)=0.056791285748460808_dp
      w(32)=0.056125441606870231_dp
      w(33)=0.055273154376380134_dp
      w(34)=0.054237255266874141_dp
      w(35)=0.053021185427449941_dp
      w(36)=0.051628984514939112_dp
      w(37)=0.050065277274085501_dp
      w(38)=0.048335258173876832_dp
      w(39)=0.046444674150926230_dp
      w(40)=0.044399805516991254_dp
      w(41)=0.042207445093640033_dp
      w(42)=0.039874875642630918_dp
      w(43)=0.037409845665582208_dp
      w(44)=0.034820543650590017_dp
      w(45)=0.032115570845726109_dp
      w(46)=0.029303912637618081_dp
      w(47)=0.026394908601620216_dp
      w(48)=0.023398221250648128_dp
      w(49)=0.020323803383333689_dp
      w(50)=0.017181863492228659_dp
      w(51)=0.013982826904940362_dp
      w(52)=0.010737281181964297_dp
      w(53)=0.0074558278035213583_dp
      w(54)=0.0041478623286710431_dp
      w(55)=0.00067340067340067340_dp
   case(56)
      w(1)=0.00064935064935064935_dp
      w(2)=0.0039998421051063664_dp
      w(3)=0.0071902581429929797_dp
      w(4)=0.010355959403268498_dp
      w(5)=0.013488256491098847_dp
      w(6)=0.016577289173990204_dp
      w(7)=0.019613200257610404_dp
      w(8)=0.022586276257862587_dp
      w(9)=0.025486997771695898_dp
      w(10)=0.028306074740684041_dp
      w(11)=0.031034477684631204_dp
      w(12)=0.033663467159778756_dp
      w(13)=0.036184621971786739_dp
      w(14)=0.038589866248989720_dp
      w(15)=0.040871495359022180_dp
      w(16)=0.043022200613337809_dp
      w(17)=0.045035092692287906_dp
      w(18)=0.046903723721137408_dp
      w(19)=0.048622107928936951_dp
      w(20)=0.050184740825421413_dp
      w(21)=0.051586616835224780_dp
      w(22)=0.052823245333322424_dp
      w(23)=0.053890665030563063_dp
      w(24)=0.054785456663344156_dp
      w(25)=0.055504753946863551_dp
      w(26)=0.056046252756911301_dp
      w(27)=0.056408218510821249_dp
      w(28)=0.056589491723958915_dp
      w(29)=0.056589491723958915_dp
      w(30)=0.056408218510821249_dp
      w(31)=0.056046252756911301_dp
      w(32)=0.055504753946863551_dp
      w(33)=0.054785456663344156_dp
      w(34)=0.053890665030563063_dp
      w(35)=0.052823245333322424_dp
      w(36)=0.051586616835224780_dp
      w(37)=0.050184740825421413_dp
      w(38)=0.048622107928936951_dp
      w(39)=0.046903723721137408_dp
      w(40)=0.045035092692287906_dp
      w(41)=0.043022200613337809_dp
      w(42)=0.040871495359022180_dp
      w(43)=0.038589866248989720_dp
      w(44)=0.036184621971786739_dp
      w(45)=0.033663467159778756_dp
      w(46)=0.031034477684631204_dp
      w(47)=0.028306074740684041_dp
      w(48)=0.025486997771695898_dp
      w(49)=0.022586276257862587_dp
      w(50)=0.019613200257610404_dp
      w(51)=0.016577289173990204_dp
      w(52)=0.013488256491098847_dp
      w(53)=0.010355959403268498_dp
      w(54)=0.0071902581429929797_dp
      w(55)=0.0039998421051063664_dp
      w(56)=0.00064935064935064935_dp
   case(57)
      w(1)=0.00062656641604010025_dp
      w(2)=0.0038596043785436147_dp
      w(3)=0.0069386173666456160_dp
      w(4)=0.0099945603588191146_dp
      w(5)=0.013019387947265630_dp
      w(6)=0.016003917925357172_dp
      w(7)=0.018938961856321942_dp
      w(8)=0.021815458738125021_dp
      w(9)=0.024624521589129164_dp
      w(10)=0.027357469519451914_dp
      w(11)=0.030005855985896861_dp
      w(12)=0.032561495414958662_dp
      w(13)=0.035016488714174597_dp
      w(14)=0.037363247781945434_dp
      w(15)=0.039594519007425481_dp
      w(16)=0.041703405714416466_dp
      w(17)=0.043683389491276988_dp
      w(18)=0.045528350346142624_dp
      w(19)=0.047232585627699398_dp
      w(20)=0.048790827654326899_dp
      w(21)=0.050198259997814124_dp
      w(22)=0.051450532371700677_dp
      w(23)=0.052543774078444874_dp
      w(24)=0.053474605973984535_dp
      w(25)=0.054240150912787569_dp
      w(26)=0.054838042641156126_dp
      w(27)=0.055266433111326355_dp
      w(28)=0.055523998193775815_dp
      w(29)=0.055609941770094453_dp
      w(30)=0.055523998193775815_dp
      w(31)=0.055266433111326355_dp
      w(32)=0.054838042641156126_dp
      w(33)=0.054240150912787569_dp
      w(34)=0.053474605973984535_dp
      w(35)=0.052543774078444874_dp
      w(36)=0.051450532371700677_dp
      w(37)=0.050198259997814124_dp
      w(38)=0.048790827654326899_dp
      w(39)=0.047232585627699398_dp
      w(40)=0.045528350346142624_dp
      w(41)=0.043683389491276988_dp
      w(42)=0.041703405714416466_dp
      w(43)=0.039594519007425481_dp
      w(44)=0.037363247781945434_dp
      w(45)=0.035016488714174597_dp
      w(46)=0.032561495414958662_dp
      w(47)=0.030005855985896861_dp
      w(48)=0.027357469519451914_dp
      w(49)=0.024624521589129164_dp
      w(50)=0.021815458738125021_dp
      w(51)=0.018938961856321942_dp
      w(52)=0.016003917925357172_dp
      w(53)=0.013019387947265630_dp
      w(54)=0.0099945603588191146_dp
      w(55)=0.0069386173666456160_dp
      w(56)=0.0038596043785436147_dp
      w(57)=0.00062656641604010025_dp
   case(58)
      w(1)=0.00060496067755595886_dp
      w(2)=0.0037266131000573870_dp
      w(3)=0.0066999489276936575_dp
      w(4)=0.0096517223726991574_dp
      w(5)=0.012574476194818146_dp
      w(6)=0.015459649328833408_dp
      w(7)=0.018298666593522217_dp
      w(8)=0.021083065913302917_dp
      w(9)=0.023804541509152485_dp
      w(10)=0.026454973129381842_dp
      w(11)=0.029026451657207376_dp
      w(12)=0.031511303212033337_dp
      w(13)=0.033902112254246459_dp
      w(14)=0.036191743807007028_dp
      w(15)=0.038373364793743459_dp
      w(16)=0.040440464453321367_dp
      w(17)=0.042386873782949744_dp
      w(18)=0.044206783955842146_dp
      w(19)=0.045894763661120302_dp
      w(20)=0.047445775315465170_dp
      w(21)=0.048855190098803076_dp
      w(22)=0.050118801769525812_dp
      w(23)=0.051232839218227538_dp
      w(24)=0.052193977722618908_dp
      w(25)=0.052999348870105525_dp
      w(26)=0.053646549118465074_dp
      w(27)=0.054133646969104492_dp
      w(28)=0.054459188731508404_dp
      w(29)=0.054622202861687608_dp
      w(30)=0.054622202861687608_dp
      w(31)=0.054459188731508404_dp
      w(32)=0.054133646969104492_dp
      w(33)=0.053646549118465074_dp
      w(34)=0.052999348870105525_dp
      w(35)=0.052193977722618908_dp
      w(36)=0.051232839218227538_dp
      w(37)=0.050118801769525812_dp
      w(38)=0.048855190098803076_dp
      w(39)=0.047445775315465170_dp
      w(40)=0.045894763661120302_dp
      w(41)=0.044206783955842146_dp
      w(42)=0.042386873782949744_dp
      w(43)=0.040440464453321367_dp
      w(44)=0.038373364793743459_dp
      w(45)=0.036191743807007028_dp
      w(46)=0.033902112254246459_dp
      w(47)=0.031511303212033337_dp
      w(48)=0.029026451657207376_dp
      w(49)=0.026454973129381842_dp
      w(50)=0.023804541509152485_dp
      w(51)=0.021083065913302917_dp
      w(52)=0.018298666593522217_dp
      w(53)=0.015459649328833408_dp
      w(54)=0.012574476194818146_dp
      w(55)=0.0096517223726991574_dp
      w(56)=0.0066999489276936575_dp
      w(57)=0.0037266131000573870_dp
      w(58)=0.00060496067755595886_dp
   case(59)
      w(1)=0.00058445353594389246_dp
      w(2)=0.0036003775817301266_dp
      w(3)=0.0064733769401522526_dp
      w(4)=0.0093261979484901245_dp
      w(5)=0.012151921331788713_dp
      w(6)=0.014942555892415815_dp
      w(7)=0.017690089617496037_dp
      w(8)=0.020386610960599045_dp
      w(9)=0.023024348980387447_dp
      w(10)=0.025595700038299814_dp
      w(11)=0.028093251048625340_dp
      w(12)=0.030509801332777334_dp
      w(13)=0.032838383576712234_dp
      w(14)=0.035072284007301496_dp
      w(15)=0.037205061792294917_dp
      w(16)=0.039230567632716819_dp
      w(17)=0.041142961504703147_dp
      w(18)=0.042936729504496210_dp
      w(19)=0.044606699750397694_dp
      w(20)=0.046148057297041744_dp
      w(21)=0.047556358019633027_dp
      w(22)=0.048827541428476511_dp
      w(23)=0.049957942377056949_dp
      w(24)=0.050944301630032067_dp
      w(25)=0.051783775260742830_dp
      w(26)=0.052473942851190980_dp
      w(27)=0.053012814470870080_dp
      w(28)=0.053398836414346775_dp
      w(29)=0.053630895681061314_dp
      w(30)=0.053708323184438532_dp
      w(31)=0.053630895681061314_dp
      w(32)=0.053398836414346775_dp
      w(33)=0.053012814470870080_dp
      w(34)=0.052473942851190980_dp
      w(35)=0.051783775260742830_dp
      w(36)=0.050944301630032067_dp
      w(37)=0.049957942377056949_dp
      w(38)=0.048827541428476511_dp
      w(39)=0.047556358019633027_dp
      w(40)=0.046148057297041744_dp
      w(41)=0.044606699750397694_dp
      w(42)=0.042936729504496210_dp
      w(43)=0.041142961504703147_dp
      w(44)=0.039230567632716819_dp
      w(45)=0.037205061792294917_dp
      w(46)=0.035072284007301496_dp
      w(47)=0.032838383576712234_dp
      w(48)=0.030509801332777334_dp
      w(49)=0.028093251048625340_dp
      w(50)=0.025595700038299814_dp
      w(51)=0.023024348980387447_dp
      w(52)=0.020386610960599045_dp
      w(53)=0.017690089617496037_dp
      w(54)=0.014942555892415815_dp
      w(55)=0.012151921331788713_dp
      w(56)=0.0093261979484901245_dp
      w(57)=0.0064733769401522526_dp
      w(58)=0.0036003775817301266_dp
      w(59)=0.00058445353594389246_dp
   case(60)
      w(1)=0.00056497175141242938_dp
      w(2)=0.0034804479681531450_dp
      w(3)=0.0062580981584771698_dp
      w(4)=0.0090168424893638245_dp
      w(5)=0.011750254422266675_dp
      w(6)=0.014450866330632214_dp
      w(7)=0.017111184093521228_dp
      w(8)=0.019723802887793956_dp
      w(9)=0.022281444575675224_dp
      w(10)=0.024776982138835831_dp
      w(11)=0.027203460825102395_dp
      w(12)=0.029554117996938696_dp
      w(13)=0.031822402169556473_dp
      w(14)=0.034001991355932718_dp
      w(15)=0.036086810728312710_dp
      w(16)=0.038071049570919672_dp
      w(17)=0.039949177486879667_dp
      w(18)=0.041715959818897681_dp
      w(19)=0.043366472242994263_dp
      w(20)=0.044896114495797823_dp
      w(21)=0.046300623197757076_dp
      w(22)=0.047576083736879506_dp
      w(23)=0.048718941180072447_dp
      w(24)=0.049726010181792254_dp
      w(25)=0.050594483862455558_dp
      w(26)=0.051321941631911051_dp
      w(27)=0.051906355936194341_dp
      w(28)=0.052346097908779451_dp
      w(29)=0.052639941910587587_dp
      w(30)=0.052787068946106932_dp
      w(31)=0.052787068946106932_dp
      w(32)=0.052639941910587587_dp
      w(33)=0.052346097908779451_dp
      w(34)=0.051906355936194341_dp
      w(35)=0.051321941631911051_dp
      w(36)=0.050594483862455558_dp
      w(37)=0.049726010181792254_dp
      w(38)=0.048718941180072447_dp
      w(39)=0.047576083736879506_dp
      w(40)=0.046300623197757076_dp
      w(41)=0.044896114495797823_dp
      w(42)=0.043366472242994263_dp
      w(43)=0.041715959818897681_dp
      w(44)=0.039949177486879667_dp
      w(45)=0.038071049570919672_dp
      w(46)=0.036086810728312710_dp
      w(47)=0.034001991355932718_dp
      w(48)=0.031822402169556473_dp
      w(49)=0.029554117996938696_dp
      w(50)=0.027203460825102395_dp
      w(51)=0.024776982138835831_dp
      w(52)=0.022281444575675224_dp
      w(53)=0.019723802887793956_dp
      w(54)=0.017111184093521228_dp
      w(55)=0.014450866330632214_dp
      w(56)=0.011750254422266675_dp
      w(57)=0.0090168424893638245_dp
      w(58)=0.0062580981584771698_dp
      w(59)=0.0034804479681531450_dp
      w(60)=0.00056497175141242938_dp
   case(61)
      w(1)=0.00054644808743169399_dp
      w(2)=0.0033664112266196559_dp
      w(3)=0.0060533748717342209_dp
      w(4)=0.0087226042949829567_dp
      w(5)=0.011368124877434199_dp
      w(6)=0.013982950691308668_dp
      w(7)=0.016560064513450824_dp
      w(8)=0.019092528532347467_dp
      w(9)=0.021573519250141791_dp
      w(10)=0.023996349889820171_dp
      w(11)=0.026354489661820360_dp
      w(12)=0.028641581818932473_dp
      w(13)=0.030851460976146763_dp
      w(14)=0.032978169813494282_dp
      w(15)=0.035015975175564419_dp
      w(16)=0.036959383547455666_dp
      w(17)=0.038803155875359809_dp
      w(18)=0.040542321696378078_dp
      w(19)=0.042172192541691657_dp
      w(20)=0.043688374578085778_dp
      w(21)=0.045086780454352271_dp
      w(22)=0.046363640320969804_dp
      w(23)=0.047515511993546788_dp
      w(24)=0.048539290232741588_dp
      w(25)=0.049432215115711843_dp
      w(26)=0.050191879476567684_dp
      w(27)=0.050816235395797787_dp
      w(28)=0.051303599721191369_dp
      w(29)=0.051652658605384086_dp
      w(30)=0.051862471047802855_dp
      w(31)=0.051932471431465988_dp
      w(32)=0.051862471047802855_dp
      w(33)=0.051652658605384086_dp
      w(34)=0.051303599721191369_dp
      w(35)=0.050816235395797787_dp
      w(36)=0.050191879476567684_dp
      w(37)=0.049432215115711843_dp
      w(38)=0.048539290232741588_dp
      w(39)=0.047515511993546788_dp
      w(40)=0.046363640320969804_dp
      w(41)=0.045086780454352271_dp
      w(42)=0.043688374578085778_dp
      w(43)=0.042172192541691657_dp
      w(44)=0.040542321696378078_dp
      w(45)=0.038803155875359809_dp
      w(46)=0.036959383547455666_dp
      w(47)=0.035015975175564419_dp
      w(48)=0.032978169813494282_dp
      w(49)=0.030851460976146763_dp
      w(50)=0.028641581818932473_dp
      w(51)=0.026354489661820360_dp
      w(52)=0.023996349889820171_dp
      w(53)=0.021573519250141791_dp
      w(54)=0.019092528532347467_dp
      w(55)=0.016560064513450824_dp
      w(56)=0.013982950691308668_dp
      w(57)=0.011368124877434199_dp
      w(58)=0.0087226042949829567_dp
      w(59)=0.0060533748717342209_dp
      w(60)=0.0033664112266196559_dp
      w(61)=0.00054644808743169399_dp
   case(62)
      w(1)=0.00052882072977260709_dp
      w(2)=0.0032578875892193705_dp
      w(3)=0.0058585285951202132_dp
      w(4)=0.0084425156729469517_dp
      w(5)=0.011004289228371536_dp
      w(6)=0.013537307100143246_dp
      w(7)=0.016034991787545405_dp
      w(8)=0.018490836436195776_dp
      w(9)=0.020898437489170431_dp
      w(10)=0.023251515275652287_dp
      w(11)=0.025543931593973602_dp
      w(12)=0.027769706159981799_dp
      w(13)=0.029923032386157679_dp
      w(14)=0.031998292609727308_dp
      w(15)=0.033990072786850010_dp
      w(16)=0.035893176636954393_dp
      w(17)=0.037702639209920314_dp
      w(18)=0.039413739845115966_dp
      w(19)=0.041022014490623409_dp
      w(20)=0.042523267351608065_dp
      w(21)=0.043913581838027435_dp
      w(22)=0.045189330783441834_dp
      w(23)=0.046347185908453264_dp
      w(24)=0.047384126504193187_dp
      w(25)=0.048297447313271564_dp
      w(26)=0.049084765587668027_dp
      w(27)=0.049744027305178180_dp
      w(28)=0.050273512528213980_dp
      w(29)=0.050671839890988745_dp
      w(30)=0.050937970203387571_dp
      w(31)=0.051071209162125845_dp
      w(32)=0.051071209162125845_dp
      w(33)=0.050937970203387571_dp
      w(34)=0.050671839890988745_dp
      w(35)=0.050273512528213980_dp
      w(36)=0.049744027305178180_dp
      w(37)=0.049084765587668027_dp
      w(38)=0.048297447313271564_dp
      w(39)=0.047384126504193187_dp
      w(40)=0.046347185908453264_dp
      w(41)=0.045189330783441834_dp
      w(42)=0.043913581838027435_dp
      w(43)=0.042523267351608065_dp
      w(44)=0.041022014490623409_dp
      w(45)=0.039413739845115966_dp
      w(46)=0.037702639209920314_dp
      w(47)=0.035893176636954393_dp
      w(48)=0.033990072786850010_dp
      w(49)=0.031998292609727308_dp
      w(50)=0.029923032386157679_dp
      w(51)=0.027769706159981799_dp
      w(52)=0.025543931593973602_dp
      w(53)=0.023251515275652287_dp
      w(54)=0.020898437489170431_dp
      w(55)=0.018490836436195776_dp
      w(56)=0.016034991787545405_dp
      w(57)=0.013537307100143246_dp
      w(58)=0.011004289228371536_dp
      w(59)=0.0084425156729469517_dp
      w(60)=0.0058585285951202132_dp
      w(61)=0.0032578875892193705_dp
      w(62)=0.00052882072977260709_dp
   case(63)
      w(1)=0.00051203277009728623_dp
      w(2)=0.0031545273895644060_dp
      w(3)=0.0056729344582693992_dp
      w(4)=0.0081756850253161989_dp
      w(5)=0.010657601118471009_dp
      w(6)=0.013112549926151271_dp
      w(7)=0.015534359906328990_dp
      w(8)=0.017916922379588210_dp
      w(9)=0.020254222137224678_dp
      w(10)=0.022540356395139318_dp
      w(11)=0.024769550866660007_dp
      w(12)=0.026936174769537630_dp
      w(13)=0.029034755221373857_dp
      w(14)=0.031059991141448416_dp
      w(15)=0.033006766678829398_dp
      w(16)=0.034870164154538921_dp
      w(17)=0.036645476494373641_dp
      w(18)=0.038328219125237480_dp
      w(19)=0.039914141307008860_dp
      w(20)=0.041399236872377105_dp
      w(21)=0.042779754348084063_dp
      w(22)=0.044052206432317513_dp
      w(23)=0.045213378804495547_dp
      w(24)=0.046260338245293888_dp
      w(25)=0.047190440046468734_dp
      w(26)=0.048001334691797319_dp
      w(27)=0.048690973792284970_dp
      w(28)=0.049257615260662229_dp
      w(29)=0.049699827712111578_dp
      w(30)=0.050016494080114291_dp
      w(31)=0.050206814438288189_dp
      w(32)=0.050270308021091199_dp
      w(33)=0.050206814438288189_dp
      w(34)=0.050016494080114291_dp
      w(35)=0.049699827712111578_dp
      w(36)=0.049257615260662229_dp
      w(37)=0.048690973792284970_dp
      w(38)=0.048001334691797319_dp
      w(39)=0.047190440046468734_dp
      w(40)=0.046260338245293888_dp
      w(41)=0.045213378804495547_dp
      w(42)=0.044052206432317513_dp
      w(43)=0.042779754348084063_dp
      w(44)=0.041399236872377105_dp
      w(45)=0.039914141307008860_dp
      w(46)=0.038328219125237480_dp
      w(47)=0.036645476494373641_dp
      w(48)=0.034870164154538921_dp
      w(49)=0.033006766678829398_dp
      w(50)=0.031059991141448416_dp
      w(51)=0.029034755221373857_dp
      w(52)=0.026936174769537630_dp
      w(53)=0.024769550866660007_dp
      w(54)=0.022540356395139318_dp
      w(55)=0.020254222137224678_dp
      w(56)=0.017916922379588210_dp
      w(57)=0.015534359906328990_dp
      w(58)=0.013112549926151271_dp
      w(59)=0.010657601118471009_dp
      w(60)=0.0081756850253161989_dp
      w(61)=0.0056729344582693992_dp
      w(62)=0.0031545273895644060_dp
      w(63)=0.00051203277009728623_dp
   case(64)
      w(1)=0.00049603174603174603_dp
      w(2)=0.0030560082449124904_dp
      w(3)=0.0054960162038171569_dp
      w(4)=0.0079212897900466340_dp
      w(5)=0.010327002366815328_dp
      w(6)=0.012707399197454735_dp
      w(7)=0.015056683987961443_dp
      w(8)=0.017369116384542182_dp
      w(9)=0.019639040723241718_dp
      w(10)=0.021860903511518060_dp
      w(11)=0.024029268144023827_dp
      w(12)=0.026138828614338438_dp
      w(13)=0.028184422665848517_dp
      w(14)=0.030161044499089451_dp
      w(15)=0.032063857057727025_dp
      w(16)=0.033888203884125398_dp
      w(17)=0.035629620524489486_dp
      w(18)=0.037283845459801173_dp
      w(19)=0.038846830537807737_dp
      w(20)=0.040314750881560237_dp
      w(21)=0.041684014250801952_dp
      w(22)=0.042951269833601819_dp
      w(23)=0.044113416446892471_dp
      w(24)=0.045167610125947702_dp
      w(25)=0.046111271084289059_dp
      w(26)=0.046942090027028316_dp
      w(27)=0.047658033802220637_dp
      w(28)=0.048257350376414549_dp
      w(29)=0.048738573122233185_dp
      w(30)=0.049100524407501308_dp
      w(31)=0.049342318477139574_dp
      w(32)=0.049463363620776646_dp
      w(33)=0.049463363620776646_dp
      w(34)=0.049342318477139574_dp
      w(35)=0.049100524407501308_dp
      w(36)=0.048738573122233185_dp
      w(37)=0.048257350376414549_dp
      w(38)=0.047658033802220637_dp
      w(39)=0.046942090027028316_dp
      w(40)=0.046111271084289059_dp
      w(41)=0.045167610125947702_dp
      w(42)=0.044113416446892471_dp
      w(43)=0.042951269833601819_dp
      w(44)=0.041684014250801952_dp
      w(45)=0.040314750881560237_dp
      w(46)=0.038846830537807737_dp
      w(47)=0.037283845459801173_dp
      w(48)=0.035629620524489486_dp
      w(49)=0.033888203884125398_dp
      w(50)=0.032063857057727025_dp
      w(51)=0.030161044499089451_dp
      w(52)=0.028184422665848517_dp
      w(53)=0.026138828614338438_dp
      w(54)=0.024029268144023827_dp
      w(55)=0.021860903511518060_dp
      w(56)=0.019639040723241718_dp
      w(57)=0.017369116384542182_dp
      w(58)=0.015056683987961443_dp
      w(59)=0.012707399197454735_dp
      w(60)=0.010327002366815328_dp
      w(61)=0.0079212897900466340_dp
      w(62)=0.0054960162038171569_dp
      w(63)=0.0030560082449124904_dp
      w(64)=0.00049603174603174603_dp
   case default
      write(*,*) "lobatto_wts ERROR: Number of points < 2 or > ", max_lobatto_pts;
      call stop_error("")
end select
lobatto_wts=w
end function

end module