6 October 2025   6:52:17.400 PM

vandermonde_test()
  Fortran90 version.
  Test vandermonde().

BIVAND1_TEST:
  Compute a bidimensional Vandermonde matrix
  associated with polynomials of total degree < N.
 
  Vandermonde vector ALPHA:
 
         1:    1.0000000    
         2:    2.0000000    
         3:    3.0000000    
 
  Vandermonde vector BETA:
 
         1:    10.000000    
         2:    20.000000    
         3:    30.000000    
 
  Bidimensional Vandermonde matrix:
 
  Col          1             2             3             4             5      
  Row
 
    1:      1.            1.            1.            1.            1.      
    2:      1.            2.            3.            1.            2.      
    3:     10.           10.           10.           20.           20.      
    4:      1.            4.            9.            1.            4.      
    5:     10.           20.           30.           20.           40.      
    6:    100.          100.          100.          400.          400.      
 
  Col          6      
  Row
 
    1:      1.      
    2:      1.      
    3:     30.      
    4:      1.      
    5:     30.      
    6:    900.      

BIVAND2_TEST:
  Compute a bidimensional Vandermonde matrix
  associated with polynomials of maximum degree < N.
 
  Vandermonde vector ALPHA:
 
         1:    1.0000000    
         2:    2.0000000    
         3:    3.0000000    
 
  Vandermonde vector BETA:
 
         1:    10.000000    
         2:    20.000000    
         3:    30.000000    
 
  Bidimensional Vandermonde matrix:
 
  Col          1             2             3             4             5      
  Row
 
    1:      1.            1.            1.            1.            1.      
    2:      1.            2.            3.            1.            2.      
    3:      1.            4.            9.            1.            4.      
    4:     10.           10.           10.           20.           20.      
    5:     10.           20.           30.           20.           40.      
    6:     10.           40.           90.           20.           80.      
    7:    100.          100.          100.          400.          400.      
    8:    100.          200.          300.          400.          800.      
    9:    100.          400.          900.          400.         1600.      
 
  Col          6             7             8             9      
  Row
 
    1:      1.            1.            1.            1.      
    2:      3.            1.            2.            3.      
    3:      9.            1.            4.            9.      
    4:     20.           30.           30.           30.      
    5:     60.           30.           60.           90.      
    6:    180.           30.          120.          270.      
    7:    400.          900.          900.          900.      
    8:   1200.          900.         1800.         2700.      
    9:   3600.          900.         3600.         8100.      

DVAND_TEST:
  Solve a Vandermonde linear system A'*x=b
 
  Vandermonde vector ALPHA:
 
         1:    0.0000000    
         2:    1.0000000    
         3:    2.0000000    
         4:    3.0000000    
         5:    4.0000000    
 
  Right hand side B:
 
         1:    5.0000000    
         2:    15.000000    
         3:    67.000000    
         4:    239.00000    
         5:    657.00000    
 
  Solution X:
 
         1:    5.0000000    
         2:    3.0000000    
         3:    4.0000000    
         4:    1.0000000    
         5:    2.0000000    
 
  Vandermonde vector ALPHA:
 
         1:   0.63903745    
         2:   0.99190439E-01
         3:   0.28077152    
         4:   0.75329483    
         5:   0.62431865    
 
  Right hand side B:
 
         1:    9.1450811    
         2:    5.3380958    
         3:    6.1922083    
         4:    10.601162    
         5:    8.9792412    
 
  Solution X:
 
         1:    5.0000000    
         2:    3.0000000    
         3:    4.0000000    
         4:    1.0000000    
         5:    2.0000000    

DVANDPRG_TEST:
  Solve a Vandermonde linear system A'*x=b
  progressively.
  First we use ALPHA = 0, 1, 2, 3, 4.
  Then we choose ALPHA at random.
 
  Vandermonde vector ALPHA:
 
         1:    0.0000000    
         2:    1.0000000    
         3:    2.0000000    
         4:    3.0000000    
         5:    4.0000000    
 
  Right hand side B:
 
         1:    5.0000000    
         2:    15.000000    
         3:    67.000000    
         4:    239.00000    
         5:    657.00000    
 
  Solution X:
 
         1:    5.0000000    
 
  Solution X:
 
         1:    5.0000000    
         2:    10.000000    
 
  Solution X:
 
         1:    5.0000000    
         2:   -11.000000    
         3:    21.000000    
 
  Solution X:
 
         1:    5.0000000    
         2:    15.000000    
         3:   -18.000000    
         4:    13.000000    
 
  Solution X:
 
         1:    5.0000000    
         2:    3.0000000    
         3:    4.0000000    
         4:    1.0000000    
         5:    2.0000000    
 
  Vandermonde vector ALPHA:
 
         1:   0.31577876    
         2:   0.26646082    
         3:   0.78039015    
         4:   0.73008073    
         5:   0.89642477    
 
  Right hand side B:
 
         1:    6.3975761    
         2:    6.1123894    
         3:    10.994253    
         4:    10.279676    
         5:    12.915404    
 
  Solution X:
 
         1:    6.3975761    
 
  Solution X:
 
         1:    4.5715489    
         2:    5.7826157    
 
  Solution X:
 
         1:    5.2446158    
         2:    1.1252138    
         3:    7.9991159    
 
  Solution X:
 
         1:    4.9041198    
         2:    3.9176495    
         3:   0.93330719    
         4:    5.1854209    
 
  Solution X:
 
         1:    5.0000000    
         2:    3.0000000    
         3:    4.0000000    
         4:    1.0000000    
         5:    2.0000000    

PVAND_TEST:
  Solve a Vandermonde linear system A*x=b
 
  Vandermonde vector ALPHA:
 
         1:    0.0000000    
         2:    1.0000000    
         3:    2.0000000    
         4:    3.0000000    
         5:    4.0000000    
 
  Right hand side B:
 
         1:    15.000000    
         2:    22.000000    
         3:    60.000000    
         4:    190.00000    
         5:    660.00000    
 
  Solution X:
 
         1:    5.0000000    
         2:    3.0000000    
         3:    4.0000000    
         4:    1.0000000    
         5:    2.0000000    
 
  Vandermonde vector ALPHA:
 
         1:   0.40236340    
         2:   0.13133354    
         3:   0.19966219    
         4:   0.39824610    
         5:   0.33546662    
 
  Right hand side B:
 
         1:    15.000000    
         2:    4.2736457    
         3:    1.4043627    
         4:   0.50300699    
         5:   0.18878496    
 
  Solution X:
 
         1:    5.0000000    
         2:    3.0000000    
         3:    4.0000000    
         4:    1.0000000    
         5:    2.0000000    

PVANDPRG_TEST:
  Solve a Vandermonde linear system A*x=b
  progressively.
  First we use ALPHA = 0, 1, 2, 3, 4.
  Then we choose ALPHA at random.
 
  Vandermonde vector ALPHA:
 
         1:    0.0000000    
         2:    1.0000000    
         3:    2.0000000    
         4:    3.0000000    
         5:    4.0000000    
 
  Right hand side B:
 
         1:    15.000000    
         2:    22.000000    
         3:    60.000000    
         4:    190.00000    
         5:    660.00000    
 
  Solution X:
 
         1:    15.000000    
 
  Solution X:
 
         1:   -7.0000000    
         2:    22.000000    
 
  Solution X:
 
         1:    12.000000    
         2:   -16.000000    
         3:    19.000000    
 
  Solution X:
 
         1:    3.0000000    
         2:    11.000000    
         3:   -8.0000000    
         4:    9.0000000    
 
  Solution X:
 
         1:    5.0000000    
         2:    3.0000000    
         3:    4.0000000    
         4:    1.0000000    
         5:    2.0000000    
 
  Vandermonde vector ALPHA:
 
         1:   0.90739445    
         2:   0.60851810    
         3:   0.85026539    
         4:   0.29337934    
         5:   0.82087017    
 
  Right hand side B:
 
         1:    15.000000    
         2:    11.698708    
         3:    9.5532383    
         4:    8.0018786    
         5:    6.8071307    
 
  Solution X:
 
         1:    15.000000    
 
  Solution X:
 
         1:    8.6020065    
         2:    6.3979935    
 
  Solution X:
 
         1:    14.547095    
         2:    7.8029205    
         3:   -7.3500153    
 
  Solution X:
 
         1:    4.3718688    
         2:    3.1178432    
         3:    6.5203123    
         4:   0.98997570    
 
  Solution X:
 
         1:    5.0000000    
         2:    3.0000000    
         3:    4.0000000    
         4:    1.0000000    
         5:    2.0000000    

vandermonde_test():
  Normal end of execution.

 6 October 2025   6:52:17.401 PM