内包表記で生成したリストを2回使うと、スペースリークでシステムが停止してしまう

テクノロジーカテゴリーの変更を依頼記事元:

ja.stackoverflow.com

3users がブックマークコメント

記事へのコメント0件

注目コメント
新着コメント

新着コメントはまだありません。
このエントリーにコメントしてみましょう。

注目コメント算出アルゴリズムの一部にLINEヤフー株式会社の「建設的コメント順位付けモデルAPI」を使用しています

リンクを埋め込む

以下のコードをコピーしてサイトに埋め込むことができます

<iframe marginwidth="0" marginheight="0" src="https://b.hatena.ne.jp/entry.parts?url=https%3A%2F%2Fja.stackoverflow.com%2Fquestions%2F36399%2F%25E5%2586%2585%25E5%258C%2585%25E8%25A1%25A8%25E8%25A8%2598%25E3%2581%25A7%25E7%2594%259F%25E6%2588%2590%25E3%2581%2597%25E3%2581%259F%25E3%2583%25AA%25E3%2582%25B9%25E3%2583%2588%25E3%2582%25922%25E5%259B%259E%25E4%25BD%25BF%25E3%2581%2586%25E3%2581%25A8-%25E3%2582%25B9%25E3%2583%259A%25E3%2583%25BC%25E3%2582%25B9%25E3%2583%25AA%25E3%2583%25BC%25E3%2582%25AF%25E3%2581%25A7%25E3%2582%25B7%25E3%2582%25B9%25E3%2583%2586%25E3%2583%25A0%25E3%2581%258C%25E5%2581%259C%25E6%25AD%25A2%25E3%2581%2597%25E3%2581%25A6%25E3%2581%2597%25E3%2581%25BE%25E3%2581%2586" scrolling="no" frameborder="0" height="230" width="500"><div class="hatena-bookmark-detail-info"><a href="https://ja.stackoverflow.com/questions/36399/%E5%86%85%E5%8C%85%E8%A1%A8%E8%A8%98%E3%81%A7%E7%94%9F%E6%88%90%E3%81%97%E3%81%9F%E3%83%AA%E3%82%B9%E3%83%88%E3%82%922%E5%9B%9E%E4%BD%BF%E3%81%86%E3%81%A8-%E3%82%B9%E3%83%9A%E3%83%BC%E3%82%B9%E3%83%AA%E3%83%BC%E3%82%AF%E3%81%A7%E3%82%B7%E3%82%B9%E3%83%86%E3%83%A0%E3%81%8C%E5%81%9C%E6%AD%A2%E3%81%97%E3%81%A6%E3%81%97%E3%81%BE%E3%81%86">内包表記で生成したリストを2回使うと、スペースリークでシステムが停止してしまう</a><a href="https://b.hatena.ne.jp/entry/s/ja.stackoverflow.com/questions/36399/%E5%86%85%E5%8C%85%E8%A1%A8%E8%A8%98%E3%81%A7%E7%94%9F%E6%88%90%E3%81%97%E3%81%9F%E3%83%AA%E3%82%B9%E3%83%88%E3%82%922%E5%9B%9E%E4%BD%BF%E3%81%86%E3%81%A8-%E3%82%B9%E3%83%9A%E3%83%BC%E3%82%B9%E3%83%AA%E3%83%BC%E3%82%AF%E3%81%A7%E3%82%B7%E3%82%B9%E3%83%86%E3%83%A0%E3%81%8C%E5%81%9C%E6%AD%A2%E3%81%97%E3%81%A6%E3%81%97%E3%81%BE%E3%81%86">はてなブックマーク - 内包表記で生成したリストを2回使うと、スペースリークでシステムが停止してしまう</a></div></iframe>

プレビュー

規約違反を報告

いまの話題をアプリでチェック！

バナー広告なし
ミュート機能あり
ダークモード搭載

アプリをダウンロード

内包表記で生成したリストを2回使うと、スペースリークでシステムが停止してしまう

円周率を近似するコードです。 main :: IO () main = do let points = [(x,y) | x<-range 10000, y<-ran... 円周率を近似するコードです。 main :: IO () main = do let points = [(x,y) | x<-range 10000, y<-range 10000] let all = length $ points let hit = length $ filter ((<= 1) . distance) points putStrLn $ show $ (fromIntegral hit * 4) / (fromIntegral all) where range n = (map (/ n) [0 .. n]) distance (a,b) = sqrt(a*a+b*b) このコードを実行するとメモリが大量に消費され、システムが停止します。何か問題があるようです。しかし、hit だけを評価、あるいは all だけを評価すると、このコードは動作します。 main :