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

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

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

revision 1.2 by gforget, Sun May 2 21:28:52 2010 UTC revision 1.4 by gforget, Sun May 2 23:22:37 2010 UTC
# Line 4  global mydir; mydir=[pwd '/']; Line 4  global mydir; mydir=[pwd '/'];
4  fid=fopen([mydir 'gcmfaces_path.m'],'wt');  fid=fopen([mydir 'gcmfaces_path.m'],'wt');
5  fprintf(fid,['global mydir; mydir=''' mydir ''';\n']);  fprintf(fid,['global mydir; mydir=''' mydir ''';\n']);
6  fprintf(fid,['addpath ' mydir ';\n']);  fprintf(fid,['addpath ' mydir ';\n']);
 fprintf(fid,['addpath ' mydir 'gcmfaces_specs/;\n']);  
7  fprintf(fid,['addpath ' mydir 'gcmfaces_IO/;\n']);  fprintf(fid,['addpath ' mydir 'gcmfaces_IO/;\n']);
8  fprintf(fid,['addpath ' mydir 'gcmfaces_convert/;\n']);  fprintf(fid,['addpath ' mydir 'gcmfaces_convert/;\n']);
9  fprintf(fid,['addpath ' mydir 'gcmfaces_exch/;\n']);  fprintf(fid,['addpath ' mydir 'gcmfaces_exch/;\n']);
# Line 12  fprintf(fid,['addpath ' mydir 'gcmfaces_ Line 11  fprintf(fid,['addpath ' mydir 'gcmfaces_
11  fprintf(fid,['addpath ' mydir 'gcmfaces_misc/;\n']);  fprintf(fid,['addpath ' mydir 'gcmfaces_misc/;\n']);
12  fprintf(fid,['addpath ' mydir 'gcmfaces_calc/;\n']);  fprintf(fid,['addpath ' mydir 'gcmfaces_calc/;\n']);
13  fprintf(fid,['addpath ' mydir 'gcmfaces_smooth/;\n']);  fprintf(fid,['addpath ' mydir 'gcmfaces_smooth/;\n']);
14    %fprintf(fid,['addpath ' mydir 'gcmfaces_specs/;\n']);
15  %fprintf(fid,['addpath ' mydir 'gcmfaces_legacy/;\n']);  %fprintf(fid,['addpath ' mydir 'gcmfaces_legacy/;\n']);
16  %fprintf(fid,['addpath ' mydir 'gcmfaces_devel/;\n']);  %fprintf(fid,['addpath ' mydir 'gcmfaces_devel/;\n']);
17  fprintf(fid,['addpath ' mydir 'sample_analysis/;\n']);  fprintf(fid,['addpath ' mydir 'sample_analysis/;\n']);
# Line 25  fprintf(' ultimately you may want to cop Line 25  fprintf(' ultimately you may want to cop
25    
26  gcmfaces_path;  gcmfaces_path;
27    
28    test0=dir('sample_input'); if isempty(test0); fprintf('no sample input data found\n'); return; end;
29    
30  fprintf('\n\n\n***********message from gcmfaces_init.m************\n ');  fprintf('\n\n\n***********message from gcmfaces_init.m************\n ');
31  fprintf(' starting 1st example routine: plot_one_field ... \n');  fprintf(' starting 1st example routine: plot_one_field ... \n');
32    
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.4
  ViewVC Help
Powered by ViewVC 1.1.22