diff --git a/base/internals/psi_dswapdata.F90 b/base/internals/psi_dswapdata.F90
index de50650e..42df115c 100644
--- a/base/internals/psi_dswapdata.F90
+++ b/base/internals/psi_dswapdata.F90
@@ -1075,12 +1075,10 @@ subroutine psi_dswapdata_vect(flag,beta,y,desc_a,work,info,data)
   end if
   
   if ((data_ == psb_comm_halo_) .and. (beta == dzero)) then 
-    write(0,*) me,' Going for ISWAPDATA with cached index types'
     call psi_swapdata(ictxt,icomm,flag,beta,y,d_idx,totxch,idxs,idxr,&
          & desc_a%sendtypes(:,psb_rdpkidx_),desc_a%recvtypes(:,psb_rdpkidx_),&
          & work,info)
   else
-    write(0,*) me,' Going for default ISWAPDATA'
     call psi_swapdata(ictxt,icomm,flag,beta,y,d_idx,totxch,idxs,idxr,&
          & work,info)
   end if