diff options
author | lanfer <lanfer@89daf98e-ef62-4674-b946-b8ff9de2216c> | 1999-11-01 10:18:22 +0000 |
---|---|---|
committer | lanfer <lanfer@89daf98e-ef62-4674-b946-b8ff9de2216c> | 1999-11-01 10:18:22 +0000 |
commit | 9226b00f06d9248b8f8213ed1847990a736f2080 (patch) | |
tree | eaaee232fe587815f9508585cfad5bd83cb40df4 /src/AHFinder_pow.F | |
parent | 6b1568e9c8e7e1573d4047aa3e9b86e7a0779e77 (diff) |
putting files into outdir (appending a / after outdir)
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/AHFinder/trunk@24 89daf98e-ef62-4674-b946-b8ff9de2216c
Diffstat (limited to 'src/AHFinder_pow.F')
-rw-r--r-- | src/AHFinder_pow.F | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/AHFinder_pow.F b/src/AHFinder_pow.F index 9acf62b..e3f1dd7 100644 --- a/src/AHFinder_pow.F +++ b/src/AHFinder_pow.F @@ -103,7 +103,7 @@ c Note that including cactus.h will also include AHFinder.h end if if ((myproc.eq.0).and.logfile) then - logf = filestr(1:nfile)//"ahf_logfile" + logf = filestr(1:nfile)//"/ahf_logfile" open(1,file=logf,form='formatted',status='old', . position='append') write(1,*) @@ -708,7 +708,7 @@ c Note that including cactus.h will also include AHFinder.h ! *** OPEN LOGFILE *** ! ************************ - logf = filestr(1:nfile)//"ahf_logfile" + logf = filestr(1:nfile)//"/ahf_logfile" if (logfile.and.(myproc.eq.0)) then open(1,file=logf,form='formatted',status='old', |