aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/wtpol.spad.pamphlet
diff options
context:
space:
mode:
Diffstat (limited to 'src/algebra/wtpol.spad.pamphlet')
-rw-r--r--src/algebra/wtpol.spad.pamphlet2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/algebra/wtpol.spad.pamphlet b/src/algebra/wtpol.spad.pamphlet
index 7f64a69f..d4b28f47 100644
--- a/src/algebra/wtpol.spad.pamphlet
+++ b/src/algebra/wtpol.spad.pamphlet
@@ -58,7 +58,7 @@ WeightedPolynomials(R:Ring,VarSet: OrderedSet, E:OrderedAbelianMonoidSup,
if #vl ~= #wl then error "incompatible length lists in WeightedPolynomial"
lookupList:=[[v,n] for v in vl for n in wl]
-- local operation
- innercoerce:(p,z) -> $
+ innercoerce: (P,Integer) -> $
lookup:VarSet -> NonNegativeInteger
lookup v ==
l:=lookupList