Print the final string after a successful execution

src/wannier_prog.F90

@@ -171,6 +171,8 @@ program wannier
 #ifdef MPI
     call mpi_finalize(ierr)
 #endif
+    ! if (rank == 0) write (stderr, *) TRIM(seedname)//'.nnkp', ' file written.'
+    if (rank == 0) write (stderr, *) 'All done: wannier90 exiting.'
     stop
   endif
 
@@ -474,6 +476,7 @@ subroutine write_kmesh(common_data, istdout, istderr, ierr)
         call prterr(error, ierr, istdout, istderr, common_data%comm)
         return
       endif
+    write (stderr, *) TRIM(seedname)//'.nnkp', ' file written.'
     endif
     call comms_sync_err(common_data%comm, error, 0) ! this is necessary since non-root may never enter an mpi collective if root has exited here
   end subroutine write_kmesh