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

Theorem disjunsn 29407
Description: Append an element to a disjoint collection. Similar to ralunsn 4422, gsumunsn 18359, etc. (Contributed by Thierry Arnoux, 28-Mar-2018.)
Hypothesis
Ref Expression
disjunsn.s  |-  ( x  =  M  ->  B  =  C )
Assertion
Ref Expression
disjunsn  |-  ( ( M  e.  V  /\  -.  M  e.  A
)  ->  (Disj  x  e.  ( A  u.  { M } ) B  <->  (Disj  x  e.  A  B  /\  ( U_ x  e.  A  B  i^i  C )  =  (/) ) ) )
Distinct variable groups:    x, A    x, C    x, M    x, V
Allowed substitution hint:    B( x)

Proof of Theorem disjunsn
Dummy variables  i 
j are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 disjors 4635 . . . . . 6  |-  (Disj  x  e.  ( A  u.  { M } ) B  <->  A. i  e.  ( A  u.  { M } ) A. j  e.  ( A  u.  { M } ) ( i  =  j  \/  ( [_ i  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) )
2 eqeq1 2626 . . . . . . . . 9  |-  ( i  =  M  ->  (
i  =  j  <->  M  =  j ) )
3 csbeq1 3536 . . . . . . . . . . 11  |-  ( i  =  M  ->  [_ i  /  x ]_ B  = 
[_ M  /  x ]_ B )
43ineq1d 3813 . . . . . . . . . 10  |-  ( i  =  M  ->  ( [_ i  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B ) )
54eqeq1d 2624 . . . . . . . . 9  |-  ( i  =  M  ->  (
( [_ i  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/)  <->  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) )
62, 5orbi12d 746 . . . . . . . 8  |-  ( i  =  M  ->  (
( i  =  j  \/  ( [_ i  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) 
<->  ( M  =  j  \/  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) ) )
76ralbidv 2986 . . . . . . 7  |-  ( i  =  M  ->  ( A. j  e.  ( A  u.  { M } ) ( i  =  j  \/  ( [_ i  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) )  <->  A. j  e.  ( A  u.  { M } ) ( M  =  j  \/  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) ) )
87ralunsn 4422 . . . . . 6  |-  ( M  e.  V  ->  ( A. i  e.  ( A  u.  { M } ) A. j  e.  ( A  u.  { M } ) ( i  =  j  \/  ( [_ i  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) )  <->  ( A. i  e.  A  A. j  e.  ( A  u.  { M } ) ( i  =  j  \/  ( [_ i  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) )  /\  A. j  e.  ( A  u.  { M } ) ( M  =  j  \/  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) ) ) )
91, 8syl5bb 272 . . . . 5  |-  ( M  e.  V  ->  (Disj  x  e.  ( A  u.  { M } ) B  <-> 
( A. i  e.  A  A. j  e.  ( A  u.  { M } ) ( i  =  j  \/  ( [_ i  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) )  /\  A. j  e.  ( A  u.  { M } ) ( M  =  j  \/  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) ) ) )
10 eqeq2 2633 . . . . . . . . 9  |-  ( j  =  M  ->  (
i  =  j  <->  i  =  M ) )
11 csbeq1 3536 . . . . . . . . . . 11  |-  ( j  =  M  ->  [_ j  /  x ]_ B  = 
[_ M  /  x ]_ B )
1211ineq2d 3814 . . . . . . . . . 10  |-  ( j  =  M  ->  ( [_ i  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B ) )
1312eqeq1d 2624 . . . . . . . . 9  |-  ( j  =  M  ->  (
( [_ i  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/)  <->  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) )
1410, 13orbi12d 746 . . . . . . . 8  |-  ( j  =  M  ->  (
( i  =  j  \/  ( [_ i  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) 
<->  ( i  =  M  \/  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) ) )
1514ralunsn 4422 . . . . . . 7  |-  ( M  e.  V  ->  ( A. j  e.  ( A  u.  { M } ) ( i  =  j  \/  ( [_ i  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) )  <->  ( A. j  e.  A  (
i  =  j  \/  ( [_ i  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) )  /\  (
i  =  M  \/  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) ) ) )
1615ralbidv 2986 . . . . . 6  |-  ( M  e.  V  ->  ( A. i  e.  A  A. j  e.  ( A  u.  { M } ) ( i  =  j  \/  ( [_ i  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) )  <->  A. i  e.  A  ( A. j  e.  A  (
i  =  j  \/  ( [_ i  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) )  /\  (
i  =  M  \/  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) ) ) )
17 eqeq2 2633 . . . . . . . . 9  |-  ( j  =  M  ->  ( M  =  j  <->  M  =  M ) )
1811ineq2d 3814 . . . . . . . . . 10  |-  ( j  =  M  ->  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  ( [_ M  /  x ]_ B  i^i  [_ M  /  x ]_ B ) )
1918eqeq1d 2624 . . . . . . . . 9  |-  ( j  =  M  ->  (
( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/)  <->  ( [_ M  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) )
2017, 19orbi12d 746 . . . . . . . 8  |-  ( j  =  M  ->  (
( M  =  j  \/  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) 
<->  ( M  =  M  \/  ( [_ M  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) ) )
2120ralunsn 4422 . . . . . . 7  |-  ( M  e.  V  ->  ( A. j  e.  ( A  u.  { M } ) ( M  =  j  \/  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) )  <->  ( A. j  e.  A  ( M  =  j  \/  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) )  /\  ( M  =  M  \/  ( [_ M  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) ) ) )
22 eqid 2622 . . . . . . . . 9  |-  M  =  M
2322orci 405 . . . . . . . 8  |-  ( M  =  M  \/  ( [_ M  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) )
2423biantru 526 . . . . . . 7  |-  ( A. j  e.  A  ( M  =  j  \/  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) )  <->  ( A. j  e.  A  ( M  =  j  \/  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) )  /\  ( M  =  M  \/  ( [_ M  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) ) )
2521, 24syl6bbr 278 . . . . . 6  |-  ( M  e.  V  ->  ( A. j  e.  ( A  u.  { M } ) ( M  =  j  \/  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) )  <->  A. j  e.  A  ( M  =  j  \/  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) ) )
2616, 25anbi12d 747 . . . . 5  |-  ( M  e.  V  ->  (
( A. i  e.  A  A. j  e.  ( A  u.  { M } ) ( i  =  j  \/  ( [_ i  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) )  /\  A. j  e.  ( A  u.  { M } ) ( M  =  j  \/  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) )  <->  ( A. i  e.  A  ( A. j  e.  A  ( i  =  j  \/  ( [_ i  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) )  /\  ( i  =  M  \/  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) )  /\  A. j  e.  A  ( M  =  j  \/  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) ) ) )
279, 26bitrd 268 . . . 4  |-  ( M  e.  V  ->  (Disj  x  e.  ( A  u.  { M } ) B  <-> 
( A. i  e.  A  ( A. j  e.  A  ( i  =  j  \/  ( [_ i  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) )  /\  (
i  =  M  \/  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) )  /\  A. j  e.  A  ( M  =  j  \/  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) ) ) )
28 r19.26 3064 . . . . . 6  |-  ( A. i  e.  A  ( A. j  e.  A  ( i  =  j  \/  ( [_ i  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) )  /\  ( i  =  M  \/  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) )  <->  ( A. i  e.  A  A. j  e.  A  (
i  =  j  \/  ( [_ i  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) )  /\  A. i  e.  A  (
i  =  M  \/  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) ) )
29 disjors 4635 . . . . . . 7  |-  (Disj  x  e.  A  B  <->  A. i  e.  A  A. j  e.  A  ( i  =  j  \/  ( [_ i  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) )
3029anbi1i 731 . . . . . 6  |-  ( (Disj  x  e.  A  B  /\  A. i  e.  A  ( i  =  M  \/  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) )  <->  ( A. i  e.  A  A. j  e.  A  (
i  =  j  \/  ( [_ i  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) )  /\  A. i  e.  A  (
i  =  M  \/  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) ) )
3128, 30bitr4i 267 . . . . 5  |-  ( A. i  e.  A  ( A. j  e.  A  ( i  =  j  \/  ( [_ i  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) )  /\  ( i  =  M  \/  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) )  <->  (Disj  x  e.  A  B  /\  A. i  e.  A  (
i  =  M  \/  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) ) )
3231anbi1i 731 . . . 4  |-  ( ( A. i  e.  A  ( A. j  e.  A  ( i  =  j  \/  ( [_ i  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) )  /\  ( i  =  M  \/  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) )  /\  A. j  e.  A  ( M  =  j  \/  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) )  <->  ( (Disj  x  e.  A  B  /\  A. i  e.  A  ( i  =  M  \/  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) )  /\  A. j  e.  A  ( M  =  j  \/  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) ) )
3327, 32syl6bb 276 . . 3  |-  ( M  e.  V  ->  (Disj  x  e.  ( A  u.  { M } ) B  <-> 
( (Disj  x  e.  A  B  /\  A. i  e.  A  ( i  =  M  \/  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) )  /\  A. j  e.  A  ( M  =  j  \/  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) ) ) )
3433adantr 481 . 2  |-  ( ( M  e.  V  /\  -.  M  e.  A
)  ->  (Disj  x  e.  ( A  u.  { M } ) B  <->  ( (Disj  x  e.  A  B  /\  A. i  e.  A  ( i  =  M  \/  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) )  /\  A. j  e.  A  ( M  =  j  \/  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) ) ) )
35 orcom 402 . . . . . . . . 9  |-  ( ( ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/)  \/  i  =  M )  <->  ( i  =  M  \/  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) )
3635ralbii 2980 . . . . . . . 8  |-  ( A. i  e.  A  (
( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/)  \/  i  =  M )  <->  A. i  e.  A  ( i  =  M  \/  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) )
37 r19.30 3082 . . . . . . . . 9  |-  ( A. i  e.  A  (
( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/)  \/  i  =  M )  ->  ( A. i  e.  A  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/)  \/  E. i  e.  A  i  =  M ) )
38 risset 3062 . . . . . . . . . . . 12  |-  ( M  e.  A  <->  E. i  e.  A  i  =  M )
39 biorf 420 . . . . . . . . . . . 12  |-  ( -. 
E. i  e.  A  i  =  M  ->  ( A. i  e.  A  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/)  <->  ( E. i  e.  A  i  =  M  \/  A. i  e.  A  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) ) )
4038, 39sylnbi 320 . . . . . . . . . . 11  |-  ( -.  M  e.  A  -> 
( A. i  e.  A  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/)  <->  ( E. i  e.  A  i  =  M  \/  A. i  e.  A  (
[_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) ) )
4140adantl 482 . . . . . . . . . 10  |-  ( ( M  e.  V  /\  -.  M  e.  A
)  ->  ( A. i  e.  A  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/)  <->  ( E. i  e.  A  i  =  M  \/  A. i  e.  A  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) ) )
42 orcom 402 . . . . . . . . . 10  |-  ( ( E. i  e.  A  i  =  M  \/  A. i  e.  A  (
[_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) )  <->  ( A. i  e.  A  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/)  \/  E. i  e.  A  i  =  M ) )
4341, 42syl6bb 276 . . . . . . . . 9  |-  ( ( M  e.  V  /\  -.  M  e.  A
)  ->  ( A. i  e.  A  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/)  <->  ( A. i  e.  A  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/)  \/ 
E. i  e.  A  i  =  M )
) )
4437, 43syl5ibr 236 . . . . . . . 8  |-  ( ( M  e.  V  /\  -.  M  e.  A
)  ->  ( A. i  e.  A  (
( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/)  \/  i  =  M )  ->  A. i  e.  A  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) )
4536, 44syl5bir 233 . . . . . . 7  |-  ( ( M  e.  V  /\  -.  M  e.  A
)  ->  ( A. i  e.  A  (
i  =  M  \/  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) )  ->  A. i  e.  A  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) )
46 olc 399 . . . . . . . 8  |-  ( (
[_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/)  ->  ( i  =  M  \/  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) )
4746ralimi 2952 . . . . . . 7  |-  ( A. i  e.  A  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/)  ->  A. i  e.  A  ( i  =  M  \/  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) )
4845, 47impbid1 215 . . . . . 6  |-  ( ( M  e.  V  /\  -.  M  e.  A
)  ->  ( A. i  e.  A  (
i  =  M  \/  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) )  <->  A. i  e.  A  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) )
49 nfv 1843 . . . . . . . . . 10  |-  F/ i ( B  i^i  C
)  =  (/)
50 nfcsb1v 3549 . . . . . . . . . . . 12  |-  F/_ x [_ i  /  x ]_ B
51 nfcv 2764 . . . . . . . . . . . 12  |-  F/_ x C
5250, 51nfin 3820 . . . . . . . . . . 11  |-  F/_ x
( [_ i  /  x ]_ B  i^i  C )
5352nfeq1 2778 . . . . . . . . . 10  |-  F/ x
( [_ i  /  x ]_ B  i^i  C )  =  (/)
54 csbeq1a 3542 . . . . . . . . . . . 12  |-  ( x  =  i  ->  B  =  [_ i  /  x ]_ B )
5554ineq1d 3813 . . . . . . . . . . 11  |-  ( x  =  i  ->  ( B  i^i  C )  =  ( [_ i  /  x ]_ B  i^i  C
) )
5655eqeq1d 2624 . . . . . . . . . 10  |-  ( x  =  i  ->  (
( B  i^i  C
)  =  (/)  <->  ( [_ i  /  x ]_ B  i^i  C )  =  (/) ) )
5749, 53, 56cbvral 3167 . . . . . . . . 9  |-  ( A. x  e.  A  ( B  i^i  C )  =  (/) 
<-> 
A. i  e.  A  ( [_ i  /  x ]_ B  i^i  C )  =  (/) )
5857a1i 11 . . . . . . . 8  |-  ( M  e.  V  ->  ( A. x  e.  A  ( B  i^i  C )  =  (/)  <->  A. i  e.  A  ( [_ i  /  x ]_ B  i^i  C )  =  (/) ) )
59 ss0b 3973 . . . . . . . . . . 11  |-  ( U_ x  e.  A  ( B  i^i  C )  C_  (/)  <->  U_ x  e.  A  ( B  i^i  C )  =  (/) )
60 iunss 4561 . . . . . . . . . . 11  |-  ( U_ x  e.  A  ( B  i^i  C )  C_  (/)  <->  A. x  e.  A  ( B  i^i  C ) 
C_  (/) )
61 iunin1 4585 . . . . . . . . . . . 12  |-  U_ x  e.  A  ( B  i^i  C )  =  (
U_ x  e.  A  B  i^i  C )
6261eqeq1i 2627 . . . . . . . . . . 11  |-  ( U_ x  e.  A  ( B  i^i  C )  =  (/) 
<->  ( U_ x  e.  A  B  i^i  C
)  =  (/) )
6359, 60, 623bitr3ri 291 . . . . . . . . . 10  |-  ( (
U_ x  e.  A  B  i^i  C )  =  (/) 
<-> 
A. x  e.  A  ( B  i^i  C ) 
C_  (/) )
64 ss0b 3973 . . . . . . . . . . 11  |-  ( ( B  i^i  C ) 
C_  (/)  <->  ( B  i^i  C )  =  (/) )
6564ralbii 2980 . . . . . . . . . 10  |-  ( A. x  e.  A  ( B  i^i  C )  C_  (/)  <->  A. x  e.  A  ( B  i^i  C )  =  (/) )
6663, 65bitri 264 . . . . . . . . 9  |-  ( (
U_ x  e.  A  B  i^i  C )  =  (/) 
<-> 
A. x  e.  A  ( B  i^i  C )  =  (/) )
6766a1i 11 . . . . . . . 8  |-  ( M  e.  V  ->  (
( U_ x  e.  A  B  i^i  C )  =  (/) 
<-> 
A. x  e.  A  ( B  i^i  C )  =  (/) ) )
68 nfcvd 2765 . . . . . . . . . . . 12  |-  ( M  e.  V  ->  F/_ x C )
69 disjunsn.s . . . . . . . . . . . 12  |-  ( x  =  M  ->  B  =  C )
7068, 69csbiegf 3557 . . . . . . . . . . 11  |-  ( M  e.  V  ->  [_ M  /  x ]_ B  =  C )
7170ineq2d 3814 . . . . . . . . . 10  |-  ( M  e.  V  ->  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  ( [_ i  /  x ]_ B  i^i  C ) )
7271eqeq1d 2624 . . . . . . . . 9  |-  ( M  e.  V  ->  (
( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/)  <->  ( [_ i  /  x ]_ B  i^i  C )  =  (/) ) )
7372ralbidv 2986 . . . . . . . 8  |-  ( M  e.  V  ->  ( A. i  e.  A  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/)  <->  A. i  e.  A  ( [_ i  /  x ]_ B  i^i  C )  =  (/) ) )
7458, 67, 733bitr4d 300 . . . . . . 7  |-  ( M  e.  V  ->  (
( U_ x  e.  A  B  i^i  C )  =  (/) 
<-> 
A. i  e.  A  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) )
7574adantr 481 . . . . . 6  |-  ( ( M  e.  V  /\  -.  M  e.  A
)  ->  ( ( U_ x  e.  A  B  i^i  C )  =  (/) 
<-> 
A. i  e.  A  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) )
7648, 75bitr4d 271 . . . . 5  |-  ( ( M  e.  V  /\  -.  M  e.  A
)  ->  ( A. i  e.  A  (
i  =  M  \/  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) )  <->  ( U_ x  e.  A  B  i^i  C )  =  (/) ) )
7776anbi2d 740 . . . 4  |-  ( ( M  e.  V  /\  -.  M  e.  A
)  ->  ( (Disj  x  e.  A  B  /\  A. i  e.  A  ( i  =  M  \/  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) )  <->  (Disj  x  e.  A  B  /\  ( U_ x  e.  A  B  i^i  C )  =  (/) ) ) )
78 orcom 402 . . . . . . . 8  |-  ( ( ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/)  \/  M  =  j )  <->  ( M  =  j  \/  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) )
7978ralbii 2980 . . . . . . 7  |-  ( A. j  e.  A  (
( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/)  \/  M  =  j )  <->  A. j  e.  A  ( M  =  j  \/  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) )
80 r19.30 3082 . . . . . . . 8  |-  ( A. j  e.  A  (
( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/)  \/  M  =  j )  -> 
( A. j  e.  A  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/)  \/ 
E. j  e.  A  M  =  j )
)
81 clel5 3343 . . . . . . . . . . 11  |-  ( M  e.  A  <->  E. j  e.  A  M  =  j )
82 biorf 420 . . . . . . . . . . 11  |-  ( -. 
E. j  e.  A  M  =  j  ->  ( A. j  e.  A  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/)  <->  ( E. j  e.  A  M  =  j  \/  A. j  e.  A  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) ) )
8381, 82sylnbi 320 . . . . . . . . . 10  |-  ( -.  M  e.  A  -> 
( A. j  e.  A  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/)  <->  ( E. j  e.  A  M  =  j  \/  A. j  e.  A  (
[_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) ) )
8483adantl 482 . . . . . . . . 9  |-  ( ( M  e.  V  /\  -.  M  e.  A
)  ->  ( A. j  e.  A  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/)  <->  ( E. j  e.  A  M  =  j  \/  A. j  e.  A  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) ) )
85 orcom 402 . . . . . . . . 9  |-  ( ( E. j  e.  A  M  =  j  \/  A. j  e.  A  (
[_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) )  <->  ( A. j  e.  A  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/)  \/  E. j  e.  A  M  =  j ) )
8684, 85syl6bb 276 . . . . . . . 8  |-  ( ( M  e.  V  /\  -.  M  e.  A
)  ->  ( A. j  e.  A  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/)  <->  ( A. j  e.  A  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/)  \/ 
E. j  e.  A  M  =  j )
) )
8780, 86syl5ibr 236 . . . . . . 7  |-  ( ( M  e.  V  /\  -.  M  e.  A
)  ->  ( A. j  e.  A  (
( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/)  \/  M  =  j )  ->  A. j  e.  A  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) )
8879, 87syl5bir 233 . . . . . 6  |-  ( ( M  e.  V  /\  -.  M  e.  A
)  ->  ( A. j  e.  A  ( M  =  j  \/  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) )  ->  A. j  e.  A  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) )
89 olc 399 . . . . . . 7  |-  ( (
[_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/)  ->  ( M  =  j  \/  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) )
9089ralimi 2952 . . . . . 6  |-  ( A. j  e.  A  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/)  ->  A. j  e.  A  ( M  =  j  \/  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) )
9188, 90impbid1 215 . . . . 5  |-  ( ( M  e.  V  /\  -.  M  e.  A
)  ->  ( A. j  e.  A  ( M  =  j  \/  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) )  <->  A. j  e.  A  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) )
92 nfv 1843 . . . . . . . . . 10  |-  F/ j ( B  i^i  C
)  =  (/)
93 nfcsb1v 3549 . . . . . . . . . . . 12  |-  F/_ x [_ j  /  x ]_ B
9493, 51nfin 3820 . . . . . . . . . . 11  |-  F/_ x
( [_ j  /  x ]_ B  i^i  C )
9594nfeq1 2778 . . . . . . . . . 10  |-  F/ x
( [_ j  /  x ]_ B  i^i  C )  =  (/)
96 csbeq1a 3542 . . . . . . . . . . . 12  |-  ( x  =  j  ->  B  =  [_ j  /  x ]_ B )
9796ineq1d 3813 . . . . . . . . . . 11  |-  ( x  =  j  ->  ( B  i^i  C )  =  ( [_ j  /  x ]_ B  i^i  C
) )
9897eqeq1d 2624 . . . . . . . . . 10  |-  ( x  =  j  ->  (
( B  i^i  C
)  =  (/)  <->  ( [_ j  /  x ]_ B  i^i  C )  =  (/) ) )
9992, 95, 98cbvral 3167 . . . . . . . . 9  |-  ( A. x  e.  A  ( B  i^i  C )  =  (/) 
<-> 
A. j  e.  A  ( [_ j  /  x ]_ B  i^i  C )  =  (/) )
10099a1i 11 . . . . . . . 8  |-  ( M  e.  V  ->  ( A. x  e.  A  ( B  i^i  C )  =  (/)  <->  A. j  e.  A  ( [_ j  /  x ]_ B  i^i  C )  =  (/) ) )
101 incom 3805 . . . . . . . . . 10  |-  ( [_ j  /  x ]_ B  i^i  C )  =  ( C  i^i  [_ j  /  x ]_ B )
102101eqeq1i 2627 . . . . . . . . 9  |-  ( (
[_ j  /  x ]_ B  i^i  C )  =  (/)  <->  ( C  i^i  [_ j  /  x ]_ B )  =  (/) )
103102ralbii 2980 . . . . . . . 8  |-  ( A. j  e.  A  ( [_ j  /  x ]_ B  i^i  C )  =  (/)  <->  A. j  e.  A  ( C  i^i  [_ j  /  x ]_ B )  =  (/) )
104100, 103syl6bb 276 . . . . . . 7  |-  ( M  e.  V  ->  ( A. x  e.  A  ( B  i^i  C )  =  (/)  <->  A. j  e.  A  ( C  i^i  [_ j  /  x ]_ B )  =  (/) ) )
10570ineq1d 3813 . . . . . . . . 9  |-  ( M  e.  V  ->  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  ( C  i^i  [_ j  /  x ]_ B ) )
106105eqeq1d 2624 . . . . . . . 8  |-  ( M  e.  V  ->  (
( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/)  <->  ( C  i^i  [_ j  /  x ]_ B )  =  (/) ) )
107106ralbidv 2986 . . . . . . 7  |-  ( M  e.  V  ->  ( A. j  e.  A  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/)  <->  A. j  e.  A  ( C  i^i  [_ j  /  x ]_ B )  =  (/) ) )
108104, 67, 1073bitr4d 300 . . . . . 6  |-  ( M  e.  V  ->  (
( U_ x  e.  A  B  i^i  C )  =  (/) 
<-> 
A. j  e.  A  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) )
109108adantr 481 . . . . 5  |-  ( ( M  e.  V  /\  -.  M  e.  A
)  ->  ( ( U_ x  e.  A  B  i^i  C )  =  (/) 
<-> 
A. j  e.  A  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) )
11091, 109bitr4d 271 . . . 4  |-  ( ( M  e.  V  /\  -.  M  e.  A
)  ->  ( A. j  e.  A  ( M  =  j  \/  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) )  <->  ( U_ x  e.  A  B  i^i  C )  =  (/) ) )
11177, 110anbi12d 747 . . 3  |-  ( ( M  e.  V  /\  -.  M  e.  A
)  ->  ( (
(Disj  x  e.  A  B  /\  A. i  e.  A  ( i  =  M  \/  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) )  /\  A. j  e.  A  ( M  =  j  \/  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) )  <->  ( (Disj  x  e.  A  B  /\  ( U_ x  e.  A  B  i^i  C )  =  (/) )  /\  ( U_ x  e.  A  B  i^i  C )  =  (/) ) ) )
112 anass 681 . . . 4  |-  ( ( (Disj  x  e.  A  B  /\  ( U_ x  e.  A  B  i^i  C )  =  (/) )  /\  ( U_ x  e.  A  B  i^i  C )  =  (/) )  <->  (Disj  x  e.  A  B  /\  ( ( U_ x  e.  A  B  i^i  C )  =  (/)  /\  ( U_ x  e.  A  B  i^i  C
)  =  (/) ) ) )
113 anidm 676 . . . . 5  |-  ( ( ( U_ x  e.  A  B  i^i  C
)  =  (/)  /\  ( U_ x  e.  A  B  i^i  C )  =  (/) )  <->  ( U_ x  e.  A  B  i^i  C )  =  (/) )
114113anbi2i 730 . . . 4  |-  ( (Disj  x  e.  A  B  /\  ( ( U_ x  e.  A  B  i^i  C )  =  (/)  /\  ( U_ x  e.  A  B  i^i  C )  =  (/) ) )  <->  (Disj  x  e.  A  B  /\  ( U_ x  e.  A  B  i^i  C )  =  (/) ) )
115112, 114bitri 264 . . 3  |-  ( ( (Disj  x  e.  A  B  /\  ( U_ x  e.  A  B  i^i  C )  =  (/) )  /\  ( U_ x  e.  A  B  i^i  C )  =  (/) )  <->  (Disj  x  e.  A  B  /\  ( U_ x  e.  A  B  i^i  C )  =  (/) ) )
116111, 115syl6bb 276 . 2  |-  ( ( M  e.  V  /\  -.  M  e.  A
)  ->  ( (
(Disj  x  e.  A  B  /\  A. i  e.  A  ( i  =  M  \/  ( [_ i  /  x ]_ B  i^i  [_ M  /  x ]_ B )  =  (/) ) )  /\  A. j  e.  A  ( M  =  j  \/  ( [_ M  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) )  <->  (Disj  x  e.  A  B  /\  ( U_ x  e.  A  B  i^i  C )  =  (/) ) ) )
11734, 116bitrd 268 1  |-  ( ( M  e.  V  /\  -.  M  e.  A
)  ->  (Disj  x  e.  ( A  u.  { M } ) B  <->  (Disj  x  e.  A  B  /\  ( U_ x  e.  A  B  i^i  C )  =  (/) ) ) )
Colors of variables: wff setvar class
Syntax hints:   -. wn 3    -> wi 4    <-> wb 196    \/ wo 383    /\ wa 384    = wceq 1483    e. wcel 1990   A.wral 2912   E.wrex 2913   [_csb 3533    u. cun 3572    i^i cin 3573    C_ wss 3574   (/)c0 3915   {csn 4177   U_ciun 4520  Disj wdisj 4620
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1722  ax-4 1737  ax-5 1839  ax-6 1888  ax-7 1935  ax-9 1999  ax-10 2019  ax-11 2034  ax-12 2047  ax-13 2246  ax-ext 2602
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3an 1039  df-tru 1486  df-ex 1705  df-nf 1710  df-sb 1881  df-eu 2474  df-mo 2475  df-clab 2609  df-cleq 2615  df-clel 2618  df-nfc 2753  df-ral 2917  df-rex 2918  df-reu 2919  df-rmo 2920  df-rab 2921  df-v 3202  df-sbc 3436  df-csb 3534  df-dif 3577  df-un 3579  df-in 3581  df-ss 3588  df-nul 3916  df-sn 4178  df-iun 4522  df-disj 4621
This theorem is referenced by:  disjun0  29408  disjiunel  29409
  Copyright terms: Public domain W3C validator