From 8a9fd3312528432f516d22d4dc98937087c3c517 Mon Sep 17 00:00:00 2001
From: Oliver Kirsebom <oliver.kirsebom@gmail.com>
Date: Mon, 11 Dec 2017 17:57:29 +0100
Subject: [PATCH] neutron and proton mass in keV instead of MeV
---
bedepe.f | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/bedepe.f b/bedepe.f
index d3da260..121f455 100644
--- a/bedepe.f
+++ b/bedepe.f
@@ -22,8 +22,8 @@
character*80 histout,dataout
COMMON /PAWC/HMEMOR(8000000)
real malpha,me,QEC,mn,mp,mpar
- parameter(mn = 939.565002441406)
- parameter(mp = 938.271972656250)
+ parameter(mn = 939565.002441406)
+ parameter(mp = 938271.972656250)
parameter(malpha = 3727378.97610664)
parameter(amu = 931494.0)
PARAMETER(me = 510.99906)
--
GitLab