Mercurial > hg > ishara

comparison general/funutils/@function_handle/and.m @ 42:ae596261e75f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Various fixes and development to audio handling
author samer
date Tue, 02 Dec 2014 14:51:13 +0000
parents c388f1c70669
children
comparison
equal deleted inserted replaced
41:79632e7bcb52 42:ae596261e75f
16 % discarding return values, then calls g with arguments returning result. 16 % discarding return values, then calls g with arguments returning result.
17 function h=and(f,g,nin,nout) 17 function h=and(f,g,nin,nout)
18 if nargin<4, nout=nargout(g); end 18 if nargin<4, nout=nargout(g); end
19 if nargin<3, nin=nargin(g); end 19 if nargin<3, nin=nargin(g); end
20 fns = { @q11, @q1n; @qn1, @qnn }; 20 fns = { @q11, @q1n; @qn1, @qnn };
21 h=fns{acount(nin,1),acount(nout,1)}; 21 h=fns{acount(nin,1,1),acount(nout,1,1)};
22 function y=q11(x), f(x); y=g(x); end 22 function y=q11(x), f(x); y=g(x); end
23 function y=qn1(varargin), f(varargin{:}); y=g(varargin{:}); end 23 function y=qn1(varargin), f(varargin{:}); y=g(varargin{:}); end
24 function varargout=q1n(x), f(x); [varargout{1:nargout}]=g(x); end 24 function varargout=q1n(x), f(x); [varargout{1:nargout}]=g(x); end
25 function varargout=qnn(varargin), f(varargin{:}); [varargout{1:nargout}]=g(varargin{:}); end 25 function varargout=qnn(varargin), f(varargin{:}); [varargout{1:nargout}]=g(varargin{:}); end
26 end 26 end