Add tests for "sign"

Macaulay2 · Jan 19, 2025 · 447f563 · 447f563
1 parent 2d2c766
commit 447f563
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/M2/Macaulay2/tests/normal/numbers.m2 b/M2/Macaulay2/tests/normal/numbers.m2
@@ -1081,6 +1081,11 @@ assert( not isANumber ((1/0.-1/0.) + 1*ii) )
 assert( not isANumber (1 + (ii/0.-ii/0.) ) )
 assert( not isANumber ((1 + ii/0.) - ii/0. ) )
 
+assert( sign 5 == 1 )
+assert( sign pi == 1 )
+assert( sign 0/1 == 0 )
+assert( sign(-3) == -1 )
+assert( sign(-5 * ii) == -ii )
 
 -- Local Variables:
 -- compile-command: "make -C $M2BUILDDIR/Macaulay2/packages/Macaulay2Doc/test numbers.out"