Step
*
of Lemma
bag_all_wf
∀[T:Type]. ∀[f:T ⟶ 𝔹]. ∀[b:bag(T)].  (bag_all(b;f) ∈ 𝔹)
BY
{ (ProveWfLemma THEN (RWO "band_assoc" 0 THENA Auto) THEN RW (AddrC [2;2] (LemmaC `band_commutes`)) 0 THEN Auto) }
Latex:
Latex:
\mforall{}[T:Type].  \mforall{}[f:T  {}\mrightarrow{}  \mBbbB{}].  \mforall{}[b:bag(T)].    (bag\_all(b;f)  \mmember{}  \mBbbB{})
By
Latex:
(ProveWfLemma
  THEN  (RWO  "band\_assoc"  0  THENA  Auto)
  THEN  RW  (AddrC  [2;2]  (LemmaC  `band\_commutes`))  0
  THEN  Auto)
Home
Index