diff --git a/configure b/configure
index 9f677e92..98970655 100755
--- a/configure
+++ b/configure
@@ -138,7 +138,7 @@ zeromq = Info(
     default_path=join(QP_ROOT_LIB, "libzmq.a"))
 
 gmp= Info(
-    url='https://gmplib.org/download/gmp/gmp-6.1.2.tar.bz2',
+    url='ftp://ftp.gnu.org/gnu/gmp/gmp-6.1.2.tar.bz2',
     description=' The GNU Multiple Precision Arithmetic Library',
     default_path=join(QP_ROOT_LIB, "libgmp.a"))
 
diff --git a/src/Integrals_Bielec/map_integrals.irp.f b/src/Integrals_Bielec/map_integrals.irp.f
index 7d1714b0..03f0f073 100644
--- a/src/Integrals_Bielec/map_integrals.irp.f
+++ b/src/Integrals_Bielec/map_integrals.irp.f
@@ -100,7 +100,7 @@ subroutine bielec_integrals_index_reverse(i,j,k,l,i1)
       call bielec_integrals_index(i(ii),j(ii),k(ii),l(ii),i2)
       if (i1 /= i2) then
         print *,  i1, i2
-        print *,  i(ii), j(jj), k(jj), l(jj)
+        print *,  i(ii), j(ii), k(ii), l(ii)
         stop 'bielec_integrals_index_reverse failed'
       endif
     endif
@@ -447,7 +447,7 @@ subroutine get_mo_bielec_integrals(j,k,l,sze,out_val,map)
     call bielec_integrals_index(i,j,k,l,hash(i))
   enddo
   
-  if (key_kind == 8) then
+  if (integral_kind == 8) then
     call map_get_many(map, hash, out_val, sze)
   else
     call map_get_many(map, hash, tmp_val, sze)
@@ -534,7 +534,7 @@ subroutine get_mo_bielec_integrals_coulomb_ii(k,l,sze,out_val,map)
     call bielec_integrals_index(k,i,l,i,hash(i))
   enddo
   
-  if (key_kind == 8) then
+  if (integral_kind == 8) then
     call map_get_many(map, hash, out_val, sze)
   else
     call map_get_many(map, hash, tmp_val, sze)
@@ -567,7 +567,7 @@ subroutine get_mo_bielec_integrals_exch_ii(k,l,sze,out_val,map)
     call bielec_integrals_index(k,i,i,l,hash(i))
   enddo
   
-  if (key_kind == 8) then
+  if (integral_kind == 8) then
     call map_get_many(map, hash, out_val, sze)
   else
     call map_get_many(map, hash, tmp_val, sze)