MITgcm_contrib/gael/startup.m


locDir=pwd;%the directory where we start from and will come back to
matDir=pwd;%the directory where gcmfaces and MITprof were downloaded

test0=dir([matDir '/gcmfaces']); 
test1=dir([matDir '/MITprof']); 

if isempty(test0)|isempty(test1); error('startup.m : matDir needs to be the directory where gcmfaces & MITprof are located\n'); end;

cd([matDir '/gcmfaces']);
global gcmfaces_verbose; gcmfaces_verbose=0;
gcmfaces_path;

cd([matDir '/MITprof']);
global MITprof_verbose; MITprof_verbose=0;
MITprof_path;

cd(locDir);

clear locDir matDir test0 test1;


1	gforget	1.1
2			locDir=pwd;%the directory where we start from and will come back to
3			matDir=pwd;%the directory where gcmfaces and MITprof were downloaded
4
5			test0=dir([matDir '/gcmfaces']);
6			test1=dir([matDir '/MITprof']);
7
8			if isempty(test0)\|isempty(test1); error('startup.m : matDir needs to be the directory where gcmfaces & MITprof are located\n'); end;
9
10			cd([matDir '/gcmfaces']);
11			global gcmfaces_verbose; gcmfaces_verbose=0;
12			gcmfaces_path;
13
14			cd([matDir '/MITprof']);
15			global MITprof_verbose; MITprof_verbose=0;
16			MITprof_path;
17
18			cd(locDir);
19
20			clear locDir matDir test0 test1;
21
22