- the definition of the framework for strong normalization continues ...

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

diff --git a/matita/matita/contribs/lambda_delta/Basic_2/notation.ma b/matita/matita/contribs/lambda_delta/Basic_2/notation.ma
index 8e1d4362afddadfc86d1df58337c5d8bf2bfeee9..4d71723d0c11b9bc9daa443f17547ad6d66599e7 100644 (file)
--- a/matita/matita/contribs/lambda_delta/Basic_2/notation.ma
+++ b/matita/matita/contribs/lambda_delta/Basic_2/notation.ma
@@ -225,3 +225,14 @@ notation "hvbox( T1 ⊑ break T2 )"
 notation "hvbox( T1 break [ R ] ⊑ break T2 )"
    non associative with precedence 45
    for @{ 'CrSubEq $T1 $R $T2 }.
+
+(* Functional ***************************************************************)
+
+notation "hvbox( ↟ [ d , break e ] break T )"
+   non associative with precedence 80
+   for @{ 'Lift $d $e $T }.
+
+notation "hvbox( ↡ [ d ← break V ] break T )"
+   non associative with precedence 80
+   for @{ 'Subst $V $d $T }.
+