Guest User

Untitled

a guest
Jan 5th, 2018
83
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.72 KB | None | 0 0
  1. F:=FreeGroup("e","a","r","s","t","x","y","z");
  2. rels:=ParseRelators(F,"ea=r,ae=x,rx=s,sy=t,tz=e,xr=y,ys=z,zt=a");
  3. G:=F/rels;`
  4.  
  5. [ t*a*t^-1*a*(a*t)^2*a^2*t^-1*a, a*t*(a^2*t^-1)^2*a^2*t*a*t^-1 ]
  6.  
  7. F:=FreeGroup("e","a","r","s","t","x","y","z");
  8. rels:=ParseRelators(F,"ea=x,ae=r,rx=y,sy=z,tz=a,xr=s,ys=t,zt=e");
  9. G:=F/rels;`
  10.  
  11. F:=FreeGroup("e","a","r","s","t","x","y","z");
  12. rels:=ParseRelators(F,"ea=z,ae=t,rx=a,sy=x,tz=y,xr=e,ys=r,zt=s");
  13. G:=F/rels;
  14.  
  15. F:=FreeGroup("e","a","r","s","t","x","y","z");
  16. rels:=ParseRelators(F,"ea=t,ae=z,rx=e,sy=r,tz=s,xr=a,ys=x,zt=y");
  17. G:=F/rels;
  18.  
  19. F<a,t> := FreeGroup(2);
  20. rels := [ t*a*t^-1*a*(a*t)^2*a^2*t^-1*a, a*t*(a^2*t^-1)^2*a^2*t*a*t^-1 ];
  21. G:=quo<F|rels>;
  22. L2Quotients(G);
  23.  
  24. [
  25. L_2(2^infty)
  26. ]
Add Comment
Please, Sign In to add comment