Guest User

Untitled

a guest
Oct 19th, 2017
79
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.95 KB | None | 0 0
  1. for G in AllSmallGroups(60) do
  2. Conj:=ConjugacyClassesSubgroups(LatticeSubgroups(G));
  3. SubgroupSizes:=Set(Conj,C->Size(C[1]));
  4. Print(StructureDescription(G)," ",IsAbelian(G)," ",SubgroupSizes,"n");
  5. od;
  6.  
  7. C5 x (C3 : C4) false [ 1, 2, 3, 4, 5, 6, 10, 12, 15, 20, 30, 60 ]
  8. C3 x (C5 : C4) false [ 1, 2, 3, 4, 5, 6, 10, 12, 15, 20, 30, 60 ]
  9. C15 : C4 false [ 1, 2, 3, 4, 5, 6, 10, 12, 15, 20, 30, 60 ]
  10. C60 true [ 1, 2, 3, 4, 5, 6, 10, 12, 15, 20, 30, 60 ]
  11. A5 false [ 1, 2, 3, 4, 5, 6, 10, 12, 60 ]
  12. C3 x (C5 : C4) false [ 1, 2, 3, 4, 5, 6, 10, 12, 15, 20, 30, 60 ]
  13. C15 : C4 false [ 1, 2, 3, 4, 5, 6, 10, 12, 15, 20, 30, 60 ]
  14. S3 x D10 false [ 1, 2, 3, 4, 5, 6, 10, 12, 15, 20, 30, 60 ]
  15. C5 x A4 false [ 1, 2, 3, 4, 5, 10, 12, 15, 20, 60 ]
  16. C6 x D10 false [ 1, 2, 3, 4, 5, 6, 10, 12, 15, 20, 30, 60 ]
  17. C10 x S3 false [ 1, 2, 3, 4, 5, 6, 10, 12, 15, 20, 30, 60 ]
  18. D60 false [ 1, 2, 3, 4, 5, 6, 10, 12, 15, 20, 30, 60 ]
  19. C30 x C2 true [ 1, 2, 3, 4, 5, 6, 10, 12, 15, 20, 30, 60 ]
Add Comment
Please, Sign In to add comment