powered by
revdiag(x,...) offdiag(x,type=0,...) revdiag(x,...) <- value offdiag(x,type=0,...) <- value