printsep(":", 1,2,3,4);print(0);
printsep(":");print(0);
printsep1(":", 1,2,3,4);print(0);
printsep1(":");print(0);
printsep(":",matid(2));print(0);
printsep1(":",matid(2));print(0);
printp(matid(2))

w=42; print(quadgen(5))
q = 2 + 0*quadgen(-3,z);
printtex(q)
print(q)
q = quadgen(-3,z);
printtex(q)
print(q)
q = 2*quadgen(-3,z);
printtex(q)
print(q)
q = 2 + 3*quadgen(-3,'z);
printtex(q)
print(q)
q = 2 + 3*I;
printtex(q)
print(q)

f(x)=my(y=Pi*x);y*sin(y);
g(x)=my(y=Pi*x);y*cos(y);
M=[f,g;f,g];
eval(Str(f))==f
eval(Str(M))==M
