【.NET】F#について語れ【OCAML】
■ このスレッドは過去ログ倉庫に格納されています
0439デフォルトの名無しさん
2009/02/11(水) 08:56:56lazyに考えれば、もっとシンプルに書けるんじゃね(´・ω・`)?
let rec fix (f : Lazy<_>) = f.Force() (lazy fix f)
let fact = fix <| lazy fun f x -> if x = 0 then 1 else x * f.Force() (x - 1)
do fact 5 |> printfn "%d"
■ このスレッドは過去ログ倉庫に格納されています