aboutsummaryrefslogtreecommitdiff
path: root/math/deboor/progs/prog17.f
diff options
context:
space:
mode:
Diffstat (limited to 'math/deboor/progs/prog17.f')
-rw-r--r--math/deboor/progs/prog17.f10
1 files changed, 10 insertions, 0 deletions
diff --git a/math/deboor/progs/prog17.f b/math/deboor/progs/prog17.f
new file mode 100644
index 00000000..1008c3a1
--- /dev/null
+++ b/math/deboor/progs/prog17.f
@@ -0,0 +1,10 @@
+c main program for example in chapter xv.
+c from * a practical guide to splines * by c. de boor
+c solution of a second order nonlinear two point boundary value
+c problem on (0., 1.) , by collocation with pp functions having 4
+c pieces of order 6 . 2 passes through newnot are to be made,
+c without any knots being added. newton iteration is to be stopped
+c when two iterates agree to 6 decimal places.
+ call colloc(0.,1.,4,6,2,0.,1.e-6)
+ stop
+ end