Line | |
---|
1 | function [varargout] = fcn(varargin) |
---|
2 | |
---|
3 | % fcn -- Apply a function or operator. |
---|
4 | % fcn(self, other, ...) applies the function or operator |
---|
5 | % derived from the name of this M-file to the arguments. |
---|
6 | % the "self" argument is an "ncitem". |
---|
7 | |
---|
8 | % Copyright (C) 1997 Dr. Charles R. Denham, ZYDECO. |
---|
9 | % All Rights Reserved. |
---|
10 | % Disclosure without explicit written consent from the |
---|
11 | % copyright owner does not constitute publication. |
---|
12 | |
---|
13 | % Version of 07-Aug-1997 11:46:29. |
---|
14 | |
---|
15 | fcn = mfilename; |
---|
16 | f = find(fcn == '/'); |
---|
17 | if any(f), fcn(1:f(length(f))) = ''; end |
---|
18 | |
---|
19 | varargin = [{fcn} varargin]; |
---|
20 | varargout = cell(1, nargout); |
---|
21 | |
---|
22 | [varargout{:}] = feval(varargin{:}); |
---|
Note: See
TracBrowser
for help on using the repository browser.