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

Theorem unsnfidcel 6923
Description: The  -.  B  e.  A condition in unsnfi 6921. This is intended to show that unsnfi 6921 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 6764 . . . . 5  |-  ( A  e.  Fin  <->  E. n  e.  om  A  ~~  n
)
21biimpi 120 . . . 4  |-  ( A  e.  Fin  ->  E. n  e.  om  A  ~~  n
)
323ad2ant1 1018 . . 3  |-  ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  ->  E. n  e.  om  A  ~~  n )
4 isfi 6764 . . . . . . 7  |-  ( ( A  u.  { B } )  e.  Fin  <->  E. m  e.  om  ( A  u.  { B } )  ~~  m
)
54biimpi 120 . . . . . 6  |-  ( ( A  u.  { B } )  e.  Fin  ->  E. m  e.  om  ( A  u.  { B } )  ~~  m
)
653ad2ant3 1020 . . . . 5  |-  ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  ->  E. m  e.  om  ( A  u.  { B } )  ~~  m
)
76adantr 276 . . . 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 531 . . . . . . . . . 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 488 . . . . . . . . 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 531 . . . . . . . . . . . 12  |-  ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  ->  A  ~~  n )
1110ad3antrrr 492 . . . . . . . . . . 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 528 . . . . . . . . . . 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 4033 . . . . . . . . . 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 6786 . . . . . . . . 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 6787 . . . . . . . . 9  |-  ( ( ( A  u.  { B } )  ~~  m  /\  m  ~~  A )  ->  ( A  u.  { B } )  ~~  A )
169, 14, 15syl2anc 411 . . . . . . . 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 6786 . . . . . . 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 997 . . . . . . . . 9  |-  ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  ->  A  e.  Fin )
1918ad4antr 494 . . . . . . . 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 1001 . . . . . . . . . . 11  |-  ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  ->  B  e.  V )
2120ad3antrrr 492 . . . . . . . . . 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 2752 . . . . . . . . 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 110 . . . . . . . . 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 3141 . . . . . . . 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 6885 . . . . . . . 8  |-  ( ( A  e.  Fin  /\  B  e.  ( _V  \  A ) )  ->  -.  A  ~~  ( A  u.  { B }
) )
2619, 24, 25syl2anc 411 . . . . . . 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 661 . . . . . 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 734 . . . . 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 488 . . . . . . . . . . 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 3738 . . . . . . . . . . . . . 14  |-  ( B  e.  A  ->  { B }  C_  A )
31 ssequn2 3310 . . . . . . . . . . . . . 14  |-  ( { B }  C_  A  <->  ( A  u.  { B } )  =  A )
3230, 31sylib 122 . . . . . . . . . . . . 13  |-  ( B  e.  A  ->  ( A  u.  { B } )  =  A )
3332breq1d 4015 . . . . . . . . . . . 12  |-  ( B  e.  A  ->  (
( A  u.  { B } )  ~~  m  <->  A 
~~  m ) )
3433adantl 277 . . . . . . . . . . 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 147 . . . . . . . . . 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 6786 . . . . . . . . 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 492 . . . . . . . . 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 6787 . . . . . . . . 9  |-  ( ( m  ~~  A  /\  A  ~~  n )  ->  m  ~~  n )
3936, 37, 38syl2anc 411 . . . . . . . 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 529 . . . . . . . . . 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 488 . . . . . . . . 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 529 . . . . . . . . . 10  |-  ( ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  /\  ( n  e. 
om  /\  A  ~~  n ) )  ->  n  e.  om )
4342ad3antrrr 492 . . . . . . . . 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 6860 . . . . . . . . 9  |-  ( ( m  e.  om  /\  n  e.  om )  ->  ( m  ~~  n  <->  m  =  n ) )
4541, 43, 44syl2anc 411 . . . . . . . 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 147 . . . . . . 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 528 . . . . . . 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 661 . . . . . 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 733 . . . . 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 276 . . . . . . 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 6503 . . . . . . 7  |-  ( ( m  e.  om  /\  n  e.  om )  -> DECID  m  =  n )
5240, 50, 51syl2anc 411 . . . . . 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 836 . . . . . 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 798 . . . 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 2599 . . 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 2599 . 2  |-  ( ( A  e.  Fin  /\  B  e.  V  /\  ( A  u.  { B } )  e.  Fin )  ->  ( -.  B  e.  A  \/  -.  -.  B  e.  A
) )
58 df-dc 835 . 2  |-  (DECID  -.  B  e.  A  <->  ( -.  B  e.  A  \/  -.  -.  B  e.  A
) )
5957, 58sylibr 134 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 104    <-> wb 105    \/ wo 708  DECID wdc 834    /\ w3a 978    = wceq 1353    e. wcel 2148   E.wrex 2456   _Vcvv 2739    \ cdif 3128    u. cun 3129    C_ wss 3131   {csn 3594   class class class wbr 4005   omcom 4591    ~~ cen 6741   Fincfn 6743
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 614  ax-in2 615  ax-io 709  ax-5 1447  ax-7 1448  ax-gen 1449  ax-ie1 1493  ax-ie2 1494  ax-8 1504  ax-10 1505  ax-11 1506  ax-i12 1507  ax-bndl 1509  ax-4 1510  ax-17 1526  ax-i9 1530  ax-ial 1534  ax-i5r 1535  ax-13 2150  ax-14 2151  ax-ext 2159  ax-sep 4123  ax-nul 4131  ax-pow 4176  ax-pr 4211  ax-un 4435  ax-setind 4538  ax-iinf 4589
This theorem depends on definitions:  df-bi 117  df-dc 835  df-3or 979  df-3an 980  df-tru 1356  df-fal 1359  df-nf 1461  df-sb 1763  df-eu 2029  df-mo 2030  df-clab 2164  df-cleq 2170  df-clel 2173  df-nfc 2308  df-ne 2348  df-ral 2460  df-rex 2461  df-rab 2464  df-v 2741  df-sbc 2965  df-dif 3133  df-un 3135  df-in 3137  df-ss 3144  df-nul 3425  df-pw 3579  df-sn 3600  df-pr 3601  df-op 3603  df-uni 3812  df-int 3847  df-br 4006  df-opab 4067  df-tr 4104  df-id 4295  df-iord 4368  df-on 4370  df-suc 4373  df-iom 4592  df-xp 4634  df-rel 4635  df-cnv 4636  df-co 4637  df-dm 4638  df-rn 4639  df-res 4640  df-ima 4641  df-iota 5180  df-fun 5220  df-fn 5221  df-f 5222  df-f1 5223  df-fo 5224  df-f1o 5225  df-fv 5226  df-1o 6420  df-er 6538  df-en 6744  df-fin 6746
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator