Step
*
of Lemma
rec-combined-loc-class-2_wf
∀[Info,A,B,C:Type]. ∀[F:Id ─→ bag(A) ─→ bag(B) ─→ bag(C) ─→ bag(C)]. ∀[X:EClass(A)]. ∀[Y:EClass(B)].
  (F|Loc, X, Y, Prior(self)| ∈ EClass(C))
BY
{ (ProveWfLemma
   THEN (InstLemma `rec-combined-loc-class_wf` [⌈Info⌉; ⌈2⌉; ⌈λn.[A; B][n]⌉]⋅ THENA Auto')
   THEN BHyp (-1) 
   THEN Reduce 0
   THEN Try (Complete (Auto'))
   THEN (MemCD THENA Auto)
   THEN IntSegCases (-1)
   THEN Reduce 0
   THEN Trivial)⋅ }
Latex:
Latex:
\mforall{}[Info,A,B,C:Type].  \mforall{}[F:Id  {}\mrightarrow{}  bag(A)  {}\mrightarrow{}  bag(B)  {}\mrightarrow{}  bag(C)  {}\mrightarrow{}  bag(C)].  \mforall{}[X:EClass(A)].  \mforall{}[Y:EClass(B)].
    (F|Loc,  X,  Y,  Prior(self)|  \mmember{}  EClass(C))
By
Latex:
(ProveWfLemma
  THEN  (InstLemma  `rec-combined-loc-class\_wf`  [\mkleeneopen{}Info\mkleeneclose{};  \mkleeneopen{}2\mkleeneclose{};  \mkleeneopen{}\mlambda{}n.[A;  B][n]\mkleeneclose{}]\mcdot{}  THENA  Auto')
  THEN  BHyp  (-1) 
  THEN  Reduce  0
  THEN  Try  (Complete  (Auto'))
  THEN  (MemCD  THENA  Auto)
  THEN  IntSegCases  (-1)
  THEN  Reduce  0
  THEN  Trivial)\mcdot{}
Home
Index