aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorjthorn <jthorn@e296648e-0e4f-0410-bd07-d597d9acff87>2003-06-26 10:27:32 +0000
committerjthorn <jthorn@e296648e-0e4f-0410-bd07-d597d9acff87>2003-06-26 10:27:32 +0000
commit17cf0df94dbce6b3f63b1d5062712c7954b067bb (patch)
tree4f177cc8737fe1ae00027a4c587d314bd97f942c /src
parentb1a90b48844f9f27a9512c11ca9ba94b76138b49 (diff)
fix several occurences of single quote (') in Fortran comments
since these confuse the Perl preprocessor :( :( -- Thanks to Ryoji for spotting this! git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinInitialData/Exact/trunk@187 e296648e-0e4f-0410-bd07-d597d9acff87
Diffstat (limited to 'src')
-rw-r--r--src/metrics/Alvi.F772
-rw-r--r--src/metrics/bowl.F772
-rw-r--r--src/metrics/multi_BH.F774
3 files changed, 4 insertions, 4 deletions
diff --git a/src/metrics/Alvi.F77 b/src/metrics/Alvi.F77
index 39b2879..cda692f 100644
--- a/src/metrics/Alvi.F77
+++ b/src/metrics/Alvi.F77
@@ -39,7 +39,7 @@ c locals
CCTK_REAL rin1,rin2,rout,x1,x2, r1, r2, r3, results(10)
C this is a vacuum solution with no cosmological constant
-C ==> it doesn't set the stress-energy tensor
+C ==> it does not set the stress-energy tensor
Tmunu_flag = .false.
if (firstcall) then
diff --git a/src/metrics/bowl.F77 b/src/metrics/bowl.F77
index ec239f6..be3955f 100644
--- a/src/metrics/bowl.F77
+++ b/src/metrics/bowl.F77
@@ -139,7 +139,7 @@ c Get parameters of the metric.
c Multiply the bowl strength "a" with a time evolution factor.
c The time evolution factor is taken to be a Fermi step centered
-c in `t0' and with a width `st'. The size of this step is always
+c in "t0" and with a width "st". The size of this step is always
c 1 so that far in the past we will always have flat space, and
c far in the future we will have the static bowl.
diff --git a/src/metrics/multi_BH.F77 b/src/metrics/multi_BH.F77
index 145d6a0..f5b62b2 100644
--- a/src/metrics/multi_BH.F77
+++ b/src/metrics/multi_BH.F77
@@ -56,8 +56,8 @@ c constants
CCTK_REAL zero,one
parameter (zero=0.0d0, one=1.0d0)
-C This model doesn't set the stress-energy tensor
-C FIXME: should it? I.e. isn't there a nonzero Maxwell tensor here?
+C This model does not set the stress-energy tensor
+C FIXME: should it? I.e. isn"t there a nonzero Maxwell tensor here?
Tmunu_flag = .false.
c Get parameters of the exact solution.