matlab_class/gcmfaces_convert/convert2array_ll.m

function [FLD]=convert2array_ll(fld);
%object:    gcmfaces to array format conversion (if gcmfaces input)
%    or:    array to gcmfaces format conversion (if array input)
%
%notes:     if array input, the gcmfaces format will be the one of mygrid.XC, so 
%           the array input must have originally been created according to convert2array

global mygrid;

if isa(fld,'gcmfaces'); do_gcmfaces2array=1; else; do_gcmfaces2array=0; end;

if do_gcmfaces2array;
   FLD=fld.f1;
else;
   FLD=NaN*mygrid.XC;
   FLD.f1=fld;
end;


1	gforget	1.2	function [FLD]=convert2array_ll(fld);
2			%object: gcmfaces to array format conversion (if gcmfaces input)
3			% or: array to gcmfaces format conversion (if array input)
4			%
5			%notes: if array input, the gcmfaces format will be the one of mygrid.XC, so
6			% the array input must have originally been created according to convert2array
7
8			global mygrid;
9	gforget	1.1
10			if isa(fld,'gcmfaces'); do_gcmfaces2array=1; else; do_gcmfaces2array=0; end;
11
12			if do_gcmfaces2array;
13			FLD=fld.f1;
14			else;
15	gforget	1.2	FLD=NaN*mygrid.XC;
16	gforget	1.1	FLD.f1=fld;
17			end;
18
19