/[MITgcm]/MITgcm_contrib/gael/profilesMatlabProcessing/MITprof_global.m
ViewVC logotype

Diff of /MITgcm_contrib/gael/profilesMatlabProcessing/MITprof_global.m

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

revision 1.1 by gforget, Mon Jul 28 19:34:16 2014 UTC revision 1.3 by gforget, Mon Jul 28 23:30:07 2014 UTC
# Line 7  function []=MITprof_global(varargin); Line 7  function []=MITprof_global(varargin);
7  %           - this routine replaces MITprof_path  %           - this routine replaces MITprof_path
8    
9  %get/define global variables:  %get/define global variables:
10  global mitprofenv;  gcmfaces_global;
11    
12  %take care of path:  %take care of path:
13  test0=which('MITprof_load.m');  test0=which('MITprof_load.m');
# Line 26  if isempty(test0); Line 26  if isempty(test0);
26  end;  end;
27    
28  %environment variables:  %environment variables:
29  if isempty(mitprofenv);  if ~isfield(myenv,'MITprof_dir');
30      test0=which('MITprof_global.m'); ii=strfind(test0,filesep);      test0=which('MITprof_global.m'); ii=strfind(test0,filesep);
31      mitprofenv.MITprof_dir=test0(1:ii(end));      myenv.MITprof_dir=test0(1:ii(end));
32      mitprofenv.verbose=0;      myenv.MITprof_griddir=fullfile(myenv.gcmfaces_dir,'sample_input','GRIDv4',filesep);
33      mitprofenv.lessplot=0;      myenv.MITprof_climdir=fullfile(myenv.gcmfaces_dir,'sample_input','OCCAetcONv4GRID',filesep);
     mitprofenv.lesstest=0;  
     mitprofenv.useNativeMatlabNetcdf = ~isempty(which('netcdf.open'));  
     %... check for gcmfaces  
34  end;  end;
35    
36  %send to workspace:  %send to workspace:
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.22