Step * of Lemma simple-loc-comb2_wf

[Info,A,B,C:Type]. ∀[F:Id ⟶ bag(A) ⟶ bag(B) ⟶ bag(C)]. ∀[X:EClass(A)]. ∀[Y:EClass(B)].
  (simple-loc-comb2(l,a,b.F[l;a;b];X;Y) ∈ EClass(C))
BY
(ProveWfLemma
   THEN (InstLemma `simple-loc-comb_wf` [⌜Info⌝; ⌜C⌝; ⌜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)].  \mforall{}[X:EClass(A)].  \mforall{}[Y:EClass(B)].
    (simple-loc-comb2(l,a,b.F[l;a;b];X;Y)  \mmember{}  EClass(C))


By


Latex:
(ProveWfLemma
  THEN  (InstLemma  `simple-loc-comb\_wf`  [\mkleeneopen{}Info\mkleeneclose{};  \mkleeneopen{}C\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)




Home Index