Work at SourceForge, help us to make it a better place! We have an immediate need for a Support Technician in our San Francisco or Denver office.

Close

Diff of /inst/symfsolve.m [fcb181] .. [46a454] Maximize Restore

  Switch to side-by-side view

--- a/inst/symfsolve.m
+++ b/inst/symfsolve.m
@@ -154,18 +154,13 @@
 
 endfunction
 
-%!shared
-% x = sym ("x");
-% y = sym ("y");
-% f = x ^ 2 + 3 * x - 1;
-% g = x * y - y ^ 2 + 3;
-%!test
-% assert (symfsolve (f, g), [0.30278; -1.58727]', 1e-5);
-%!test
-% assert (symfsolve (f, g, x, 1, y, 5), [0.30278; 1.89004]', 1e-5);
-%!test
-% assert (symfsolve (f, g, {x==1,y==5}), [0.30278; 1.89004]', 1e-5);
-%!test
-% assert (symfsolve (f, g, [1 5]), [0.30278; 1.89004]', 1e-5);
-%!test
-% assert (symfsolve ({f, g}, {y==1,x==2}), [1.89004; 0.30278]', 1e-5);
+%!shared x,y,f,g
+%! x = sym ("x");
+%! y = sym ("y");
+%! f = x ^ 2 + 3 * x - 1;
+%! g = x * y - y ^ 2 + 3;
+%!assert (symfsolve (f, g), [0.30278; -1.58727], 1e-5);
+%!assert (symfsolve (f, g, x, 1, y, 5), [0.30278; 1.89004]', 1e-5);
+%!assert (symfsolve (f, g, {x==1,y==5}), [0.30278; 1.89004]', 1e-5);
+%!assert (symfsolve (f, g, [1 5]), [0.30278; 1.89004]', 1e-5);
+%!assert (symfsolve ({f, g}, {y==1,x==2}), [1.89004; 0.30278]', 1e-5);