23 |
dirData=input(['does not exist. Specify directory of nc file : \n']); |
dirData=input(['does not exist. Specify directory of nc file : \n']); |
24 |
end; |
end; |
25 |
|
|
26 |
|
listData=dir([dirData '*.nc']); |
27 |
|
|
28 |
dirMat={'dirMat',dirMat}; |
dirMat={'dirMat',dirMat}; |
29 |
dirData={'dirData',dirData}; |
dirData={'dirData',dirData}; |
30 |
|
listData={'listData',listData(:).name}; |
31 |
|
|
32 |
if isempty(who('dirTex')); |
if isempty(who('dirTex')); |
33 |
addToTex={'addToTex',0}; dirTex={'dirTex',''}; nameTex={'nameTex',''}; |
addToTex={'addToTex',0}; dirTex={'dirTex',''}; nameTex={'nameTex',''}; |
40 |
end; |
end; |
41 |
|
|
42 |
if doComp; |
if doComp; |
43 |
insitu_misfit(1,dirData,dirMat); |
fprintf('starting insitu_misfit\n'); clock |
44 |
insitu_cost(1,dirData,dirMat); |
insitu_misfit(1,dirData,dirMat,listData); |
45 |
|
fprintf('starting insitu_cost\n'); clock |
46 |
|
insitu_cost(1,dirData,dirMat,listData); |
47 |
|
fprintf('done with insitu_diags\n'); clock |
48 |
else; |
else; |
49 |
insitu_misfit(0,dirMat,addToTex,dirTex,nameTex); |
insitu_misfit(0,dirMat,addToTex,dirTex,nameTex); |
50 |
insitu_cost(0,dirMat,addToTex,dirTex,nameTex); |
insitu_cost(0,dirMat,addToTex,dirTex,nameTex); |