úΗó(c) 2015 Jared TobinMITJared Tobin <jared@jtobin.ca>unstableghcNone!":DRTrace n8 iterations of a Markov chain and stream them to stdout.Nlet rosenbrock [x0, x1] = negate (5 *(x1 - x0 ^ 2) ^ 2 + 0.05 * (1 - x0) ^ 2)7withSystemRandom . asGenIO $ mcmc 3 1 [0, 0] rosenbrock)-3.854097694213343e-2,0.16688601288358407(-9.310661272172682e-2,0.2562387977415508(-0.48500122500661846,0.46245400501919076%A slice sampling transition operator.       )speedy-slice-0.2.0-AfuZDXmBLIf2lAKoGUObPrNumeric.MCMC.Slice*mwc-random-0.13.5.0-9fVrEibWMFm8DwR7HO0MWXSystem.Random.MWCasGenIOcreatewithSystemRandomcreateSystemRandommcmcslicechain findBracketexpandBracketLeftexpandBracketRightexpandBracketBy rejection