src/Tools/SML/factorial.sml
author wenzelm
Mon, 24 Jan 2022 21:29:37 +0100
changeset 74995 68ffcf5cc94b
parent 56276 9e2d5e3debd3
permissions -rw-r--r--
updated to polyml-test-15c840d48c9a;
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;