Saddle Points

Challenge Overview

Detect saddle points in a matrix.

Visit the saddle-points exercise on Exercism to read the full instructions and download the exercise files.

Community Solutions

View Community Solutions

The following are the top 1 community solutions by stars:

Solution 1 by @keiraville (⭐ 0) — View on Exercism

Source: Exercism sml/saddle-points

💡 View Solution

type point = {row: int, column: int};

fun saddlePoints ([] : int list list): point list = []
  | saddlePoints ([] :: _): point list = []
  | saddlePoints (matrix: int list list): point list =
  let
        fun rowMax (row: int list): int = foldl Int.max (hd row) (tl row)
        val rowMaximums = Vector.fromList (map rowMax matrix)

        fun transpose ([] :: _) = []