Step
*
5
1
1
of Lemma
insert-int-lex
1. u : ℤ
2. v : ℤ List
3. ∀bs:ℤ List. ∀x:ℤ.  ((↑v ≤_lex bs) 
⇒ (↑insert-int(x;v) ≤_lex insert-int(x;bs)))
4. u1 : ℤ
5. v1 : ℤ List
6. ∀x:ℤ. ((↑[u / v] ≤_lex v1) 
⇒ (↑insert-int(x;[u / v]) ≤_lex insert-int(x;v1)))
7. x : ℤ
8. ¬u < x
9. ↑[u / v] ≤_lex [u1 / v1]
10. u1 < x
11. u1 < u
⊢ ||[u / v]|| < ||insert-int(x;v1)||
BY
{ (RWO "intlex-cons" (-3) THENA Auto) }
1
1. u : ℤ
2. v : ℤ List
3. ∀bs:ℤ List. ∀x:ℤ.  ((↑v ≤_lex bs) 
⇒ (↑insert-int(x;v) ≤_lex insert-int(x;bs)))
4. u1 : ℤ
5. v1 : ℤ List
6. ∀x:ℤ. ((↑[u / v] ≤_lex v1) 
⇒ (↑insert-int(x;[u / v]) ≤_lex insert-int(x;v1)))
7. x : ℤ
8. ¬u < x
9. ||v|| < ||v1|| ∨ (u < u1 ∧ (||v|| = ||v1|| ∈ ℤ)) ∨ ((u = u1 ∈ ℤ) ∧ (↑v ≤_lex v1))
10. u1 < x
11. u1 < u
⊢ ||[u / v]|| < ||insert-int(x;v1)||
Latex:
Latex:
1.  u  :  \mBbbZ{}
2.  v  :  \mBbbZ{}  List
3.  \mforall{}bs:\mBbbZ{}  List.  \mforall{}x:\mBbbZ{}.    ((\muparrow{}v  \mleq{}\_lex  bs)  {}\mRightarrow{}  (\muparrow{}insert-int(x;v)  \mleq{}\_lex  insert-int(x;bs)))
4.  u1  :  \mBbbZ{}
5.  v1  :  \mBbbZ{}  List
6.  \mforall{}x:\mBbbZ{}.  ((\muparrow{}[u  /  v]  \mleq{}\_lex  v1)  {}\mRightarrow{}  (\muparrow{}insert-int(x;[u  /  v])  \mleq{}\_lex  insert-int(x;v1)))
7.  x  :  \mBbbZ{}
8.  \mneg{}u  <  x
9.  \muparrow{}[u  /  v]  \mleq{}\_lex  [u1  /  v1]
10.  u1  <  x
11.  u1  <  u
\mvdash{}  ||[u  /  v]||  <  ||insert-int(x;v1)||
By
Latex:
(RWO  "intlex-cons"  (-3)  THENA  Auto)
Home
Index