measurable

A simple shallowly-embedded DSL for dealing with measures.
Log | Files | Refs | README | LICENSE

commit bf9df624d63f741d7b4bec222969a6e9ac8dbb21
parent 66cb8fd8695ca17cc9a9775bb4aebf4173502ce4
Author: Jared Tobin <jared@jtobin.ca>
Date:   Sat, 19 Oct 2013 18:03:03 +1300

Fix tanh example.

Diffstat:
Mtests/Test.hs | 2+-
1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tests/Test.hs b/tests/Test.hs @@ -66,5 +66,5 @@ main = do let alpha = fromDensity $ density $ chiSquared 5 putStrLn $ "let X ~ N(2, 1), Y ~ chisq(5). variance of exp (tanh XY) " ++ - show (variance . push (exp . tanh) $ mu * nu) + show (variance . push (exp . tanh) $ phi * alpha)