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)

structure Example :> Example =
struct

type t = int

val a = 0
fun b x = x + 1

end