Step
*
of Lemma
simple-comb3_wf
∀[Info,A,B,C,D:Type].
  ∀F:bag(A) ─→ bag(B) ─→ bag(C) ─→ bag(D)
    ∀[X:EClass(A)]. ∀[Y:EClass(B)]. ∀[Z:EClass(C)].  (simple-comb3(x,y,z.F[x;y;z];X;Y;Z) ∈ EClass(D))
BY
{ (ProveWfLemma
   THEN (InstLemma `simple-comb_wf` [⌈Info⌉;⌈D⌉;⌈3⌉;⌈λx.[A; B; C][x]⌉]⋅ THEN Try (BHyp -1 ))
   THEN Reduce 0
   THEN Try (Complete (Auto'))
   THEN MemCD
   THEN Try ((IntSegCases (-1) THEN Reduce 0 THEN Trivial))
   THEN Auto)⋅ }
Latex:
Latex:
\mforall{}[Info,A,B,C,D:Type].
    \mforall{}F:bag(A)  {}\mrightarrow{}  bag(B)  {}\mrightarrow{}  bag(C)  {}\mrightarrow{}  bag(D)
        \mforall{}[X:EClass(A)].  \mforall{}[Y:EClass(B)].  \mforall{}[Z:EClass(C)].
            (simple-comb3(x,y,z.F[x;y;z];X;Y;Z)  \mmember{}  EClass(D))
By
Latex:
(ProveWfLemma
  THEN  (InstLemma  `simple-comb\_wf`  [\mkleeneopen{}Info\mkleeneclose{};\mkleeneopen{}D\mkleeneclose{};\mkleeneopen{}3\mkleeneclose{};\mkleeneopen{}\mlambda{}x.[A;  B;  C][x]\mkleeneclose{}]\mcdot{}  THEN  Try  (BHyp  -1  ))
  THEN  Reduce  0
  THEN  Try  (Complete  (Auto'))
  THEN  MemCD
  THEN  Try  ((IntSegCases  (-1)  THEN  Reduce  0  THEN  Trivial))
  THEN  Auto)\mcdot{}
Home
Index