Skip to content

Instantly share code, notes, and snippets.

@KKostya
Created October 21, 2018 19:49
Show Gist options
  • Save KKostya/f6a5ce105f56fce1b0da5e27e3d3aac0 to your computer and use it in GitHub Desktop.
Save KKostya/f6a5ce105f56fce1b0da5e27e3d3aac0 to your computer and use it in GitHub Desktop.
let make_scenario_pmf : (door => real) => (door => choice => real) => (scenario => real) =
(door_pmf) => (strategy) => (s) => Real.({
door_pmf(s.prize) * strategy(s.first_guess, s.choice)
})
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment