diff options
Diffstat (limited to 'lib/Data/Packed/Random.hs')
| -rw-r--r-- | lib/Data/Packed/Random.hs | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/lib/Data/Packed/Random.hs b/lib/Data/Packed/Random.hs index 7e0f91f..260e4dc 100644 --- a/lib/Data/Packed/Random.hs +++ b/lib/Data/Packed/Random.hs | |||
| @@ -48,7 +48,6 @@ uniformSample :: Int -- ^ seed | |||
| 48 | uniformSample seed n rgs = m where | 48 | uniformSample seed n rgs = m where |
| 49 | (as,bs) = unzip rgs | 49 | (as,bs) = unzip rgs |
| 50 | a = fromList as | 50 | a = fromList as |
| 51 | b = fromList bs | ||
| 52 | cs = zipWith subtract as bs | 51 | cs = zipWith subtract as bs |
| 53 | d = dim a | 52 | d = dim a |
| 54 | dat = toRows $ reshape n $ randomVector seed Uniform (n*d) | 53 | dat = toRows $ reshape n $ randomVector seed Uniform (n*d) |