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

Theorem unsnfidcel 6386
Description: The  -.  B  e.  A condition in unsnfi 6384. This is intended to show that unsnfi 6384 without that condition would not be provable but it probably would need to be strengthened (for example, to imply included middle) to fully show that. (Contributed by Jim Kingdon, 6-Feb-2022.)
Assertion
Ref Expression
unsnfidcel  |-  ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  -> DECID  -.  B  e.  A
)

Proof of Theorem unsnfidcel
Dummy variables  m  n are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 isfi 6264 . . . . 5  |-  ( A  e.  Fin  <->  E. n  e.  om  A  ~~  n
)
21biimpi 118 . . . 4  |-  ( A  e.  Fin  ->  E. n  e.  om  A  ~~  n
)
323ad2ant1 959 . . 3  |-  ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  ->  E. n  e.  om  A  ~~  n )
4 isfi 6264 . . . . . . 7  |-  ( ( A  u.  { B } )  e.  Fin  <->  E. m  e.  om  ( A  u.  { B } )  ~~  m
)
54biimpi 118 . . . . . 6  |-  ( ( A  u.  { B } )  e.  Fin  ->  E. m  e.  om  ( A  u.  { B } )  ~~  m
)
653ad2ant3 961 . . . . 5  |-  ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  ->  E. m  e.  om  ( A  u.  { B } )  ~~  m
)
76adantr 270 . . . 4  |-  ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  ->  E. m  e.  om  ( A  u.  { B } )  ~~  m
)
8 simprr 498 . . . . . . . . . 10  |-  ( ( ( ( A  e. 
Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e. 
Fin )  /\  (
n  e.  om  /\  A  ~~  n ) )  /\  ( m  e. 
om  /\  ( A  u.  { B } ) 
~~  m ) )  ->  ( A  u.  { B } )  ~~  m )
98ad2antrr 471 . . . . . . . . 9  |-  ( ( ( ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  /\  ( m  e.  om  /\  ( A  u.  { B } )  ~~  m
) )  /\  m  =  n )  /\  -.  B  e.  A )  ->  ( A  u.  { B } )  ~~  m
)
10 simprr 498 . . . . . . . . . . . 12  |-  ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  ->  A  ~~  n )
1110ad3antrrr 475 . . . . . . . . . . 11  |-  ( ( ( ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  /\  ( m  e.  om  /\  ( A  u.  { B } )  ~~  m
) )  /\  m  =  n )  /\  -.  B  e.  A )  ->  A  ~~  n )
12 simplr 496 . . . . . . . . . . 11  |-  ( ( ( ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  /\  ( m  e.  om  /\  ( A  u.  { B } )  ~~  m
) )  /\  m  =  n )  /\  -.  B  e.  A )  ->  m  =  n )
1311, 12breqtrrd 3811 . . . . . . . . . 10  |-  ( ( ( ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  /\  ( m  e.  om  /\  ( A  u.  { B } )  ~~  m
) )  /\  m  =  n )  /\  -.  B  e.  A )  ->  A  ~~  m )
1413ensymd 6286 . . . . . . . . 9  |-  ( ( ( ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  /\  ( m  e.  om  /\  ( A  u.  { B } )  ~~  m
) )  /\  m  =  n )  /\  -.  B  e.  A )  ->  m  ~~  A )
15 entr 6287 . . . . . . . . 9  |-  ( ( ( A  u.  { B } )  ~~  m  /\  m  ~~  A )  ->  ( A  u.  { B } )  ~~  A )
169, 14, 15syl2anc 403 . . . . . . . 8  |-  ( ( ( ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  /\  ( m  e.  om  /\  ( A  u.  { B } )  ~~  m
) )  /\  m  =  n )  /\  -.  B  e.  A )  ->  ( A  u.  { B } )  ~~  A
)
1716ensymd 6286 . . . . . . 7  |-  ( ( ( ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  /\  ( m  e.  om  /\  ( A  u.  { B } )  ~~  m
) )  /\  m  =  n )  /\  -.  B  e.  A )  ->  A  ~~  ( A  u.  { B }
) )
18 simp1 938 . . . . . . . . 9  |-  ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  ->  A  e.  Fin )
1918ad4antr 477 . . . . . . . 8  |-  ( ( ( ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  /\  ( m  e.  om  /\  ( A  u.  { B } )  ~~  m
) )  /\  m  =  n )  /\  -.  B  e.  A )  ->  A  e.  Fin )
20 simpl2 942 . . . . . . . . . . 11  |-  ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  ->  B  e.  V )
2120ad3antrrr 475 . . . . . . . . . 10  |-  ( ( ( ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  /\  ( m  e.  om  /\  ( A  u.  { B } )  ~~  m
) )  /\  m  =  n )  /\  -.  B  e.  A )  ->  B  e.  V )
2221elexd 2612 . . . . . . . . 9  |-  ( ( ( ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  /\  ( m  e.  om  /\  ( A  u.  { B } )  ~~  m
) )  /\  m  =  n )  /\  -.  B  e.  A )  ->  B  e.  _V )
23 simpr 108 . . . . . . . . 9  |-  ( ( ( ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  /\  ( m  e.  om  /\  ( A  u.  { B } )  ~~  m
) )  /\  m  =  n )  /\  -.  B  e.  A )  ->  -.  B  e.  A
)
2422, 23eldifd 2983 . . . . . . . 8  |-  ( ( ( ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  /\  ( m  e.  om  /\  ( A  u.  { B } )  ~~  m
) )  /\  m  =  n )  /\  -.  B  e.  A )  ->  B  e.  ( _V 
\  A ) )
25 php5fin 6366 . . . . . . . 8  |-  ( ( A  e.  Fin  /\  B  e.  ( _V  \  A ) )  ->  -.  A  ~~  ( A  u.  { B }
) )
2619, 24, 25syl2anc 403 . . . . . . 7  |-  ( ( ( ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  /\  ( m  e.  om  /\  ( A  u.  { B } )  ~~  m
) )  /\  m  =  n )  /\  -.  B  e.  A )  ->  -.  A  ~~  ( A  u.  { B } ) )
2717, 26pm2.65da 619 . . . . . 6  |-  ( ( ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  /\  ( m  e.  om  /\  ( A  u.  { B } )  ~~  m
) )  /\  m  =  n )  ->  -.  -.  B  e.  A
)
2827olcd 685 . . . . 5  |-  ( ( ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  /\  ( m  e.  om  /\  ( A  u.  { B } )  ~~  m
) )  /\  m  =  n )  ->  ( -.  B  e.  A  \/  -.  -.  B  e.  A ) )
298ad2antrr 471 . . . . . . . . . . 11  |-  ( ( ( ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  /\  ( m  e.  om  /\  ( A  u.  { B } )  ~~  m
) )  /\  -.  m  =  n )  /\  B  e.  A
)  ->  ( A  u.  { B } ) 
~~  m )
30 snssi 3529 . . . . . . . . . . . . . 14  |-  ( B  e.  A  ->  { B }  C_  A )
31 ssequn2 3145 . . . . . . . . . . . . . 14  |-  ( { B }  C_  A  <->  ( A  u.  { B } )  =  A )
3230, 31sylib 120 . . . . . . . . . . . . 13  |-  ( B  e.  A  ->  ( A  u.  { B } )  =  A )
3332breq1d 3795 . . . . . . . . . . . 12  |-  ( B  e.  A  ->  (
( A  u.  { B } )  ~~  m  <->  A 
~~  m ) )
3433adantl 271 . . . . . . . . . . 11  |-  ( ( ( ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  /\  ( m  e.  om  /\  ( A  u.  { B } )  ~~  m
) )  /\  -.  m  =  n )  /\  B  e.  A
)  ->  ( ( A  u.  { B } )  ~~  m  <->  A 
~~  m ) )
3529, 34mpbid 145 . . . . . . . . . 10  |-  ( ( ( ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  /\  ( m  e.  om  /\  ( A  u.  { B } )  ~~  m
) )  /\  -.  m  =  n )  /\  B  e.  A
)  ->  A  ~~  m )
3635ensymd 6286 . . . . . . . . 9  |-  ( ( ( ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  /\  ( m  e.  om  /\  ( A  u.  { B } )  ~~  m
) )  /\  -.  m  =  n )  /\  B  e.  A
)  ->  m  ~~  A )
3710ad3antrrr 475 . . . . . . . . 9  |-  ( ( ( ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  /\  ( m  e.  om  /\  ( A  u.  { B } )  ~~  m
) )  /\  -.  m  =  n )  /\  B  e.  A
)  ->  A  ~~  n )
38 entr 6287 . . . . . . . . 9  |-  ( ( m  ~~  A  /\  A  ~~  n )  ->  m  ~~  n )
3936, 37, 38syl2anc 403 . . . . . . . 8  |-  ( ( ( ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  /\  ( m  e.  om  /\  ( A  u.  { B } )  ~~  m
) )  /\  -.  m  =  n )  /\  B  e.  A
)  ->  m  ~~  n )
40 simprl 497 . . . . . . . . . 10  |-  ( ( ( ( A  e. 
Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e. 
Fin )  /\  (
n  e.  om  /\  A  ~~  n ) )  /\  ( m  e. 
om  /\  ( A  u.  { B } ) 
~~  m ) )  ->  m  e.  om )
4140ad2antrr 471 . . . . . . . . 9  |-  ( ( ( ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  /\  ( m  e.  om  /\  ( A  u.  { B } )  ~~  m
) )  /\  -.  m  =  n )  /\  B  e.  A
)  ->  m  e.  om )
42 simprl 497 . . . . . . . . . 10  |-  ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  ->  n  e.  om )
4342ad3antrrr 475 . . . . . . . . 9  |-  ( ( ( ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  /\  ( m  e.  om  /\  ( A  u.  { B } )  ~~  m
) )  /\  -.  m  =  n )  /\  B  e.  A
)  ->  n  e.  om )
44 nneneq 6343 . . . . . . . . 9  |-  ( ( m  e.  om  /\  n  e.  om )  ->  ( m  ~~  n  <->  m  =  n ) )
4541, 43, 44syl2anc 403 . . . . . . . 8  |-  ( ( ( ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  /\  ( m  e.  om  /\  ( A  u.  { B } )  ~~  m
) )  /\  -.  m  =  n )  /\  B  e.  A
)  ->  ( m  ~~  n  <->  m  =  n
) )
4639, 45mpbid 145 . . . . . . 7  |-  ( ( ( ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  /\  ( m  e.  om  /\  ( A  u.  { B } )  ~~  m
) )  /\  -.  m  =  n )  /\  B  e.  A
)  ->  m  =  n )
47 simplr 496 . . . . . . 7  |-  ( ( ( ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  /\  ( m  e.  om  /\  ( A  u.  { B } )  ~~  m
) )  /\  -.  m  =  n )  /\  B  e.  A
)  ->  -.  m  =  n )
4846, 47pm2.65da 619 . . . . . 6  |-  ( ( ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  /\  ( m  e.  om  /\  ( A  u.  { B } )  ~~  m
) )  /\  -.  m  =  n )  ->  -.  B  e.  A
)
4948orcd 684 . . . . 5  |-  ( ( ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  /\  ( m  e.  om  /\  ( A  u.  { B } )  ~~  m
) )  /\  -.  m  =  n )  ->  ( -.  B  e.  A  \/  -.  -.  B  e.  A )
)
5042adantr 270 . . . . . . 7  |-  ( ( ( ( A  e. 
Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e. 
Fin )  /\  (
n  e.  om  /\  A  ~~  n ) )  /\  ( m  e. 
om  /\  ( A  u.  { B } ) 
~~  m ) )  ->  n  e.  om )
51 nndceq 6100 . . . . . . 7  |-  ( ( m  e.  om  /\  n  e.  om )  -> DECID  m  =  n )
5240, 50, 51syl2anc 403 . . . . . 6  |-  ( ( ( ( A  e. 
Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e. 
Fin )  /\  (
n  e.  om  /\  A  ~~  n ) )  /\  ( m  e. 
om  /\  ( A  u.  { B } ) 
~~  m ) )  -> DECID 
m  =  n )
53 exmiddc 777 . . . . . 6  |-  (DECID  m  =  n  ->  ( m  =  n  \/  -.  m  =  n )
)
5452, 53syl 14 . . . . 5  |-  ( ( ( ( A  e. 
Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e. 
Fin )  /\  (
n  e.  om  /\  A  ~~  n ) )  /\  ( m  e. 
om  /\  ( A  u.  { B } ) 
~~  m ) )  ->  ( m  =  n  \/  -.  m  =  n ) )
5528, 49, 54mpjaodan 744 . . . 4  |-  ( ( ( ( A  e. 
Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e. 
Fin )  /\  (
n  e.  om  /\  A  ~~  n ) )  /\  ( m  e. 
om  /\  ( A  u.  { B } ) 
~~  m ) )  ->  ( -.  B  e.  A  \/  -.  -.  B  e.  A
) )
567, 55rexlimddv 2481 . . 3  |-  ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  -> 
( -.  B  e.  A  \/  -.  -.  B  e.  A )
)
573, 56rexlimddv 2481 . 2  |-  ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  ->  ( -.  B  e.  A  \/  -.  -.  B  e.  A
) )
58 df-dc 776 . 2  |-  (DECID  -.  B  e.  A  <->  ( -.  B  e.  A  \/  -.  -.  B  e.  A
) )
5957, 58sylibr 132 1  |-  ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  -> DECID  -.  B  e.  A
)
Colors of variables: wff set class
Syntax hints:   -. wn 3    -> wi 4    /\ wa 102    <-> wb 103    \/ wo 661  DECID wdc 775    /\ w3a 919    = wceq 1284    e. wcel 1433   E.wrex 2349   _Vcvv 2601    \ cdif 2970    u. cun 2971    C_ wss 2973   {csn 3398   class class class wbr 3785   omcom 4331    ~~ cen 6242   Fincfn 6244
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 104  ax-ia2 105  ax-ia3 106  ax-in1 576  ax-in2 577  ax-io 662  ax-5 1376  ax-7 1377  ax-gen 1378  ax-ie1 1422  ax-ie2 1423  ax-8 1435  ax-10 1436  ax-11 1437  ax-i12 1438  ax-bndl 1439  ax-4 1440  ax-13 1444  ax-14 1445  ax-17 1459  ax-i9 1463  ax-ial 1467  ax-i5r 1468  ax-ext 2063  ax-sep 3896  ax-nul 3904  ax-pow 3948  ax-pr 3964  ax-un 4188  ax-setind 4280  ax-iinf 4329
This theorem depends on definitions:  df-bi 115  df-dc 776  df-3or 920  df-3an 921  df-tru 1287  df-fal 1290  df-nf 1390  df-sb 1686  df-eu 1944  df-mo 1945  df-clab 2068  df-cleq 2074  df-clel 2077  df-nfc 2208  df-ne 2246  df-ral 2353  df-rex 2354  df-rab 2357  df-v 2603  df-sbc 2816  df-dif 2975  df-un 2977  df-in 2979  df-ss 2986  df-nul 3252  df-pw 3384  df-sn 3404  df-pr 3405  df-op 3407  df-uni 3602  df-int 3637  df-br 3786  df-opab 3840  df-tr 3876  df-id 4048  df-iord 4121  df-on 4123  df-suc 4126  df-iom 4332  df-xp 4369  df-rel 4370  df-cnv 4371  df-co 4372  df-dm 4373  df-rn 4374  df-res 4375  df-ima 4376  df-iota 4887  df-fun 4924  df-fn 4925  df-f 4926  df-f1 4927  df-fo 4928  df-f1o 4929  df-fv 4930  df-1o 6024  df-er 6129  df-en 6245  df-fin 6247
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator