fricas
Z==>Integer; Q==>Fraction Z
Type: Void
fricas
z: Symbol := 'z; P==>UnivariatePolynomial(z,Q)
Type: Void
fricas
t:P := monomial(1,1)
Type: UnivariatePolynomial
?(z,
Fraction(Integer))
fricas
p:P := (1-t)*(1-t^2)*(1-t^3)
Type: UnivariatePolynomial
?(z,
Fraction(Integer))
fricas
L==>UnivariateLaurentSeries(Q,z,0)
Type: Void
fricas
R ==> Record(k: Z, c: Q)
Type: Void
fricas
l: List R := reverse [[degree m, leadingCoefficient m]$R for m in monomials p]
Type: List(Record(k: Integer,c: Fraction(Integer)))
fricas
series(l)$L
Type: UnivariateLaurentSeries
?(Fraction(Integer),
z,
0)
fricas
l1: List R := [[n, if n=5 then 0 else n/1]$R for n in 1..7]
Type: List(Record(k: Integer,c: Fraction(Integer)))
fricas
series(l1)$L
Type: UnivariateLaurentSeries
?(Fraction(Integer),
z,
0)
fricas
l2: List R := [[n, n/1]$R for n in 1..7|n~=5]
Type: List(Record(k: Integer,c: Fraction(Integer)))
fricas
series(l2)$L
Type: UnivariateLaurentSeries
?(Fraction(Integer),
z,
0)