src/Tools/SML/factorial.sml
author wenzelm
Fri, 01 Jan 2016 14:44:52 +0100
changeset 62026 ea3b1b0413b4
parent 56276 9e2d5e3debd3
permissions -rw-r--r--
more symbols;
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
56276
9e2d5e3debd3 some SML examples;
wenzelm
parents:
diff changeset
     1
fun factorial 0 = 1
9e2d5e3debd3 some SML examples;
wenzelm
parents:
diff changeset
     2
  | factorial n = n * factorial (n - 1);
9e2d5e3debd3 some SML examples;
wenzelm
parents:
diff changeset
     3
9e2d5e3debd3 some SML examples;
wenzelm
parents:
diff changeset
     4
factorial 10;
9e2d5e3debd3 some SML examples;
wenzelm
parents:
diff changeset
     5
factorial 100;
9e2d5e3debd3 some SML examples;
wenzelm
parents:
diff changeset
     6
factorial 1000;