]> matita.cs.unibo.it Git - helm.git/commitdiff
added an example on lstas showing a difference with previous sta
authorFerruccio Guidi <ferruccio.guidi@unibo.it>
Wed, 10 Sep 2014 19:51:09 +0000 (19:51 +0000)
committerFerruccio Guidi <ferruccio.guidi@unibo.it>
Wed, 10 Sep 2014 19:51:09 +0000 (19:51 +0000)
matita/matita/contribs/lambdadelta/basic_2/examples/ex_sta_ldec.ma [new file with mode: 0644]
matita/matita/contribs/lambdadelta/basic_2/web/basic_2_src.tbl

diff --git a/matita/matita/contribs/lambdadelta/basic_2/examples/ex_sta_ldec.ma b/matita/matita/contribs/lambdadelta/basic_2/examples/ex_sta_ldec.ma
new file mode 100644 (file)
index 0000000..3761330
--- /dev/null
@@ -0,0 +1,9 @@
+include "basic_2/unfold/lstas.ma".
+
+(* EXAMPLES *****************************************************************)
+
+(* Static type assignment (iterated vs primitive): the declared variable ****)
+
+(* basic_1: we have "L.ⓛⓝ⋆k1.⋆k2⦄ ⊢ #0 • ⓝ⋆k1.⋆k2". *)
+theorem sta_ldec: ∀h,G,L,k1,k2. ⦃G, L.ⓛⓝ⋆k1.⋆k2⦄ ⊢ #0 •*[h, 1] ⋆k2.
+/3 width=6 by lstas_sort, lstas_succ, lstas_cast, drop_pair/ qed-.
index 7c16cd346c68ea4ac29d779bcd717fdbade5220c..b17fe1e421050ffe8f90b92b1697833970aecf14 100644 (file)
@@ -12,7 +12,7 @@ table {
    class "wine"
    [ { "examples" * } {
         [ { "terms with special features" * } {
-             [ "ex_cpr_omega" * ]
+             [ "ex_sta_ldec" "ex_cpr_omega" * ]
           }
         ]
      }