MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  ordtypelem7 Structured version   Unicode version

Theorem ordtypelem7 7992
Description: Lemma for ordtype 8000. 
ran  O is an initial segment of  A under the well-order  R. (Contributed by Mario Carneiro, 25-Jun-2015.)
Hypotheses
Ref Expression
ordtypelem.1  |-  F  = recs ( G )
ordtypelem.2  |-  C  =  { w  e.  A  |  A. j  e.  ran  h  j R w }
ordtypelem.3  |-  G  =  ( h  e.  _V  |->  ( iota_ v  e.  C  A. u  e.  C  -.  u R v ) )
ordtypelem.5  |-  T  =  { x  e.  On  |  E. t  e.  A  A. z  e.  ( F " x ) z R t }
ordtypelem.6  |-  O  = OrdIso
( R ,  A
)
ordtypelem.7  |-  ( ph  ->  R  We  A )
ordtypelem.8  |-  ( ph  ->  R Se  A )
Assertion
Ref Expression
ordtypelem7  |-  ( ( ( ph  /\  N  e.  A )  /\  M  e.  dom  O )  -> 
( ( O `  M ) R N  \/  N  e.  ran  O ) )
Distinct variable groups:    v, u, C    h, j, t, u, v, w, x, z, M    j, N, u, w    R, h, j, t, u, v, w, x, z    A, h, j, t, u, v, w, x, z    t, O, u, v, x    ph, t, x    h, F, j, t, u, v, w, x, z
Allowed substitution hints:    ph( z, w, v, u, h, j)    C( x, z, w, t, h, j)    T( x, z, w, v, u, t, h, j)    G( x, z, w, v, u, t, h, j)    N( x, z, v, t, h)    O( z, w, h, j)

Proof of Theorem ordtypelem7
Dummy variables  a 
b are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 eldif 3389 . . . . . 6  |-  ( N  e.  ( A  \  ran  O )  <->  ( N  e.  A  /\  -.  N  e.  ran  O ) )
2 ordtypelem.1 . . . . . . . . . . . 12  |-  F  = recs ( G )
3 ordtypelem.2 . . . . . . . . . . . 12  |-  C  =  { w  e.  A  |  A. j  e.  ran  h  j R w }
4 ordtypelem.3 . . . . . . . . . . . 12  |-  G  =  ( h  e.  _V  |->  ( iota_ v  e.  C  A. u  e.  C  -.  u R v ) )
5 ordtypelem.5 . . . . . . . . . . . 12  |-  T  =  { x  e.  On  |  E. t  e.  A  A. z  e.  ( F " x ) z R t }
6 ordtypelem.6 . . . . . . . . . . . 12  |-  O  = OrdIso
( R ,  A
)
7 ordtypelem.7 . . . . . . . . . . . 12  |-  ( ph  ->  R  We  A )
8 ordtypelem.8 . . . . . . . . . . . 12  |-  ( ph  ->  R Se  A )
92, 3, 4, 5, 6, 7, 8ordtypelem4 7989 . . . . . . . . . . 11  |-  ( ph  ->  O : ( T  i^i  dom  F ) --> A )
109adantr 466 . . . . . . . . . 10  |-  ( (
ph  /\  N  e.  ( A  \  ran  O
) )  ->  O : ( T  i^i  dom 
F ) --> A )
11 fdm 5693 . . . . . . . . . 10  |-  ( O : ( T  i^i  dom 
F ) --> A  ->  dom  O  =  ( T  i^i  dom  F )
)
1210, 11syl 17 . . . . . . . . 9  |-  ( (
ph  /\  N  e.  ( A  \  ran  O
) )  ->  dom  O  =  ( T  i^i  dom 
F ) )
13 inss1 3625 . . . . . . . . . 10  |-  ( T  i^i  dom  F )  C_  T
142, 3, 4, 5, 6, 7, 8ordtypelem2 7987 . . . . . . . . . . . 12  |-  ( ph  ->  Ord  T )
1514adantr 466 . . . . . . . . . . 11  |-  ( (
ph  /\  N  e.  ( A  \  ran  O
) )  ->  Ord  T )
16 ordsson 6574 . . . . . . . . . . 11  |-  ( Ord 
T  ->  T  C_  On )
1715, 16syl 17 . . . . . . . . . 10  |-  ( (
ph  /\  N  e.  ( A  \  ran  O
) )  ->  T  C_  On )
1813, 17syl5ss 3418 . . . . . . . . 9  |-  ( (
ph  /\  N  e.  ( A  \  ran  O
) )  ->  ( T  i^i  dom  F )  C_  On )
1912, 18eqsstrd 3441 . . . . . . . 8  |-  ( (
ph  /\  N  e.  ( A  \  ran  O
) )  ->  dom  O 
C_  On )
2019sseld 3406 . . . . . . 7  |-  ( (
ph  /\  N  e.  ( A  \  ran  O
) )  ->  ( M  e.  dom  O  ->  M  e.  On )
)
21 eleq1 2494 . . . . . . . . . . 11  |-  ( a  =  b  ->  (
a  e.  dom  O  <->  b  e.  dom  O ) )
22 fveq2 5825 . . . . . . . . . . . 12  |-  ( a  =  b  ->  ( O `  a )  =  ( O `  b ) )
2322breq1d 4376 . . . . . . . . . . 11  |-  ( a  =  b  ->  (
( O `  a
) R N  <->  ( O `  b ) R N ) )
2421, 23imbi12d 321 . . . . . . . . . 10  |-  ( a  =  b  ->  (
( a  e.  dom  O  ->  ( O `  a ) R N )  <->  ( b  e. 
dom  O  ->  ( O `
 b ) R N ) ) )
2524imbi2d 317 . . . . . . . . 9  |-  ( a  =  b  ->  (
( ( ph  /\  N  e.  ( A  \  ran  O ) )  ->  ( a  e. 
dom  O  ->  ( O `
 a ) R N ) )  <->  ( ( ph  /\  N  e.  ( A  \  ran  O
) )  ->  (
b  e.  dom  O  ->  ( O `  b
) R N ) ) ) )
26 eleq1 2494 . . . . . . . . . . 11  |-  ( a  =  M  ->  (
a  e.  dom  O  <->  M  e.  dom  O ) )
27 fveq2 5825 . . . . . . . . . . . 12  |-  ( a  =  M  ->  ( O `  a )  =  ( O `  M ) )
2827breq1d 4376 . . . . . . . . . . 11  |-  ( a  =  M  ->  (
( O `  a
) R N  <->  ( O `  M ) R N ) )
2926, 28imbi12d 321 . . . . . . . . . 10  |-  ( a  =  M  ->  (
( a  e.  dom  O  ->  ( O `  a ) R N )  <->  ( M  e. 
dom  O  ->  ( O `
 M ) R N ) ) )
3029imbi2d 317 . . . . . . . . 9  |-  ( a  =  M  ->  (
( ( ph  /\  N  e.  ( A  \  ran  O ) )  ->  ( a  e. 
dom  O  ->  ( O `
 a ) R N ) )  <->  ( ( ph  /\  N  e.  ( A  \  ran  O
) )  ->  ( M  e.  dom  O  -> 
( O `  M
) R N ) ) ) )
31 r19.21v 2770 . . . . . . . . . 10  |-  ( A. b  e.  a  (
( ph  /\  N  e.  ( A  \  ran  O ) )  ->  (
b  e.  dom  O  ->  ( O `  b
) R N ) )  <->  ( ( ph  /\  N  e.  ( A 
\  ran  O )
)  ->  A. b  e.  a  ( b  e.  dom  O  ->  ( O `  b ) R N ) ) )
322tfr1a 7067 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( Fun 
F  /\  Lim  dom  F
)
3332simpri 463 . . . . . . . . . . . . . . . . . . . . . 22  |-  Lim  dom  F
34 limord 5444 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( Lim 
dom  F  ->  Ord  dom  F )
3533, 34ax-mp 5 . . . . . . . . . . . . . . . . . . . . 21  |-  Ord  dom  F
36 ordin 5415 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( Ord  T  /\  Ord  dom 
F )  ->  Ord  ( T  i^i  dom  F
) )
3715, 35, 36sylancl 666 . . . . . . . . . . . . . . . . . . . 20  |-  ( (
ph  /\  N  e.  ( A  \  ran  O
) )  ->  Ord  ( T  i^i  dom  F
) )
38 ordeq 5392 . . . . . . . . . . . . . . . . . . . . 21  |-  ( dom 
O  =  ( T  i^i  dom  F )  ->  ( Ord  dom  O  <->  Ord  ( T  i^i  dom  F ) ) )
3912, 38syl 17 . . . . . . . . . . . . . . . . . . . 20  |-  ( (
ph  /\  N  e.  ( A  \  ran  O
) )  ->  ( Ord  dom  O  <->  Ord  ( T  i^i  dom  F )
) )
4037, 39mpbird 235 . . . . . . . . . . . . . . . . . . 19  |-  ( (
ph  /\  N  e.  ( A  \  ran  O
) )  ->  Ord  dom 
O )
41 ordelss 5401 . . . . . . . . . . . . . . . . . . 19  |-  ( ( Ord  dom  O  /\  a  e.  dom  O )  ->  a  C_  dom  O )
4240, 41sylan 473 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  a  e.  dom  O )  -> 
a  C_  dom  O )
4342sselda 3407 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  a  e.  dom  O )  /\  b  e.  a )  ->  b  e.  dom  O )
44 pm5.5 337 . . . . . . . . . . . . . . . . 17  |-  ( b  e.  dom  O  -> 
( ( b  e. 
dom  O  ->  ( O `
 b ) R N )  <->  ( O `  b ) R N ) )
4543, 44syl 17 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  a  e.  dom  O )  /\  b  e.  a )  ->  (
( b  e.  dom  O  ->  ( O `  b ) R N )  <->  ( O `  b ) R N ) )
4645ralbidva 2801 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  a  e.  dom  O )  -> 
( A. b  e.  a  ( b  e. 
dom  O  ->  ( O `
 b ) R N )  <->  A. b  e.  a  ( O `  b ) R N ) )
47 eldifn 3531 . . . . . . . . . . . . . . . . . . 19  |-  ( N  e.  ( A  \  ran  O )  ->  -.  N  e.  ran  O )
4847ad2antlr 731 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  -.  N  e.  ran  O )
499ad2antrr 730 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  O :
( T  i^i  dom  F ) --> A )
50 ffn 5689 . . . . . . . . . . . . . . . . . . . . 21  |-  ( O : ( T  i^i  dom 
F ) --> A  ->  O  Fn  ( T  i^i  dom  F ) )
5149, 50syl 17 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  O  Fn  ( T  i^i  dom  F
) )
52 simprl 762 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  a  e.  dom  O )
5349, 11syl 17 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  dom  O  =  ( T  i^i  dom  F ) )
5452, 53eleqtrd 2508 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  a  e.  ( T  i^i  dom  F
) )
55 fnfvelrn 5978 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( O  Fn  ( T  i^i  dom  F )  /\  a  e.  ( T  i^i  dom  F )
)  ->  ( O `  a )  e.  ran  O )
5651, 54, 55syl2anc 665 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  ( O `  a )  e.  ran  O )
57 eleq1 2494 . . . . . . . . . . . . . . . . . . 19  |-  ( ( O `  a )  =  N  ->  (
( O `  a
)  e.  ran  O  <->  N  e.  ran  O ) )
5856, 57syl5ibcom 223 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  ( ( O `  a )  =  N  ->  N  e. 
ran  O ) )
5948, 58mtod 180 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  -.  ( O `  a )  =  N )
60 eldifi 3530 . . . . . . . . . . . . . . . . . . . 20  |-  ( N  e.  ( A  \  ran  O )  ->  N  e.  A )
6160ad2antlr 731 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  N  e.  A )
62 simprr 764 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  A. b  e.  a  ( O `  b ) R N )
632, 3, 4, 5, 6, 7, 8ordtypelem1 7986 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ph  ->  O  =  ( F  |`  T ) )
6463ad2antrr 730 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  O  =  ( F  |`  T ) )
6542adantrr 721 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  a  C_  dom  O )
6665, 53sseqtrd 3443 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  a  C_  ( T  i^i  dom  F
) )
6766, 13syl6ss 3419 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  a  C_  T )
68 fveq1 5824 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( O  =  ( F  |`  T )  ->  ( O `  b )  =  ( ( F  |`  T ) `  b
) )
69 ssel2 3402 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( a  C_  T  /\  b  e.  a )  ->  b  e.  T )
70 fvres 5839 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( b  e.  T  ->  (
( F  |`  T ) `
 b )  =  ( F `  b
) )
7169, 70syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( a  C_  T  /\  b  e.  a )  ->  ( ( F  |`  T ) `  b
)  =  ( F `
 b ) )
7268, 71sylan9eq 2482 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( O  =  ( F  |`  T )  /\  (
a  C_  T  /\  b  e.  a )
)  ->  ( O `  b )  =  ( F `  b ) )
7372anassrs 652 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( O  =  ( F  |`  T )  /\  a  C_  T )  /\  b  e.  a )  ->  ( O `  b )  =  ( F `  b ) )
7473breq1d 4376 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( O  =  ( F  |`  T )  /\  a  C_  T )  /\  b  e.  a )  ->  ( ( O `  b ) R N  <->  ( F `  b ) R N ) )
7574ralbidva 2801 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( O  =  ( F  |`  T )  /\  a  C_  T )  ->  ( A. b  e.  a 
( O `  b
) R N  <->  A. b  e.  a  ( F `  b ) R N ) )
7664, 67, 75syl2anc 665 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  ( A. b  e.  a  ( O `  b ) R N  <->  A. b  e.  a  ( F `  b
) R N ) )
7762, 76mpbid 213 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  A. b  e.  a  ( F `  b ) R N )
7832simpli 459 . . . . . . . . . . . . . . . . . . . . . 22  |-  Fun  F
79 funfn 5573 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( Fun 
F  <->  F  Fn  dom  F )
8078, 79mpbi 211 . . . . . . . . . . . . . . . . . . . . 21  |-  F  Fn  dom  F
81 inss2 3626 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( T  i^i  dom  F )  C_ 
dom  F
8266, 81syl6ss 3419 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  a  C_  dom  F )
83 breq1 4369 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( j  =  ( F `  b )  ->  (
j R N  <->  ( F `  b ) R N ) )
8483ralima 6104 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( F  Fn  dom  F  /\  a  C_  dom  F
)  ->  ( A. j  e.  ( F " a ) j R N  <->  A. b  e.  a  ( F `  b
) R N ) )
8580, 82, 84sylancr 667 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  ( A. j  e.  ( F " a ) j R N  <->  A. b  e.  a  ( F `  b
) R N ) )
8677, 85mpbird 235 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  A. j  e.  ( F " a
) j R N )
87 breq2 4370 . . . . . . . . . . . . . . . . . . . . 21  |-  ( w  =  N  ->  (
j R w  <->  j R N ) )
8887ralbidv 2804 . . . . . . . . . . . . . . . . . . . 20  |-  ( w  =  N  ->  ( A. j  e.  ( F " a ) j R w  <->  A. j  e.  ( F " a
) j R N ) )
8988elrab 3171 . . . . . . . . . . . . . . . . . . 19  |-  ( N  e.  { w  e.  A  |  A. j  e.  ( F " a
) j R w }  <->  ( N  e.  A  /\  A. j  e.  ( F " a
) j R N ) )
9061, 86, 89sylanbrc 668 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  N  e.  { w  e.  A  |  A. j  e.  ( F " a ) j R w } )
9164fveq1d 5827 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  ( O `  a )  =  ( ( F  |`  T ) `
 a ) )
9213, 54sseldi 3405 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  a  e.  T )
93 fvres 5839 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( a  e.  T  ->  (
( F  |`  T ) `
 a )  =  ( F `  a
) )
9492, 93syl 17 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  ( ( F  |`  T ) `  a )  =  ( F `  a ) )
9591, 94eqtrd 2462 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  ( O `  a )  =  ( F `  a ) )
96 simpll 758 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  ph )
972, 3, 4, 5, 6, 7, 8ordtypelem3 7988 . . . . . . . . . . . . . . . . . . . . 21  |-  ( (
ph  /\  a  e.  ( T  i^i  dom  F
) )  ->  ( F `  a )  e.  { v  e.  {
w  e.  A  |  A. j  e.  ( F " a ) j R w }  |  A. u  e.  { w  e.  A  |  A. j  e.  ( F " a ) j R w }  -.  u R v } )
9896, 54, 97syl2anc 665 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  ( F `  a )  e.  {
v  e.  { w  e.  A  |  A. j  e.  ( F " a ) j R w }  |  A. u  e.  { w  e.  A  |  A. j  e.  ( F " a ) j R w }  -.  u R v } )
9995, 98eqeltrd 2506 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  ( O `  a )  e.  {
v  e.  { w  e.  A  |  A. j  e.  ( F " a ) j R w }  |  A. u  e.  { w  e.  A  |  A. j  e.  ( F " a ) j R w }  -.  u R v } )
100 breq2 4370 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( v  =  ( O `  a )  ->  (
u R v  <->  u R
( O `  a
) ) )
101100notbid 295 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( v  =  ( O `  a )  ->  ( -.  u R v  <->  -.  u R ( O `  a ) ) )
102101ralbidv 2804 . . . . . . . . . . . . . . . . . . . . 21  |-  ( v  =  ( O `  a )  ->  ( A. u  e.  { w  e.  A  |  A. j  e.  ( F " a ) j R w }  -.  u R v  <->  A. u  e.  { w  e.  A  |  A. j  e.  ( F " a ) j R w }  -.  u R ( O `
 a ) ) )
103102elrab 3171 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( O `  a )  e.  { v  e. 
{ w  e.  A  |  A. j  e.  ( F " a ) j R w }  |  A. u  e.  {
w  e.  A  |  A. j  e.  ( F " a ) j R w }  -.  u R v }  <->  ( ( O `  a )  e.  { w  e.  A  |  A. j  e.  ( F " a ) j R w }  /\  A. u  e.  {
w  e.  A  |  A. j  e.  ( F " a ) j R w }  -.  u R ( O `  a ) ) )
104103simprbi 465 . . . . . . . . . . . . . . . . . . 19  |-  ( ( O `  a )  e.  { v  e. 
{ w  e.  A  |  A. j  e.  ( F " a ) j R w }  |  A. u  e.  {
w  e.  A  |  A. j  e.  ( F " a ) j R w }  -.  u R v }  ->  A. u  e.  { w  e.  A  |  A. j  e.  ( F " a ) j R w }  -.  u R ( O `  a ) )
10599, 104syl 17 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  A. u  e.  { w  e.  A  |  A. j  e.  ( F " a ) j R w }  -.  u R ( O `
 a ) )
106 breq1 4369 . . . . . . . . . . . . . . . . . . . 20  |-  ( u  =  N  ->  (
u R ( O `
 a )  <->  N R
( O `  a
) ) )
107106notbid 295 . . . . . . . . . . . . . . . . . . 19  |-  ( u  =  N  ->  ( -.  u R ( O `
 a )  <->  -.  N R ( O `  a ) ) )
108107rspcv 3121 . . . . . . . . . . . . . . . . . 18  |-  ( N  e.  { w  e.  A  |  A. j  e.  ( F " a
) j R w }  ->  ( A. u  e.  { w  e.  A  |  A. j  e.  ( F " a ) j R w }  -.  u R ( O `  a )  ->  -.  N R ( O `  a ) ) )
10990, 105, 108sylc 62 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  -.  N R ( O `  a ) )
110 weso 4787 . . . . . . . . . . . . . . . . . . . . 21  |-  ( R  We  A  ->  R  Or  A )
1117, 110syl 17 . . . . . . . . . . . . . . . . . . . 20  |-  ( ph  ->  R  Or  A )
112111ad2antrr 730 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  R  Or  A )
11349, 54ffvelrnd 5982 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  ( O `  a )  e.  A
)
114 sotric 4743 . . . . . . . . . . . . . . . . . . 19  |-  ( ( R  Or  A  /\  ( ( O `  a )  e.  A  /\  N  e.  A
) )  ->  (
( O `  a
) R N  <->  -.  (
( O `  a
)  =  N  \/  N R ( O `  a ) ) ) )
115112, 113, 61, 114syl12anc 1262 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  ( ( O `  a ) R N  <->  -.  ( ( O `  a )  =  N  \/  N R ( O `  a ) ) ) )
116 ioran 492 . . . . . . . . . . . . . . . . . 18  |-  ( -.  ( ( O `  a )  =  N  \/  N R ( O `  a ) )  <->  ( -.  ( O `  a )  =  N  /\  -.  N R ( O `  a ) ) )
117115, 116syl6bb 264 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  ( ( O `  a ) R N  <->  ( -.  ( O `  a )  =  N  /\  -.  N R ( O `  a ) ) ) )
11859, 109, 117mpbir2and 930 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  (
a  e.  dom  O  /\  A. b  e.  a  ( O `  b
) R N ) )  ->  ( O `  a ) R N )
119118expr 618 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  a  e.  dom  O )  -> 
( A. b  e.  a  ( O `  b ) R N  ->  ( O `  a ) R N ) )
12046, 119sylbid 218 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  /\  a  e.  dom  O )  -> 
( A. b  e.  a  ( b  e. 
dom  O  ->  ( O `
 b ) R N )  ->  ( O `  a ) R N ) )
121120ex 435 . . . . . . . . . . . . 13  |-  ( (
ph  /\  N  e.  ( A  \  ran  O
) )  ->  (
a  e.  dom  O  ->  ( A. b  e.  a  ( b  e. 
dom  O  ->  ( O `
 b ) R N )  ->  ( O `  a ) R N ) ) )
122121com23 81 . . . . . . . . . . . 12  |-  ( (
ph  /\  N  e.  ( A  \  ran  O
) )  ->  ( A. b  e.  a 
( b  e.  dom  O  ->  ( O `  b ) R N )  ->  ( a  e.  dom  O  ->  ( O `  a ) R N ) ) )
123122a2i 14 . . . . . . . . . . 11  |-  ( ( ( ph  /\  N  e.  ( A  \  ran  O ) )  ->  A. b  e.  a  ( b  e.  dom  O  ->  ( O `  b ) R N ) )  -> 
( ( ph  /\  N  e.  ( A  \  ran  O ) )  ->  ( a  e. 
dom  O  ->  ( O `
 a ) R N ) ) )
124123a1i 11 . . . . . . . . . 10  |-  ( a  e.  On  ->  (
( ( ph  /\  N  e.  ( A  \  ran  O ) )  ->  A. b  e.  a  ( b  e.  dom  O  ->  ( O `  b ) R N ) )  ->  (
( ph  /\  N  e.  ( A  \  ran  O ) )  ->  (
a  e.  dom  O  ->  ( O `  a
) R N ) ) ) )
12531, 124syl5bi 220 . . . . . . . . 9  |-  ( a  e.  On  ->  ( A. b  e.  a 
( ( ph  /\  N  e.  ( A  \  ran  O ) )  ->  ( b  e. 
dom  O  ->  ( O `
 b ) R N ) )  -> 
( ( ph  /\  N  e.  ( A  \  ran  O ) )  ->  ( a  e. 
dom  O  ->  ( O `
 a ) R N ) ) ) )
12625, 30, 125tfis3 6642 . . . . . . . 8  |-  ( M  e.  On  ->  (
( ph  /\  N  e.  ( A  \  ran  O ) )  ->  ( M  e.  dom  O  -> 
( O `  M
) R N ) ) )
127126com3l 84 . . . . . . 7  |-  ( (
ph  /\  N  e.  ( A  \  ran  O
) )  ->  ( M  e.  dom  O  -> 
( M  e.  On  ->  ( O `  M
) R N ) ) )
12820, 127mpdd 41 . . . . . 6  |-  ( (
ph  /\  N  e.  ( A  \  ran  O
) )  ->  ( M  e.  dom  O  -> 
( O `  M
) R N ) )
1291, 128sylan2br 478 . . . . 5  |-  ( (
ph  /\  ( N  e.  A  /\  -.  N  e.  ran  O ) )  ->  ( M  e. 
dom  O  ->  ( O `
 M ) R N ) )
130129anassrs 652 . . . 4  |-  ( ( ( ph  /\  N  e.  A )  /\  -.  N  e.  ran  O )  ->  ( M  e. 
dom  O  ->  ( O `
 M ) R N ) )
131130impancom 441 . . 3  |-  ( ( ( ph  /\  N  e.  A )  /\  M  e.  dom  O )  -> 
( -.  N  e. 
ran  O  ->  ( O `
 M ) R N ) )
132131orrd 379 . 2  |-  ( ( ( ph  /\  N  e.  A )  /\  M  e.  dom  O )  -> 
( N  e.  ran  O  \/  ( O `  M ) R N ) )
133132orcomd 389 1  |-  ( ( ( ph  /\  N  e.  A )  /\  M  e.  dom  O )  -> 
( ( O `  M ) R N  \/  N  e.  ran  O ) )
Colors of variables: wff setvar class
Syntax hints:   -. wn 3    -> wi 4    <-> wb 187    \/ wo 369    /\ wa 370    = wceq 1437    e. wcel 1872   A.wral 2714   E.wrex 2715   {crab 2718   _Vcvv 3022    \ cdif 3376    i^i cin 3378    C_ wss 3379   class class class wbr 4366    |-> cmpt 4425    Or wor 4716   Se wse 4753    We wwe 4754   dom cdm 4796   ran crn 4797    |` cres 4798   "cima 4799   Ord word 5384   Oncon0 5385   Lim wlim 5386   Fun wfun 5538    Fn wfn 5539   -->wf 5540   ` cfv 5544   iota_crio 6210  recscrecs 7044  OrdIsocoi 7977
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1663  ax-4 1676  ax-5 1752  ax-6 1798  ax-7 1843  ax-8 1874  ax-9 1876  ax-10 1891  ax-11 1896  ax-12 1909  ax-13 2063  ax-ext 2408  ax-sep 4489  ax-nul 4498  ax-pow 4545  ax-pr 4603  ax-un 6541
This theorem depends on definitions:  df-bi 188  df-or 371  df-an 372  df-3or 983  df-3an 984  df-tru 1440  df-ex 1658  df-nf 1662  df-sb 1791  df-eu 2280  df-mo 2281  df-clab 2415  df-cleq 2421  df-clel 2424  df-nfc 2558  df-ne 2601  df-ral 2719  df-rex 2720  df-reu 2721  df-rmo 2722  df-rab 2723  df-v 3024  df-sbc 3243  df-csb 3339  df-dif 3382  df-un 3384  df-in 3386  df-ss 3393  df-pss 3395  df-nul 3705  df-if 3855  df-pw 3926  df-sn 3942  df-pr 3944  df-tp 3946  df-op 3948  df-uni 4163  df-iun 4244  df-br 4367  df-opab 4426  df-mpt 4427  df-tr 4462  df-eprel 4707  df-id 4711  df-po 4717  df-so 4718  df-fr 4755  df-se 4756  df-we 4757  df-xp 4802  df-rel 4803  df-cnv 4804  df-co 4805  df-dm 4806  df-rn 4807  df-res 4808  df-ima 4809  df-pred 5342  df-ord 5388  df-on 5389  df-lim 5390  df-suc 5391  df-iota 5508  df-fun 5546  df-fn 5547  df-f 5548  df-f1 5549  df-fo 5550  df-f1o 5551  df-fv 5552  df-riota 6211  df-wrecs 6983  df-recs 7045  df-oi 7978
This theorem is referenced by:  ordtypelem9  7994  ordtypelem10  7995  oiiniseg  8001
  Copyright terms: Public domain W3C validator