1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
--- examples/misc-examples/zlink.dia.ref.orig Tue Sep 15 07:28:05 1998
+++ examples/misc-examples/zlink.dia.ref Fri Oct 8 19:36:36 1999
@@ -231,5 +231,5 @@
yy2=dassl([y0,y0d],t0,t,'dres1',info); //=yy0
-if norm(dres1(yy2(1,:),yy2(2:3,:),yy2(4:5,:)),1)>1.d-6 then bugmes();quit;end
+if norm(dres1(yy2(1,:),yy2(2:3,:),yy2(4:5,:)),1)>1.4d-6 then bugmes();quit;end
// fortran routines dres1 and djac1 in dir. routines/default, with jacobian
@@ -346,5 +346,5 @@
xn=dassl([x0,x0d],t0,t,g,j,info);
-if norm(x-xn,1) > Eps then bugmes();quit;end
+if norm(x-xn,1) > 2.0*Eps then bugmes();quit;end
|
