SB
Size: a a a
И
let rec factorial n : bigint =
match n with
| x when x <= 1 -> 1I
| _ -> (n |> bigint) * factorial (n - 1)
На factorial 10UL компилятор ругаетсяP
И
P
P
И
P
IC
P
P
И
IC
P
P
И
VK
let rec inline factorial n =
match n with
| x when x <= LanguagePrimitives.GenericOne -> LanguagePrimitives.GenericOne
| _ -> n * factorial (n - LanguagePrimitives.GenericOne)P