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

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

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

revision 1.2 by gforget, Thu Jan 17 20:23:22 2013 UTC revision 1.3 by gforget, Mon Jul 28 20:54:09 2014 UTC
# Line 13  function []=gcmfaces_global(varargin); Line 13  function []=gcmfaces_global(varargin);
13  %           - calls to this routine will eventually replace  %           - calls to this routine will eventually replace
14  %           both gcmfaces_path and 'global mygrid' calls.  %           both gcmfaces_path and 'global mygrid' calls.
15    
   
16  %set optional paramaters to default values  %set optional paramaters to default values
17  resetGrid=0; listVars={};  resetGrid=0; listVars={};
18  %set more optional paramaters to user defined values  %set more optional paramaters to user defined values
# Line 50  global myenv mygrid; Line 49  global myenv mygrid;
49  %take care of path:  %take care of path:
50  test0=which('convert2gcmfaces.m');  test0=which('convert2gcmfaces.m');
51  if isempty(test0);  if isempty(test0);
52      test0=which('gcmfaces_global.m'); ii=strfind(test0,'/');      test0=which('gcmfaces_global.m'); ii=strfind(test0,filesep);
53      mydir=test0(1:ii(end));      mydir=test0(1:ii(end));
54      %      %
55      eval(['addpath ' mydir ';']);      eval(['addpath ' mydir ';']);
# Line 70  end; Line 69  end;
69    
70  %environment variables:  %environment variables:
71  if isempty(myenv);  if isempty(myenv);
72      test0=which('gcmfaces_global.m'); ii=strfind(test0,'/');      test0=which('gcmfaces_global.m'); ii=strfind(test0,filesep);
73      myenv.gcmfaces_dir=test0(1:ii(end));      myenv.gcmfaces_dir=test0(1:ii(end));
74      myenv.verbose=0;      myenv.verbose=0;
75      myenv.lessplot=0;      myenv.lessplot=0;
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.22