/[MITgcm]/MITgcm_contrib/gael/matlab_class/gcmfaces_demo.m
ViewVC logotype

Diff of /MITgcm_contrib/gael/matlab_class/gcmfaces_demo.m

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.8 by gforget, Fri Mar 20 14:32:54 2015 UTC revision 1.9 by gforget, Fri Mar 20 15:41:13 2015 UTC
# Line 1  Line 1 
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');
# Line 45  gcmfaces_msg('please hit return','// >> Line 44  gcmfaces_msg('please hit return','// >>
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('///////////////////////////////////////////');
# Line 54  gcmfaces_msg('please hit return','// >> Line 53  gcmfaces_msg('please hit return','// >>
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('/////////////////////////////////////////');
# Line 66  gcmfaces_msg('please hit return','// >> Line 65  gcmfaces_msg('please hit return','// >>
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;
# Line 78  gcmfaces_msg('please hit return','// >> Line 77  gcmfaces_msg('please hit return','// >>
77  gcmfaces_msg('/////////////////////////////////////////');  gcmfaces_msg('/////////////////////////////////////////');
78  fprintf('\n\n');  fprintf('\n\n');
79  pause;  pause;
80  example_budget(choiceGrid);  example_budget;
81    

Legend:
Removed from v.1.8  
changed lines
  Added in v.1.9

  ViewVC Help
Powered by ViewVC 1.1.22