ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  lediv12a Unicode version

Theorem lediv12a 7905
Description: Comparison of ratio of two nonnegative numbers. (Contributed by NM, 31-Dec-2005.)
Assertion
Ref Expression
lediv12a  |-  ( ( ( ( A  e.  RR  /\  B  e.  RR )  /\  (
0  <_  A  /\  A  <_  B ) )  /\  ( ( C  e.  RR  /\  D  e.  RR )  /\  (
0  <  C  /\  C  <_  D ) ) )  ->  ( A  /  D )  <_  ( B  /  C ) )

Proof of Theorem lediv12a
StepHypRef Expression
1 simplrr 496 . . 3  |-  ( ( ( ( A  e.  RR  /\  B  e.  RR )  /\  (
0  <_  A  /\  A  <_  B ) )  /\  ( ( C  e.  RR  /\  D  e.  RR )  /\  (
0  <  C  /\  C  <_  D ) ) )  ->  A  <_  B )
2 simprrr 500 . . . 4  |-  ( ( ( ( A  e.  RR  /\  B  e.  RR )  /\  (
0  <_  A  /\  A  <_  B ) )  /\  ( ( C  e.  RR  /\  D  e.  RR )  /\  (
0  <  C  /\  C  <_  D ) ) )  ->  C  <_  D )
3 simprll 497 . . . . 5  |-  ( ( ( ( A  e.  RR  /\  B  e.  RR )  /\  (
0  <_  A  /\  A  <_  B ) )  /\  ( ( C  e.  RR  /\  D  e.  RR )  /\  (
0  <  C  /\  C  <_  D ) ) )  ->  C  e.  RR )
4 simprrl 499 . . . . 5  |-  ( ( ( ( A  e.  RR  /\  B  e.  RR )  /\  (
0  <_  A  /\  A  <_  B ) )  /\  ( ( C  e.  RR  /\  D  e.  RR )  /\  (
0  <  C  /\  C  <_  D ) ) )  ->  0  <  C )
5 simprlr 498 . . . . 5  |-  ( ( ( ( A  e.  RR  /\  B  e.  RR )  /\  (
0  <_  A  /\  A  <_  B ) )  /\  ( ( C  e.  RR  /\  D  e.  RR )  /\  (
0  <  C  /\  C  <_  D ) ) )  ->  D  e.  RR )
6 0red 7056 . . . . . 6  |-  ( ( ( ( A  e.  RR  /\  B  e.  RR )  /\  (
0  <_  A  /\  A  <_  B ) )  /\  ( ( C  e.  RR  /\  D  e.  RR )  /\  (
0  <  C  /\  C  <_  D ) ) )  ->  0  e.  RR )
76, 3, 5, 4, 2ltletrd 7462 . . . . 5  |-  ( ( ( ( A  e.  RR  /\  B  e.  RR )  /\  (
0  <_  A  /\  A  <_  B ) )  /\  ( ( C  e.  RR  /\  D  e.  RR )  /\  (
0  <  C  /\  C  <_  D ) ) )  ->  0  <  D )
8 lerec 7895 . . . . 5  |-  ( ( ( C  e.  RR  /\  0  <  C )  /\  ( D  e.  RR  /\  0  < 
D ) )  -> 
( C  <_  D  <->  ( 1  /  D )  <_  ( 1  /  C ) ) )
93, 4, 5, 7, 8syl22anc 1145 . . . 4  |-  ( ( ( ( A  e.  RR  /\  B  e.  RR )  /\  (
0  <_  A  /\  A  <_  B ) )  /\  ( ( C  e.  RR  /\  D  e.  RR )  /\  (
0  <  C  /\  C  <_  D ) ) )  ->  ( C  <_  D  <->  ( 1  /  D )  <_  (
1  /  C ) ) )
102, 9mpbid 139 . . 3  |-  ( ( ( ( A  e.  RR  /\  B  e.  RR )  /\  (
0  <_  A  /\  A  <_  B ) )  /\  ( ( C  e.  RR  /\  D  e.  RR )  /\  (
0  <  C  /\  C  <_  D ) ) )  ->  ( 1  /  D )  <_ 
( 1  /  C
) )
11 simplll 493 . . . . 5  |-  ( ( ( ( A  e.  RR  /\  B  e.  RR )  /\  (
0  <_  A  /\  A  <_  B ) )  /\  ( ( C  e.  RR  /\  D  e.  RR )  /\  (
0  <  C  /\  C  <_  D ) ) )  ->  A  e.  RR )
12 simplrl 495 . . . . 5  |-  ( ( ( ( A  e.  RR  /\  B  e.  RR )  /\  (
0  <_  A  /\  A  <_  B ) )  /\  ( ( C  e.  RR  /\  D  e.  RR )  /\  (
0  <  C  /\  C  <_  D ) ) )  ->  0  <_  A )
1311, 12jca 294 . . . 4  |-  ( ( ( ( A  e.  RR  /\  B  e.  RR )  /\  (
0  <_  A  /\  A  <_  B ) )  /\  ( ( C  e.  RR  /\  D  e.  RR )  /\  (
0  <  C  /\  C  <_  D ) ) )  ->  ( A  e.  RR  /\  0  <_  A ) )
14 simpllr 494 . . . 4  |-  ( ( ( ( A  e.  RR  /\  B  e.  RR )  /\  (
0  <_  A  /\  A  <_  B ) )  /\  ( ( C  e.  RR  /\  D  e.  RR )  /\  (
0  <  C  /\  C  <_  D ) ) )  ->  B  e.  RR )
155, 7gt0ap0d 7663 . . . . . 6  |-  ( ( ( ( A  e.  RR  /\  B  e.  RR )  /\  (
0  <_  A  /\  A  <_  B ) )  /\  ( ( C  e.  RR  /\  D  e.  RR )  /\  (
0  <  C  /\  C  <_  D ) ) )  ->  D #  0
)
165, 15rerecclapd 7852 . . . . 5  |-  ( ( ( ( A  e.  RR  /\  B  e.  RR )  /\  (
0  <_  A  /\  A  <_  B ) )  /\  ( ( C  e.  RR  /\  D  e.  RR )  /\  (
0  <  C  /\  C  <_  D ) ) )  ->  ( 1  /  D )  e.  RR )
17 recgt0 7861 . . . . . . 7  |-  ( ( D  e.  RR  /\  0  <  D )  -> 
0  <  ( 1  /  D ) )
185, 7, 17syl2anc 397 . . . . . 6  |-  ( ( ( ( A  e.  RR  /\  B  e.  RR )  /\  (
0  <_  A  /\  A  <_  B ) )  /\  ( ( C  e.  RR  /\  D  e.  RR )  /\  (
0  <  C  /\  C  <_  D ) ) )  ->  0  <  ( 1  /  D ) )
196, 16, 18ltled 7164 . . . . 5  |-  ( ( ( ( A  e.  RR  /\  B  e.  RR )  /\  (
0  <_  A  /\  A  <_  B ) )  /\  ( ( C  e.  RR  /\  D  e.  RR )  /\  (
0  <  C  /\  C  <_  D ) ) )  ->  0  <_  ( 1  /  D ) )
2016, 19jca 294 . . . 4  |-  ( ( ( ( A  e.  RR  /\  B  e.  RR )  /\  (
0  <_  A  /\  A  <_  B ) )  /\  ( ( C  e.  RR  /\  D  e.  RR )  /\  (
0  <  C  /\  C  <_  D ) ) )  ->  ( (
1  /  D )  e.  RR  /\  0  <_  ( 1  /  D
) ) )
213, 4gt0ap0d 7663 . . . . 5  |-  ( ( ( ( A  e.  RR  /\  B  e.  RR )  /\  (
0  <_  A  /\  A  <_  B ) )  /\  ( ( C  e.  RR  /\  D  e.  RR )  /\  (
0  <  C  /\  C  <_  D ) ) )  ->  C #  0
)
223, 21rerecclapd 7852 . . . 4  |-  ( ( ( ( A  e.  RR  /\  B  e.  RR )  /\  (
0  <_  A  /\  A  <_  B ) )  /\  ( ( C  e.  RR  /\  D  e.  RR )  /\  (
0  <  C  /\  C  <_  D ) ) )  ->  ( 1  /  C )  e.  RR )
23 lemul12a 7873 . . . 4  |-  ( ( ( ( A  e.  RR  /\  0  <_  A )  /\  B  e.  RR )  /\  (
( ( 1  /  D )  e.  RR  /\  0  <_  ( 1  /  D ) )  /\  ( 1  /  C )  e.  RR ) )  ->  (
( A  <_  B  /\  ( 1  /  D
)  <_  ( 1  /  C ) )  ->  ( A  x.  ( 1  /  D
) )  <_  ( B  x.  ( 1  /  C ) ) ) )
2413, 14, 20, 22, 23syl22anc 1145 . . 3  |-  ( ( ( ( A  e.  RR  /\  B  e.  RR )  /\  (
0  <_  A  /\  A  <_  B ) )  /\  ( ( C  e.  RR  /\  D  e.  RR )  /\  (
0  <  C  /\  C  <_  D ) ) )  ->  ( ( A  <_  B  /\  (
1  /  D )  <_  ( 1  /  C ) )  -> 
( A  x.  (
1  /  D ) )  <_  ( B  x.  ( 1  /  C
) ) ) )
251, 10, 24mp2and 417 . 2  |-  ( ( ( ( A  e.  RR  /\  B  e.  RR )  /\  (
0  <_  A  /\  A  <_  B ) )  /\  ( ( C  e.  RR  /\  D  e.  RR )  /\  (
0  <  C  /\  C  <_  D ) ) )  ->  ( A  x.  ( 1  /  D
) )  <_  ( B  x.  ( 1  /  C ) ) )
2611recnd 7083 . . 3  |-  ( ( ( ( A  e.  RR  /\  B  e.  RR )  /\  (
0  <_  A  /\  A  <_  B ) )  /\  ( ( C  e.  RR  /\  D  e.  RR )  /\  (
0  <  C  /\  C  <_  D ) ) )  ->  A  e.  CC )
275recnd 7083 . . 3  |-  ( ( ( ( A  e.  RR  /\  B  e.  RR )  /\  (
0  <_  A  /\  A  <_  B ) )  /\  ( ( C  e.  RR  /\  D  e.  RR )  /\  (
0  <  C  /\  C  <_  D ) ) )  ->  D  e.  CC )
2826, 27, 15divrecapd 7813 . 2  |-  ( ( ( ( A  e.  RR  /\  B  e.  RR )  /\  (
0  <_  A  /\  A  <_  B ) )  /\  ( ( C  e.  RR  /\  D  e.  RR )  /\  (
0  <  C  /\  C  <_  D ) ) )  ->  ( A  /  D )  =  ( A  x.  ( 1  /  D ) ) )
2914recnd 7083 . . 3  |-  ( ( ( ( A  e.  RR  /\  B  e.  RR )  /\  (
0  <_  A  /\  A  <_  B ) )  /\  ( ( C  e.  RR  /\  D  e.  RR )  /\  (
0  <  C  /\  C  <_  D ) ) )  ->  B  e.  CC )
303recnd 7083 . . 3  |-  ( ( ( ( A  e.  RR  /\  B  e.  RR )  /\  (
0  <_  A  /\  A  <_  B ) )  /\  ( ( C  e.  RR  /\  D  e.  RR )  /\  (
0  <  C  /\  C  <_  D ) ) )  ->  C  e.  CC )
3129, 30, 21divrecapd 7813 . 2  |-  ( ( ( ( A  e.  RR  /\  B  e.  RR )  /\  (
0  <_  A  /\  A  <_  B ) )  /\  ( ( C  e.  RR  /\  D  e.  RR )  /\  (
0  <  C  /\  C  <_  D ) ) )  ->  ( B  /  C )  =  ( B  x.  ( 1  /  C ) ) )
3225, 28, 313brtr4d 3819 1  |-  ( ( ( ( A  e.  RR  /\  B  e.  RR )  /\  (
0  <_  A  /\  A  <_  B ) )  /\  ( ( C  e.  RR  /\  D  e.  RR )  /\  (
0  <  C  /\  C  <_  D ) ) )  ->  ( A  /  D )  <_  ( B  /  C ) )
Colors of variables: wff set class
Syntax hints:    -> wi 4    /\ wa 101    <-> wb 102    e. wcel 1407   class class class wbr 3789  (class class class)co 5537   RRcr 6916   0cc0 6917   1c1 6918    x. cmul 6922    < clt 7089    <_ cle 7090    / cdiv 7695
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 103  ax-ia2 104  ax-ia3 105  ax-in1 552  ax-in2 553  ax-io 638  ax-5 1350  ax-7 1351  ax-gen 1352  ax-ie1 1396  ax-ie2 1397  ax-8 1409  ax-10 1410  ax-11 1411  ax-i12 1412  ax-bndl 1413  ax-4 1414  ax-13 1418  ax-14 1419  ax-17 1433  ax-i9 1437  ax-ial 1441  ax-i5r 1442  ax-ext 2036  ax-coll 3897  ax-sep 3900  ax-nul 3908  ax-pow 3952  ax-pr 3969  ax-un 4195  ax-setind 4287  ax-iinf 4336  ax-cnex 7003  ax-resscn 7004  ax-1cn 7005  ax-1re 7006  ax-icn 7007  ax-addcl 7008  ax-addrcl 7009  ax-mulcl 7010  ax-mulrcl 7011  ax-addcom 7012  ax-mulcom 7013  ax-addass 7014  ax-mulass 7015  ax-distr 7016  ax-i2m1 7017  ax-1rid 7019  ax-0id 7020  ax-rnegex 7021  ax-precex 7022  ax-cnre 7023  ax-pre-ltirr 7024  ax-pre-ltwlin 7025  ax-pre-lttrn 7026  ax-pre-apti 7027  ax-pre-ltadd 7028  ax-pre-mulgt0 7029  ax-pre-mulext 7030
This theorem depends on definitions:  df-bi 114  df-dc 752  df-3or 895  df-3an 896  df-tru 1260  df-fal 1263  df-nf 1364  df-sb 1660  df-eu 1917  df-mo 1918  df-clab 2041  df-cleq 2047  df-clel 2050  df-nfc 2181  df-ne 2219  df-nel 2313  df-ral 2326  df-rex 2327  df-reu 2328  df-rmo 2329  df-rab 2330  df-v 2574  df-sbc 2785  df-csb 2878  df-dif 2945  df-un 2947  df-in 2949  df-ss 2956  df-nul 3250  df-pw 3386  df-sn 3406  df-pr 3407  df-op 3409  df-uni 3606  df-int 3641  df-iun 3684  df-br 3790  df-opab 3844  df-mpt 3845  df-tr 3880  df-eprel 4051  df-id 4055  df-po 4058  df-iso 4059  df-iord 4128  df-on 4130  df-suc 4133  df-iom 4339  df-xp 4376  df-rel 4377  df-cnv 4378  df-co 4379  df-dm 4380  df-rn 4381  df-res 4382  df-ima 4383  df-iota 4892  df-fun 4929  df-fn 4930  df-f 4931  df-f1 4932  df-fo 4933  df-f1o 4934  df-fv 4935  df-riota 5493  df-ov 5540  df-oprab 5541  df-mpt2 5542  df-1st 5792  df-2nd 5793  df-recs 5948  df-irdg 5985  df-1o 6029  df-2o 6030  df-oadd 6033  df-omul 6034  df-er 6134  df-ec 6136  df-qs 6140  df-ni 6430  df-pli 6431  df-mi 6432  df-lti 6433  df-plpq 6470  df-mpq 6471  df-enq 6473  df-nqqs 6474  df-plqqs 6475  df-mqqs 6476  df-1nqqs 6477  df-rq 6478  df-ltnqqs 6479  df-enq0 6550  df-nq0 6551  df-0nq0 6552  df-plq0 6553  df-mq0 6554  df-inp 6592  df-i1p 6593  df-iplp 6594  df-iltp 6596  df-enr 6839  df-nr 6840  df-ltr 6843  df-0r 6844  df-1r 6845  df-0 6924  df-1 6925  df-r 6927  df-lt 6930  df-pnf 7091  df-mnf 7092  df-xr 7093  df-ltxr 7094  df-le 7095  df-sub 7217  df-neg 7218  df-reap 7610  df-ap 7617  df-div 7696
This theorem is referenced by:  lediv2a  7906  lediv12ad  8750
  Copyright terms: Public domain W3C validator