<HTML dir=ltr><HEAD><TITLE>RE: [mpich-discuss] program in system() executes before prior onefinishes</TITLE>
<META content="text/html; charset=unicode" http-equiv=Content-Type>
<META name=GENERATOR content="MSHTML 8.00.7600.16671"></HEAD>
<BODY>
<DIV dir=ltr id=idOWAReplyText39849>
<DIV dir=ltr><FONT color=#000000 size=2 face=Arial>Bingo! That works beautifully, Jayesh! </FONT></DIV>
<DIV dir=ltr><FONT size=2 face=Arial></FONT> </DIV>
<DIV dir=ltr><FONT size=2 face=Arial>Thank you VERY much!</FONT></DIV>
<DIV dir=ltr><FONT size=2 face=Arial></FONT> </DIV>
<DIV dir=ltr><FONT size=2 face=Arial>John Joseph</FONT></DIV></DIV>
<DIV dir=ltr><BR>
<HR tabIndex=-1>
<FONT size=2 face=Tahoma><B>From:</B> Jayesh Krishna [mailto:jayesh@mcs.anl.gov]<BR><B>Sent:</B> Fri 12/3/2010 10:39 AM<BR><B>To:</B> John Joseph<BR><B>Cc:</B> mpich-discuss@mcs.anl.gov<BR><B>Subject:</B> RE: [mpich-discuss] program in system() executes before prior onefinishes<BR></FONT><BR></DIV>
<DIV>
<P><FONT size=2>Hi,<BR> What is the error message that you get ? Can you try adding the command ("start /w swat_Edit.exe") into a batch file (say "swat_edit_batch.bat") and invoking the batch file from R (system("swat_edit_batch.bat"))?<BR><BR>Regards,<BR>Jayesh<BR>----- Original Message -----<BR>From: John Joseph <John.Joseph@utsa.edu><BR>To: Jayesh Krishna <jayesh@mcs.anl.gov><BR>Cc: mpich-discuss@mcs.anl.gov<BR>Sent: Fri, 03 Dec 2010 09:59:10 -0600 (CST)<BR>Subject: RE: [mpich-discuss] program in system() executes before prior onefinishes<BR><BR>Thanks for your response, Jayesh. The lines of code I've presented are actually written and executed in R, while the executables "swat_Edit.exe" and "swat2009.exe" are written and compiled in Fortran. I used the latest Intel Fortran compiler to compile swat2009.exe, but cannot alter swat_Edit.exe, as I do not have the source code. <BR><BR>system("start /w swat_Edit.exe") does not work in R. As far as Fortran, I'm sure you are more of an expert in it than I am. You seem to be saying that I might be able to write some Fortran code that that forces swat2009.exe to wait until swat_Edit.exe completely finishes. Is that right?<BR><BR>I appreciate even your guesses because I've been stumped by this for so long. And that goes for everyone else out there, too...even guesses/brainstorming are appreciated.<BR><BR>John Joseph<BR><BR>________________________________<BR><BR>From: Jayesh Krishna [<A href="mailto:jayesh@mcs.anl.gov">mailto:jayesh@mcs.anl.gov</A>]<BR>Sent: Fri 12/3/2010 9:17 AM<BR>To: John Joseph<BR>Cc: mpich-discuss@mcs.anl.gov<BR>Subject: Re: [mpich-discuss] program in system() executes before prior onefinishes<BR><BR><BR><BR>Hi,<BR> I am not a FORTRAN expert. Is system(...,...,...) (The version with 3 args) available with your compiler ? Which compiler are you using ?<BR> If you are running on Windows you can try,<BR><BR>=====================================<BR><BR> system("start /w swat_Edit.exe")<BR> system("swat2009.exe")<BR><BR>=====================================<BR><BR>Regards,<BR>Jayesh<BR><BR>----- Original Message -----<BR>From: John Joseph <John.Joseph@utsa.edu><BR>To: mpich-discuss@mcs.anl.gov<BR>Sent: Fri, 03 Dec 2010 07:03:08 -0600 (CST)<BR>Subject: [mpich-discuss] program in system() executes before prior one finishes<BR><BR><BR>Hello,<BR><BR>I have a problem I've been struggling with for months, and I'm thinking that folks that deal with parallel processing are the most likely ones to be able to solve it.<BR><BR>I have this simple code that I run in R on various Windows XP and Windows 7:<BR><BR>system("swat_Edit.exe",wait=FALSE,invisible=FALSE)<BR>system("swat2009.exe")<BR><BR>(Both swat_Edit.exe and swat2009.exe are compiled in Fortran. I have access to the swat2009.exe source code, but not to the swat_Edit.exe source code.)<BR><BR>In the first of the above two lines, swat_Edit.exe opens hundreds of ASCII files having data descriptive of water basin characteristics, edits them, and then closes them. In the second line, swat2009.exe reads those files to calculate streamflow at the water basin outlet. These two code lines are actually part of a loop in which the set of ASCII files is revised and the corresponding streamflow is calculated, and the loop typically cycles about 10,000 times. In each new cycle the streamflow calculated from the previous cycle is needed to direct swat_Edit.exe in revising the ASCII files so that swat2009.exe can calculate the streamflow for the new cycle.<BR><BR>Now, the problem is this: swat2009.exe sometimes begins executing BEFORE swat_Edit.exe finishes revising and closing all the ASCII files. As a partial remedy, I insert a Sys.sleep() line like this:<BR><BR>system("swat_Edit.exe",wait=FALSE,invisible=FALSE)<BR>Sys.sleep(7)<BR>system("swat2009.exe")<BR><BR>But this doesn't always work. It might work for, say, 7,553 cycles, but then on the 7,554th swat2009.exe starts before swat_Edit.exe is quite finished, and then the whole set of simulations, which takes a day or two, must start all over again. Also, Sys.sleep() adds time to the whole process. The higher the argument in Sys.sleep(), the less likely the crash, but the more the slow down - and the risk of swat2009.exe starting too soon is never completely eliminated even for Sys.sleep() times that far exceed the average time it takes swat_Edit.exe to complete its task.<BR><BR>The common sense reader might say, "Why not change the 'wait=FALSE' argument in the first line to 'wait=TRUE'?" Well, if I do that the command won't execute. I can change 'invisible=FALSE' to 'invisible=TRUE', but that doesn't seem to make a difference.<BR><BR>The problem is worst on my Core-i7, but also happens on an old single-processor computer I have.<BR><BR>MPICH and Rmpi are installed on my computers, and I'm hoping that I can somehow use them to positively prevent swat2009.exe from starting before swat_Edit.exe finishes.<BR><BR>I'm a newbie as far as mpi goes. Any ideas? Your help would be much appreciated.<BR><BR>John Joseph<BR><BR><BR><BR><BR><BR><BR><BR><BR><BR><BR><BR><BR><BR><BR><BR></FONT></P></DIV></BODY></HTML>