main = do 
    let result = run 1000000
    print result
    print $minimum result
main = do 
    let result = run 1000000
    print result
    print $minimum result
main = do 
    let result = run 1000000
    print result
    print $minimum result