aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/smith.spad.pamphlet
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2013-05-19 23:55:58 +0000
committerdos-reis <gdr@axiomatics.org>2013-05-19 23:55:58 +0000
commit9f93bd1e41e901891fe77f2a777fd18ead4b94dc (patch)
tree5b81278020fdfc9fea4abc4ad75bb50492fbed90 /src/algebra/smith.spad.pamphlet
parent549aab1d993019339d4eef36049e7639c37ca1b6 (diff)
downloadopen-axiom-9f93bd1e41e901891fe77f2a777fd18ead4b94dc.tar.gz
Eradicate attribute shallowlyMutable.
Diffstat (limited to 'src/algebra/smith.spad.pamphlet')
-rw-r--r--src/algebra/smith.spad.pamphlet2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/algebra/smith.spad.pamphlet b/src/algebra/smith.spad.pamphlet
index 4e824033..4572488d 100644
--- a/src/algebra/smith.spad.pamphlet
+++ b/src/algebra/smith.spad.pamphlet
@@ -84,7 +84,7 @@ SmithNormalForm(R,Row,Col,M) : Exports == Implementation where
km:= (km - 1) :: NNI
km
- if Col has shallowlyMutable then
+ if Col has ShallowlyMutableAggregate R then
test2(sm : M ,b : Col, n1:NNI,dk:NNI) : Union( Col, "failed") ==
-- test divisibility --