Added print messages to let user know whats going on

src/mode_merge.f90

@@ -20,6 +20,8 @@ module mode_merge
         integer :: i
         real(kind=dp) :: displace(3), temp_box_bd(6)
 
+        print *, '-----------------------Mode Merge---------------------------'
+        
         wrap = .false.
         shift_flag = .false.
 
@@ -34,6 +36,7 @@ module mode_merge
             !The new starts variable dictate where in the atom and element array each new 
             !file starts. This is used for additional options that can be applied to solely 
             !these new atoms/elements that are read in.
+
             new_starts(1) = atom_num + 1
             new_starts(2) = ele_num + 1
 
@@ -136,6 +139,8 @@ module mode_merge
         !Calculate the current shift which is the filenum-1 multiplied by the user specified shift
         current_shift = (filenum-1)*shift_vec
 
+        print *, "Atoms/elements from file ", trim(adjustl(infiles(filenum))), " are shifted by ", current_shift
+
         !First shift all the atoms
         do i = array_start(1), atom_num
             r_atom(:,i) = r_atom(:,i) + current_shift