---

Step * 1 of Lemma rep_int_constraint_step_wf


1. f : IntConstraints ⟶ IntConstraints
2. p : IntConstraints
3. ∀p:IntConstraints
     (0 < dim(p) ⇒ (dim(f p) < dim(p) ∨ ((dim(f p) = dim(p) ∈ ℤ) ∧ num-eq-constraints(f p) < num-eq-constraints(p))))
⊢ rep_int_constraint_step(f;p) ∈ {p:IntConstraints| dim(p) = 0 ∈ ℤ} 
BY
{ ((Assert ⌜∀n:ℕ. ∀p:IntConstraints.  (dim(p) < n ⇒ (rep_int_constraint_step(f;p) ∈ {p:IntConstraints| dim(p) = 0 ∈ ℤ} \000C))⌝⋅
   THENM (InstHyp [⌜dim(p) + 1⌝] (-1)⋅ THEN Auto)
   )
   THEN InductionOnNat
   THEN Auto) }

1
1. f : IntConstraints ⟶ IntConstraints
2. p : IntConstraints
3. ∀p:IntConstraints
     (0 < dim(p) ⇒ (dim(f p) < dim(p) ∨ ((dim(f p) = dim(p) ∈ ℤ) ∧ num-eq-constraints(f p) < num-eq-constraints(p))))
4. n : ℤ
5. p1 : IntConstraints
6. dim(p1) < 0
⊢ rep_int_constraint_step(f;p1) ∈ {p:IntConstraints| dim(p) = 0 ∈ ℤ} 

2
1. f : IntConstraints ⟶ IntConstraints
2. p : IntConstraints
3. ∀p:IntConstraints
     (0 < dim(p) ⇒ (dim(f p) < dim(p) ∨ ((dim(f p) = dim(p) ∈ ℤ) ∧ num-eq-constraints(f p) < num-eq-constraints(p))))
4. n : ℤ
5. 0 < n
6. ∀p:IntConstraints. (dim(p) < n - 1 ⇒ (rep_int_constraint_step(f;p) ∈ {p:IntConstraints| dim(p) = 0 ∈ ℤ} ))
7. p1 : IntConstraints
8. dim(p1) < n
⊢ rep_int_constraint_step(f;p1) ∈ {p:IntConstraints| dim(p) = 0 ∈ ℤ} 

---

Latex:

---

Latex:

1.  f  :  IntConstraints  {}\mrightarrow{}  IntConstraints
2.  p  :  IntConstraints
3.  \mforall{}p:IntConstraints
          (0  <  dim(p)
          {}\mRightarrow{}  (dim(f  p)  <  dim(p)
                \mvee{}  ((dim(f  p)  =  dim(p))  \mwedge{}  num-eq-constraints(f  p)  <  num-eq-constraints(p))))
\mvdash{}  rep\_int\_constraint\_step(f;p)  \mmember{}  \{p:IntConstraints|  dim(p)  =  0\} 


By

---

Latex:
((Assert  \mkleeneopen{}\mforall{}n:\mBbbN{}.  \mforall{}p:IntConstraints.
                        (dim(p)  <  n  {}\mRightarrow{}  (rep\_int\_constraint\_step(f;p)  \mmember{}  \{p:IntConstraints|  dim(p)  =  0\}  ))\mkleeneclose{}\mcdot{}
  THENM  (InstHyp  [\mkleeneopen{}dim(p)  +  1\mkleeneclose{}]  (-1)\mcdot{}  THEN  Auto)
  )
  THEN  InductionOnNat
  THEN  Auto)

---

Home Index