1 |
function [fldOut]=rdmds2gcmfaces(fileName,varargin); |
function [fldOut]=rdmds2gcmfaces(fileName,varargin); |
2 |
|
|
3 |
if nargin==3; tt=varargin{1}; nFaces=varargin{2}; |
if nargin>=3&~isempty(varargin{1}); |
4 |
elseif nargin==2; tt=varargin{1}; nFaces=5; |
v0=rdmds(fileName,varargin{1:end-1}); nFaces=varargin{end}; |
5 |
else; tt=[]; nFaces=5; |
elseif nargin>=3&isempty(varargin{1}); |
6 |
|
v0=rdmds(fileName,varargin{2:end-1}); nFaces=varargin{end}; |
7 |
|
elseif nargin==2~isempty(varargin{1}); |
8 |
|
v0=rdmds(fileName,varargin{1}); nFaces=5; |
9 |
|
else; |
10 |
|
v0=rdmds(fileName); nFaces=5; |
11 |
end; |
end; |
12 |
|
|
|
if ~isempty(tt); v0=rdmds(fileName,tt); else; v0=rdmds(fileName); end; |
|
|
|
|
13 |
fldOut=convert2gcmfaces(v0,nFaces); |
fldOut=convert2gcmfaces(v0,nFaces); |
14 |
|
|