!+ ! Subroutine tao_hook_init_data () ! ! Hook routine to initialize data. !- subroutine tao_hook_init_data () use tao_init_data_mod, dummy => tao_hook_init_data implicit none ! end subroutine