diff --git a/PHonon/PH/add_zstar_ue_us.f90 b/PHonon/PH/add_zstar_ue_us.f90
index 800a377fe..f8327f28b 100644
--- a/PHonon/PH/add_zstar_ue_us.f90
+++ b/PHonon/PH/add_zstar_ue_us.f90
@@ -71,7 +71,7 @@ subroutine add_zstar_ue_us(imode0,npe)
            ! Note: we need becp1
            !
            pdsp = (0.d0,0.d0)
-           call psidspsi (ik, u (1, mode), pdsp,npw)
+           call psidspsi (ik, u (1, mode), pdsp )
 #ifdef __MPI
            call mp_sum(pdsp, intra_pool_comm )
 #endif
diff --git a/PHonon/PH/zstar_eu_us.f90 b/PHonon/PH/zstar_eu_us.f90
index e0e0a08b5..2149d697f 100644
--- a/PHonon/PH/zstar_eu_us.f90
+++ b/PHonon/PH/zstar_eu_us.f90
@@ -211,7 +211,7 @@ subroutine zstar_eu_us
               call davcio (dvpsi, lrebar, iuebar, nrec, - 1)
               !
               pdsp = (0.d0,0.d0)
-              call psidspsi (ik, u (1, mode), pdsp,npw)
+              call psidspsi (ik, u (1, mode), pdsp )
 #ifdef __MPI
               call mp_sum( pdsp, intra_pool_comm )
 #endif