diff options
author | diener <diener@2a26948c-0e4f-0410-aee8-f1d3e353619c> | 2002-07-26 09:33:13 +0000 |
---|---|---|
committer | diener <diener@2a26948c-0e4f-0410-aee8-f1d3e353619c> | 2002-07-26 09:33:13 +0000 |
commit | 3dac3d5fd060b0cc2d03db0712bbb94b4097404f (patch) | |
tree | 82e1bbd7ccbe028f5ebe6fc46edfaa9c49786a50 /src/EHFinder_Constants.F90 | |
parent | 09550e86f557510909856c2ebedf67e44235e6a1 (diff) |
Added eight = 8.0d0 as a constant.
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/EHFinder/trunk@38 2a26948c-0e4f-0410-aee8-f1d3e353619c
Diffstat (limited to 'src/EHFinder_Constants.F90')
-rw-r--r-- | src/EHFinder_Constants.F90 | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/EHFinder_Constants.F90 b/src/EHFinder_Constants.F90 index fa86316..49d0836 100644 --- a/src/EHFinder_Constants.F90 +++ b/src/EHFinder_Constants.F90 @@ -9,6 +9,7 @@ module EHFinder_Constants CCTK_REAL, parameter :: two = 2.0d0 CCTK_REAL, parameter :: three = 3.0d0 CCTK_REAL, parameter :: four = 4.0d0 + CCTK_REAL, parameter :: eight = 8.0d0 CCTK_REAL, parameter :: half = 0.5d0 CCTK_REAL, parameter :: tenth = 0.1d0 CCTK_REAL, parameter :: huge = 1d23 |