# Test l00: for distributed versions of MAPLE
words(-1):
3+4;
7*9;
12/18;
7-13;
30!;
2^5;
3^6;
3/4+5/6;
3.1^2;
evalf(Pi);
2.0^3.0;
# test comment
evalb(expand((x+1)^9) =
x^9+9*x^8+36*x^7+84*x^6+126*x^5+126*x^4+84*x^3+36*x^2+9*x+1);
expand(sin(2*x))-2*sin(x)*cos(x);
sum(i^2,i=1..3);
diff(x^6,x);
gc():
taylor(1/(1-2*x),x);
taylor(exp(x),x);
gc():
evalb(normal(1/(1+1/x)) = x/(x+1));
ifactor(8);
evalb(factor(x^3+2*x^2*y+2*x*y^2+y^3) = (x+y)*(x^2+x*y+y^2));
gc():
radnormal(4^(1/2));
a := 1;
save a,ZMpLtmp;
save a,`ZMpLtmp.m`;
a;
a:=0;
a;
read ZMpLtmp;
a;
a:=0;
a;
read `ZMpLtmp.m`;
a;
if 1=2 then bad elif 2=3 then alsobad else good fi;
%;
for i from 3 by 2 to 13 while i<7 do t[i] := i^2 od;
f := proc(n) 1/n end;
f(5);
# quick test of the pretty-printer
restart;
interface(prettyprint=true);
3+4;
7*9;
12/18;
7-13;
30!;
2^5;
3^6;
3/4+5/6;
3.1^2;
evalf(Pi);
2.0^3.0;
# test comment
evalb(expand((x+1)^9) =
x^9+9*x^8+36*x^7+84*x^6+126*x^5+126*x^4+84*x^3+36*x^2+9*x+1);
expand(sin(2*x))-2*sin(x)*cos(x);
sum(i^2,i=1..3);
diff(x^6,x);
gc():
taylor(1/(1-2*x),x);
taylor(exp(x),x);
gc():
evalb(normal(1/(1+1/x)) = x/(x+1));
ifactor(8);
evalb(factor(x^3+2*x^2*y+2*x*y^2+y^3) = (x+y)*(x^2+x*y+y^2));
gc():
radnormal(4^(1/2));
quit
