src/Tools/SML/factorial.sml
author Andreas Lochbihler
Wed, 11 Feb 2015 18:39:56 +0100
changeset 59527 edaabc1ab1ed
parent 56276 9e2d5e3debd3
permissions -rw-r--r--
rel_pmf preserves orders
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;