1 |
|
|
2 |
choiceGrid='v4'; |
%to load the ECCO v4 / LLC90 grid: |
3 |
|
% nF=5; |
4 |
%old option that eventually should be re-activated: |
% fileFormat='compact'; |
5 |
% fprintf('\n Please set the demo grid : \n'); |
% dirGrid=fullfile([myenv.gcmfaces_dir '../']); |
6 |
% fprintf(' ''llc'': lat-lon-cap grid (5 faces). \n'); |
% dirGrid=fullfile(dirGrid,'GRID/'); |
7 |
% fprintf(' ''ll'' : simple lat-lon grid (1 face). \n'); |
% |
8 |
% choiceGrid=input(' and type return. ''llc'' is the default.\n'); |
%to instead load e.g. your MITgcm lat-lon grid, |
9 |
% if isempty(choiceGrid); choiceGrid='llc'; end; |
%you would edit the example routines to look like: |
10 |
% if strcmp(choiceGrid,'llc'); choiceGrid='v4'; |
% nF=1; |
11 |
% elseif strcmp(choiceGrid,'ll'); choiceGrid='v3'; |
% fileFormat='straight'; |
12 |
% else; error('wrong grid choice'); |
% dirGrid='./'; |
|
% end; |
|
13 |
|
|
14 |
%choose verbise level |
%choose verbise level |
15 |
fprintf('\n Please set the amount of explanatory text display :\n'); |
fprintf('\n Please set the amount of explanatory text display :\n'); |
44 |
gcmfaces_msg('/////////////////////////////////////'); |
gcmfaces_msg('/////////////////////////////////////'); |
45 |
fprintf('\n\n'); |
fprintf('\n\n'); |
46 |
pause; |
pause; |
47 |
plot_one_field(choiceGrid,0);%%incl. call to m_map_gcmfaces; |
plot_one_field; |
48 |
|
|
49 |
fprintf('\n\n'); |
fprintf('\n\n'); |
50 |
gcmfaces_msg('///////////////////////////////////////////'); |
gcmfaces_msg('///////////////////////////////////////////'); |
53 |
gcmfaces_msg('///////////////////////////////////////////'); |
gcmfaces_msg('///////////////////////////////////////////'); |
54 |
fprintf('\n\n'); |
fprintf('\n\n'); |
55 |
pause; |
pause; |
56 |
example_bin_average(choiceGrid,1);%incl. call to example_smooth.m; |
example_bin_average(1);%incl. call to example_smooth.m; |
57 |
example_griddata(choiceGrid); |
example_griddata; |
58 |
example_interp(choiceGrid); |
example_interp; |
59 |
example_faces2latlon2faces(choiceGrid); |
example_faces2latlon2faces; |
60 |
|
|
61 |
fprintf('\n\n'); |
fprintf('\n\n'); |
62 |
gcmfaces_msg('/////////////////////////////////////////'); |
gcmfaces_msg('/////////////////////////////////////////'); |
65 |
gcmfaces_msg('/////////////////////////////////////////'); |
gcmfaces_msg('/////////////////////////////////////////'); |
66 |
fprintf('\n\n'); |
fprintf('\n\n'); |
67 |
pause; |
pause; |
68 |
diags=example_transports(choiceGrid); |
diags=example_transports; |
69 |
if ~isempty(diags); |
if ~isempty(diags); |
70 |
example_transports_disp(diags); |
example_transports_disp(diags); |
71 |
end; |
end; |
77 |
gcmfaces_msg('/////////////////////////////////////////'); |
gcmfaces_msg('/////////////////////////////////////////'); |
78 |
fprintf('\n\n'); |
fprintf('\n\n'); |
79 |
pause; |
pause; |
80 |
example_budget(choiceGrid); |
example_budget; |
81 |
|
|