diff --git a/el_nuc_el.irp.f b/el_nuc_el.irp.f
index 1190e8d..081693a 100644
--- a/el_nuc_el.irp.f
+++ b/el_nuc_el.irp.f
@@ -29,4 +29,6 @@ BEGIN_PROVIDER [double precision, factor_een]
     end do
  end do
 
+ factor_een = 0.5d0 * factor_een
+
 END_PROVIDER
diff --git a/nuclei.irp.f b/nuclei.irp.f
index c2b431c..568636b 100644
--- a/nuclei.irp.f
+++ b/nuclei.irp.f
@@ -56,4 +56,6 @@ BEGIN_PROVIDER [double precision, factor_en]
             / (1 + aord_vect(2) * rescale_en(i, j)) + pow_ser
     end do
  end do
+
+ factor_en = 0.5d0 * factor_en
 END_PROVIDER