diff --git a/Nmr/Makefile b/Nmr/Makefile
index 1aed8c969..952ee17ec 100644
--- a/Nmr/Makefile
+++ b/Nmr/Makefile
@@ -269,15 +269,10 @@ PWOBJS = \
 ../PW/save_in_cbands.o \
 ../PW/save_in_electrons.o \
 ../PW/save_in_ions.o \
-../PW/scala_cdiag.o \
-../PW/scala_cdiaghg.o \
-../PW/scala_utils.o \
 ../PW/scale_h.o \
-../PW/scopy_t3e.o \
 ../PW/seqopn.o \
 ../PW/set_fft_dim.o \
 ../PW/set_hubbard_l.o \
-../PW/set_kplusb.o \
 ../PW/set_kplusq.o \
 ../PW/set_kup_and_kdw.o \
 ../PW/set_rhoc.o \
diff --git a/Nmr/nmr.f90 b/Nmr/nmr.f90
index 05e08ef8f..5123469cb 100644
--- a/Nmr/nmr.f90
+++ b/Nmr/nmr.f90
@@ -21,7 +21,7 @@ program nmr
  USE ions_base,        ONLY : ntyp => nsp, ityp
  use parameters,       only : ntypx
  use gvect,            only : g, ngm, ecutwfc, nrxx
- use klist,            only : nks, xk, wk, b_length
+ use klist,            only : nks, xk, wk
  use cell_base,        only : tpiba2
  use wavefunctions_module, only: evc
  use wvfct,            only : npwx, nbnd, npw, igk, g2kin, et
@@ -50,7 +50,7 @@ program nmr
  complex (DP) :: kkterm_hh(3,3), kkterm_vv(3,3), dchi, &
       chihh(3,3), chivv(3,3)
 
- real (DP) :: emin, emax, chi_macro, test 
+ real (DP) :: emin, emax, chi_macro, test , b_length
 
  complex (DP) :: ZDOTC