<<<>>>
loadlib("groebner");
<<<>>>
loadlib("groebner");
<<<>>>
info(groebner);
<<<>>>
p1:=poly(x^2 - x + 2*y^2, [x,y]);
p2:=poly(x + 2*y - 1, [x,y]):
groebner::spoly(p1, p2, LexOrder);
<<<>>>
export(groebner, spoly):
spoly(p1, p2, LexOrder);
<<<>>>
export(groebner):
<<<>>>
spoly:= NIL:
export(groebner, spoly);
<<<>>>
LIB_PATH:= "/user/tom/MuPAD/mylib/" , LIB_PATH:
<<<>>>
f:= proc(f,x) option remember; begin series(f, x, ORDER) end_proc:
f(sin(x), x);
<<<>>>
ORDER:= 10:
f(sin(x),x);
<<<>>>
f:= subsop(f,5=NIL):
ORDER:= 10:
f(sin(x), x);
<<<>>>
f:= proc(x) local a, b; begin a:= x+c end_proc:
misc::checkFunction(f);
<<<>>>
f:= proc() local x; begin x:= 2; g() end_proc:
g:= proc() begin x end_proc:
x:= 3:
f();
<<<>>>
f:= proc() local x; begin x:= 2; g(x) end_proc:
g:= proc(x) begin x end_proc:
<<<>>>
evalsubs:= proc(f, x, v) begin eval(subs(f, x=v)) end_proc:
<<<>>>
evalsubs(x^k, k, 2);
<<<>>>
evalsubs:= proc() begin eval(subs(args(1), args(2)=args(3))) end_proc:
<<<>>>
pathname("GROEBNER")."spoly.mu"
<<<>>>
