simple probabilistic programming in Scheme