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

Theorem dn1dc 950
Description: DN1 for decidable propositions. Without the decidability conditions, DN1 can serve as a single axiom for Boolean algebra. See http://www-unix.mcs.anl.gov/~mccune/papers/basax/v12.pdf. (Contributed by Jim Kingdon, 22-Apr-2018.)
Assertion
Ref Expression
dn1dc  |-  ( (DECID  ph  /\  (DECID  ps  /\  (DECID  ch  /\ DECID  th )
) )  ->  ( -.  ( -.  ( -.  ( ph  \/  ps )  \/  ch )  \/  -.  ( ph  \/  -.  ( -.  ch  \/  -.  ( ch  \/  th ) ) ) )  <->  ch ) )

Proof of Theorem dn1dc
StepHypRef Expression
1 pm2.45 728 . . . . 5  |-  ( -.  ( ph  \/  ps )  ->  -.  ph )
2 imnan 680 . . . . 5  |-  ( ( -.  ( ph  \/  ps )  ->  -.  ph ) 
<->  -.  ( -.  ( ph  \/  ps )  /\  ph ) )
31, 2mpbi 144 . . . 4  |-  -.  ( -.  ( ph  \/  ps )  /\  ph )
43biorfi 736 . . 3  |-  ( ch  <->  ( ch  \/  ( -.  ( ph  \/  ps )  /\  ph ) ) )
5 orcom 718 . . 3  |-  ( ( ch  \/  ( -.  ( ph  \/  ps )  /\  ph ) )  <-> 
( ( -.  ( ph  \/  ps )  /\  ph )  \/  ch )
)
6 ordir 807 . . 3  |-  ( ( ( -.  ( ph  \/  ps )  /\  ph )  \/  ch )  <->  ( ( -.  ( ph  \/  ps )  \/  ch )  /\  ( ph  \/  ch ) ) )
74, 5, 63bitri 205 . 2  |-  ( ch  <->  ( ( -.  ( ph  \/  ps )  \/  ch )  /\  ( ph  \/  ch ) ) )
8 pm4.45 774 . . . . . 6  |-  ( ch  <->  ( ch  /\  ( ch  \/  th ) ) )
9 simprrl 529 . . . . . . 7  |-  ( (DECID  ph  /\  (DECID  ps  /\  (DECID  ch  /\ DECID  th )
) )  -> DECID  ch )
10 dcor 925 . . . . . . . . 9  |-  (DECID  ch  ->  (DECID  th 
-> DECID  ( ch  \/  th )
) )
1110imp 123 . . . . . . . 8  |-  ( (DECID  ch 
/\ DECID  th )  -> DECID  ( ch  \/  th ) )
1211ad2antll 483 . . . . . . 7  |-  ( (DECID  ph  /\  (DECID  ps  /\  (DECID  ch  /\ DECID  th )
) )  -> DECID  ( ch  \/  th ) )
13 anordc 946 . . . . . . 7  |-  (DECID  ch  ->  (DECID  ( ch  \/  th )  ->  ( ( ch  /\  ( ch  \/  th )
)  <->  -.  ( -.  ch  \/  -.  ( ch  \/  th ) ) ) ) )
149, 12, 13sylc 62 . . . . . 6  |-  ( (DECID  ph  /\  (DECID  ps  /\  (DECID  ch  /\ DECID  th )
) )  ->  (
( ch  /\  ( ch  \/  th ) )  <->  -.  ( -.  ch  \/  -.  ( ch  \/  th ) ) ) )
158, 14syl5bb 191 . . . . 5  |-  ( (DECID  ph  /\  (DECID  ps  /\  (DECID  ch  /\ DECID  th )
) )  ->  ( ch 
<->  -.  ( -.  ch  \/  -.  ( ch  \/  th ) ) ) )
1615orbi2d 780 . . . 4  |-  ( (DECID  ph  /\  (DECID  ps  /\  (DECID  ch  /\ DECID  th )
) )  ->  (
( ph  \/  ch ) 
<->  ( ph  \/  -.  ( -.  ch  \/  -.  ( ch  \/  th ) ) ) ) )
1716anbi2d 460 . . 3  |-  ( (DECID  ph  /\  (DECID  ps  /\  (DECID  ch  /\ DECID  th )
) )  ->  (
( ( -.  ( ph  \/  ps )  \/ 
ch )  /\  ( ph  \/  ch ) )  <-> 
( ( -.  ( ph  \/  ps )  \/ 
ch )  /\  ( ph  \/  -.  ( -. 
ch  \/  -.  ( ch  \/  th ) ) ) ) ) )
18 dcor 925 . . . . . . . 8  |-  (DECID  ph  ->  (DECID  ps 
-> DECID  ( ph  \/  ps )
) )
19 dcn 832 . . . . . . . 8  |-  (DECID  ( ph  \/  ps )  -> DECID  -.  ( ph  \/  ps ) )
2018, 19syl6 33 . . . . . . 7  |-  (DECID  ph  ->  (DECID  ps 
-> DECID  -.  ( ph  \/  ps ) ) )
2120imp 123 . . . . . 6  |-  ( (DECID  ph  /\ DECID  ps )  -> DECID  -.  ( ph  \/  ps ) )
2221adantrr 471 . . . . 5  |-  ( (DECID  ph  /\  (DECID  ps  /\  (DECID  ch  /\ DECID  th )
) )  -> DECID  -.  ( ph  \/  ps ) )
23 dcor 925 . . . . 5  |-  (DECID  -.  ( ph  \/  ps )  -> 
(DECID 
ch  -> DECID 
( -.  ( ph  \/  ps )  \/  ch ) ) )
2422, 9, 23sylc 62 . . . 4  |-  ( (DECID  ph  /\  (DECID  ps  /\  (DECID  ch  /\ DECID  th )
) )  -> DECID  ( -.  ( ph  \/  ps )  \/  ch ) )
25 dcn 832 . . . . . . . 8  |-  (DECID  ch  -> DECID  -.  ch )
269, 25syl 14 . . . . . . 7  |-  ( (DECID  ph  /\  (DECID  ps  /\  (DECID  ch  /\ DECID  th )
) )  -> DECID  -.  ch )
27 dcn 832 . . . . . . . 8  |-  (DECID  ( ch  \/  th )  -> DECID  -.  ( ch  \/  th )
)
2812, 27syl 14 . . . . . . 7  |-  ( (DECID  ph  /\  (DECID  ps  /\  (DECID  ch  /\ DECID  th )
) )  -> DECID  -.  ( ch  \/  th ) )
29 dcor 925 . . . . . . 7  |-  (DECID  -.  ch  ->  (DECID  -.  ( ch  \/  th )  -> DECID  ( -.  ch  \/  -.  ( ch  \/  th ) ) ) )
3026, 28, 29sylc 62 . . . . . 6  |-  ( (DECID  ph  /\  (DECID  ps  /\  (DECID  ch  /\ DECID  th )
) )  -> DECID  ( -.  ch  \/  -.  ( ch  \/  th ) ) )
31 dcn 832 . . . . . 6  |-  (DECID  ( -. 
ch  \/  -.  ( ch  \/  th ) )  -> DECID  -.  ( -.  ch  \/  -.  ( ch  \/  th ) ) )
3230, 31syl 14 . . . . 5  |-  ( (DECID  ph  /\  (DECID  ps  /\  (DECID  ch  /\ DECID  th )
) )  -> DECID  -.  ( -.  ch  \/  -.  ( ch  \/  th ) ) )
33 dcor 925 . . . . . 6  |-  (DECID  ph  ->  (DECID  -.  ( -.  ch  \/  -.  ( ch  \/  th ) )  -> DECID  ( ph  \/  -.  ( -.  ch  \/  -.  ( ch  \/  th ) ) ) ) )
3433imp 123 . . . . 5  |-  ( (DECID  ph  /\ DECID  -.  ( -.  ch  \/  -.  ( ch  \/  th ) ) )  -> DECID  ( ph  \/  -.  ( -. 
ch  \/  -.  ( ch  \/  th ) ) ) )
3532, 34syldan 280 . . . 4  |-  ( (DECID  ph  /\  (DECID  ps  /\  (DECID  ch  /\ DECID  th )
) )  -> DECID  ( ph  \/  -.  ( -.  ch  \/  -.  ( ch  \/  th ) ) ) )
36 anordc 946 . . . 4  |-  (DECID  ( -.  ( ph  \/  ps )  \/  ch )  ->  (DECID  ( ph  \/  -.  ( -.  ch  \/  -.  ( ch  \/  th ) ) )  -> 
( ( ( -.  ( ph  \/  ps )  \/  ch )  /\  ( ph  \/  -.  ( -.  ch  \/  -.  ( ch  \/  th ) ) ) )  <->  -.  ( -.  ( -.  ( ph  \/  ps )  \/  ch )  \/  -.  ( ph  \/  -.  ( -.  ch  \/  -.  ( ch  \/  th ) ) ) ) ) ) )
3724, 35, 36sylc 62 . . 3  |-  ( (DECID  ph  /\  (DECID  ps  /\  (DECID  ch  /\ DECID  th )
) )  ->  (
( ( -.  ( ph  \/  ps )  \/ 
ch )  /\  ( ph  \/  -.  ( -. 
ch  \/  -.  ( ch  \/  th ) ) ) )  <->  -.  ( -.  ( -.  ( ph  \/  ps )  \/  ch )  \/  -.  ( ph  \/  -.  ( -. 
ch  \/  -.  ( ch  \/  th ) ) ) ) ) )
3817, 37bitrd 187 . 2  |-  ( (DECID  ph  /\  (DECID  ps  /\  (DECID  ch  /\ DECID  th )
) )  ->  (
( ( -.  ( ph  \/  ps )  \/ 
ch )  /\  ( ph  \/  ch ) )  <->  -.  ( -.  ( -.  ( ph  \/  ps )  \/  ch )  \/  -.  ( ph  \/  -.  ( -.  ch  \/  -.  ( ch  \/  th ) ) ) ) ) )
397, 38bitr2id 192 1  |-  ( (DECID  ph  /\  (DECID  ps  /\  (DECID  ch  /\ DECID  th )
) )  ->  ( -.  ( -.  ( -.  ( ph  \/  ps )  \/  ch )  \/  -.  ( ph  \/  -.  ( -.  ch  \/  -.  ( ch  \/  th ) ) ) )  <->  ch ) )
Colors of variables: wff set class
Syntax hints:   -. wn 3    -> wi 4    /\ wa 103    <-> wb 104    \/ wo 698  DECID wdc 824
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 105  ax-ia2 106  ax-ia3 107  ax-in1 604  ax-in2 605  ax-io 699
This theorem depends on definitions:  df-bi 116  df-stab 821  df-dc 825
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator