Skip to content
This repository
Fetching contributors…

Octocat-spinner-32-eaf2f5

Cannot retrieve contributors at this time

file 8 lines (6 sloc) 0.211 kb
1 2 3 4 5 6 7
fun fact(x) = case (x ==: 0:) of {
                    0 => x *: fact(x - 1)
                  | _ => 1:
              }

fun main() = let f = fact(200:) in
                 %WriteString(%BigString(f) ++ "\n")
Something went wrong with that request. Please try again.