subroutine ticks (major,minor)
      call tick4 (major,minor,major,minor)
      return
      end