exception negativeInteger
fun factorial n =
    if n < 0 then raise negativeInteger
    else if n = 0 then 1
    else n * factorial (n-1)
(* Comment *)