Synopsis:
Code:
-- ../m2/matrix.m2:191-195 transpose Matrix := Matrix => (m) -> if m.cache.?transpose then m.cache.transpose else m.cache.transpose = ( if not (isFreeModule source m and isFreeModule target m) then error "expected a map between free modules"; sendgg (ggPush m, ggtranspose); getMatrix ring m)