From a5396a491b1b308b622db3e12da734e6fb1fdb53 Mon Sep 17 00:00:00 2001 From: dos-reis Date: Wed, 12 Oct 2011 16:22:50 +0000 Subject: * algebra/boolean.spad.pamphlet (Reference) [elt]: Remove. [setelt]: Likewise. * algebra/lodof.spad.pamphlet: Adjust use. * algebra/float.spad.pamphlet: Likewise. * algebra/divisor.spad.pamphlet: Likewise. * algebra/curve.spad.pamphlet: Likewise. * algebra/card.spad.pamphlet: Likewise. * algebra/algext.spad.pamphlet: Likewise. * algebra/op.spad.pamphlet: Likewise. * algebra/suls.spad.pamphlet: Likewise. * algebra/sups.spad.pamphlet: Likewise. * algebra/supxs.spad.pamphlet: Likewise. * algebra/suts.spad.pamphlet: Likewise. * algebra/symbol.spad.pamphlet: Likewise. * algebra/view3D.spad.pamphlet: Likewise. * algebra/viewDef.spad.pamphlet: Likewise. --- src/algebra/supxs.spad.pamphlet | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/algebra/supxs.spad.pamphlet') diff --git a/src/algebra/supxs.spad.pamphlet b/src/algebra/supxs.spad.pamphlet index a911aa38..e8ec5473 100644 --- a/src/algebra/supxs.spad.pamphlet +++ b/src/algebra/supxs.spad.pamphlet @@ -85,7 +85,7 @@ SparseUnivariatePuiseuxSeries(Coef,var,cen): Exports == Implementation where sups : SUPS := laurentRep(x) pretend SUPS st := getStream sups; refer := getRef sups if not(explicitlyEmpty? st or explicitEntries? st) _ - and (nx := retractIfCan(elt refer)@Union(I,"failed")) case I then + and (nx := retractIfCan(deref refer)@Union(I,"failed")) case I then count : NNI := _$streamCount$Lisp degr := min(count,(nx :: I) + count + 1) extend(sups,degr) -- cgit v1.2.3