8 April     2011   8:52:53.887 AM      
 
FEM1D_HEAT_STEADY_PRB
  FORTRAN77 version
  Test the FEM1D_HEAT_STEADY library.
 
FEM1D_HEAT_STEADY_TEST01
  K1(X)  = 1.0
  F1(X)  = X * ( X + 3 ) * exp ( X )
  U1(X)  = X * ( 1 - X ) * exp ( X )
 
  Number of nodes =       11
  Left endpoint A =     0.0000
  Right endpoint B =     1.0000
  Prescribed U(A) =     0.0000
  Prescribed U(B) =     0.0000
 
     I    X         U         Uexact    Error
 
     1      0.00    0.499600E-15     0.00000        0.499600E-15
     2      0.10    0.994655E-01    0.994654E-01    0.133423E-06
     3      0.20    0.195425        0.195424        0.247563E-06
     4      0.30    0.283471        0.283470        0.339433E-06
     5      0.40    0.358038        0.358038        0.405613E-06
     6      0.50    0.412181        0.412180        0.442187E-06
     7      0.60    0.437309        0.437309        0.444681E-06
     8      0.70    0.422888        0.422888        0.407976E-06
     9      0.80    0.356087        0.356087        0.326231E-06
    10      0.90    0.221364        0.221364        0.192775E-06
    11      1.00     0.00000         0.00000         0.00000    
 
FEM1D_HEAT_STEADY_PRB
  Normal end of execution.
 
 8 April     2011   8:52:53.888 AM