the support for reducibility candidates evolves ,,,,

[helm.git] / matita / matita / contribs / lambda_delta / Ground_2 / notation.ma

diff --git a/matita/matita/contribs/lambda_delta/Ground_2/notation.ma b/matita/matita/contribs/lambda_delta/Ground_2/notation.ma
index 5238b0d132525c02155a6d41b7683cd8a6203359..71fbbe0c2c65c0a1965a8e0527f690b89fd0b0c9 100644 (file)
--- a/matita/matita/contribs/lambda_delta/Ground_2/notation.ma
+++ b/matita/matita/contribs/lambda_delta/Ground_2/notation.ma
@@ -20,10 +20,18 @@ notation "hvbox( ◊ )"
   non associative with precedence 90
   for @{'Nil}.
 
-notation "hvbox( hd break :: tl )"
+notation "hvbox( hd :: break tl )"
   right associative with precedence 47
   for @{'Cons $hd $tl}.
 
-notation "hvbox( l1 break @ l2 )"
+notation "hvbox( l1 @ break l2 )"
   right associative with precedence 47
   for @{'Append $l1 $l2 }.
+
+notation "hvbox( ⟠ )"
+  non associative with precedence 90
+  for @{'Nil2}.
+
+notation "hvbox( { hd1 , break hd2 } :: break tl )"
+  non associative with precedence 47
+  for @{'Cons $hd1 $hd2 $tl}.