4 October 2024 8:08:38.194 AM poisson_2d_test(): Fortran77 version Test poisson_2d(). poisson_2d(): Fortran77 version A program for solving the Poisson equation. -DEL^2 U = F(X,Y) on the rectangle 0 <= X <= 1, 0 <= Y <= 1. F(X,Y) = pi^2 * ( x^2 + y^2 ) * sin ( pi * x * y ) The number of interior X grid points is 161 The number of interior Y grid points is 161 The X grid spacing is 0.625000E-02 The Y grid spacing is 0.625000E-02 RMS of F = 5.91904 L2 norm of exact solution = 0.620835 Step ||Unew|| ||Unew-U|| ||Unew-Exact|| 0 0.785659E-01 0.615844 500 0.230766 0.195725E-03 0.498491 1000 0.282249 0.127406E-03 0.437281 1500 0.320729 0.987791E-04 0.388848 2000 0.352434 0.816059E-04 0.348142 2500 0.379583 0.695970E-04 0.312989 3000 0.403294 0.604760E-04 0.282162 3500 0.424250 0.531903E-04 0.254861 4000 0.442912 0.471739E-04 0.230520 4500 0.459619 0.420887E-04 0.208716 5000 0.474634 0.377168E-04 0.189116 5500 0.488166 0.339098E-04 0.171453 6000 0.500388 0.305623E-04 0.155504 6500 0.511445 0.275964E-04 0.141083 7000 0.521460 0.249534E-04 0.128029 7500 0.530541 0.225875E-04 0.116203 8000 0.538781 0.204622E-04 0.105484 8500 0.546262 0.185481E-04 0.957623E-01 9000 0.553057 0.168207E-04 0.869434E-01 9500 0.559231 0.152594E-04 0.789409E-01 10000 0.564841 0.138466E-04 0.716780E-01 10500 0.569941 0.125670E-04 0.650852E-01 11000 0.574577 0.114072E-04 0.591002E-01 11500 0.578792 0.103557E-04 0.536665E-01 12000 0.582623 0.940182E-05 0.487330E-01 12500 0.586107 0.853634E-05 0.442534E-01 13000 0.589274 0.775089E-05 0.401858E-01 13500 0.592154 0.703794E-05 0.364923E-01 14000 0.594772 0.639074E-05 0.331384E-01 14500 0.597152 0.580317E-05 0.300928E-01 15000 0.599315 0.526969E-05 0.273272E-01 15500 0.601282 0.478531E-05 0.248157E-01 16000 0.603069 0.434549E-05 0.225351E-01 16500 0.604694 0.394611E-05 0.204640E-01 17000 0.606171 0.358346E-05 0.185833E-01 17500 0.607513 0.325414E-05 0.168754E-01 18000 0.608732 0.295510E-05 0.153245E-01 18500 0.609841 0.268354E-05 0.139160E-01 19000 0.610848 0.243694E-05 0.126370E-01 19500 0.611763 0.221301E-05 0.114756E-01 20000 0.612594 0.200965E-05 0.104208E-01 20500 0.613350 0.182498E-05 0.946300E-02 21000 0.614036 0.165728E-05 0.859319E-02 21500 0.614660 0.150499E-05 0.780331E-02 22000 0.615226 0.136670E-05 0.708601E-02 22500 0.615741 0.124111E-05 0.643463E-02 23000 0.616208 0.112707E-05 0.584310E-02 23500 0.616633 0.102350E-05 0.530592E-02 24000 0.617019 0.929454E-06 0.481811E-02 The iteration has converged. Wall clock time in seconds is 5.87200 poisson_2d_test(): Normal end of execution. 4 October 2024 8:08:44.066 AM