# HG changeset patch # User paulson # Date 834070827 -7200 # Node ID 2f3694c50101e7e79d6345b9920bb7e9034493e4 # Parent aade046ec6d591f372ff32a1357135dd8acdeb63 Quotes now optional around inductive set diff -r aade046ec6d5 -r 2f3694c50101 src/HOL/MiniML/MiniML.thy --- a/src/HOL/MiniML/MiniML.thy Thu Jun 06 14:39:44 1996 +0200 +++ b/src/HOL/MiniML/MiniML.thy Thu Jun 06 16:20:27 1996 +0200 @@ -21,7 +21,7 @@ translations "a |- e :: t" == "(a,e,t):has_type" -inductive "has_type" +inductive has_type intrs VarI "[| n < length a |] ==> a |- Var n :: nth n a" AbsI "[| t1#a |- e :: t2 |] ==> a |- Abs e :: t1 -> t2"