From b1cf20d5c18fc061205154b095bf345e8514d726 Mon Sep 17 00:00:00 2001
From: Wim Haeck <whaeck@gmail.com>
Date: Thu, 11 Oct 2018 13:24:52 -0600
Subject: [PATCH] Corrected value of hbar, see issue #106

---
 src/phys.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/phys.f90 b/src/phys.f90
index 82ab4b8d..81345b23 100644
--- a/src/phys.f90
+++ b/src/phys.f90
@@ -24,7 +24,7 @@ module physics
    real(kr),parameter,public::clight=2.99792458e10_kr   !cm/s
    real(kr),parameter,public::amu=931.4940954e6_kr*ev/&
                                         (clight*clight) !g/amu
-   real(kr),parameter,public::hbar=6.58219514e-16_kr*ev !Planck/2pi, erg
+   real(kr),parameter,public::hbar=6.582119514e-16_kr*ev !Planck/2pi, erg
    real(kr),parameter,public::finstri=1.e16_kr*hbar/(ev*ev*clight) !inv fine str
 ! ****************************************************************
 ! * Light particle masses (in amu), per ENDF-102, Appendix H:    *