mirror of
https://git.FreeBSD.org/ports.git
synced 2024-10-30 21:49:25 +00:00
17 lines
610 B
Plaintext
17 lines
610 B
Plaintext
|
--- 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
|
||
|
|
|
||
|
|
|