25 |
global mygrid; if isempty(mygrid); grid_load('GRID/',5,'compact'); end; |
global mygrid; if isempty(mygrid); grid_load('GRID/',5,'compact'); end; |
26 |
|
|
27 |
%set more optional paramaters to default values |
%set more optional paramaters to default values |
28 |
year0=1992; year1=2008; |
global myparms; year0=myparms.yearInAve(1); year1=myparms.yearInAve(2); |
29 |
|
%year0=1992; year1=2008; |
30 |
listData={'WOD09_XBT*','WOD09_CTD*','argo_in*','argo_at*','argo_pa*','seals*'}; |
listData={'WOD09_XBT*','WOD09_CTD*','argo_in*','argo_at*','argo_pa*','seals*'}; |
31 |
listVar={'T','S'}; |
listVar={'T','S'}; |
32 |
%shorter test case: listData={'argo_in*'}; listVar={'T'}; |
%shorter test case: listData={'argo_in*'}; listVar={'T'}; |
82 |
eval(['load ' dirData '/' subdirMat 'insitu_misfit' suffMat '.mat;']); |
eval(['load ' dirData '/' subdirMat 'insitu_misfit' suffMat '.mat;']); |
83 |
|
|
84 |
nk=size(vecDepth,1); |
nk=size(vecDepth,1); |
85 |
figureL; orient tall; |
figureL; |
86 |
for vv=1:length(listVar); |
for vv=1:length(listVar); |
87 |
varCur=listVar{vv}; |
varCur=listVar{vv}; |
88 |
for kkk=1:size(vecDepth,1); |
for kkk=1:size(vecDepth,1); |
96 |
end; |
end; |
97 |
end; |
end; |
98 |
|
|
99 |
myCaption={'model minus in situ profiles'}; |
myCaption={'Time mean misfit (model-data) for in situ profiles, ',... |
100 |
|
'at various depths (rows), for T (left; in K) and S (right; in psu).'}; |
101 |
if addToTex; write2tex([dirData '/' subdirTex '/myPlots.tex'],2,myCaption,gcf); end; |
if addToTex; write2tex([dirData '/' subdirTex '/myPlots.tex'],2,myCaption,gcf); end; |
102 |
|
|
103 |
end; |
end; |