Users' Mathboxes Mathbox for Thierry Arnoux < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  gtiso Structured version   Visualization version   GIF version

Theorem gtiso 32710
Description: Two ways to write a strictly decreasing function on the reals. (Contributed by Thierry Arnoux, 6-Apr-2017.)
Assertion
Ref Expression
gtiso ((𝐴 ⊆ ℝ*𝐵 ⊆ ℝ*) → (𝐹 Isom < , < (𝐴, 𝐵) ↔ 𝐹 Isom ≤ , ≤ (𝐴, 𝐵)))

Proof of Theorem gtiso
StepHypRef Expression
1 eqid 2737 . . . . 5 ((𝐴 × 𝐴) ∖ < ) = ((𝐴 × 𝐴) ∖ < )
2 eqid 2737 . . . . 5 ((𝐵 × 𝐵) ∖ < ) = ((𝐵 × 𝐵) ∖ < )
31, 2isocnv3 7352 . . . 4 (𝐹 Isom < , < (𝐴, 𝐵) ↔ 𝐹 Isom ((𝐴 × 𝐴) ∖ < ), ((𝐵 × 𝐵) ∖ < )(𝐴, 𝐵))
43a1i 11 . . 3 ((𝐴 ⊆ ℝ*𝐵 ⊆ ℝ*) → (𝐹 Isom < , < (𝐴, 𝐵) ↔ 𝐹 Isom ((𝐴 × 𝐴) ∖ < ), ((𝐵 × 𝐵) ∖ < )(𝐴, 𝐵)))
5 df-le 11301 . . . . . . . . . 10 ≤ = ((ℝ* × ℝ*) ∖ < )
65cnveqi 5885 . . . . . . . . 9 ≤ = ((ℝ* × ℝ*) ∖ < )
7 cnvdif 6163 . . . . . . . . 9 ((ℝ* × ℝ*) ∖ < ) = ((ℝ* × ℝ*) ∖ < )
8 cnvxp 6177 . . . . . . . . . 10 (ℝ* × ℝ*) = (ℝ* × ℝ*)
9 ltrel 11323 . . . . . . . . . . 11 Rel <
10 dfrel2 6209 . . . . . . . . . . 11 (Rel < ↔ < = < )
119, 10mpbi 230 . . . . . . . . . 10 < = <
128, 11difeq12i 4124 . . . . . . . . 9 ((ℝ* × ℝ*) ∖ < ) = ((ℝ* × ℝ*) ∖ < )
136, 7, 123eqtri 2769 . . . . . . . 8 ≤ = ((ℝ* × ℝ*) ∖ < )
1413ineq1i 4216 . . . . . . 7 ( ≤ ∩ (𝐴 × 𝐴)) = (((ℝ* × ℝ*) ∖ < ) ∩ (𝐴 × 𝐴))
15 indif1 4282 . . . . . . 7 (((ℝ* × ℝ*) ∖ < ) ∩ (𝐴 × 𝐴)) = (((ℝ* × ℝ*) ∩ (𝐴 × 𝐴)) ∖ < )
1614, 15eqtri 2765 . . . . . 6 ( ≤ ∩ (𝐴 × 𝐴)) = (((ℝ* × ℝ*) ∩ (𝐴 × 𝐴)) ∖ < )
17 xpss12 5700 . . . . . . . . 9 ((𝐴 ⊆ ℝ*𝐴 ⊆ ℝ*) → (𝐴 × 𝐴) ⊆ (ℝ* × ℝ*))
1817anidms 566 . . . . . . . 8 (𝐴 ⊆ ℝ* → (𝐴 × 𝐴) ⊆ (ℝ* × ℝ*))
19 sseqin2 4223 . . . . . . . 8 ((𝐴 × 𝐴) ⊆ (ℝ* × ℝ*) ↔ ((ℝ* × ℝ*) ∩ (𝐴 × 𝐴)) = (𝐴 × 𝐴))
2018, 19sylib 218 . . . . . . 7 (𝐴 ⊆ ℝ* → ((ℝ* × ℝ*) ∩ (𝐴 × 𝐴)) = (𝐴 × 𝐴))
2120difeq1d 4125 . . . . . 6 (𝐴 ⊆ ℝ* → (((ℝ* × ℝ*) ∩ (𝐴 × 𝐴)) ∖ < ) = ((𝐴 × 𝐴) ∖ < ))
2216, 21eqtr2id 2790 . . . . 5 (𝐴 ⊆ ℝ* → ((𝐴 × 𝐴) ∖ < ) = ( ≤ ∩ (𝐴 × 𝐴)))
2322adantr 480 . . . 4 ((𝐴 ⊆ ℝ*𝐵 ⊆ ℝ*) → ((𝐴 × 𝐴) ∖ < ) = ( ≤ ∩ (𝐴 × 𝐴)))
24 isoeq2 7338 . . . 4 (((𝐴 × 𝐴) ∖ < ) = ( ≤ ∩ (𝐴 × 𝐴)) → (𝐹 Isom ((𝐴 × 𝐴) ∖ < ), ((𝐵 × 𝐵) ∖ < )(𝐴, 𝐵) ↔ 𝐹 Isom ( ≤ ∩ (𝐴 × 𝐴)), ((𝐵 × 𝐵) ∖ < )(𝐴, 𝐵)))
2523, 24syl 17 . . 3 ((𝐴 ⊆ ℝ*𝐵 ⊆ ℝ*) → (𝐹 Isom ((𝐴 × 𝐴) ∖ < ), ((𝐵 × 𝐵) ∖ < )(𝐴, 𝐵) ↔ 𝐹 Isom ( ≤ ∩ (𝐴 × 𝐴)), ((𝐵 × 𝐵) ∖ < )(𝐴, 𝐵)))
265ineq1i 4216 . . . . . . 7 ( ≤ ∩ (𝐵 × 𝐵)) = (((ℝ* × ℝ*) ∖ < ) ∩ (𝐵 × 𝐵))
27 indif1 4282 . . . . . . 7 (((ℝ* × ℝ*) ∖ < ) ∩ (𝐵 × 𝐵)) = (((ℝ* × ℝ*) ∩ (𝐵 × 𝐵)) ∖ < )
2826, 27eqtri 2765 . . . . . 6 ( ≤ ∩ (𝐵 × 𝐵)) = (((ℝ* × ℝ*) ∩ (𝐵 × 𝐵)) ∖ < )
29 xpss12 5700 . . . . . . . . 9 ((𝐵 ⊆ ℝ*𝐵 ⊆ ℝ*) → (𝐵 × 𝐵) ⊆ (ℝ* × ℝ*))
3029anidms 566 . . . . . . . 8 (𝐵 ⊆ ℝ* → (𝐵 × 𝐵) ⊆ (ℝ* × ℝ*))
31 sseqin2 4223 . . . . . . . 8 ((𝐵 × 𝐵) ⊆ (ℝ* × ℝ*) ↔ ((ℝ* × ℝ*) ∩ (𝐵 × 𝐵)) = (𝐵 × 𝐵))
3230, 31sylib 218 . . . . . . 7 (𝐵 ⊆ ℝ* → ((ℝ* × ℝ*) ∩ (𝐵 × 𝐵)) = (𝐵 × 𝐵))
3332difeq1d 4125 . . . . . 6 (𝐵 ⊆ ℝ* → (((ℝ* × ℝ*) ∩ (𝐵 × 𝐵)) ∖ < ) = ((𝐵 × 𝐵) ∖ < ))
3428, 33eqtr2id 2790 . . . . 5 (𝐵 ⊆ ℝ* → ((𝐵 × 𝐵) ∖ < ) = ( ≤ ∩ (𝐵 × 𝐵)))
3534adantl 481 . . . 4 ((𝐴 ⊆ ℝ*𝐵 ⊆ ℝ*) → ((𝐵 × 𝐵) ∖ < ) = ( ≤ ∩ (𝐵 × 𝐵)))
36 isoeq3 7339 . . . 4 (((𝐵 × 𝐵) ∖ < ) = ( ≤ ∩ (𝐵 × 𝐵)) → (𝐹 Isom ( ≤ ∩ (𝐴 × 𝐴)), ((𝐵 × 𝐵) ∖ < )(𝐴, 𝐵) ↔ 𝐹 Isom ( ≤ ∩ (𝐴 × 𝐴)), ( ≤ ∩ (𝐵 × 𝐵))(𝐴, 𝐵)))
3735, 36syl 17 . . 3 ((𝐴 ⊆ ℝ*𝐵 ⊆ ℝ*) → (𝐹 Isom ( ≤ ∩ (𝐴 × 𝐴)), ((𝐵 × 𝐵) ∖ < )(𝐴, 𝐵) ↔ 𝐹 Isom ( ≤ ∩ (𝐴 × 𝐴)), ( ≤ ∩ (𝐵 × 𝐵))(𝐴, 𝐵)))
384, 25, 373bitrd 305 . 2 ((𝐴 ⊆ ℝ*𝐵 ⊆ ℝ*) → (𝐹 Isom < , < (𝐴, 𝐵) ↔ 𝐹 Isom ( ≤ ∩ (𝐴 × 𝐴)), ( ≤ ∩ (𝐵 × 𝐵))(𝐴, 𝐵)))
39 isocnv2 7351 . . 3 (𝐹 Isom ≤ , ≤ (𝐴, 𝐵) ↔ 𝐹 Isom ≤ , ≤ (𝐴, 𝐵))
40 isores2 7353 . . . 4 (𝐹 Isom ≤ , ≤ (𝐴, 𝐵) ↔ 𝐹 Isom ≤ , ( ≤ ∩ (𝐵 × 𝐵))(𝐴, 𝐵))
41 isores1 7354 . . . 4 (𝐹 Isom ≤ , ( ≤ ∩ (𝐵 × 𝐵))(𝐴, 𝐵) ↔ 𝐹 Isom ( ≤ ∩ (𝐴 × 𝐴)), ( ≤ ∩ (𝐵 × 𝐵))(𝐴, 𝐵))
4240, 41bitri 275 . . 3 (𝐹 Isom ≤ , ≤ (𝐴, 𝐵) ↔ 𝐹 Isom ( ≤ ∩ (𝐴 × 𝐴)), ( ≤ ∩ (𝐵 × 𝐵))(𝐴, 𝐵))
43 lerel 11325 . . . . 5 Rel ≤
44 dfrel2 6209 . . . . 5 (Rel ≤ ↔ ≤ = ≤ )
4543, 44mpbi 230 . . . 4 ≤ = ≤
46 isoeq2 7338 . . . 4 ( ≤ = ≤ → (𝐹 Isom ≤ , ≤ (𝐴, 𝐵) ↔ 𝐹 Isom ≤ , ≤ (𝐴, 𝐵)))
4745, 46ax-mp 5 . . 3 (𝐹 Isom ≤ , ≤ (𝐴, 𝐵) ↔ 𝐹 Isom ≤ , ≤ (𝐴, 𝐵))
4839, 42, 473bitr3ri 302 . 2 (𝐹 Isom ≤ , ≤ (𝐴, 𝐵) ↔ 𝐹 Isom ( ≤ ∩ (𝐴 × 𝐴)), ( ≤ ∩ (𝐵 × 𝐵))(𝐴, 𝐵))
4938, 48bitr4di 289 1 ((𝐴 ⊆ ℝ*𝐵 ⊆ ℝ*) → (𝐹 Isom < , < (𝐴, 𝐵) ↔ 𝐹 Isom ≤ , ≤ (𝐴, 𝐵)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395   = wceq 1540  cdif 3948  cin 3950  wss 3951   × cxp 5683  ccnv 5684  Rel wrel 5690   Isom wiso 6562  *cxr 11294   < clt 11295  cle 11296
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2157  ax-12 2177  ax-ext 2708  ax-sep 5296  ax-nul 5306  ax-pr 5432
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3an 1089  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2065  df-mo 2540  df-eu 2569  df-clab 2715  df-cleq 2729  df-clel 2816  df-ne 2941  df-ral 3062  df-rex 3071  df-rab 3437  df-v 3482  df-dif 3954  df-un 3956  df-in 3958  df-ss 3968  df-nul 4334  df-if 4526  df-sn 4627  df-pr 4629  df-op 4633  df-uni 4908  df-br 5144  df-opab 5206  df-id 5578  df-xp 5691  df-rel 5692  df-cnv 5693  df-co 5694  df-dm 5695  df-rn 5696  df-res 5697  df-ima 5698  df-iota 6514  df-fun 6563  df-fn 6564  df-f 6565  df-f1 6566  df-fo 6567  df-f1o 6568  df-fv 6569  df-isom 6570  df-xr 11299  df-ltxr 11300  df-le 11301
This theorem is referenced by:  xrge0iifhmeo  33935
  Copyright terms: Public domain W3C validator