cleanup

README.md

@@ -5,7 +5,7 @@
 Install the Haskell build tool `stack` and ensure `~/.local/bin` is in your `$PATH`
 
 ```
-curl -sSL https://get.haskellstack.org/ | sh
+curl -sSL https://get.haskellstack.org | sh -s - -d ~/.local/bin
 ```
 
 Run the demo:

src/AcceptReject.hs

@@ -30,4 +30,3 @@ main = do
     normalPointsAR <- generateNormalPointsAR 10 0 1
     putStrLn "Normal distribution points (Acceptance-Rejection):"
     print normalPointsAR
-

src/RandomUtils.hs

@@ -22,4 +22,3 @@ boxMullerTransform mu sigma (u1:u2:us) =
         z1 = sqrt (-2 * log u1) * sin (2 * pi * u2)
     in (mu + z0 * sigma) : (mu + z1 * sigma) : boxMullerTransform mu sigma us
 boxMullerTransform _ _ _ = []  -- If input list is not in pairs, return empty list
-