Message passing utility for parallel computing.

git-svn-id: https://www.dynare.org/svn/dynare/trunk@2663 ac1d8469-bf42-47a9-8791-bf33cf982152

matlab/fMessageStatus.m

@@ -0,0 +1,12 @@
+function fMessageStatus(prtfrc, njob, waitbarString, waitbarTitle, Local, MasterName, DyMo)
+
+global fname
+
+if nargin<4,
+  Local=1;
+end
+
+save(['comp_status_',fname,int2str(njob)],'prtfrc','njob','waitbarString','waitbarTitle');
+if Local==0,
+  copyfile(['comp_status_',fname,int2str(njob),'.mat'],['\\',MasterName,'\',DyMo(1),'$\',DyMo(4:end),'\']);
+end