Included check for existence of structure of Global variables
git-svn-id: https://www.dynare.org/svn/dynare/trunk@2691 ac1d8469-bf42-47a9-8791-bf33cf982152time-shift
parent
490fc6a900
commit
7c07a0dab5
|
@ -25,8 +25,13 @@ fInputVar.DyMo=DyMo;
|
||||||
[tempo, MasterName]=system('hostname');
|
[tempo, MasterName]=system('hostname');
|
||||||
MasterName=MasterName(1:end-1);
|
MasterName=MasterName(1:end-1);
|
||||||
fInputVar.MasterName = MasterName;
|
fInputVar.MasterName = MasterName;
|
||||||
save([fname,'_input.mat'],'fInputVar','fGlobalVar')
|
|
||||||
|
|
||||||
|
if exist('fGlobalVar'),
|
||||||
|
save([fname,'_input.mat'],'fInputVar','fGlobalVar')
|
||||||
|
else
|
||||||
|
save([fname,'_input.mat'],'fInputVar')
|
||||||
|
end
|
||||||
|
save([fname,'_input.mat'],'Parallel','-append')
|
||||||
for j=1:length(Parallel),
|
for j=1:length(Parallel),
|
||||||
nCPU(j)=length(Parallel(j).NumCPU);
|
nCPU(j)=length(Parallel(j).NumCPU);
|
||||||
totCPU=totCPU+nCPU(j);
|
totCPU=totCPU+nCPU(j);
|
||||||
|
@ -210,8 +215,10 @@ end
|
||||||
break
|
break
|
||||||
end
|
end
|
||||||
end
|
end
|
||||||
|
delete([fname,'_input.mat'])
|
||||||
for j=1:totCPU,
|
for j=1:totCPU,
|
||||||
load([fname,'_output_',int2str(j),'.mat'],'fOutputVar');
|
load([fname,'_output_',int2str(j),'.mat'],'fOutputVar');
|
||||||
|
delete([fname,'_output_',int2str(j),'.mat']);
|
||||||
fOutVar(j)=fOutputVar;
|
fOutVar(j)=fOutputVar;
|
||||||
|
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue