kingCastleMove White Short =
  (toSquare eFile firstRank, toSquare gFile firstRank)
kingCastleMove White Short =
  (toSquare eFile firstRank, toSquare gFile firstRank)
kingCastleMove White Short =
  (toSquare eFile firstRank, toSquare gFile firstRank)