/[MITgcm]/MITgcm_contrib/gael/profilesMatlabProcessing/ecco_v4/insitu_diags.m
ViewVC logotype

Contents of /MITgcm_contrib/gael/profilesMatlabProcessing/ecco_v4/insitu_diags.m

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


Revision 1.2 - (show annotations) (download)
Wed Apr 18 20:24:45 2012 UTC (13 years, 3 months ago) by gforget
Branch: MAIN
Changes since 1.1: +24 -9 lines
- insitu_cost.m,insitu_misfit.m : use myparms.yearInAve
- MITprof_gcm2nc.m : fix nargin typo
- insitu_diags.m : use dirMat/dirTex and map them to subdirMat/subdirTex to drive insitu_cost.m,insitu_misfit.m

1 function []=insitu_diags(dirModel,dirMat,doComp,dirTex);
2 %object: driver for insitu_misfit and insitu_cost
3 %inputs: dirModel is the model run directory
4 % dirMat is the directory where diagnozed .mat files will be saved
5 % -> set it to '' to use the default [dirModel 'mat/']
6 % doComp states whether to compute (1) or display (0)
7 % dirTex is the directory where tex and fig files will be created
8
9 if dirMat(1)~='/'; dirMat=[pwd '/' dirMat]; end; %make full path
10 subdirMat={'subdirMat',[dirMat '/']};
11
12 subdirData={'subdirData',[dirMat '/profiles/output/']};
13
14 if isempty(who('dirTex'));
15 addToTex={'addToTex',0}; subdirTex={'subdirTex',''};
16 else;
17 if ~ischar(dirTex); error('mis-specified dirTex'); end;
18 if dirTex(1)~='/'; dirTex=[pwd '/' dirTex]; end; %make full path
19 addToTex={'addToTex',1}; subdirTex={'subdirTex',[dirTex '/']};
20 end;
21
22 if doComp;
23 insitu_misfit('',1,subdirData,subdirMat);
24 insitu_cost('',1,subdirData,subdirMat);
25 else;
26 insitu_misfit('',0,subdirData,subdirMat,addToTex,subdirTex);
27 insitu_cost('',0,subdirData,subdirMat,addToTex,subdirTex);
28 end;
29
30 return
31 %old example that may or may not work ...
32
33 dirModel='./apr1alpha_it0/';
34 listData={'listData','WOD09_XBT*'};
35 listVar={'listVar','T'};
36 suffMat={'suffMat','XBT'};
37 addToTex={'addToTex',1};
38
39 insitu_misfit(dirModel,1,listData,listVar,suffMat);
40 insitu_cost(dirModel,1,listData,listVar,suffMat);
41
42 mkdir([dirModel 'tex']);
43 write2tex([dirModel 'tex/myPlots.tex'],0);
44 insitu_misfit(dirModel,0,suffMat,addToTex);
45 insitu_cost(dirModel,0,suffMat,addToTex);
46 write2tex([dirModel 'tex/myPlots.tex'],4);
47

  ViewVC Help
Powered by ViewVC 1.1.22