subroutine tide_data
      return
      end