!+ ! Subroutine out_io_line (line) ! ! Dummy routine for linker. ! See out_io for more details. !- Subroutine out_io_line (line) implicit none character(*) line end subroutine out_io_line