---

Step * 1 1 4 1 1 2 of Lemma satisfiable-exact-reduce-constraints

.....antecedent..... 
1. eqs : ℤ List List
2. i : ℕ||eqs||
3. j : ℕ+||eqs[i]||
4. exact-eq-constraint(eqs;i;j)
5. ineqs : ℤ List List
6. xs : ℤ List
7. satisfies-integer-problem(eqs;ineqs;xs)
8. (∀e∈eqs.||e|| = ||xs|| ∈ ℤ)
9. (∀e∈ineqs.||e|| = ||xs|| ∈ ℤ)
10. ||eqs[i]|| ~ ||xs||
11. eqs ∈ {l:ℤ List| ||l|| = ||eqs[i]|| ∈ ℤ}  List
12. ineqs ∈ {l:ℤ List| ||l|| = ||eqs[i]|| ∈ ℤ}  List
13. 1 ≤ j
14. j < ||xs||
15. 0 < ||xs\j||
16. hd(xs\j) = hd(xs) ∈ ℤ
17. (∀as∈eqs.xs ⋅ as =0)
18. ∀i:ℕ||ineqs||. xs ⋅ ineqs[i] ≥0
19. i@0 : ℕ||ineqs||
20. ||xs|| = ||ineqs[i@0]|| ∈ ℤ
21. 0 < ||xs||
22. hd(xs) = 1 ∈ ℤ
23. ineqs[i@0] ⋅ xs ≥ 0 
24. 0 < ||xs\j||
25. hd(xs\j) = 1 ∈ ℤ
26. ||xs|| = ||ineqs[i@0]|| ∈ ℤ
27. 0 < ||xs||
28. hd(xs) = 1 ∈ ℤ
29. ineqs[i@0] ⋅ xs ≥ 0 
⊢ xs[j] = -eqs[i][j] * eqs[i]\j ⋅ xs\j ∈ ℤ
BY
{ TACTIC:(FLemma `exact-eq-constraint-implies` [4;7]⋅ THENA Auto) }

1
1. eqs : ℤ List List
2. i : ℕ||eqs||
3. j : ℕ+||eqs[i]||
4. exact-eq-constraint(eqs;i;j)
5. ineqs : ℤ List List
6. xs : ℤ List
7. satisfies-integer-problem(eqs;ineqs;xs)
8. (∀e∈eqs.||e|| = ||xs|| ∈ ℤ)
9. (∀e∈ineqs.||e|| = ||xs|| ∈ ℤ)
10. ||eqs[i]|| ~ ||xs||
11. eqs ∈ {l:ℤ List| ||l|| = ||eqs[i]|| ∈ ℤ}  List
12. ineqs ∈ {l:ℤ List| ||l|| = ||eqs[i]|| ∈ ℤ}  List
13. 1 ≤ j
14. j < ||xs||
15. 0 < ||xs\j||
16. hd(xs\j) = hd(xs) ∈ ℤ
17. (∀as∈eqs.xs ⋅ as =0)
18. ∀i:ℕ||ineqs||. xs ⋅ ineqs[i] ≥0
19. i@0 : ℕ||ineqs||
20. ||xs|| = ||ineqs[i@0]|| ∈ ℤ
21. 0 < ||xs||
22. hd(xs) = 1 ∈ ℤ
23. ineqs[i@0] ⋅ xs ≥ 0 
24. 0 < ||xs\j||
25. hd(xs\j) = 1 ∈ ℤ
26. ||xs|| = ||ineqs[i@0]|| ∈ ℤ
27. 0 < ||xs||
28. hd(xs) = 1 ∈ ℤ
29. ineqs[i@0] ⋅ xs ≥ 0 
30. xs[j] = if (eqs[i][j] =z 1) then -1 * eqs[i]\j ⋅ xs\j else eqs[i]\j ⋅ xs\j fi  ∈ ℤ
⊢ xs[j] = -eqs[i][j] * eqs[i]\j ⋅ xs\j ∈ ℤ

---

Latex:

---

Latex:
.....antecedent..... 
1.  eqs  :  \mBbbZ{}  List  List
2.  i  :  \mBbbN{}||eqs||
3.  j  :  \mBbbN{}\msupplus{}||eqs[i]||
4.  exact-eq-constraint(eqs;i;j)
5.  ineqs  :  \mBbbZ{}  List  List
6.  xs  :  \mBbbZ{}  List
7.  satisfies-integer-problem(eqs;ineqs;xs)
8.  (\mforall{}e\mmember{}eqs.||e||  =  ||xs||)
9.  (\mforall{}e\mmember{}ineqs.||e||  =  ||xs||)
10.  ||eqs[i]||  \msim{}  ||xs||
11.  eqs  \mmember{}  \{l:\mBbbZ{}  List|  ||l||  =  ||eqs[i]||\}    List
12.  ineqs  \mmember{}  \{l:\mBbbZ{}  List|  ||l||  =  ||eqs[i]||\}    List
13.  1  \mleq{}  j
14.  j  <  ||xs||
15.  0  <  ||xs\mbackslash{}j||
16.  hd(xs\mbackslash{}j)  =  hd(xs)
17.  (\mforall{}as\mmember{}eqs.xs  \mcdot{}  as  =0)
18.  \mforall{}i:\mBbbN{}||ineqs||.  xs  \mcdot{}  ineqs[i]  \mgeq{}0
19.  i@0  :  \mBbbN{}||ineqs||
20.  ||xs||  =  ||ineqs[i@0]||
21.  0  <  ||xs||
22.  hd(xs)  =  1
23.  ineqs[i@0]  \mcdot{}  xs  \mgeq{}  0 
24.  0  <  ||xs\mbackslash{}j||
25.  hd(xs\mbackslash{}j)  =  1
26.  ||xs||  =  ||ineqs[i@0]||
27.  0  <  ||xs||
28.  hd(xs)  =  1
29.  ineqs[i@0]  \mcdot{}  xs  \mgeq{}  0 
\mvdash{}  xs[j]  =  -eqs[i][j]  *  eqs[i]\mbackslash{}j  \mcdot{}  xs\mbackslash{}j


By

---

Latex:
TACTIC:(FLemma  `exact-eq-constraint-implies`  [4;7]\mcdot{}  THENA  Auto)

---

Home Index