Update lib/matint.gi

Co-Authored-By: Max Horn <max@quendi.de>
gap-system · Aug 29, 2019 · 5b06915 · 5b06915
1 parent 7da83a9
commit 5b06915
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/matint.gi b/lib/matint.gi
@@ -1051,7 +1051,7 @@ local n,zero,nv,new,pip,piv,i,v,p,w,g,nov,pin,now,rat,extra,clean,assign,try;
   for try in [1..3] do
     w:=List(new,x->x*x); # norm sort
     SortParallel(w,new);
-    new:=Reversed(new);
+    SortBy(new, x -> - x*x);
     i:=Length(new);
     while i>0 do
       v:=ShallowCopy(new[i]);