13 |
% - calls to this routine will eventually replace |
% - calls to this routine will eventually replace |
14 |
% both gcmfaces_path and 'global mygrid' calls. |
% both gcmfaces_path and 'global mygrid' calls. |
15 |
|
|
16 |
|
warning(sprintf(['This version of gcmfaces, from an old CVS server, is \n' ... |
17 |
|
' now considered deprecated. Future devopment will proceed, instead, \n' ... |
18 |
|
' via GitHub. For up to date documentation, please refer to \n' ... |
19 |
|
' http://gcmfaces.readthedocs.io/en/latest/'])); |
20 |
|
|
21 |
%set optional paramaters to default values |
%set optional paramaters to default values |
22 |
resetGrid=0; listVars={}; |
resetGrid=0; listVars={}; |
23 |
%set more optional paramaters to user defined values |
%set more optional paramaters to user defined values |
108 |
test0=~isfield(mygrid,'XC'); |
test0=~isfield(mygrid,'XC'); |
109 |
[ST,I]=dbstack; ST={ST(:).name}'; |
[ST,I]=dbstack; ST={ST(:).name}'; |
110 |
test1=1; |
test1=1; |
111 |
list1={'grid_load','startup','plot_one_field','plot_std_field',... |
list1={'grid_load','startup','example_display','example_IO',... |
112 |
'example_remap','example_griddata','example_interp','example_faces2latlon2faces',... |
'example_remap','example_griddata','example_interp','example_faces2latlon2faces',... |
113 |
'example_bin_average','example_transports','example_budget',... |
'example_bin_average','example_transports','example_budget',... |
114 |
'profiles_process_init','gcmfaces_init'}; |
'profiles_process_init','gcmfaces_init','diags_pre_process','diags_grid'}; |
115 |
|
list1={list1{:},'profiles_prep_main','profiles_prep_select','MITprof_demo'}; |
116 |
for jj=1:length(list1); |
for jj=1:length(list1); |
117 |
test1=test1&isempty(find(strcmp(ST,list1{jj}))); |
test1=test1&isempty(find(strcmp(ST,list1{jj}))); |
118 |
end; |
end; |