Laboratory observations and calculations of the depth averaged flow patterns in a square harbor on a tidal river