diff options
Diffstat (limited to 'src/metrics/bowl.F77')
-rw-r--r-- | src/metrics/bowl.F77 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/metrics/bowl.F77 b/src/metrics/bowl.F77 index 100d5e2..e70aad3 100644 --- a/src/metrics/bowl.F77 +++ b/src/metrics/bowl.F77 @@ -194,7 +194,7 @@ c I use the same trick as above. rr2 = (one - a*fac/(one + dexp(-s*(r-c)))/r)**2 else - write (warn_buffer, '(a,i)') + write (warn_buffer, '(a,i8)') $ 'Unknown type = ', type call CCTK_WARN(0, warn_buffer) |