diff options
| author | allen <allen@41e88fdd-2190-4c69-9c84-4659c8cf322e> | 2002-08-21 15:59:30 +0000 |
|---|---|---|
| committer | allen <allen@41e88fdd-2190-4c69-9c84-4659c8cf322e> | 2002-08-21 15:59:30 +0000 |
| commit | 9b7d7994e7c413e9e750c945588e6f7ef2a0b012 (patch) | |
| tree | 93dc26fb8a9634c4d7fb6895cc132e28bcb3783b | |
| parent | 8354c54589053154324c795165705759a8af8dfb (diff) | |
Fixed typo in last commit
git-svn-id: http://svn.cactuscode.org/arrangements/CactusWave/IDScalarWaveElliptic/trunk@54 41e88fdd-2190-4c69-9c84-4659c8cf322e
| -rw-r--r-- | src/SourceData.F77 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/SourceData.F77 b/src/SourceData.F77 index 1bdfe37..2659f89 100644 --- a/src/SourceData.F77 +++ b/src/SourceData.F77 @@ -104,7 +104,7 @@ c Set parameters for specific solvers end if write(infoline,'("Going into elliptic solver ",A)') fsolver - call CCTK_INFO(infoline(1:len_rim(infoline))) + call CCTK_INFO(infoline(1:len_trim(infoline))) c Call elliptic solver to fill out phi |