3 lines
61 B
Text
3 lines
61 B
Text
fun {Fac1 N}
|
|
{FoldL {List.number 1 N 1} Number.'*' 1}
|
|
end
|
fun {Fac1 N}
|
|
{FoldL {List.number 1 N 1} Number.'*' 1}
|
|
end
|