From e61f5a0fa4656dd256ad664528e9a6355638bd41 Mon Sep 17 00:00:00 2001 From: dos-reis Date: Sat, 19 Jun 2010 02:29:06 +0000 Subject: * algebra/catdef.spad.pamphlet (LinearlyExplicitRingOver) [reducedSystem]: Add overload. * algebra/si.spad.pamphlet (SingleInteger)[reducedSystem]: Tidy. --- src/algebra/si.spad.pamphlet | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/algebra/si.spad.pamphlet') diff --git a/src/algebra/si.spad.pamphlet b/src/algebra/si.spad.pamphlet index e9e5637c..b62da15a 100644 --- a/src/algebra/si.spad.pamphlet +++ b/src/algebra/si.spad.pamphlet @@ -317,7 +317,7 @@ SingleInteger(): Join(IntegerNumberSystem,OrderedFinite,BooleanLogic,Logic,OpenM (x -$Lisp MININT +$Lisp 1$Lisp) pretend PositiveInteger - reducedSystem(m, v) == + reducedSystem(m: Matrix %, v: Vector %) == [m pretend Matrix(Integer), v pretend Vector(Integer)] positiveRemainder(x,n) == -- cgit v1.2.3