![[next]](next.gif)
![[previous]](previous.gif)
![[up]](up.gif)
![[top]](top.gif)
Synopsis:
Code:
-- ../../../Macaulay2/m2/modules2.m2:397-404
degree Module := M -> (
hf := poincare M;
T := (ring hf)_0;
if hf == 0 then 0
else (
while substitute(hf,{T=>1}) == 0 do hf = hf // (1-T);
-- while hf % (1 - T) == 0 do hf = hf // (1-T);
substitute(hf,{T=>1})))
![[next]](next.gif)
![[previous]](previous.gif)
![[up]](up.gif)
![[top]](top.gif)