find.m

来自「matlab有限元分析工具,比经较全面的一个手册,请大家下载呀」· M 代码 · 共 21 行

function [i,j,v] = find(a)
if nargout <= 1
  i = find(a.entries);
  [m,n] = size(i);
  i = zba(i - ones(m,n));
elseif nargout == 2
  [i,j] = find(a.entries);
  [m,n] = size(i);
  i = zba(i - ones(m,n));
  j = zba(j - ones(m,n));
elseif nargout == 3
  [i,j,v] = find(a.entries);
  [m,n] = size(i);
  i = zba(i - ones(m,n));
  j = zba(j - ones(m,n));
  v = zba(v);
end