Mercurial Mercurial > repos > isabelle / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
src/Doc/Tutorial/Protocol/Message.thy
changeset 80768 c7723cc15de8
parent 72991 d0a0b74f0ad7
child 80786 70076ba563d2 
--- a/src/Doc/Tutorial/Protocol/Message.thy	Sun Aug 25 20:54:20 2024 +0200
+++ b/src/Doc/Tutorial/Protocol/Message.thy	Sun Aug 25 21:10:01 2024 +0200
@@ -81,6 +81,8 @@
 text\<open>Concrete syntax: messages appear as \<open>\<lbrace>A,B,NA\<rbrace>\<close>, etc...\<close>
 syntax
   "_MTuple"      :: "['a, args] \<Rightarrow> 'a * 'b"       ("(2\<lbrace>_,/ _\<rbrace>)")
+syntax_consts
+  "_MTuple"     == MPair
 translations
   "\<lbrace>x, y, z\<rbrace>"   == "\<lbrace>x, \<lbrace>y, z\<rbrace>\<rbrace>"
   "\<lbrace>x, y\<rbrace>"      == "CONST MPair x y"
isabelle