author | mueller |
Wed, 04 Jun 1997 10:58:56 +0200 | |
changeset 3394 | fa31c7dca468 |
parent 3393 | e31ac367387e |
child 3395 | d8700b008944 |
--- a/src/HOLCF/Cfun1.thy Tue Jun 03 16:38:58 1997 +0200 +++ b/src/HOLCF/Cfun1.thy Wed Jun 04 10:58:56 1997 +0200 @@ -29,7 +29,7 @@ translations "f`x" == "fapp f x" syntax (symbols) - "->" :: [type, type] => type ("(_ \\<rightarrow>/ _)" [6,5]5) + "->" :: [type, type] => type ("(_ \\<rightarrow>/ _)" [1,0]0) "LAM " :: "[idts, 'a => 'b] => ('a -> 'b)" ("(3\\<Lambda>_./ _)" [0, 10] 10) defs