zerodiag.m (86B)
1 function x=zerodiag(x); 2 3 % Puts zeros on the diagonal of a matrix 4 5 x=-diag(diag(x))+x;