changeset 60555 | 51a6997b1384 |
parent 59498 | 50b60f501b05 |
child 60770 | 240563fbf41d |
--- a/src/CCL/Term.thy Mon Jun 22 19:22:48 2015 +0200 +++ b/src/CCL/Term.thy Mon Jun 22 20:36:33 2015 +0200 @@ -17,7 +17,7 @@ inl :: "i\<Rightarrow>i" inr :: "i\<Rightarrow>i" - when :: "[i,i\<Rightarrow>i,i\<Rightarrow>i]\<Rightarrow>i" + "when" :: "[i,i\<Rightarrow>i,i\<Rightarrow>i]\<Rightarrow>i" split :: "[i,[i,i]\<Rightarrow>i]\<Rightarrow>i" fst :: "i\<Rightarrow>i"