Step
*
of Lemma
nc-s-i1-j1
∀[I:fset(ℕ)]. ∀[i:ℕ]. ∀[j:{j:ℕ| ¬j ∈ I} ].  ((i1) = s ⋅ (i1) ⋅ (j1) ∈ I ⟶ I+i)
BY
{ ((Auto THEN DVar `j')
   THEN (Assert (i1) ∈ I+j ⟶ I+i+j BY
               ((Assert (i1) ∈ I+j ⟶ I+j+i BY Auto) THEN InferEqualType THEN Auto))
   ) }
1
1. I : fset(ℕ)
2. i : ℕ
3. j : ℕ
4. ¬j ∈ I
5. (i1) ∈ I+j ⟶ I+i+j
⊢ (i1) = s ⋅ (i1) ⋅ (j1) ∈ I ⟶ I+i
Latex:
Latex:
\mforall{}[I:fset(\mBbbN{})].  \mforall{}[i:\mBbbN{}].  \mforall{}[j:\{j:\mBbbN{}|  \mneg{}j  \mmember{}  I\}  ].    ((i1)  =  s  \mcdot{}  (i1)  \mcdot{}  (j1))
By
Latex:
((Auto  THEN  DVar  `j')
  THEN  (Assert  (i1)  \mmember{}  I+j  {}\mrightarrow{}  I+i+j  BY
                          ((Assert  (i1)  \mmember{}  I+j  {}\mrightarrow{}  I+j+i  BY  Auto)  THEN  InferEqualType  THEN  Auto))
  )
Home
Index