9 May 2025   9:26:43.651 PM
 
power_method_test():
  Fortran90 version:
  Test power_method().
 
TEST01
  Use POWER_METHOD on the Fibonacci2 matrix.
 
  Matrix order N         =      100
  Maximum iterations     =      500
  Error tolerance        =   0.100000E-07
 
  Number of iterations   =      376
  CPU time               =   0.193900E-02
  Estimated eigenvalue   =   1.6180340314
  Correct value          =   1.6180340052
  ||Error||              =   0.262013E-07
 
  Sine of angle between true and estimated vectors =   0.0000000558
 
TEST02
  Use POWER_METHOD2 on the Fibonacci2 matrix.
 
  Matrix order N         =       10
  Maximum iterations     =      500
  Error tolerance        =   0.100000E-07
 
  Number of iterations   =       68
  CPU time               =   0.150000E-04
  Estimated eigenvalue   =   1.6180340044  0.0000000000
  Correct value          =   1.6180340052
  ||Error||              =   0.729331E-09
 
  Sine of angle between true and estimated vectors =   0.0000000211
 
test03():
  Use POWER_METHOD2 on the TRIS (tridiagonal scalar) matrix.
 
  Matrix order N         =      100
  Maximum iterations     =     4000
  Error tolerance        =   0.100000E-07
 
  Number of iterations   =     4000
  CPU time               =   0.229230E-01
  Estimated eigenvalue   =  10.0002426069  5.6488800262
  Correct max eigenvalue =  10.0000000000  5.6541179289
  ||Error||              =   0.524352E-02
 
power_method_test():
  Normal end of execution.
 
 9 May 2025   9:26:43.676 PM