view general/arrutils/findmd.m @ 20:ed2629b7f02b

Added beginnings of some introductory blurb.

% findmd - Multidimensional find
%
% findmd :: [D:[[1,E]]] -> [[N,E]->natural].
%
% Take an E dimensional array and return subscripts of nonzero
% elements.
function S=findmd(A)

E=ndims(A);
[SX{1:E}]=ind2sub(size(A),find(A));
S=cellcat(2,SX);