diff --git a/src/prop.F90 b/src/prop.F90
index a03e4d4fdf5d1d8b9b51ba6948968033a38efcab..fa2ad9ea392328686cab1e6e59578e6094c7757e 100644
--- a/src/prop.F90
+++ b/src/prop.F90
@@ -262,9 +262,7 @@ Program proprietes
         write(f_output,*) 
         write(f_output,*) " >>> One particule density matrix"
         write(f_output,*) "     Not yet implemented"
-        call  dens(ndet,nvec,nblock, psi,det, d,rspin, &
-             g_info,o_info,int_info,prog_info,&
-             rho_tot,rho_spin)
+        call  dens(ndet,nvec, psi,det, d,rspin, o_info, rho_tot,rho_spin)
      end select
   end do