!+
! Program tao_program
!
! Program wrapper
!-

program tao_program

use tao_interface

implicit none

! Call tao_top_level and we are done.

call tao_top_level()

end program