/[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.3 by gforget, Thu Oct 20 20:56:24 2011 UTC revision 1.9 by gforget, Fri Mar 20 15:41:13 2015 UTC
# Line 1  Line 1 
1    
2  %choose grid for test  %to load the ECCO v4 / LLC90 grid:
3  fprintf('\n Please set the demo grid : \n');  % nF=5;
4  fprintf('    ''llc'': lat-lon-cap grid (5 faces). \n');  % fileFormat='compact';
5  fprintf('    ''ll'' : simple lat-lon grid (1 face). \n');  % dirGrid=fullfile([myenv.gcmfaces_dir '../']);
6  choiceGrid=input(' and type return. ''llc'' is the default.\n');  % dirGrid=fullfile(dirGrid,'GRID/');
7  if isempty(choiceGrid); choiceGrid='llc'; end;  %
8  if strcmp(choiceGrid,'llc'); choiceGrid='v4';  %to instead load e.g. your MITgcm lat-lon grid,
9  elseif strcmp(choiceGrid,'ll'); choiceGrid='v3';  %you would edit the example routines to look like:
10  else; error('wrong grid choice');  % nF=1;
11  end;  % fileFormat='straight';
12    % dirGrid='./';
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 20  verbose=input(' and/or type return. 0 is Line 21  verbose=input(' and/or type return. 0 is
21  if isempty(verbose); verbose=0; end;  if isempty(verbose); verbose=0; end;
22    
23  %initialize environment variables and mygrid  %initialize environment variables and mygrid
24    addpath gcmfaces;
25  gcmfaces_global;  gcmfaces_global;
26    myenv.issueWarnings=0;
27  myenv.verbose=verbose;  myenv.verbose=verbose;
28  if myenv.verbose>0;  if myenv.verbose>0;
29      gcmfaces_msg('* set path and environment variables (myenv) by calling gcmfaces_global');      gcmfaces_msg('* set path and environment variables (myenv) by calling gcmfaces_global');
30  end;  end;
31    
32  basic_diags_compute_v3_or_v4(choiceGrid);  addpath MITprof;
33  basic_diags_display_v3_or_v4(choiceGrid);  if ~isempty(which('MITprof_global'));
34    MITprof_global;
35  example_bin_average(choiceGrid,1);%incl. call to example_smooth.m;  if myenv.verbose>0;
36  example_griddata(choiceGrid);      gcmfaces_msg('* set MITprof path by calling MITprof_global');
37  example_interp(choiceGrid);  end;
38    end;
39    
40  plot_one_field(choiceGrid,0);%%incl. call to m_map_gcmfaces;  fprintf('\n\n');
41    gcmfaces_msg('/////////////////////////////////////');
42    gcmfaces_msg('demo of plotting routines','// PART 1 :');
43    gcmfaces_msg('please hit return','// >> ');
44    gcmfaces_msg('/////////////////////////////////////');
45    fprintf('\n\n');
46    pause;
47    plot_one_field;
48    
49    fprintf('\n\n');
50    gcmfaces_msg('///////////////////////////////////////////');
51    gcmfaces_msg('demo of gridding v interpolating','// PART 2 :');
52    gcmfaces_msg('please hit return','// >> ');
53    gcmfaces_msg('///////////////////////////////////////////');
54    fprintf('\n\n');
55    pause;
56    example_bin_average(1);%incl. call to example_smooth.m;
57    example_griddata;
58    example_interp;
59    example_faces2latlon2faces;
60    
61    fprintf('\n\n');
62    gcmfaces_msg('/////////////////////////////////////////');
63    gcmfaces_msg('demo of transport computations','// PART 3 :');
64    gcmfaces_msg('please hit return','// >> ');
65    gcmfaces_msg('/////////////////////////////////////////');
66    fprintf('\n\n');
67    pause;
68    diags=example_transports;
69    if ~isempty(diags);
70        example_transports_disp(diags);
71    end;
72    
73    fprintf('\n\n');
74    gcmfaces_msg('/////////////////////////////////////////');
75    gcmfaces_msg('demo of budget computations','// PART 4 :');
76    gcmfaces_msg('please hit return','// >> ');
77    gcmfaces_msg('/////////////////////////////////////////');
78    fprintf('\n\n');
79    pause;
80    example_budget;
81    
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.9
  ViewVC Help
Powered by ViewVC 1.1.22