KKostya
10/21/2018 - 8:15 PM

prize_door.re

let prize = 1000000.0

type door =
  | DoorA
  | DoorB
  | DoorC