Users' Mathboxes Mathbox for Alan Sare < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  3orbi123VD Structured version   Visualization version   Unicode version

Theorem 3orbi123VD 37256
Description: Virtual deduction proof of 3orbi123 36879. The following user's proof is completed by invoking mmj2's unify command and using mmj2's StepSelector to pick all remaining steps of the Metamath proof.
1::  |-  (. ( ( ph  <->  ps )  /\  ( ch  <->  th )  /\  ( ta  <->  et ) )  ->.  ( ( ph  <->  ps )  /\  ( ch  <->  th )  /\  ( ta  <->  et ) ) ).
2:1,?: e1a 37017  |-  (. ( ( ph  <->  ps )  /\  ( ch  <->  th )  /\  ( ta  <->  et ) )  ->.  ( ph  <->  ps ) ).
3:1,?: e1a 37017  |-  (. ( ( ph  <->  ps )  /\  ( ch  <->  th )  /\  ( ta  <->  et ) )  ->.  ( ch  <->  th ) ).
4:1,?: e1a 37017  |-  (. ( ( ph  <->  ps )  /\  ( ch  <->  th )  /\  ( ta  <->  et ) )  ->.  ( ta  <->  et ) ).
5:2,3,?: e11 37078  |-  (. ( ( ph  <->  ps )  /\  ( ch  <->  th )  /\  ( ta  <->  et ) )  ->.  ( ( ph  \/  ch )  <->  ( ps  \/  th ) ) ).
6:5,4,?: e11 37078  |-  (. ( ( ph  <->  ps )  /\  ( ch  <->  th )  /\  ( ta  <->  et ) )  ->.  ( ( ( ph  \/  ch )  \/  ta )  <->  ( ( ps  \/  th )  \/  et ) ) ).
7:?:  |-  ( ( ( ph  \/  ch )  \/  ta )  <->  ( ph  \/  ch  \/  ta ) )
8:6,7,?: e10 37084  |-  (. ( ( ph  <->  ps )  /\  ( ch  <->  th )  /\  ( ta  <->  et ) )  ->.  ( ( ph  \/  ch  \/  ta )  <->  ( ( ps  \/  th )  \/  et ) ) ).
9:?:  |-  ( ( ( ps  \/  th )  \/  et )  <->  ( ps  \/  th  \/  et ) )
10:8,9,?: e10 37084  |-  (. ( ( ph  <->  ps )  /\  ( ch  <->  th )  /\  ( ta  <->  et ) )  ->.  ( ( ph  \/  ch  \/  ta )  <->  ( ps  \/  th  \/  et ) ) ).
qed:10:  |-  ( ( ( ph  <->  ps )  /\  ( ch  <->  th )  /\  ( ta  <->  et ) )  ->  ( ( ph  \/  ch  \/  ta )  <->  ( ps  \/  th  \/  et ) ) )
(Contributed by Alan Sare, 31-Dec-2011.) (Proof modification is discouraged.) (New usage is discouraged.)
Assertion
Ref Expression
3orbi123VD  |-  ( ( ( ph  <->  ps )  /\  ( ch  <->  th )  /\  ( ta  <->  et )
)  ->  ( ( ph  \/  ch  \/  ta ) 
<->  ( ps  \/  th  \/  et ) ) )

Proof of Theorem 3orbi123VD
StepHypRef Expression
1 idn1 36955 . . . . . . 7  |-  (. (
( ph  <->  ps )  /\  ( ch 
<->  th )  /\  ( ta 
<->  et ) )  ->.  ( ( ph 
<->  ps )  /\  ( ch 
<->  th )  /\  ( ta 
<->  et ) ) ).
2 simp1 1009 . . . . . . 7  |-  ( ( ( ph  <->  ps )  /\  ( ch  <->  th )  /\  ( ta  <->  et )
)  ->  ( ph  <->  ps ) )
31, 2e1a 37017 . . . . . 6  |-  (. (
( ph  <->  ps )  /\  ( ch 
<->  th )  /\  ( ta 
<->  et ) )  ->.  ( ph  <->  ps ) ).
4 simp2 1010 . . . . . . 7  |-  ( ( ( ph  <->  ps )  /\  ( ch  <->  th )  /\  ( ta  <->  et )
)  ->  ( ch  <->  th ) )
51, 4e1a 37017 . . . . . 6  |-  (. (
( ph  <->  ps )  /\  ( ch 
<->  th )  /\  ( ta 
<->  et ) )  ->.  ( ch  <->  th ) ).
6 pm4.39 883 . . . . . . 7  |-  ( ( ( ph  <->  ps )  /\  ( ch  <->  th )
)  ->  ( ( ph  \/  ch )  <->  ( ps  \/  th ) ) )
76ex 436 . . . . . 6  |-  ( (
ph 
<->  ps )  ->  (
( ch  <->  th )  ->  ( ( ph  \/  ch )  <->  ( ps  \/  th ) ) ) )
83, 5, 7e11 37078 . . . . 5  |-  (. (
( ph  <->  ps )  /\  ( ch 
<->  th )  /\  ( ta 
<->  et ) )  ->.  ( ( ph  \/  ch )  <->  ( ps  \/  th ) ) ).
9 simp3 1011 . . . . . 6  |-  ( ( ( ph  <->  ps )  /\  ( ch  <->  th )  /\  ( ta  <->  et )
)  ->  ( ta  <->  et ) )
101, 9e1a 37017 . . . . 5  |-  (. (
( ph  <->  ps )  /\  ( ch 
<->  th )  /\  ( ta 
<->  et ) )  ->.  ( ta  <->  et ) ).
11 pm4.39 883 . . . . . 6  |-  ( ( ( ( ph  \/  ch )  <->  ( ps  \/  th ) )  /\  ( ta 
<->  et ) )  -> 
( ( ( ph  \/  ch )  \/  ta ) 
<->  ( ( ps  \/  th )  \/  et ) ) )
1211ex 436 . . . . 5  |-  ( ( ( ph  \/  ch ) 
<->  ( ps  \/  th ) )  ->  (
( ta  <->  et )  ->  ( ( ( ph  \/  ch )  \/  ta ) 
<->  ( ( ps  \/  th )  \/  et ) ) ) )
138, 10, 12e11 37078 . . . 4  |-  (. (
( ph  <->  ps )  /\  ( ch 
<->  th )  /\  ( ta 
<->  et ) )  ->.  ( (
( ph  \/  ch )  \/  ta )  <->  ( ( ps  \/  th )  \/  et )
) ).
14 df-3or 987 . . . . 5  |-  ( (
ph  \/  ch  \/  ta )  <->  ( ( ph  \/  ch )  \/  ta ) )
1514bicomi 206 . . . 4  |-  ( ( ( ph  \/  ch )  \/  ta )  <->  (
ph  \/  ch  \/  ta ) )
16 bitr3 36878 . . . . 5  |-  ( ( ( ( ph  \/  ch )  \/  ta ) 
<->  ( ph  \/  ch  \/  ta ) )  -> 
( ( ( (
ph  \/  ch )  \/  ta )  <->  ( ( ps  \/  th )  \/  et ) )  -> 
( ( ph  \/  ch  \/  ta )  <->  ( ( ps  \/  th )  \/  et ) ) ) )
1716com12 32 . . . 4  |-  ( ( ( ( ph  \/  ch )  \/  ta ) 
<->  ( ( ps  \/  th )  \/  et ) )  ->  ( (
( ( ph  \/  ch )  \/  ta ) 
<->  ( ph  \/  ch  \/  ta ) )  -> 
( ( ph  \/  ch  \/  ta )  <->  ( ( ps  \/  th )  \/  et ) ) ) )
1813, 15, 17e10 37084 . . 3  |-  (. (
( ph  <->  ps )  /\  ( ch 
<->  th )  /\  ( ta 
<->  et ) )  ->.  ( ( ph  \/  ch  \/  ta ) 
<->  ( ( ps  \/  th )  \/  et ) ) ).
19 df-3or 987 . . . 4  |-  ( ( ps  \/  th  \/  et )  <->  ( ( ps  \/  th )  \/  et ) )
2019bicomi 206 . . 3  |-  ( ( ( ps  \/  th )  \/  et )  <->  ( ps  \/  th  \/  et ) )
21 bitr 716 . . . 4  |-  ( ( ( ( ph  \/  ch  \/  ta )  <->  ( ( ps  \/  th )  \/  et ) )  /\  ( ( ( ps  \/  th )  \/  et )  <->  ( ps  \/  th  \/  et ) ) )  ->  (
( ph  \/  ch  \/  ta )  <->  ( ps  \/  th  \/  et ) ) )
2221ex 436 . . 3  |-  ( ( ( ph  \/  ch  \/  ta )  <->  ( ( ps  \/  th )  \/  et ) )  -> 
( ( ( ( ps  \/  th )  \/  et )  <->  ( ps  \/  th  \/  et ) )  ->  ( ( ph  \/  ch  \/  ta ) 
<->  ( ps  \/  th  \/  et ) ) ) )
2318, 20, 22e10 37084 . 2  |-  (. (
( ph  <->  ps )  /\  ( ch 
<->  th )  /\  ( ta 
<->  et ) )  ->.  ( ( ph  \/  ch  \/  ta ) 
<->  ( ps  \/  th  \/  et ) ) ).
2423in1 36952 1  |-  ( ( ( ph  <->  ps )  /\  ( ch  <->  th )  /\  ( ta  <->  et )
)  ->  ( ( ph  \/  ch  \/  ta ) 
<->  ( ps  \/  th  \/  et ) ) )
Colors of variables: wff setvar class
Syntax hints:    -> wi 4    <-> wb 188    \/ wo 370    \/ w3o 985    /\ w3a 986
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8
This theorem depends on definitions:  df-bi 189  df-or 372  df-an 373  df-3or 987  df-3an 988  df-vd1 36951
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator