24 |
if isempty(verbose); verbose=0; end; |
if isempty(verbose); verbose=0; end; |
25 |
|
|
26 |
%initialize environment variables and mygrid |
%initialize environment variables and mygrid |
27 |
|
addpath gcmfaces; |
28 |
gcmfaces_global; |
gcmfaces_global; |
29 |
myenv.verbose=verbose; |
myenv.verbose=verbose; |
30 |
if myenv.verbose>0; |
if myenv.verbose>0; |
31 |
gcmfaces_msg('* set path and environment variables (myenv) by calling gcmfaces_global'); |
gcmfaces_msg('* set path and environment variables (myenv) by calling gcmfaces_global'); |
32 |
end; |
end; |
33 |
|
|
34 |
|
if ~isempty(which('MITprof_global')); |
35 |
|
MITprof_global; |
36 |
|
if myenv.verbose>0; |
37 |
|
gcmfaces_msg('* set MITprof path by calling MITprof_global'); |
38 |
|
end; |
39 |
|
end; |
40 |
|
|
41 |
fprintf('\n\n'); |
fprintf('\n\n'); |
42 |
gcmfaces_msg('/////////////////////////////////////////'); |
gcmfaces_msg('/////////////////////////////////////////'); |
43 |
gcmfaces_msg('demo of transport computations','// PART 1 :'); |
gcmfaces_msg('demo of transport computations','// PART 1 :'); |
71 |
example_interp(choiceGrid); |
example_interp(choiceGrid); |
72 |
example_faces2latlon2faces(choiceGrid); |
example_faces2latlon2faces(choiceGrid); |
73 |
|
|
74 |
|
fprintf('\n\n'); |
75 |
|
gcmfaces_msg('/////////////////////////////////////////'); |
76 |
|
gcmfaces_msg('demo of budget computations','// PART 4 :'); |
77 |
|
gcmfaces_msg('please hit return','// >> '); |
78 |
|
gcmfaces_msg('/////////////////////////////////////////'); |
79 |
|
fprintf('\n\n'); |
80 |
|
pause; |
81 |
|
example_budget(choiceGrid); |
82 |
|
|