src/Tools/SML/Example.sml
author blanchet
Wed, 03 Sep 2014 22:47:05 +0200
changeset 58170 d84bab7ed89e
parent 56276 9e2d5e3debd3
permissions -rw-r--r--
fixed tactic for n-way mutual recursion, n >= 4 (balanced conjunctions confuse the tactic)
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
56276
9e2d5e3debd3 some SML examples;
wenzelm
parents:
diff changeset
     1
structure Example :> Example =
9e2d5e3debd3 some SML examples;
wenzelm
parents:
diff changeset
     2
struct
9e2d5e3debd3 some SML examples;
wenzelm
parents:
diff changeset
     3
9e2d5e3debd3 some SML examples;
wenzelm
parents:
diff changeset
     4
type t = int
9e2d5e3debd3 some SML examples;
wenzelm
parents:
diff changeset
     5
9e2d5e3debd3 some SML examples;
wenzelm
parents:
diff changeset
     6
val a = 0
9e2d5e3debd3 some SML examples;
wenzelm
parents:
diff changeset
     7
fun b x = x + 1
9e2d5e3debd3 some SML examples;
wenzelm
parents:
diff changeset
     8
9e2d5e3debd3 some SML examples;
wenzelm
parents:
diff changeset
     9
end