gael/matlab_class/gcmfaces_init.m


gcmfaces_global;

test0=dir('gcmfaces/sample_input');
if isempty(test0);
    fprintf('no sample input data found\n');
    return;
end;

warning('off','MATLAB:HandleGraphics:noJVM');

if myenv.verbose;
    fprintf('\n\n\n***********message from gcmfaces_init.m************\n ');
    fprintf(' starting basic test : plot_std_field ... \n');
end;
plot_std_field;

if ~myenv.lessplot;
    if myenv.verbose;
        fprintf('\n\n\n***********message from gcmfaces_init.m************\n ');
        fprintf(' starting plot test: plot_one_field ... \n');
    end;
    plot_one_field;
end;

if myenv.verbose;
    fprintf('\n\n\n***********message from gcmfaces_init.m************\n');
    fprintf(' --- initialization of gcmfaces completed correctly \n');
    fprintf(' --- you are all set and may now use the gcmfaces package. \n\n\n');
end;

1
2	gcmfaces_global;
3
4	test0=dir('gcmfaces/sample_input');
5	if isempty(test0);
6	fprintf('no sample input data found\n');
7	return;
8	end;
9
10	warning('off','MATLAB:HandleGraphics:noJVM');
11
12	if myenv.verbose;
13	fprintf('\n\n\n*********message from gcmfaces_init.m**********\n ');
14	fprintf(' starting basic test : plot_std_field ... \n');
15	end;
16	plot_std_field;
17
18	if ~myenv.lessplot;
19	if myenv.verbose;
20	fprintf('\n\n\n*********message from gcmfaces_init.m**********\n ');
21	fprintf(' starting plot test: plot_one_field ... \n');
22	end;
23	plot_one_field;
24	end;
25
26	if myenv.verbose;
27	fprintf('\n\n\n*********message from gcmfaces_init.m**********\n');
28	fprintf(' --- initialization of gcmfaces completed correctly \n');
29	fprintf(' --- you are all set and may now use the gcmfaces package. \n\n\n');
30	end;
31