http://projecteuler.net/index.php?section=problems&id=30 重複組合せを自作しました（15 + 25 + 25 = 25 + 15 + 25だから）。yieldを使うと簡単ですね。 let rec repeated_combination a n = seq { if n = 0 then yield [] else if a <> [] then for b in…