From 6fdc4391feb62ca3c311bccca31b95fc899ec927 Mon Sep 17 00:00:00 2001
From: Ulli Kehrle <ulli.kehrle@rwth-aachen.de>
Date: Wed, 7 Nov 2018 16:07:15 +0100
Subject: Also add trivial orbits to mapping

---
 subgroupladder.g | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/subgroupladder.g b/subgroupladder.g
index f186716..748c1db 100644
--- a/subgroupladder.g
+++ b/subgroupladder.g
@@ -68,7 +68,7 @@ SubgroupLadder := function(G)
 
 	n := LargestMovedPoint(G);
 
-	orb := List(Orbits(G), x -> x);
+	orb := List(Orbits(G, [1..n]), x -> x);
 	SortBy(orb, x->-Length(x));
 
 	output := [];
-- 
cgit v1.2.3-24-g4f1b