Step * 1 of Lemma psub_transitivity

.....assertion..... 
c,a,b:formula().  (a ⊆  b ⊆  a ⊆ c)
BY
((BLemma `formula-induction` THENA Auto)
   THEN Unfold `psub` 0
   THEN Reduce 0
   THEN Fold `psub` 0
   THEN (Auto
         THEN SplitOrHyps
         THEN Try (((HypSubst' (-1) (-2) THENA Auto)
                    THEN Unfold `psub` -2
                    THEN Reduce (-2)
                    THEN Try (Fold `psub` (-2))
                    THEN Trivial))
         THEN Try (((InstHyp [⌜a⌝;⌜b⌝3⋅ THENM Sel (D 0)) THEN Complete (Auto)))
         THEN Try (((InstHyp [⌜a⌝;⌜b⌝4⋅ THENM Sel (D 0)) THEN Complete (Auto)))
         THEN Try (((InstHyp [⌜a⌝;⌜b⌝2⋅ THENM Sel (D 0)) THEN Complete (Auto)))⋅)⋅}


Latex:


Latex:
.....assertion..... 
\mforall{}c,a,b:formula().    (a  \msubseteq{}  b  {}\mRightarrow{}  b  \msubseteq{}  c  {}\mRightarrow{}  a  \msubseteq{}  c)


By


Latex:
((BLemma  `formula-induction`  THENA  Auto)
  THEN  Unfold  `psub`  0
  THEN  Reduce  0
  THEN  Fold  `psub`  0
  THEN  (Auto
              THEN  SplitOrHyps
              THEN  Try  (((HypSubst'  (-1)  (-2)  THENA  Auto)
                                    THEN  Unfold  `psub`  -2
                                    THEN  Reduce  (-2)
                                    THEN  Try  (Fold  `psub`  (-2))
                                    THEN  Trivial))
              THEN  Try  (((InstHyp  [\mkleeneopen{}a\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{}]  3\mcdot{}  THENM  Sel  2  (D  0))  THEN  Complete  (Auto)))
              THEN  Try  (((InstHyp  [\mkleeneopen{}a\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{}]  4\mcdot{}  THENM  Sel  3  (D  0))  THEN  Complete  (Auto)))
              THEN  Try  (((InstHyp  [\mkleeneopen{}a\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{}]  2\mcdot{}  THENM  Sel  2  (D  0))  THEN  Complete  (Auto)))\mcdot{})\mcdot{})




Home Index