Synopsis:
Code:
-- ../../../Macaulay2/m2/modules.m2:402-405 genera(Module) := (M) -> ( e := euler M; d := dim M - 1; apply(#e, i -> (-1)^(i+d) * (e#i - 1)))