| ring r=0,(x,y,z),dp;
module m=[1,y],[0,x+z];
m;
→ m[1]=y*gen(2)+gen(1)
→ m[2]=x*gen(2)+z*gen(2)
print(m); // the columns generate m
→ 1,0,
→ y,x+z
string s=print(m,"%s"); s;
→ y*gen(2)+gen(1),x*gen(2)+z*gen(2)
s=print(m,"%2s"); s;
→ y*gen(2)+gen(1),
→ x*gen(2)+z*gen(2)
→
s=print(m,"%l"); s;
→ module(y*gen(2)+gen(1),x*gen(2)+z*gen(2))
s=print(m,"%;"); s;
→ m[1]=y*gen(2)+gen(1)
→ m[2]=x*gen(2)+z*gen(2)
→
s=print(m,"%t"); s;
→ // m [0] module, rk 2, 2 generator(s)
→ m[1]=y*gen(2)+gen(1)
→ m[2]=x*gen(2)+z*gen(2)
s=print(m,"%p"); s;
→ 1,0,
→ y,x+z
→
intmat M=betti(mres(m,0));
print(M,"betti");
→ 0 1
→ ------------------
→ 0: 1 1
→ ------------------
→ total: 1 1
list l=r,M;
s=print(l,"%s"); s;
→ (0),(x,y,z),(dp(3),C),1,1
s=print(l,"%2s"); s;
→ (0),(x,y,z),(dp(3),C),
→ 1,1
→
s=print(l,"%l"); s;
→ list("(0),(x,y,z),(dp(3),C)",intmat(intvec(1,1 ),1,2))
|