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