June 24 2002 11:02:11.285 AM NONLIN Solve a nonlinear boundary value problem: -d/dx (p(x) du/dx) + q(x)*u = f(x) - u*u' on an interval [xl,xr], with the values of u or u' specified at xl and xr. The equation is to be solved for X greater than XL = 0.E+0 and less than XR = 1. The boundary conditions are: At X = XL, U= 0.E+0 At X = XR, U'= 1. Number of quadrature points per element is 1 Number of iterations is 5 Node Location 0 0.00000 1 0.100000 2 0.200000 3 0.300000 4 0.400000 5 0.500000 6 0.600000 7 0.700000 8 0.800000 9 0.900000 10 1.00000 Subint Length 1 0.100000 2 0.100000 3 0.100000 4 0.100000E+00 5 0.100000E+00 6 0.100000 7 0.100000E+00 8 0.100000 9 0.100000E+00 10 0.100000 Subint Quadrature point 1 0.500000E-01 2 0.150000 3 0.250000 4 0.350000 5 0.450000 6 0.550000 7 0.650000 8 0.750000 9 0.850000 10 0.950000 Subint Left Node Right Node 1 0 1 2 1 2 3 2 3 4 3 4 5 4 5 6 5 6 7 6 7 8 7 8 9 8 9 10 9 10 Node Unknown 0 -1 1 1 2 2 3 3 4 4 5 5 6 6 7 7 8 8 9 9 10 10 Printout of tridiagonal linear system: Equation ALEFT ADIAG ARITE RHS 1 20.0000 -10.0000 -0.154454 2 -10.0000 20.0000 -10.0000 -0.147799 3 -10.0000 20.0000 -10.0000 -0.136149 4 -10.0000 20.0000 -10.0000 -0.119285 5 -10.0000 20.0000 -10.0000 -0.972917E-01 6 -10.0000 20.0000 -10.0000 -0.706000E-01 7 -10.0000 20.0000 -10.0000 -0.399792E-01 8 -10.0000 20.0000 -10.0000 -0.651058E-02 9 -10.0000 20.0000 -10.0000 0.284722E-01 10 -10.0000 10.0000 1.02308 Computed solution: Node X(I) U(X(I)) 0 0.00000 0.00000 1 0.100000 0.279486E-01 2 0.200000 0.713426E-01 3 0.300000 0.129516 4 0.400000 0.201305 5 0.500000 0.285022 6 0.600000 0.378469 7 0.700000 0.478975 8 0.800000 0.583480 9 0.900000 0.688635 10 1.00000 0.790943 Computed solution: Node X(I) U(X(I)) 0 0.00000 0.00000 1 0.100000 0.148377E-02 2 0.200000 0.184562E-01 3 0.300000 0.504110E-01 4 0.400000 0.965226E-01 5 0.500000 0.155663 6 0.600000 0.226426 7 0.700000 0.307152 8 0.800000 0.395966 9 0.900000 0.490807 10 1.00000 0.589466 Computed solution: Node X(I) U(X(I)) 0 0.00000 0.00000 1 0.100000 0.978223E-02 2 0.200000 0.350229E-01 3 0.300000 0.751250E-01 4 0.400000 0.129109 5 0.500000 0.195640 6 0.600000 0.273059 7 0.700000 0.359429 8 0.800000 0.452587 9 0.900000 0.550198 10 1.00000 0.649816 Computed solution: Node X(I) U(X(I)) 0 0.00000 0.00000 1 0.100000 0.777235E-02 2 0.200000 0.310138E-01 3 0.300000 0.691523E-01 4 0.400000 0.121248 5 0.500000 0.186017 6 0.600000 0.261859 7 0.700000 0.346904 8 0.800000 0.439050 9 0.900000 0.536020 10 1.00000 0.635417 Computed solution: Node X(I) U(X(I)) 0 0.00000 0.00000 1 0.100000 0.776468E-02 2 0.200000 0.309988E-01 3 0.300000 0.691308E-01 4 0.400000 0.121221 5 0.500000 0.185985 6 0.600000 0.261825 7 0.700000 0.346868 8 0.800000 0.439013 9 0.900000 0.535983 10 1.00000 0.635380 Compare computed and exact solutions: X Computed U Exact U 0.00000 0.00000 0.00000 0.125000 0.135732E-01 0.122325E-01 0.250000 0.500648E-01 0.484598E-01 0.375000 0.108199 0.107290 0.500000 0.185985 0.186462 0.625000 0.283085 0.282933 0.750000 0.392940 0.392996 0.875000 0.511740 0.512421 1.00000 0.635380 0.636620