diff options
Diffstat (limited to 'src/qlm_multipoles.F90')
-rw-r--r-- | src/qlm_multipoles.F90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/qlm_multipoles.F90 b/src/qlm_multipoles.F90 index 9068f89..b8fab9b 100644 --- a/src/qlm_multipoles.F90 +++ b/src/qlm_multipoles.F90 @@ -220,7 +220,7 @@ contains function dp5 (z) CCTK_REAL, intent(in) :: z CCTK_REAL :: dp5 - dp5 = 315*eighth * z**4 - 105*fourth * z**2 - 15*eighth + dp5 = 315*eighth * z**4 - 105*fourth * z**2 + 15*eighth end function dp5 function dp6 (z) |