| 1 | gforget | 1.1 |  | 
| 2 | gforget | 1.11 | %call sequence: | 
| 3 | gforget | 1.9 | % | 
| 4 | gforget | 1.11 | %  addpath gcmfaces; gcmfaces_demo; | 
| 5 |  |  | % | 
| 6 |  |  | %expected directory structure: | 
| 7 |  |  | % | 
| 8 |  |  | %  gcmfaces     (codes) | 
| 9 |  |  | %  MITprof      (codes) | 
| 10 |  |  | %  nctiles_grid (ECCO v4 grid) | 
| 11 |  |  | %  release1     (ECCO v4 output) | 
| 12 |  |  | %  sample_input (test material) | 
| 13 |  |  | % | 
| 14 |  |  | %to activate example_remap: | 
| 15 |  |  | % | 
| 16 |  |  | %  mkdir sample_input | 
| 17 |  |  | %  wget ftp://mit.ecco-group.org/gforget/testcase_remap.mat | 
| 18 |  |  | %  mv testcase_remap.mat sample_input/. | 
| 19 | gforget | 1.10 | % | 
| 20 |  |  | %to activate example_transports: | 
| 21 |  |  | % | 
| 22 | gforget | 1.11 | %  mkdir release1 | 
| 23 |  |  | %  wget --recursive ftp://mit.ecco-group.org/ecco_for_las/version_4/release1/nctiles_climatology | 
| 24 |  |  | %  mv mit.ecco-group.org/gforget/nctiles_climatology release1/. | 
| 25 |  |  | %  rm -rf mit.ecco-group.org | 
| 26 | gforget | 1.10 | % | 
| 27 |  |  | %to activate example_budget: | 
| 28 |  |  | % | 
| 29 | gforget | 1.11 | %  wget --recursive ftp://mit.ecco-group.org/gforget/nctiles_budget_2d | 
| 30 |  |  | %  mv mit.ecco-group.org/gforget/nctiles_budget_2d sample_input/. | 
| 31 |  |  | %  rm -rf mit.ecco-group.org | 
| 32 | gforget | 1.10 | % | 
| 33 | gforget | 1.3 |  | 
| 34 | gforget | 1.10 | %choose verbose level | 
| 35 | gforget | 1.3 | fprintf('\n Please set the amount of explanatory text display :\n'); | 
| 36 |  |  | fprintf('    0: none.\n'); | 
| 37 |  |  | fprintf('    1: comments.\n'); | 
| 38 |  |  | fprintf('    2: comments preceeded with calling sequence.\n'); | 
| 39 |  |  | fprintf('    3: same as 2, but preceeded with pause.\n'); | 
| 40 |  |  | verbose=input(' and/or type return. 0 is the default. \n'); | 
| 41 |  |  | if isempty(verbose); verbose=0; end; | 
| 42 |  |  |  | 
| 43 | gforget | 1.2 | %initialize environment variables and mygrid | 
| 44 | gforget | 1.6 | addpath gcmfaces; | 
| 45 | gforget | 1.10 | gcmfaces_global; | 
| 46 | gforget | 1.8 | myenv.issueWarnings=0; | 
| 47 | gforget | 1.3 | myenv.verbose=verbose; | 
| 48 |  |  | if myenv.verbose>0; | 
| 49 |  |  | gcmfaces_msg('* set path and environment variables (myenv) by calling gcmfaces_global'); | 
| 50 |  |  | end; | 
| 51 | gforget | 1.1 |  | 
| 52 | gforget | 1.7 | addpath MITprof; | 
| 53 | gforget | 1.6 | if ~isempty(which('MITprof_global')); | 
| 54 | gforget | 1.10 | MITprof_global; | 
| 55 |  |  | if myenv.verbose>0; | 
| 56 |  |  | gcmfaces_msg('* set MITprof path by calling MITprof_global'); | 
| 57 |  |  | end; | 
| 58 | gforget | 1.6 | end; | 
| 59 |  |  |  | 
| 60 | gforget | 1.5 | fprintf('\n\n'); | 
| 61 |  |  | gcmfaces_msg('/////////////////////////////////////'); | 
| 62 | gforget | 1.8 | gcmfaces_msg('demo of plotting routines','// PART 1 :'); | 
| 63 | gforget | 1.5 | gcmfaces_msg('please hit return','// >> '); | 
| 64 |  |  | gcmfaces_msg('/////////////////////////////////////'); | 
| 65 |  |  | fprintf('\n\n'); | 
| 66 |  |  | pause; | 
| 67 | gforget | 1.12 | example_display; | 
| 68 | gforget | 1.1 |  | 
| 69 | gforget | 1.5 | fprintf('\n\n'); | 
| 70 |  |  | gcmfaces_msg('///////////////////////////////////////////'); | 
| 71 | gforget | 1.13 | gcmfaces_msg('demo of remapping ','// PART 2 :'); | 
| 72 | gforget | 1.5 | gcmfaces_msg('please hit return','// >> '); | 
| 73 |  |  | gcmfaces_msg('///////////////////////////////////////////'); | 
| 74 |  |  | fprintf('\n\n'); | 
| 75 |  |  | pause; | 
| 76 | gforget | 1.13 | example_remap(0); | 
| 77 | gforget | 1.10 |  | 
| 78 | gforget | 1.13 | fprintf('\n\n'); | 
| 79 |  |  | gcmfaces_msg('///////////////////////////////////////////'); | 
| 80 |  |  | gcmfaces_msg('demo of bin averaging (gridding)','// PART 2 :'); | 
| 81 |  |  | gcmfaces_msg('please hit return','// >> '); | 
| 82 |  |  | gcmfaces_msg('///////////////////////////////////////////'); | 
| 83 |  |  | fprintf('\n\n'); | 
| 84 |  |  | pause; | 
| 85 |  |  | %alternatives | 
| 86 |  |  | %example_griddata; | 
| 87 |  |  | %example_interp; | 
| 88 |  |  | %example_faces2latlon2faces; | 
| 89 |  |  | fld=example_bin_average; | 
| 90 |  |  |  | 
| 91 |  |  | fprintf('\n\n'); | 
| 92 |  |  | gcmfaces_msg('///////////////////////////////////////////'); | 
| 93 |  |  | gcmfaces_msg('demo of smoothing ','// PART 2 :'); | 
| 94 |  |  | gcmfaces_msg('please hit return','// >> '); | 
| 95 |  |  | gcmfaces_msg('///////////////////////////////////////////'); | 
| 96 |  |  | fprintf('\n\n'); | 
| 97 |  |  | pause; | 
| 98 |  |  | example_smooth(fld); | 
| 99 | gforget | 1.1 |  | 
| 100 | gforget | 1.6 | fprintf('\n\n'); | 
| 101 |  |  | gcmfaces_msg('/////////////////////////////////////////'); | 
| 102 | gforget | 1.8 | gcmfaces_msg('demo of transport computations','// PART 3 :'); | 
| 103 |  |  | gcmfaces_msg('please hit return','// >> '); | 
| 104 |  |  | gcmfaces_msg('/////////////////////////////////////////'); | 
| 105 |  |  | fprintf('\n\n'); | 
| 106 |  |  | pause; | 
| 107 | gforget | 1.9 | diags=example_transports; | 
| 108 | gforget | 1.13 |  | 
| 109 | gforget | 1.8 | if ~isempty(diags); | 
| 110 | gforget | 1.13 | fprintf('\n\n'); | 
| 111 |  |  | gcmfaces_msg('/////////////////////////////////////////'); | 
| 112 |  |  | gcmfaces_msg('demo of transport display','// PART 3 :'); | 
| 113 |  |  | gcmfaces_msg('please hit return','// >> '); | 
| 114 |  |  | gcmfaces_msg('/////////////////////////////////////////'); | 
| 115 |  |  | fprintf('\n\n'); | 
| 116 | gforget | 1.8 | example_transports_disp(diags); | 
| 117 |  |  | end; | 
| 118 |  |  |  | 
| 119 |  |  | fprintf('\n\n'); | 
| 120 |  |  | gcmfaces_msg('/////////////////////////////////////////'); | 
| 121 | gforget | 1.6 | gcmfaces_msg('demo of budget computations','// PART 4 :'); | 
| 122 |  |  | gcmfaces_msg('please hit return','// >> '); | 
| 123 |  |  | gcmfaces_msg('/////////////////////////////////////////'); | 
| 124 |  |  | fprintf('\n\n'); | 
| 125 |  |  | pause; | 
| 126 | gforget | 1.9 | example_budget; | 
| 127 | gforget | 1.1 |  |