src/HOL/MiniML/I.thy
changeset 1376 92f83b9d17e1
parent 1300 c7a8f374339b
child 1400 5d909faf0e04
     1.1 --- a/src/HOL/MiniML/I.thy	Thu Nov 30 12:58:44 1995 +0100
     1.2 +++ b/src/HOL/MiniML/I.thy	Fri Dec 01 12:03:13 1995 +0100
     1.3 @@ -8,7 +8,7 @@
     1.4  I = W +
     1.5  
     1.6  consts
     1.7 -	I :: "[expr, type_expr list, nat, subst] => result_W"
     1.8 +	I :: [expr, type_expr list, nat, subst] => result_W
     1.9  
    1.10  primrec I expr
    1.11          I_Var	"I (Var i) a n s = (if i < length a then Ok(s, nth i a, n)