!+
! Subroutine tao_hook_init_beam () 
!
! Hook routine to initialize the beam for beam tracking
!
! Note: use the logical s%com%init_beam to control the standard beam initialization.
!-

subroutine tao_hook_init_beam ()

use tao_interface, dummy => tao_hook_init_beam

implicit none

!

end subroutine