diff --git a/gap/structure.gi b/gap/structure.gi index a9c8497..e98fddc 100644 --- a/gap/structure.gi +++ b/gap/structure.gi @@ -116,8 +116,8 @@ InstallMethod(LeftDivisionTable, function(fam) local LS, n; LS := LeftSectionList(fam); - n := Size(T); - return List(T, x->ListPerm(Inverse(x), n)); + n := Size(LS); + return List(LS, x->ListPerm(Inverse(x), n)); end); ## Create section lists as needed