Step * of Lemma list-deq_wf1

[A:Type]. ∀[eq:A ⟶ A ⟶ 𝔹].  (list-deq(eq) ∈ (A List) ⟶ (A List) ⟶ 𝔹)
BY
(xxxAutoxxx
   THEN (Unfold `list-deq` THEN RepeatFor ((MemCD THENA Auto)))
   THEN MoveToConcl (-1)
   THEN ListInd (-1)
   THEN Reduce 0
   THEN Try (Complete (Auto))
   THEN InductionOnList
   THEN Reduce 0
   THEN MemCD
   THEN Try (BackThruSomeHyp)
   THEN Auto) }


Latex:


Latex:
\mforall{}[A:Type].  \mforall{}[eq:A  {}\mrightarrow{}  A  {}\mrightarrow{}  \mBbbB{}].    (list-deq(eq)  \mmember{}  (A  List)  {}\mrightarrow{}  (A  List)  {}\mrightarrow{}  \mBbbB{})


By


Latex:
(xxxAutoxxx
  THEN  (Unfold  `list-deq`  0  THEN  RepeatFor  2  ((MemCD  THENA  Auto)))
  THEN  MoveToConcl  (-1)
  THEN  ListInd  (-1)
  THEN  Reduce  0
  THEN  Try  (Complete  (Auto))
  THEN  InductionOnList
  THEN  Reduce  0
  THEN  MemCD
  THEN  Try  (BackThruSomeHyp)
  THEN  Auto)




Home Index