Synopsis:
Code:
-- ../../../Macaulay2/m2/modules2.m2:391-394 dim Module := M -> ( c := codim M; if c === infinity then -1 else dim ring M - c )