| Step |
Hyp |
Ref |
Expression |
| 1 |
|
had1OLD |
|- ( -. ph -> ( hadd ( -. ph , -. ps , -. ch ) <-> ( -. ps <-> -. ch ) ) ) |
| 2 |
|
hadnot |
|- ( -. hadd ( ph , ps , ch ) <-> hadd ( -. ph , -. ps , -. ch ) ) |
| 3 |
|
xnor |
|- ( ( ps <-> ch ) <-> -. ( ps \/_ ch ) ) |
| 4 |
|
notbi |
|- ( ( ps <-> ch ) <-> ( -. ps <-> -. ch ) ) |
| 5 |
3 4
|
bitr3i |
|- ( -. ( ps \/_ ch ) <-> ( -. ps <-> -. ch ) ) |
| 6 |
1 2 5
|
3bitr4g |
|- ( -. ph -> ( -. hadd ( ph , ps , ch ) <-> -. ( ps \/_ ch ) ) ) |
| 7 |
6
|
con4bid |
|- ( -. ph -> ( hadd ( ph , ps , ch ) <-> ( ps \/_ ch ) ) ) |