1 files changed, 0 insertions, 26 deletions
diff --git a/test.g b/test.g
deleted file mode 100644
index 40a36c2..0000000
--- a/test.g
+++ /dev/null
@@ -1,26 +0,0 @@
-TestRandom := function(n)
-  local
-    p,
-    g,
-    l, 
-    i;
-
-  p := RandomPartialPerm(n);
-  p := ComponentsOfPartialPerm(p);
-  g := YoungGroupFromPartition(p);
-  l := SubgroupLadder(g);
-  
-  for i in [2..Length(l)] do
-    if Order(l[i]) < Order(l[i-1]) then
-      if not (IsSubgroup(l[i-1],l[i]) and Order(l[i-1])/Order(l[i]) <= n) then
-        return false;
-      fi;
-    else
-      if not (IsSubgroup(l[i],l[i-1]) and Order(l[i])/Order(l[i-1]) <= n) then
-        return false;
-      fi;
-    fi;
-  od;
-
-  return true;
-end;