src/Tools/SML/factorial.sml
author paulson <lp15@cam.ac.uk>
Wed, 19 Oct 2022 13:41:42 +0100
changeset 76339 9e1fef7b4f29
parent 56276 9e2d5e3debd3
permissions -rw-r--r--
deleted unused material
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;