aboutsummaryrefslogtreecommitdiff
path: root/src/ckerr.x
diff options
context:
space:
mode:
Diffstat (limited to 'src/ckerr.x')
-rw-r--r--src/ckerr.x6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/ckerr.x b/src/ckerr.x
index 7d7e754..772c3ed 100644
--- a/src/ckerr.x
+++ b/src/ckerr.x
@@ -1,7 +1,7 @@
- mass = sqrt(2.00000000000000d0 + sqrt(4.0000000000000d0 + byJ**2
+ mass = sqrt(2.0 + sqrt(4.0 + byJ**2
& ))
a = byJ/mass
- rBL = 5.0000000000000d-1*exp(eta(i,j,k))*(1.00000000000000d0 + (1.d0*(a
+ rBL = 5.0e-1*exp(eta(i,j,k))*(1.0 + (1.0*(a
& + mass)*exp(-eta(i,j,k)))/sqrt(-a**2 + mass**2))*sqrt(-a**2 + mass**2)
- & *(1.00000000000000d0 + (1.d0*(a + mass)*exp(-eta(i,j,k)))/sqrt(a**2 + m
+ & *(1.0 + (1.*(a + mass)*exp(-eta(i,j,k)))/sqrt(a**2 + m
& ass**2))