fun fact (n) =
    if n =? 0 then 1 else n * fact (n - 1) fi

val main =
    print_int (fact (5))