diff options
| author | diener <diener@2a26948c-0e4f-0410-aee8-f1d3e353619c> | 2003-07-02 09:50:08 +0000 |
|---|---|---|
| committer | diener <diener@2a26948c-0e4f-0410-aee8-f1d3e353619c> | 2003-07-02 09:50:08 +0000 |
| commit | c32ff041769483f6ad9bf28a9b8f65ed3e06360a (patch) | |
| tree | 7bf5bd93c46a7d0da370b3832ea94fd357672796 | |
| parent | 116ecf1f8ad5bbd3ad74f9367bf7907d8c43d0ce (diff) | |
Added a missing d0 on the definition of pi. Now it should be double
precision. Thanks to Frank Herrmann for spotting this.
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/EHFinder/trunk@122 2a26948c-0e4f-0410-aee8-f1d3e353619c
| -rw-r--r-- | src/EHFinder_Constants.F90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/EHFinder_Constants.F90 b/src/EHFinder_Constants.F90 index 3c60ec8..fdd5b6f 100644 --- a/src/EHFinder_Constants.F90 +++ b/src/EHFinder_Constants.F90 @@ -18,5 +18,5 @@ module EHFinder_Constants CCTK_REAL, parameter :: quarter = 0.25d0 CCTK_REAL, parameter :: tenth = 0.1d0 CCTK_REAL, parameter :: huge = 1d23 - CCTK_REAL, parameter :: pi = 3.1415926535897932385 + CCTK_REAL, parameter :: pi = 3.1415926535897932385d0 end module EHFinder_Constants |