aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/degred.spad.pamphlet
diff options
context:
space:
mode:
Diffstat (limited to 'src/algebra/degred.spad.pamphlet')
-rw-r--r--src/algebra/degred.spad.pamphlet2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/algebra/degred.spad.pamphlet b/src/algebra/degred.spad.pamphlet
index dd903291..59a6f220 100644
--- a/src/algebra/degred.spad.pamphlet
+++ b/src/algebra/degred.spad.pamphlet
@@ -33,7 +33,7 @@ DegreeReductionPackage(R1, R2): Cat == Capsule where
degrees(u: UP R1): List Integer ==
l: List Integer := []
- while u ^= 0 repeat
+ while u ~= 0 repeat
l := concat(degree u,l)
u := reductum u
l