PARALLEL CONTEXT In a parallel context, this simply record the directory's files at time 't0'. INPUTS o PRCDir [] ... o Parallel [] ... OUTPUTS o PRCDirSnapshot [] ... Copyright (C) 2009-2011 Dynare Team This file is part of Dynare. Dynare is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, either version 3 of the License, or (at your option) any later version. Dynare is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with Dynare. If not, see <http://www.gnu.org/licenses/>.
0001 function [PRCDirSnapshot]=dynareParallelSnapshot(PRCDir,Parallel) 0002 % PARALLEL CONTEXT 0003 % In a parallel context, this simply record the directory's files at time 0004 % 't0'. 0005 % 0006 % 0007 % INPUTS 0008 % o PRCDir [] ... 0009 % o Parallel [] ... 0010 % 0011 % 0012 % OUTPUTS 0013 % o PRCDirSnapshot [] ... 0014 % 0015 % 0016 % 0017 % Copyright (C) 2009-2011 Dynare Team 0018 % 0019 % This file is part of Dynare. 0020 % 0021 % Dynare is free software: you can redistribute it and/or modify 0022 % it under the terms of the GNU General Public License as published by 0023 % the Free Software Foundation, either version 3 of the License, or 0024 % (at your option) any later version. 0025 % 0026 % Dynare is distributed in the hope that it will be useful, 0027 % but WITHOUT ANY WARRANTY; without even the implied warranty of 0028 % MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 0029 % GNU General Public License for more details. 0030 % 0031 % You should have received a copy of the GNU General Public License 0032 % along with Dynare. If not, see <http://www.gnu.org/licenses/>. 0033 0034 PRCDirSnapshot={}; 0035 0036 for indPC=1:length(Parallel), 0037 if Parallel(indPC).Local==0; 0038 % The first call ... 0039 PRCDirSnapshot{indPC}=dynareParallelListAllFiles('Root',PRCDir,Parallel(indPC)); 0040 0041 end 0042 end