int N =          101 ;
 float x[         101 ] = {
  0.000000000000000E+000 ,
  1.737280000000000E-004 ,
  1.328024000000000E-003 ,
  4.276623000000000E-003 ,
  9.665452999999999E-003 ,
  1.799379200000000E-002 ,
  2.963311700000000E-002 ,
  4.484283600000000E-002 ,
  6.378147100000001E-002 ,
  8.651332000000000E-002 ,
  0.113011509000000      ,
  0.143159266000000      ,
  0.176751592000000      ,
  0.213499466000000      ,
  0.253038107000000      ,
  0.294939885000000      ,
  0.338731411000000      ,
  0.383913362000000      ,
  0.429980968000000      ,
  0.476442943000000      ,
  0.522836984000000      ,
  0.568740773000000      ,
  0.613778435000000      ,
  0.657623486000000      ,
  0.700000000000000      ,
  0.740684378000000      ,
  0.779505755000000      ,
  0.816342224000000      ,
  0.851117754000000      ,
  0.883803327000000      ,
  0.914420660000000      ,
  0.943046518000000      ,
  0.969815368000000      ,
  0.994918530000000      ,
   1.01859881000000      ,
   1.04114059400000      ,
   1.06285649400000      ,
   1.08407235900000      ,
   1.10511290800000      ,
   1.12629005300000      ,
   1.14789538200000      ,
   1.17019730900000      ,
   1.19344231500000      ,
   1.21785876900000      ,
   1.24366122100000      ,
   1.27105294600000      ,
   1.30022491900000      ,
   1.33135023600000      ,
   1.36457402600000      ,
   1.40000000000000      ,
   1.43767542100000      ,
   1.47758010100000      ,
   1.51962513300000      ,
   1.56365916900000      ,
   1.60947928400000      ,
   1.65684595300000      ,
   1.70550051900000      ,
   1.75518302000000      ,
   1.80564819000000      ,
   1.85667781800000      ,
   1.90808852500000      ,
   1.95973506400000      ,
   2.01151027700000      ,
   2.06334362100000      ,
   2.11519578400000      ,
   2.16700904800000      ,
   2.21866189800000      ,
   2.26997543000000      ,
   2.32072846600000      ,
   2.37067509500000      ,
   2.41956248400000      ,
   2.46714675300000      ,
   2.51320515500000      ,
   2.55754365200000      ,
   2.60000000000000      ,
   2.64044361000000      ,
   2.67877159200000      ,
   2.71490053400000      ,
   2.74875875100000      ,
   2.78028288300000      ,
   2.80941911900000      ,
   2.83612838500000      ,
   2.86039387500000      ,
   2.88222874300000      ,
   2.90168178200000      ,
   2.91883933000000      ,
   2.93382255300000      ,
   2.94678029900000      ,
   2.95787874200000      ,
   2.96728978300000      ,
   2.97518045400000      ,
   2.98170534100000      ,
   2.98700335200000      ,
   2.99119915000000      ,
   2.99440849100000      ,
   2.99674581300000      ,
   2.99833190500000      ,
   2.99929944900000      ,
   2.99979475300000      ,
   2.99997481500000      ,
   3.00000000000000      };
 float xp[         101 ] = {
  0.000000000000000E+000 ,
  3.961053000000000E-003 ,
  1.489416900000000E-002 ,
  3.143021300000000E-002 ,
  5.235813300000000E-002 ,
  7.662212300000000E-002 ,
  0.103302287000000      ,
  0.131583228000000      ,
  0.160717833000000      ,
  0.189994585000000      ,
  0.218715953000000      ,
  0.246192836000000      ,
  0.271756358000000      ,
  0.294784282000000      ,
  0.314735967000000      ,
  0.331187796000000      ,
  0.343860920000000      ,
  0.352634894000000      ,
  0.357544087000000      ,
  0.358757667000000      ,
  0.356547785000000      ,
  0.351253295000000      ,
  0.343247368000000      ,
  0.332916477000000      ,
  0.320655602000000      ,
  0.306875557000000      ,
  0.291972787000000      ,
  0.276307379000000      ,
  0.260233165000000      ,
  0.244124994000000      ,
  0.228391668000000      ,
  0.213471585000000      ,
  0.199812061000000      ,
  0.187837117000000      ,
  0.177911153000000      ,
  0.170306877000000      ,
  0.165184902000000      ,
  0.162589707000000      ,
  0.162462895000000      ,
  0.164670708000000      ,
  0.169039435000000      ,
  0.175390565000000      ,
  0.183567574000000      ,
  0.193448158000000      ,
  0.204939099000000      ,
  0.217954946000000      ,
  0.232385407000000      ,
  0.248058995000000      ,
  0.264711297000000      ,
  0.281965179000000      ,
  0.299331876000000      ,
  0.316272944000000      ,
  0.332276266000000      ,
  0.346896028000000      ,
  0.359787709000000      ,
  0.370734368000000      ,
  0.379658166000000      ,
  0.386614464000000      ,
  0.391769855000000      ,
  0.395369190000000      ,
  0.397699210000000      ,
  0.399057157000000      ,
  0.399731615000000      ,
  0.400000000000000      ,
  0.399997862000000      ,
  0.399311195000000      ,
  0.397448492000000      ,
  0.394020969000000      ,
  0.388768338000000      ,
  0.381569610000000      ,
  0.372436426000000      ,
  0.361490455000000      ,
  0.348930059000000      ,
  0.334993929000000      ,
  0.319930059000000      ,
  0.303973985000000      ,
  0.287311391000000      ,
  0.270057891000000      ,
  0.252284846000000      ,
  0.234055353000000      ,
  0.215458856000000      ,
  0.196636399000000      ,
  0.177790701000000      ,
  0.159178718000000      ,
  0.141088416000000      ,
  0.123805095000000      ,
  0.107575039000000      ,
  9.257487100000000E-002 ,
  7.889368500000001E-002 ,
  6.653206700000000E-002 ,
  5.541825000000000E-002 ,
  4.543767000000000E-002 ,
  3.646910700000000E-002 ,
  2.841908600000000E-002 ,
  2.124659700000000E-002 ,
  1.497243400000000E-002 ,
  9.670995000000000E-003 ,
  5.446432000000000E-003 ,
  2.398652000000000E-003 ,
  5.869980000000000E-004 ,
  0.000000000000000E+000 };
 float deltat =   0.129619599910000      ;