gilbert189 — 11/19/2023, 1:16:58 PM

select x p q
  | True = p
  | False = q

main = putStr (select (1 == 1) "yes" "no")