/[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.7 by gforget, Thu Feb 12 21:40:26 2015 UTC revision 1.8 by gforget, Fri Mar 20 14:32:54 2015 UTC
# Line 1  Line 1 
1    
2  choiceGrid='v4';  choiceGrid='v4';
3    
4  %need to replace the missing v3 files...  %old option that eventually should be re-activated:
 %  
 %choose grid for test  
5  % fprintf('\n Please set the demo grid : \n');  % fprintf('\n Please set the demo grid : \n');
6  % fprintf('    ''llc'': lat-lon-cap grid (5 faces). \n');  % fprintf('    ''llc'': lat-lon-cap grid (5 faces). \n');
7  % fprintf('    ''ll'' : simple lat-lon grid (1 face). \n');  % fprintf('    ''ll'' : simple lat-lon grid (1 face). \n');
# Line 25  if isempty(verbose); verbose=0; end; Line 23  if isempty(verbose); verbose=0; end;
23    
24  %initialize environment variables and mygrid  %initialize environment variables and mygrid
25  addpath gcmfaces;  addpath gcmfaces;
26  gcmfaces_global;  gcmfaces_global;
27    myenv.issueWarnings=0;
28  myenv.verbose=verbose;  myenv.verbose=verbose;
29  if myenv.verbose>0;  if myenv.verbose>0;
30      gcmfaces_msg('* set path and environment variables (myenv) by calling gcmfaces_global');      gcmfaces_msg('* set path and environment variables (myenv) by calling gcmfaces_global');
# Line 40  end; Line 39  end;
39  end;  end;
40    
41  fprintf('\n\n');  fprintf('\n\n');
 gcmfaces_msg('/////////////////////////////////////////');  
 gcmfaces_msg('demo of transport computations','// PART 1 :');  
 gcmfaces_msg('please hit return','// >> ');  
 gcmfaces_msg('/////////////////////////////////////////');  
 fprintf('\n\n');  
 pause;  
 diags=example_transports(choiceGrid);  
 if ~isempty(diags);  
     example_transports_disp(diags);  
 end;  
   
 fprintf('\n\n');  
42  gcmfaces_msg('/////////////////////////////////////');  gcmfaces_msg('/////////////////////////////////////');
43  gcmfaces_msg('demo of plotting routines','// PART 2 :');  gcmfaces_msg('demo of plotting routines','// PART 1 :');
44  gcmfaces_msg('please hit return','// >> ');  gcmfaces_msg('please hit return','// >> ');
45  gcmfaces_msg('/////////////////////////////////////');  gcmfaces_msg('/////////////////////////////////////');
46  fprintf('\n\n');  fprintf('\n\n');
# Line 62  plot_one_field(choiceGrid,0);%%incl. cal Line 49  plot_one_field(choiceGrid,0);%%incl. cal
49    
50  fprintf('\n\n');  fprintf('\n\n');
51  gcmfaces_msg('///////////////////////////////////////////');  gcmfaces_msg('///////////////////////////////////////////');
52  gcmfaces_msg('demo of gridding v interpolating','// PART 3 :');  gcmfaces_msg('demo of gridding v interpolating','// PART 2 :');
53  gcmfaces_msg('please hit return','// >> ');  gcmfaces_msg('please hit return','// >> ');
54  gcmfaces_msg('///////////////////////////////////////////');  gcmfaces_msg('///////////////////////////////////////////');
55  fprintf('\n\n');  fprintf('\n\n');
# Line 74  example_faces2latlon2faces(choiceGrid); Line 61  example_faces2latlon2faces(choiceGrid);
61    
62  fprintf('\n\n');  fprintf('\n\n');
63  gcmfaces_msg('/////////////////////////////////////////');  gcmfaces_msg('/////////////////////////////////////////');
64    gcmfaces_msg('demo of transport computations','// PART 3 :');
65    gcmfaces_msg('please hit return','// >> ');
66    gcmfaces_msg('/////////////////////////////////////////');
67    fprintf('\n\n');
68    pause;
69    diags=example_transports(choiceGrid);
70    if ~isempty(diags);
71        example_transports_disp(diags);
72    end;
73    
74    fprintf('\n\n');
75    gcmfaces_msg('/////////////////////////////////////////');
76  gcmfaces_msg('demo of budget computations','// PART 4 :');  gcmfaces_msg('demo of budget computations','// PART 4 :');
77  gcmfaces_msg('please hit return','// >> ');  gcmfaces_msg('please hit return','// >> ');
78  gcmfaces_msg('/////////////////////////////////////////');  gcmfaces_msg('/////////////////////////////////////////');
Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8
  ViewVC Help
Powered by ViewVC 1.1.22