F#はじめました

30分プログラム、その805。

インストール

使い方

$ mono $FSHARP_HOME/bin/fsc.exe
$ cp $FSHARP_HOME/bin/FSharp.Core.* .
$ mono fact.exe
3628800

ソースコード

let rec fact n =
    if n = 0 then
        1
    else
        n * (fact (n - 1))

printf "%d\n" (fact 10);;