diff --git a/gap/constructions.gi b/gap/constructions.gi index 1cc0ad0..a5f28b2 100644 --- a/gap/constructions.gi +++ b/gap/constructions.gi @@ -76,8 +76,8 @@ InstallGlobalFunction(TrivialLeftQuandle, if not IsBound(LeftTrivs@[n]) then trivs := List([1..n], LInertum@); I := LeftQuandleNC(CollectionsFamily(LInertumFamily@), trivs); - SetAsSSortedList(I, trivs); SetIsTrivial(I, true); + SetAsSSortedList(I, trivs); SetIsBuiltFromMultiplicationTable(I, true); SetMultiplicationTable(I, ListWithIdenticalEntries(n, [1..n])); LeftTrivs@[n] := I;