3 September 2021 6:29:39.231 PM burgers_solution_test(): FORTRAN90 version Test burgers_solution(). test01() burgers_viscous_time_exact1() computes exact solution #1 to the Burgers equation. Viscosity NU = 0.318310E-02 NX = 11 NT = 11 X grid points: 1: -1.0000000 2: -0.80000000 3: -0.60000000 4: -0.40000000 5: -0.20000000 6: 0.0000000 7: 0.20000000 8: 0.40000000 9: 0.60000000 10: 0.80000000 11: 1.0000000 T grid points: 1: 0.0000000 2: 0.95492966E-01 3: 0.19098593 4: 0.28647890 5: 0.38197186 6: 0.47746483 7: 0.57295780 8: 0.66845076 9: 0.76394373 10: 0.85943669 11: 0.95492966 U(X,T) at grid points: Col 1 2 3 4 5 Row 1: 0.122465E-15 0.151662E-15 0.131656E-15 0.373866E-16 0.224440E-15 2: 0.587785 0.467745 0.385266 0.326331 0.282259 3: 0.951057 0.843167 0.742830 0.661054 0.590027 4: 0.951057 0.997698 0.990755 0.971206 0.946876 5: 0.587785 0.748375 0.869466 0.923817 0.954709 6: -0. -0.288173E-16 -0.233948E-16 0.132611E-16 -0.841090E-16 7: -0.587785 -0.748375 -0.869466 -0.923817 -0.954709 8: -0.951057 -0.997698 -0.990755 -0.971206 -0.946876 9: -0.951057 -0.843167 -0.742830 -0.661054 -0.590027 10: -0.587785 -0.467745 -0.385266 -0.326331 -0.282259 11: -0.122465E-15 -0.966198E-16 -0.542872E-16 0.370492E-16 -0.120307E-15 Col 6 7 8 9 10 Row 1: 0.190520E-15 0.257603E-15 0.182473E-15 0.173482E-15 0.134109E-15 2: 0.248397 0.222439 0.203040 0.188983 0.178866 3: 0.525742 0.466479 0.411552 0.360885 0.314918 4: 0.919698 0.890611 0.860186 0.828804 0.796735 5: 0.974759 0.987809 0.995661 0.999404 0.999787 6: -0.584880E-16 -0.231326E-15 -0.354500E-15 -0.391835E-15 -0.322888E-15 7: -0.974759 -0.987809 -0.995661 -0.999404 -0.999787 8: -0.919698 -0.890611 -0.860186 -0.828804 -0.796735 9: -0.525742 -0.466479 -0.411552 -0.360885 -0.314918 10: -0.248397 -0.222439 -0.203040 -0.188983 -0.178866 11: -0.682723E-16 -0.162661E-15 0.153606E-15 0.201942E-15 -0.176069E-16 Col 11 Row 1: 0.173718E-15 2: 0.171141 3: 0.274681 4: 0.764181 5: 0.997357 6: -0.397525E-15 7: -0.997357 8: -0.764181 9: -0.274681 10: -0.171141 11: -0.718165E-16 Data written to file "burgers_solution_test01.txt". test02(): burgers_viscous_time_exact1() computes exact solution #1 to the Burgers equation. Viscosity NU = 0.318310E-02 NX = 41 NT = 41 X grid points: 1: -1.0000000 2: -0.95000000 3: -0.90000000 4: -0.85000000 5: -0.80000000 6: -0.75000000 7: -0.70000000 8: -0.65000000 9: -0.60000000 10: -0.55000000 11: -0.50000000 12: -0.45000000 13: -0.40000000 14: -0.35000000 15: -0.30000000 16: -0.25000000 17: -0.20000000 18: -0.15000000 19: -0.10000000 20: -0.50000000E-01 21: 0.0000000 22: 0.50000000E-01 23: 0.10000000 24: 0.15000000 25: 0.20000000 26: 0.25000000 27: 0.30000000 28: 0.35000000 29: 0.40000000 30: 0.45000000 31: 0.50000000 32: 0.55000000 33: 0.60000000 34: 0.65000000 35: 0.70000000 36: 0.75000000 37: 0.80000000 38: 0.85000000 39: 0.90000000 40: 0.95000000 41: 1.0000000 T grid points: 1: 0.0000000 2: 0.23873241E-01 3: 0.47746483E-01 4: 0.71619724E-01 5: 0.95492966E-01 6: 0.11936621 7: 0.14323945 8: 0.16711269 9: 0.19098593 10: 0.21485917 11: 0.23873241 12: 0.26260566 13: 0.28647890 14: 0.31035214 15: 0.33422538 16: 0.35809862 17: 0.38197186 18: 0.40584510 19: 0.42971835 20: 0.45359159 21: 0.47746483 22: 0.50133807 23: 0.52521131 24: 0.54908455 25: 0.57295780 26: 0.59683104 27: 0.62070428 28: 0.64457752 29: 0.66845076 30: 0.69232400 31: 0.71619724 32: 0.74007049 33: 0.76394373 34: 0.78781697 35: 0.81169021 36: 0.83556345 37: 0.85943669 38: 0.88330993 39: 0.90718318 40: 0.93105642 41: 0.95492966 Data written to file "burgers_solution_test02.txt". test03(): burgers_viscous_time_exact2() computes exact solution #2 to the Burgers equation. Viscosity NU = 0.500000 NX = 11 NT = 11 X grid points: 1: 0.0000000 2: 0.62831853 3: 1.2566371 4: 1.8849556 5: 2.5132741 6: 3.1415927 7: 3.7699112 8: 4.3982297 9: 5.0265482 10: 5.6548668 11: 6.2831853 T grid points: 1: 0.0000000 2: 0.10000000 3: 0.20000000 4: 0.30000000 5: 0.40000000 6: 0.50000000 7: 0.60000000 8: 0.70000000 9: 0.80000000 10: 0.90000000 11: 1.0000000 U(X,T) at grid points: Col 1 2 3 4 5 Row 1: 4.00000 3.63636 3.33333 3.07692 2.85714 2: 4.62832 4.20756 3.85693 3.56024 3.30594 3: 5.25659 4.77875 4.38053 4.04357 3.75474 4: 5.88262 5.34952 4.90402 4.52686 4.20353 5: 6.39433 5.90514 5.42477 5.00951 4.65214 6: 4. 5.96463 5.87311 5.47894 5.09772 7: 1.60567 2.57089 4.96030 5.68999 5.49336 8: 2.11738 1.96528 2.20166 3.71486 5.20711 9: 2.74341 2.49515 2.30393 2.28046 2.93677 10: 3.37168 3.06520 2.81040 2.60205 2.48160 11: 4.00000 3.63636 3.33336 3.07733 2.86158 Col 6 7 8 9 10 Row 1: 2.66667 2.50000 2.35294 2.22222 2.10526 2: 3.08555 2.89270 2.72254 2.57129 2.43596 3: 3.50442 3.28540 3.09214 2.92035 2.76665 4: 3.92330 3.67809 3.46174 3.26942 3.09734 5: 4.34211 4.07077 3.83133 3.61848 3.42804 6: 4.76010 4.46318 4.20082 3.96750 3.75871 7: 5.16659 4.85246 4.56933 4.31618 4.08925 8: 5.42062 5.20532 4.92786 4.66174 4.41870 9: 4.41840 5.18271 5.18827 4.97968 4.73947 10: 2.68481 3.64115 4.72813 5.07272 4.99302 11: 2.70148 2.70245 3.16805 4.14486 4.81675 Col 11 Row 1: 2.00000 2: 2.31416 3: 2.62832 4: 2.94248 5: 3.25664 6: 3.57079 7: 3.88488 8: 4.19855 9: 4.50919 10: 4.79828 11: 4.94316 Data written to file "burgers_solution_test03.txt". test04() burgers_viscous_time_exact2() computes exact solution #2 to the Burgers equation. Viscosity NU = 0.500000 NX = 41 NT = 41 X grid points: 1: 0.0000000 2: 0.15707963 3: 0.31415927 4: 0.47123890 5: 0.62831853 6: 0.78539816 7: 0.94247780 8: 1.0995574 9: 1.2566371 10: 1.4137167 11: 1.5707963 12: 1.7278760 13: 1.8849556 14: 2.0420352 15: 2.1991149 16: 2.3561945 17: 2.5132741 18: 2.6703538 19: 2.8274334 20: 2.9845130 21: 3.1415927 22: 3.2986723 23: 3.4557519 24: 3.6128316 25: 3.7699112 26: 3.9269908 27: 4.0840704 28: 4.2411501 29: 4.3982297 30: 4.5553093 31: 4.7123890 32: 4.8694686 33: 5.0265482 34: 5.1836279 35: 5.3407075 36: 5.4977871 37: 5.6548668 38: 5.8119464 39: 5.9690260 40: 6.1261057 41: 6.2831853 T grid points: 1: 0.0000000 2: 0.25000000E-01 3: 0.50000000E-01 4: 0.75000000E-01 5: 0.10000000 6: 0.12500000 7: 0.15000000 8: 0.17500000 9: 0.20000000 10: 0.22500000 11: 0.25000000 12: 0.27500000 13: 0.30000000 14: 0.32500000 15: 0.35000000 16: 0.37500000 17: 0.40000000 18: 0.42500000 19: 0.45000000 20: 0.47500000 21: 0.50000000 22: 0.52500000 23: 0.55000000 24: 0.57500000 25: 0.60000000 26: 0.62500000 27: 0.65000000 28: 0.67500000 29: 0.70000000 30: 0.72500000 31: 0.75000000 32: 0.77500000 33: 0.80000000 34: 0.82500000 35: 0.85000000 36: 0.87500000 37: 0.90000000 38: 0.92500000 39: 0.95000000 40: 0.97500000 41: 1.0000000 Data written to file "burgers_solution_test04.txt". burgers_solution_test(): Normal end of execution. 3 September 2021 6:29:39.235 PM