Step 
*
 of Lemma 
fact_wf
∀[n:ℕ]. ((n)! ∈ ℕ+)
BY
 
{ (InductionOnNat THEN (RWO "fact_unroll" 0 THENA Auto) THEN Reduce 0 THEN Auto) }
 
Latex: 
Latex:
\mforall{}[n:\mBbbN{}].  ((n)!  \mmember{}  \mBbbN{}\msupplus{})
 By 
Latex:
(InductionOnNat  THEN  (RWO  "fact\_unroll"  0  THENA  Auto)  THEN  Reduce  0  THEN  Auto)
Home
Index