 Case ?:
 No. of rules?:
Gauss-Legendre 3-point extension
Iteration  1
Coefficients of expansion whose roots are the new nodes:
   0.0000000000000000D+00*P(  0,X)
   0.0000000000000000D+00*P(  1,X)
   0.0000000000000000D+00*P(  2,X)
   0.1000000000000000D+01*P(  3,X)
New nodes
                     REAL                IMAGINARY FLAG       ERR
   0.0000000000000000D+00   0.0000000000000000D+00    0   0.0D+00
   0.7745966692414835D+00   0.0000000000000000D+00    0   0.0D+00
  -0.7745966692414834D+00   0.0000000000000000D+00    0   0.0D+00
New full extended expansion
   0.1000000000000000D+01*P(  3,X)/HI
 Complete extended rule: STEP= 1  POINTS=  3  IFLAG=0  NODES ADDED=  3
  No.                     NODE                   WEIGHT
    1   0.7745966692414835D+00   0.5555555555555555D+00
    2   0.0000000000000000D+00   0.8888888888888889D+00
 TEST( 0)=   0.9999999999999996D+00  IERR =  0
 TEST( 1)=   0.9999999999999996D+00  IERR =  0
 TEST( 2)=   0.9999999999999996D+00  IERR =  0
Iteration  2
Coefficients of expansion whose roots are the new nodes:
   0.1571268237934878D-01*P(  0,X)
   0.0000000000000000D+00*P(  1,X)
  -0.7407407407407409D+00*P(  2,X)
   0.0000000000000000D+00*P(  3,X)
   0.1000000000000000D+01*P(  4,X)
New nodes
                     REAL                IMAGINARY FLAG       ERR
   0.4342437493468025D+00   0.0000000000000000D+00    0   0.1D-16
  -0.4342437493468026D+00   0.0000000000000000D+00    0   0.1D-16
   0.9604912687080203D+00   0.0000000000000000D+00    0   0.1D-16
  -0.9604912687080201D+00   0.0000000000000000D+00    0   0.1D-16
New full extended expansion
   0.0000000000000000D+00*P(  4,X)/HI
  -0.4444444444444440D+00*P(  5,X)/HI
   0.0000000000000000D+00*P(  6,X)/HI
   0.1000000000000000D+01*P(  7,X)/HI
 Complete extended rule: STEP= 2  POINTS=  7  IFLAG=0  NODES ADDED=  4
  No.                     NODE                   WEIGHT
    1   0.9604912687080203D+00   0.1046562260264675D+00
    2   0.7745966692414835D+00   0.2684880898683336D+00
    3   0.4342437493468025D+00   0.4013974147759621D+00
    4   0.0000000000000000D+00   0.4509165386584741D+00
 TEST( 0)=   0.1000000000000000D+01  IERR =  0
 TEST( 1)=   0.1000000000000001D+01  IERR =  0
 TEST( 2)=   0.1000000000000001D+01  IERR =  0
 TEST( 3)=   0.1000000000000001D+01  IERR =  0
 TEST( 4)=   0.1000000000000001D+01  IERR =  0
Iteration  3
Coefficients of expansion whose roots are the new nodes:
   0.5772349298068202D-03*P(  0,X)
   0.0000000000000000D+00*P(  1,X)
   0.1407910917434216D-02*P(  2,X)
   0.0000000000000000D+00*P(  3,X)
   0.2790650691523969D+00*P(  4,X)
   0.0000000000000000D+00*P(  5,X)
  -0.1205049839843540D+01*P(  6,X)
   0.0000000000000000D+00*P(  7,X)
   0.1000000000000000D+01*P(  8,X)
New nodes
                     REAL                IMAGINARY FLAG       ERR
   0.2233866864289669D+00   0.0000000000000000D+00    0   0.0D+00
  -0.2233866864289669D+00   0.0000000000000000D+00    0   0.0D+00
   0.6211029467372264D+00   0.0000000000000000D+00    0   0.3D-17
  -0.6211029467372265D+00   0.0000000000000000D+00    0   0.3D-17
   0.8884592328722570D+00   0.0000000000000000D+00    0   0.0D+00
  -0.8884592328722570D+00   0.0000000000000000D+00    0   0.0D+00
   0.9938319632127550D+00   0.0000000000000000D+00    0   0.2D-16
  -0.9938319632127550D+00   0.0000000000000000D+00    0   0.2D-16
New full extended expansion
   0.0000000000000000D+00*P(  8,X)/HI
  -0.2896464423067136D-01*P(  9,X)/HI
   0.0000000000000000D+00*P( 10,X)/HI
   0.3461310330856245D+00*P( 11,X)/HI
   0.0000000000000000D+00*P( 12,X)/HI
  -0.1000000000000000D+01*P( 13,X)/HI
   0.0000000000000000D+00*P( 14,X)/HI
   0.7705426896934804D+00*P( 15,X)/HI
 Complete extended rule: STEP= 3  POINTS= 15  IFLAG=0  NODES ADDED=  8
  No.                     NODE                   WEIGHT
    1   0.9938319632127550D+00   0.1700171962994039D-01
    2   0.9604912687080203D+00   0.5160328299708005D-01
    3   0.8884592328722570D+00   0.9292719531512467D-01
    4   0.7745966692414835D+00   0.1344152552437844D+00
    5   0.6211029467372264D+00   0.1715119091363912D+00
    6   0.4342437493468025D+00   0.2006285293769889D+00
    7   0.2233866864289669D+00   0.2191568584015875D+00
    8   0.0000000000000000D+00   0.2255104997982066D+00
 TEST( 0)=   0.1000000000000001D+01  IERR =  0
 TEST( 1)=   0.1000000000000002D+01  IERR =  0
 TEST( 2)=   0.1000000000000002D+01  IERR =  0
 TEST( 3)=   0.1000000000000002D+01  IERR =  0
 TEST( 4)=   0.1000000000000002D+01  IERR =  0
 Case ?:
 No. of rules?:
Lobatto 2-point extension
Iteration  1
Coefficients of expansion whose roots are the new nodes:
   0.0000000000000000D+00*P(  0,X)
   0.1000000000000000D+01*P(  1,X)
New nodes
                     REAL                IMAGINARY FLAG       ERR
   0.0000000000000000D+00   0.0000000000000000D+00    0   0.0D+00
New full extended expansion
  -0.1000000000000000D+01*P(  1,X)/HI
   0.0000000000000000D+00*P(  2,X)/HI
   0.4285714285714284D+00*P(  3,X)/HI
 Complete extended rule: STEP= 1  POINTS=  3  IFLAG=0  NODES ADDED=  1
  No.                     NODE                   WEIGHT
    1   0.1000000000000000D+01   0.3333333333333333D+00
    2   0.0000000000000000D+00   0.1333333333333333D+01
 TEST( 0)=   0.1000000000000000D+01  IERR =  0
 TEST( 1)=   0.1000000000000000D+01  IERR =  0
Iteration  2
Coefficients of expansion whose roots are the new nodes:
  -0.1428571428571429D+00*P(  0,X)
   0.0000000000000000D+00*P(  1,X)
   0.1000000000000000D+01*P(  2,X)
New nodes
                     REAL                IMAGINARY FLAG       ERR
   0.6546536707079773D+00   0.0000000000000000D+00    0   0.0D+00
  -0.6546536707079771D+00   0.0000000000000000D+00    0   0.0D+00
New full extended expansion
   0.0000000000000000D+00*P(  2,X)/HI
  -0.1000000000000000D+01*P(  3,X)/HI
   0.0000000000000000D+00*P(  4,X)/HI
   0.6363636363636363D+00*P(  5,X)/HI
 Complete extended rule: STEP= 2  POINTS=  5  IFLAG=0  NODES ADDED=  2
  No.                     NODE                   WEIGHT
    1   0.1000000000000000D+01   0.1000000000000000D+00
    2   0.6546536707079773D+00   0.5444444444444446D+00
    3   0.0000000000000000D+00   0.7111111111111113D+00
 TEST( 0)=   0.1000000000000000D+01  IERR =  0
 TEST( 1)=   0.1000000000000000D+01  IERR =  0
 TEST( 2)=   0.1000000000000000D+01  IERR =  0
 TEST( 3)=   0.1000000000000000D+01  IERR =  0
Iteration  3
Coefficients of expansion whose roots are the new nodes:
  -0.4746768383132037D-01*P(  0,X)
   0.0000000000000000D+00*P(  1,X)
  -0.1515151515151517D+00*P(  2,X)
   0.0000000000000000D+00*P(  3,X)
   0.1000000000000000D+01*P(  4,X)
New nodes
                     REAL                IMAGINARY FLAG       ERR
   0.3409822659109928D+00   0.0000000000000000D+00    0   0.1D-16
  -0.3409822659109928D+00   0.0000000000000000D+00    0   0.1D-16
   0.8904055275126689D+00   0.0000000000000000D+00    0   0.1D-16
  -0.8904055275126687D+00   0.0000000000000000D+00    0   0.1D-16
New full extended expansion
   0.0000000000000000D+00*P(  4,X)/HI
  -0.3813459268004732D+00*P(  5,X)/HI
   0.0000000000000000D+00*P(  6,X)/HI
  -0.9870129870129877D+00*P(  7,X)/HI
   0.0000000000000000D+00*P(  8,X)/HI
   0.1000000000000000D+01*P(  9,X)/HI
 Complete extended rule: STEP= 3  POINTS=  9  IFLAG=0  NODES ADDED=  4
  No.                     NODE                   WEIGHT
    1   0.1000000000000000D+01   0.3064373897707199D-01
    2   0.8904055275126689D+00   0.1792626995532076D+00
    3   0.6546536707079773D+00   0.2839787780481213D+00
    4   0.3409822659109928D+00   0.3342337398164176D+00
    5   0.0000000000000000D+00   0.3437620872103630D+00
 TEST( 0)=   0.1000000000000000D+01  IERR =  0
 TEST( 1)=   0.9999999999999996D+00  IERR =  0
 TEST( 2)=   0.9999999999999992D+00  IERR =  0
 TEST( 3)=   0.9999999999999980D+00  IERR =  0
 TEST( 4)=   0.9999999999999975D+00  IERR =  0
 Case ?:
 No. of rules?:
Radau 6-point extension
Iteration  1
Coefficients of expansion whose roots are the new nodes:
  -0.9090909090909082D-01*P(  0,X)
   0.2727272727272725D+00*P(  1,X)
  -0.4545454545454543D+00*P(  2,X)
   0.6363636363636364D+00*P(  3,X)
  -0.8181818181818183D+00*P(  4,X)
   0.1000000000000000D+01*P(  5,X)
New nodes
                     REAL                IMAGINARY FLAG       ERR
   0.1240503795052278D+00   0.0000000000000000D+00    0   0.5D-17
   0.6039731642527837D+00   0.0000000000000000D+00    0   0.2D-16
  -0.3909285467072722D+00   0.0000000000000000D+00    0   0.2D-16
   0.9203802858970625D+00   0.0000000000000000D+00    0   0.3D-16
  -0.8029298284023468D+00   0.0000000000000000D+00    0   0.3D-16
New full extended expansion
   0.1000000000000000D+01*P(  5,X)/HI
   0.8461538461538459D+00*P(  6,X)/HI
 Complete extended rule: STEP= 1  POINTS=  6  IFLAG=0  NODES ADDED=  5
  No.                     NODE                   WEIGHT
    1   0.9203802858970625D+00   0.2015883852534809D+00
    2   0.6039731642527837D+00   0.4169013343119077D+00
    3   0.1240503795052278D+00   0.5209267831895751D+00
    4  -0.3909285467072722D+00   0.4853871884689699D+00
    5  -0.8029298284023468D+00   0.3196407532205105D+00
    6  -0.1000000000000000D+01   0.5555555555555560D-01
 TEST( 0)=   0.9999999999999998D+00  IERR =  0
 TEST( 1)=   0.9999999999999996D+00  IERR =  0
 TEST( 2)=   0.9999999999999996D+00  IERR =  0
 TEST( 3)=   0.1000000000000000D+01  IERR =  0
 TEST( 4)=   0.1000000000000001D+01  IERR =  0
Iteration  2
Coefficients of expansion whose roots are the new nodes:
   0.1238920331102948D-01*P(  0,X)
  -0.1115360783931154D-01*P(  1,X)
   0.2930949908491550D-01*P(  2,X)
  -0.2573880815370944D-01*P(  3,X)
  -0.8051048473617495D+00*P(  4,X)
  -0.6245367209597322D+00*P(  5,X)
   0.7380888520433200D+00*P(  6,X)
   0.1000000000000000D+01*P(  7,X)
New nodes
                     REAL                IMAGINARY FLAG       ERR
  -0.1366416372713494D+00   0.0000000000000000D+00    0   0.7D-17
  -0.6212165636007759D+00   0.0000000000000000D+00    0   0.6D-16
   0.3761018966748717D+00   0.0000000000000000D+00    0   0.6D-16
  -0.8487727816552595D+00   0.0000000000000000D+00    0   0.6D-16
   0.7905296024586545D+00   0.0000000000000000D+00    0   0.6D-16
   0.9865012767506531D+00   0.0000000000000000D+00    0   0.8D-16
  -0.9439342521493513D+00   0.0000000000000000D+00    0   0.8D-16
New full extended expansion
  -0.8815438503554277D-01*P(  7,X)/HI
  -0.8472981649988010D-01*P(  8,X)/HI
  -0.3768076078706985D+00*P(  9,X)/HI
  -0.4473580103536869D+00*P( 10,X)/HI
   0.3851866566831172D+00*P( 11,X)/HI
   0.1000000000000000D+01*P( 12,X)/HI
   0.5106460045718261D+00*P( 13,X)/HI
 Complete extended rule: STEP= 2  POINTS= 13  IFLAG=0  NODES ADDED=  7
  No.                     NODE                   WEIGHT
    1   0.9865012767506531D+00   0.3610633344712032D-01
    2   0.9203802858970625D+00   0.9797463317823503D-01
    3   0.7905296024586545D+00   0.1603549149394082D+00
    4   0.6039731642527837D+00   0.2100921244820766D+00
    5   0.3761018966748717D+00   0.2427304474580506D+00
    6   0.1240503795052278D+00   0.2588076132975782D+00
    7  -0.1366416372713494D+00   0.2601366692626690D+00
    8  -0.3909285467072722D+00   0.2455064597946104D+00
    9  -0.6212165636007759D+00   0.2115512241336129D+00
   10  -0.8029298284023468D+00   0.1329820397038963D+00
   11  -0.8487727816552595D+00   0.3616137156650032D-01
   12  -0.9439342521493513D+00   0.9202712852123042D-01
   13  -0.1000000000000000D+01   0.1556904021500854D-01
 TEST( 0)=   0.9999999999999984D+00  IERR =  0
 TEST( 1)=   0.9999999999999960D+00  IERR =  0
 TEST( 2)=   0.9999999999999955D+00  IERR =  0
 TEST( 3)=   0.9999999999999955D+00  IERR =  0
 TEST( 4)=   0.9999999999999948D+00  IERR =  0
Iteration  3
Coefficients of expansion whose roots are the new nodes:
  -0.2568241533598138D+00*P(  0,X)
   0.6273882318501727D+00*P(  1,X)
  -0.6950114612478444D+00*P(  2,X)
   0.3514310704829928D+00*P(  3,X)
   0.2414864785762012D+00*P(  4,X)
  -0.9310510552262480D+00*P(  5,X)
   0.1469801497275483D+01*P(  6,X)
  -0.5792538945781199D+01*P(  7,X)
   0.4360460897293910D+01*P(  8,X)
  -0.1885604119802033D+02*P(  9,X)
   0.1887338563559287D+01*P( 10,X)
   0.6992128566615199D+02*P( 11,X)
  -0.1072921826817460D+02*P( 12,X)
  -0.4426841333551039D+02*P( 13,X)
   0.1000000000000000D+01*P( 14,X)
New nodes
                     REAL                IMAGINARY FLAG       ERR
   0.9979162551518678D+00   0.0000000000000000D+00    0   0.4D-16
  -0.6134267604635526D-02   0.0000000000000000D+00    0   0.4D-16
   0.9613067296650283D+00   0.0000000000000000D+00    0   0.6D-16
  -0.2655914229442032D+00   0.0000000000000000D+00    0   0.6D-16
   0.8632649380482538D+00   0.0000000000000000D+00    0   0.3D-15
   0.7034887989758216D+00   0.0000000000000000D+00    0   0.3D-15
   0.4941080138619341D+00   0.0000000000000000D+00    0   0.4D-16
   0.2520863057103870D+00   0.0000000000000000D+00    0   0.4D-16
  -0.7205766157140707D+00   0.0000000000000000D+00    0   0.2D-15
  -0.5103354152259294D+00   0.0000000000000000D+00    0   0.2D-15
  -0.9812660421998122D+00   0.0000000000000000D+00    0   0.6D-15
  -0.8923964308975323D+00   0.0000000000000000D+00    0   0.6D-15
   0.2307179086987864D+02   0.0000000000000000D+00    0   0.4D-14
  -0.1013669616811473D+01   0.0000000000000000D+00    0   0.4D-14
New full extended expansion
   0.5454360425671964D-02*P( 14,X)/HI
   0.1275790889142931D-02*P( 15,X)/HI
   0.1362458441982812D-01*P( 16,X)/HI
   0.1061409558174561D-01*P( 17,X)/HI
  -0.7800045804653981D-01*P( 18,X)/HI
  -0.6147544605703551D-01*P( 19,X)/HI
  -0.2027665031851316D+00*P( 20,X)/HI
  -0.2559758659656055D+00*P( 21,X)/HI
   0.5447045628625399D+00*P( 22,X)/HI
   0.1000000000000000D+01*P( 23,X)/HI
   0.5759468453180573D-02*P( 24,X)/HI
  -0.7380381496936699D+00*P( 25,X)/HI
  -0.3289096723205033D+00*P( 26,X)/HI
   0.7335603893054691D-02*P( 27,X)/HI
 Complete extended rule: STEP= 3  POINTS= 27  IFLAG=6  NODES ADDED= 14
  No.                     NODE                   WEIGHT
    1   0.2307179086987864D+02   0.8410877949033471D-15
    2   0.9979162551518678D+00   0.5761238214206085D-02
    3   0.9865012767506531D+00   0.1781397602627029D-01
    4   0.9613067296650283D+00   0.3288145280959059D-01
    5   0.9203802858970625D+00   0.4904105110221105D-01
    6   0.8632649380482538D+00   0.6509033800352288D-01
    7   0.7905296024586545D+00   0.8015752890516900D-01
    8   0.7034887989758216D+00   0.9361527599467599D-01
    9   0.6039731642527837D+00   0.1050581380411569D+00
   10   0.4941080138619341D+00   0.1143012662323622D+00
   11   0.3761018966748717D+00   0.1213546454148586D+00
   12   0.2520863057103870D+00   0.1263455706105022D+00
   13   0.1240503795052278D+00   0.1294155830050473D+00
   14  -0.6134267604635526D-02   0.1306510180165526D+00
   15  -0.1366416372713494D+00   0.1300525005145075D+00
   16  -0.2655914229442032D+00   0.1275061882372416D+00
   17  -0.3909285467072722D+00   0.1227817936161397D+00
   18  -0.5103354152259294D+00   0.1155996181401652D+00
   19  -0.6212165636007759D+00   0.1056775942146707D+00
   20  -0.7205766157140707D+00   0.9232499519844747D-01
   21  -0.8029298284023468D+00   0.6879140063252922D-01
   22  -0.8487727816552595D+00   0.3092904062992966D-01
   23  -0.8923964308975323D+00   0.5477880738382557D-01
   24  -0.9439342521493513D+00   0.4546365767395871D-01
   25  -0.9812660421998122D+00   0.2876294640770519D-01
   26  -0.1000000000000000D+01   0.5992084797066201D-02
   27  -0.1013669616811473D+01  -0.1477098223025303D-03
 TEST( 0)=   0.1000000000000005D+01  IERR =  0
 TEST( 1)=   0.1000000000000687D+01  IERR =  0
 TEST( 2)=   0.1000000001338920D+01  IERR =  0
 TEST( 3)=   0.1000002768838603D+01  IERR =  1
 TEST( 4)=   0.1005797769035385D+01  IERR =  1
Rule test is unsatisfactory
 Case ?:
 No. of rules?:
Gauss-Laguerre 2-point extension
Iteration  1
Coefficients of expansion whose roots are the new nodes:
   0.0000000000000000D+00*P(  0,X)
   0.0000000000000000D+00*P(  1,X)
   0.1000000000000000D+01*P(  2,X)
New nodes
                     REAL                IMAGINARY FLAG       ERR
   0.3414213562373095D+01   0.0000000000000000D+00    0   0.0D+00
   0.5857864376269050D+00   0.0000000000000000D+00    0   0.0D+00
New full extended expansion
   0.1000000000000000D+01*P(  2,X)/HI
 Complete extended rule: STEP= 1  POINTS=  2  IFLAG=0  NODES ADDED=  2
  No.                     NODE                   WEIGHT
    1   0.3414213562373095D+01   0.1464466094067263D+00
    2   0.5857864376269050D+00   0.8535533905932737D+00
 TEST( 0)=   0.1000000000000000D+01  IERR =  0
 TEST( 1)=   0.1000000000000000D+01  IERR =  0
Iteration  2
Coefficients of expansion whose roots are the new nodes:
   0.6000000000000000D+01*P(  0,X)
  -0.1500000000000000D+01*P(  1,X)
   0.0000000000000000D+00*P(  2,X)
   0.1000000000000000D+01*P(  3,X)
New nodes
                     REAL                IMAGINARY FLAG       ERR
   0.8396196974011155D+01   0.0000000000000000D+00    0   0.4D-15
   0.3019015129944225D+00  -0.1959389276469932D+01    0   0.2D-16
   0.3019015129944225D+00   0.1959389276469932D+01    0   0.2D-16
New full extended expansion
   0.8125000000000000D+00*P(  3,X)/HI
  -0.1000000000000000D+01*P(  4,X)/HI
   0.4166666666666667D+00*P(  5,X)/HI
 Complete extended rule: STEP= 2  POINTS=  5  IFLAG=4  NODES ADDED=  3
 Terminated prematurely - see IFLAG
 Case ?:
 No. of rules?:
Gauss-Hermite 3-point extension
Iteration  1
Coefficients of expansion whose roots are the new nodes:
   0.0000000000000000D+00*P(  0,X)
   0.0000000000000000D+00*P(  1,X)
   0.0000000000000000D+00*P(  2,X)
   0.1000000000000000D+01*P(  3,X)
New nodes
                     REAL                IMAGINARY FLAG       ERR
   0.0000000000000000D+00   0.0000000000000000D+00    0   0.0D+00
   0.1224744871391589D+01   0.0000000000000000D+00    0   0.0D+00
  -0.1224744871391589D+01   0.0000000000000000D+00    0   0.0D+00
New full extended expansion
   0.1000000000000000D+01*P(  3,X)/HI
 Complete extended rule: STEP= 1  POINTS=  3  IFLAG=0  NODES ADDED=  3
  No.                     NODE                   WEIGHT
    1   0.1224744871391589D+01   0.2954089751509195D+00
    2   0.0000000000000000D+00   0.1181635900603677D+01
 TEST( 0)=   0.1000000000000000D+01  IERR =  0
 TEST( 1)=   0.1000000000000001D+01  IERR =  0
 TEST( 2)=   0.1000000000000000D+01  IERR =  0
Iteration  2
Coefficients of expansion whose roots are the new nodes:
  -0.3000000000000000D+01*P(  0,X)
   0.0000000000000000D+00*P(  1,X)
  -0.2000000000000000D+01*P(  2,X)
   0.0000000000000000D+00*P(  3,X)
   0.1000000000000000D+01*P(  4,X)
New nodes
                     REAL                IMAGINARY FLAG       ERR
   0.0000000000000000D+00  -0.4884800789447105D+00    0   0.0D+00
   0.0000000000000000D+00   0.4884800789447105D+00    0   0.0D+00
   0.2288801605103822D+01   0.0000000000000000D+00    0   0.2D-15
  -0.2288801605103822D+01   0.0000000000000000D+00    0   0.2D-15
New full extended expansion
   0.0000000000000000D+00*P(  4,X)/HI
   0.3809523809523809D+00*P(  5,X)/HI
   0.0000000000000000D+00*P(  6,X)/HI
   0.1000000000000000D+01*P(  7,X)/HI
 Complete extended rule: STEP= 2  POINTS=  7  IFLAG=4  NODES ADDED=  4
 Terminated prematurely - see IFLAG
 Case ?:
 No. of rules?:
Gauss-Jacobi 3-point extension
Iteration  1
Coefficients of expansion whose roots are the new nodes:
   0.0000000000000000D+00*P(  0,X)
   0.0000000000000000D+00*P(  1,X)
   0.0000000000000000D+00*P(  2,X)
   0.1000000000000000D+01*P(  3,X)
New nodes
                     REAL                IMAGINARY FLAG       ERR
   0.1647102868965424D+00   0.0000000000000000D+00    0   0.1D-16
   0.9008058292716293D+00   0.0000000000000000D+00    0   0.0D+00
   0.5498684992164435D+00   0.0000000000000000D+00    0   0.0D+00
New full extended expansion
   0.1000000000000000D+01*P(  3,X)/HI
 Complete extended rule: STEP= 1  POINTS=  3  IFLAG=0  NODES ADDED=  3
  No.                     NODE                   WEIGHT
    1   0.9008058292716293D+00   0.2332816246559147D+00
    2   0.5498684992164435D+00   0.3076023676819127D+00
    3   0.1647102868965424D+00   0.1257826743288388D+00
 TEST( 0)=   0.9999999999999992D+00  IERR =  0
 TEST( 1)=   0.9999999999999996D+00  IERR =  0
 TEST( 2)=   0.1000000000000000D+01  IERR =  0
Iteration  2
Coefficients of expansion whose roots are the new nodes:
   0.8302544967323903D-04*P(  0,X)
   0.1808212463080844D-03*P(  1,X)
  -0.6293935530868694D-01*P(  2,X)
   0.0000000000000000D+00*P(  3,X)
   0.1000000000000000D+01*P(  4,X)
New nodes
                     REAL                IMAGINARY FLAG       ERR
   0.3434982475781609D+00   0.0000000000000000D+00    0   0.6D-16
   0.4317458752763434D-01   0.0000000000000000D+00    0   0.6D-16
   0.9829837529243091D+00   0.0000000000000000D+00    0   0.2D-16
   0.7479904707934251D+00   0.0000000000000000D+00    0   0.2D-16
New full extended expansion
  -0.1000000000000000D+01*P(  4,X)/HI
  -0.7540286168214390D+00*P(  5,X)/HI
  -0.9004851826770346D+00*P(  6,X)/HI
   0.5021708298937923D+00*P(  7,X)/HI
 Complete extended rule: STEP= 2  POINTS=  7  IFLAG=0  NODES ADDED=  4
  No.                     NODE                   WEIGHT
    1   0.9829837529243091D+00   0.4509009780887674D-01
    2   0.9008058292716293D+00   0.1136674496440606D+00
    3   0.7479904707934251D+00   0.1567638583107755D+00
    4   0.5498684992164435D+00   0.1546815936593538D+00
    5   0.3434982475781609D+00   0.1161056548660292D+00
    6   0.1647102868965424D+00   0.6270539664794701D-01
    7   0.4317458752763434D-01   0.1765261572962527D-01
 TEST( 0)=   0.1000000000000002D+01  IERR =  0
 TEST( 1)=   0.1000000000000005D+01  IERR =  0
 TEST( 2)=   0.1000000000000012D+01  IERR =  0
 TEST( 3)=   0.1000000000000013D+01  IERR =  0
 TEST( 4)=   0.1000000000000015D+01  IERR =  0
Iteration  3
Coefficients of expansion whose roots are the new nodes:
   0.1246085068899699D-07*P(  0,X)
   0.5106502089851601D-07*P(  1,X)
   0.1857830431069533D-06*P(  2,X)
   0.3154953497851395D-04*P(  3,X)
   0.3729410486893077D-03*P(  4,X)
   0.6566133154308323D-02*P(  5,X)
  -0.6845782043616046D-01*P(  6,X)
  -0.1121555778222753D+00*P(  7,X)
   0.1000000000000000D+01*P(  8,X)
New nodes
                     REAL                IMAGINARY FLAG       ERR
   0.9522115224106354D-01   0.0000000000000000D+00    0   0.4D-16
   0.1092616002586211D-01   0.0000000000000000D+00    0   0.4D-16
   0.4453534840434269D+00   0.0000000000000000D+00    0   0.8D-17
   0.2486386449037345D+00   0.0000000000000000D+00    0   0.8D-17
   0.8321177481736279D+00   0.0000000000000000D+00    0   0.0D+00
   0.6523614224614962D+00   0.0000000000000000D+00    0   0.0D+00
   0.9973759430379301D+00   0.0000000000000000D+00    0   0.1D-15
   0.9513731441472559D+00   0.0000000000000000D+00    0   0.1D-15
New full extended expansion
  -0.1000000000000000D+01*P(  8,X)/HI
  -0.7219216410505802D+00*P(  9,X)/HI
  -0.4137098497953547D+00*P( 10,X)/HI
   0.6243456378892447D+00*P( 11,X)/HI
   0.2379858019591277D+00*P( 12,X)/HI
   0.3071737360112755D+00*P( 13,X)/HI
  -0.3226631546878036D+00*P( 14,X)/HI
   0.5874911786041683D-01*P( 15,X)/HI
 Complete extended rule: STEP= 3  POINTS= 15  IFLAG=0  NODES ADDED=  8
  No.                     NODE                   WEIGHT
    1   0.9973759430379301D+00   0.7250785857080798D-02
    2   0.9829837529243091D+00   0.2225370714572952D-01
    3   0.9513731441472559D+00   0.4003272827656491D-01
    4   0.9008058292716293D+00   0.5689076367068386D-01
    5   0.8321177481736279D+00   0.7021992138795241D-01
    6   0.7479904707934251D+00   0.7836602038520813D-01
    7   0.6523614224614962D+00   0.8066055699011998D-01
    8   0.5498684992164435D+00   0.7734675361301652D-01
    9   0.4453534840434269D+00   0.6936411431773185D-01
   10   0.3434982475781609D+00   0.5805035560699042D-01
   11   0.2486386449037345D+00   0.4488514434457877D-01
   12   0.1647102868965424D+00   0.3135360123263906D-01
   13   0.9522115224106354D-01   0.1889127817157218D-01
   14   0.4317458752763434D-01   0.8826110122443246D-02
   15   0.1092616002586211D-01   0.2274825544358582D-02
 TEST( 0)=   0.1000000000000005D+01  IERR =  0
 TEST( 1)=   0.1000000000000008D+01  IERR =  0
 TEST( 2)=   0.1000000000000003D+01  IERR =  0
 TEST( 3)=   0.9999999999999847D+00  IERR =  0
 TEST( 4)=   0.9999999999999758D+00  IERR =  0
 Case ?:
