don't sort sets when printing them

Macaulay2 · May 8, 2024 · 6a41f93 · 6a41f93
1 parent eb6f0cc
commit 6a41f93
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/M2/Macaulay2/m2/expressions.m2 b/M2/Macaulay2/m2/expressions.m2
@@ -1296,7 +1296,7 @@ texMath MapExpression := x -> texMath x#0 | "\\," | (if #x>2 then "\\xleftarrow{
 expressionValue MapExpression := x -> map toSequence apply(x,expressionValue)
 
 -- moved from set.m2 because of loadsequence order
-expression Set := x -> Adjacent {set, expression (sortByName keys x)}
+expression Set := x -> Adjacent {set, expression keys x}
 toString Set := toString @@ expression
 net Set := net @@ expression
 texMath Set := texMath @@ expression

diff --git a/M2/Macaulay2/tests/ComputationsBook/varieties/test.out.expected b/M2/Macaulay2/tests/ComputationsBook/varieties/test.out.expected
@@ -335,8 +335,8 @@ o47 : Matrix R  <-- R
 
 i48 : set flatten entries gens M - set flatten entries C.dd_1
 
-            5 5 5   5 10   6 7   10 5
-o48 = set {x y z , x y  , x y , x  y }
+            6 7   10 5   5 5 5   5 10
+o48 = set {x y , x  y , x y z , x y  }
 
 o48 : Set