small correction

Author: yvanrichard

parallelisation/run-all-sims.r

@@ -11,8 +11,8 @@ for (cp in comps)
     cat('*****', cp,'\n')
     ## run make on remote computer within screen
     makef <- sprintf('makefile0-%s',cp)
-    cmd <- sprintf('ssh -A %s@%s "cd dragonfly/%s/%s; make -f %s -j%i &"',
-                     user, cp, projectname, runfold, makef, ca$cores[ca$comp==cp])
+    cmd <- sprintf('ssh -A %s@%s "cd %s/%s/%s; make -f %s -j%i &"',
+                     user, cp, basefold, projectname, runfold, makef, ca$cores[ca$comp==cp])
     cat(cmd,'\n')
     system(cmd, wait=F)
   }

run1.r

@@ -2,7 +2,6 @@ rm(list=ls())
 
 library(compiler)
 
-source('pars_job.r')
 source('pars_parallel.r')
 
 loadcmp('parallelisation/functions_cmp.r')