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

Theorem dn1dc 867
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 657 . . . . 5  |-  ( -.  ( ph  \/  ps )  ->  -.  ph )
2 imnan 624 . . . . 5  |-  ( ( -.  ( ph  \/  ps )  ->  -.  ph ) 
<->  -.  ( -.  ( ph  \/  ps )  /\  ph ) )
31, 2mpbi 133 . . . 4  |-  -.  ( -.  ( ph  \/  ps )  /\  ph )
43biorfi 665 . . 3  |-  ( ch  <->  ( ch  \/  ( -.  ( ph  \/  ps )  /\  ph ) ) )
5 orcom 647 . . 3  |-  ( ( ch  \/  ( -.  ( ph  \/  ps )  /\  ph ) )  <-> 
( ( -.  ( ph  \/  ps )  /\  ph )  \/  ch )
)
6 ordir 730 . . 3  |-  ( ( ( -.  ( ph  \/  ps )  /\  ph )  \/  ch )  <->  ( ( -.  ( ph  \/  ps )  \/  ch )  /\  ( ph  \/  ch ) ) )
74, 5, 63bitri 195 . 2  |-  ( ch  <->  ( ( -.  ( ph  \/  ps )  \/  ch )  /\  ( ph  \/  ch ) ) )
8 pm4.45 698 . . . . . 6  |-  ( ch  <->  ( ch  /\  ( ch  \/  th ) ) )
9 simprrl 491 . . . . . . 7  |-  ( (DECID  ph  /\  (DECID  ps  /\  (DECID  ch  /\ DECID  th )
) )  -> DECID  ch )
10 dcor 843 . . . . . . . . 9  |-  (DECID  ch  ->  (DECID  th 
-> DECID  ( ch  \/  th )
) )
1110imp 115 . . . . . . . 8  |-  ( (DECID  ch 
/\ DECID  th )  -> DECID  ( ch  \/  th ) )
1211ad2antll 460 . . . . . . 7  |-  ( (DECID  ph  /\  (DECID  ps  /\  (DECID  ch  /\ DECID  th )
) )  -> DECID  ( ch  \/  th ) )
13 anordc 863 . . . . . . 7  |-  (DECID  ch  ->  (DECID  ( ch  \/  th )  ->  ( ( ch  /\  ( ch  \/  th )
)  <->  -.  ( -.  ch  \/  -.  ( ch  \/  th ) ) ) ) )
149, 12, 13sylc 56 . . . . . 6  |-  ( (DECID  ph  /\  (DECID  ps  /\  (DECID  ch  /\ DECID  th )
) )  ->  (
( ch  /\  ( ch  \/  th ) )  <->  -.  ( -.  ch  \/  -.  ( ch  \/  th ) ) ) )
158, 14syl5bb 181 . . . . 5  |-  ( (DECID  ph  /\  (DECID  ps  /\  (DECID  ch  /\ DECID  th )
) )  ->  ( ch 
<->  -.  ( -.  ch  \/  -.  ( ch  \/  th ) ) ) )
1615orbi2d 704 . . . 4  |-  ( (DECID  ph  /\  (DECID  ps  /\  (DECID  ch  /\ DECID  th )
) )  ->  (
( ph  \/  ch ) 
<->  ( ph  \/  -.  ( -.  ch  \/  -.  ( ch  \/  th ) ) ) ) )
1716anbi2d 437 . . 3  |-  ( (DECID  ph  /\  (DECID  ps  /\  (DECID  ch  /\ DECID  th )
) )  ->  (
( ( -.  ( ph  \/  ps )  \/ 
ch )  /\  ( ph  \/  ch ) )  <-> 
( ( -.  ( ph  \/  ps )  \/ 
ch )  /\  ( ph  \/  -.  ( -. 
ch  \/  -.  ( ch  \/  th ) ) ) ) ) )
18 dcor 843 . . . . . . . 8  |-  (DECID  ph  ->  (DECID  ps 
-> DECID  ( ph  \/  ps )
) )
19 dcn 746 . . . . . . . 8  |-  (DECID  ( ph  \/  ps )  -> DECID  -.  ( ph  \/  ps ) )
2018, 19syl6 29 . . . . . . 7  |-  (DECID  ph  ->  (DECID  ps 
-> DECID  -.  ( ph  \/  ps ) ) )
2120imp 115 . . . . . 6  |-  ( (DECID  ph  /\ DECID  ps )  -> DECID  -.  ( ph  \/  ps ) )
2221adantrr 448 . . . . 5  |-  ( (DECID  ph  /\  (DECID  ps  /\  (DECID  ch  /\ DECID  th )
) )  -> DECID  -.  ( ph  \/  ps ) )
23 dcor 843 . . . . 5  |-  (DECID  -.  ( ph  \/  ps )  -> 
(DECID 
ch  -> DECID 
( -.  ( ph  \/  ps )  \/  ch ) ) )
2422, 9, 23sylc 56 . . . 4  |-  ( (DECID  ph  /\  (DECID  ps  /\  (DECID  ch  /\ DECID  th )
) )  -> DECID  ( -.  ( ph  \/  ps )  \/  ch ) )
25 dcn 746 . . . . . . . 8  |-  (DECID  ch  -> DECID  -.  ch )
269, 25syl 14 . . . . . . 7  |-  ( (DECID  ph  /\  (DECID  ps  /\  (DECID  ch  /\ DECID  th )
) )  -> DECID  -.  ch )
27 dcn 746 . . . . . . . 8  |-  (DECID  ( ch  \/  th )  -> DECID  -.  ( ch  \/  th )
)
2812, 27syl 14 . . . . . . 7  |-  ( (DECID  ph  /\  (DECID  ps  /\  (DECID  ch  /\ DECID  th )
) )  -> DECID  -.  ( ch  \/  th ) )
29 dcor 843 . . . . . . 7  |-  (DECID  -.  ch  ->  (DECID  -.  ( ch  \/  th )  -> DECID  ( -.  ch  \/  -.  ( ch  \/  th ) ) ) )
3026, 28, 29sylc 56 . . . . . 6  |-  ( (DECID  ph  /\  (DECID  ps  /\  (DECID  ch  /\ DECID  th )
) )  -> DECID  ( -.  ch  \/  -.  ( ch  \/  th ) ) )
31 dcn 746 . . . . . 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 843 . . . . . 6  |-  (DECID  ph  ->  (DECID  -.  ( -.  ch  \/  -.  ( ch  \/  th ) )  -> DECID  ( ph  \/  -.  ( -.  ch  \/  -.  ( ch  \/  th ) ) ) ) )
3433imp 115 . . . . 5  |-  ( (DECID  ph  /\ DECID  -.  ( -.  ch  \/  -.  ( ch  \/  th ) ) )  -> DECID  ( ph  \/  -.  ( -. 
ch  \/  -.  ( ch  \/  th ) ) ) )
3532, 34syldan 266 . . . 4  |-  ( (DECID  ph  /\  (DECID  ps  /\  (DECID  ch  /\ DECID  th )
) )  -> DECID  ( ph  \/  -.  ( -.  ch  \/  -.  ( ch  \/  th ) ) ) )
36 anordc 863 . . . 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 56 . . 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 177 . 2  |-  ( (DECID  ph  /\  (DECID  ps  /\  (DECID  ch  /\ DECID  th )
) )  ->  (
( ( -.  ( ph  \/  ps )  \/ 
ch )  /\  ( ph  \/  ch ) )  <->  -.  ( -.  ( -.  ( ph  \/  ps )  \/  ch )  \/  -.  ( ph  \/  -.  ( -.  ch  \/  -.  ( ch  \/  th ) ) ) ) ) )
397, 38syl5rbb 182 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 97    <-> wb 98    \/ wo 629  DECID wdc 742
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 99  ax-ia2 100  ax-ia3 101  ax-in1 544  ax-in2 545  ax-io 630
This theorem depends on definitions:  df-bi 110  df-dc 743
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator