(use-modules (srfi srfi-1))
; Return the first valid move we find.
(first (valid-moves))