From: Ferruccio Guidi <ferruccio.guidi@unibo.it>
Date: Wed, 10 Sep 2014 19:51:09 +0000 (+0000)
Subject: added an example on lstas showing a difference with previous sta
X-Git-Tag: make_still_working~846
X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=commitdiff_plain;h=bce3dca819b8f60c6a10b24f48c44b66e13ec376;p=helm.git

added an example on lstas showing a difference with previous sta
---

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
index 000000000..376133090
--- /dev/null
+++ b/matita/matita/contribs/lambdadelta/basic_2/examples/ex_sta_ldec.ma
@@ -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-.
diff --git a/matita/matita/contribs/lambdadelta/basic_2/web/basic_2_src.tbl b/matita/matita/contribs/lambdadelta/basic_2/web/basic_2_src.tbl
index 7c16cd346..b17fe1e42 100644
--- a/matita/matita/contribs/lambdadelta/basic_2/web/basic_2_src.tbl
+++ b/matita/matita/contribs/lambdadelta/basic_2/web/basic_2_src.tbl
@@ -12,7 +12,7 @@ table {
    class "wine"
    [ { "examples" * } {
         [ { "terms with special features" * } {
-             [ "ex_cpr_omega" * ]
+             [ "ex_sta_ldec" "ex_cpr_omega" * ]
           }
         ]
      }