From bce3dca819b8f60c6a10b24f48c44b66e13ec376 Mon Sep 17 00:00:00 2001 From: Ferruccio Guidi Date: Wed, 10 Sep 2014 19:51:09 +0000 Subject: [PATCH] added an example on lstas showing a difference with previous sta --- .../contribs/lambdadelta/basic_2/examples/ex_sta_ldec.ma | 9 +++++++++ .../contribs/lambdadelta/basic_2/web/basic_2_src.tbl | 2 +- 2 files changed, 10 insertions(+), 1 deletion(-) create mode 100644 matita/matita/contribs/lambdadelta/basic_2/examples/ex_sta_ldec.ma 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" * ] } ] } -- 2.39.2