# 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():
evalb(int(1/(x^4-1),x) = -1/2*arctanh(x) - 1/2*arctan(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():
radsimp(4^(1/2));
a := 1;
save a,temp;
save a,`temp.m`;
a;
a:=0;
a;
read temp;
a;
a:=0;
a;
read `temp.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);
quit
