aboutsummaryrefslogtreecommitdiff
path: root/src/metrics/Schwarzschild_Lemaitre.F77
diff options
context:
space:
mode:
Diffstat (limited to 'src/metrics/Schwarzschild_Lemaitre.F77')
-rw-r--r--src/metrics/Schwarzschild_Lemaitre.F775
1 files changed, 3 insertions, 2 deletions
diff --git a/src/metrics/Schwarzschild_Lemaitre.F77 b/src/metrics/Schwarzschild_Lemaitre.F77
index 07dee55..844975d 100644
--- a/src/metrics/Schwarzschild_Lemaitre.F77
+++ b/src/metrics/Schwarzschild_Lemaitre.F77
@@ -35,11 +35,12 @@ c output arguments
c local static variables
logical firstcall
+ CCTK_REAL lam, mas
data firstcall /.true./
- save firstcall
+ save firstcall, lam, mas
c local variables
- CCTK_REAL lam, mas, r2, ppp, unu, doi
+ CCTK_REAL r2, ppp, unu, doi
C This model has a cosmological constant
Tmunu_flag = .true.