From 2e96b01e54905f91ac17c27caca5311c4bcb2195 Mon Sep 17 00:00:00 2001
From: Friedrich Rober <friedrich.rober@rwth-aachen.de>
Date: Wed, 7 Nov 2018 16:23:00 +0100
Subject: Remove superfluous identity call

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

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