![]() |
Mathbox for Richard Penner |
< Previous
Next >
Nearby theorems |
|
Mirrors > Home > MPE Home > Th. List > Mathboxes > frege60b | Structured version Visualization version GIF version |
Description: Swap antecedents of ax-frege58b 42247. Proposition 60 of [Frege1879] p. 52. (Contributed by RP, 24-Dec-2019.) (Proof modification is discouraged.) |
Ref | Expression |
---|---|
frege60b | ⊢ (∀𝑥(𝜑 → (𝜓 → 𝜒)) → ([𝑦 / 𝑥]𝜓 → ([𝑦 / 𝑥]𝜑 → [𝑦 / 𝑥]𝜒))) |
Step | Hyp | Ref | Expression |
---|---|---|---|
1 | ax-frege58b 42247 | . . 3 ⊢ (∀𝑥(𝜑 → (𝜓 → 𝜒)) → [𝑦 / 𝑥](𝜑 → (𝜓 → 𝜒))) | |
2 | sbim 2300 | . . . 4 ⊢ ([𝑦 / 𝑥](𝜑 → (𝜓 → 𝜒)) ↔ ([𝑦 / 𝑥]𝜑 → [𝑦 / 𝑥](𝜓 → 𝜒))) | |
3 | sbim 2300 | . . . . 5 ⊢ ([𝑦 / 𝑥](𝜓 → 𝜒) ↔ ([𝑦 / 𝑥]𝜓 → [𝑦 / 𝑥]𝜒)) | |
4 | 3 | imbi2i 336 | . . . 4 ⊢ (([𝑦 / 𝑥]𝜑 → [𝑦 / 𝑥](𝜓 → 𝜒)) ↔ ([𝑦 / 𝑥]𝜑 → ([𝑦 / 𝑥]𝜓 → [𝑦 / 𝑥]𝜒))) |
5 | 2, 4 | bitri 275 | . . 3 ⊢ ([𝑦 / 𝑥](𝜑 → (𝜓 → 𝜒)) ↔ ([𝑦 / 𝑥]𝜑 → ([𝑦 / 𝑥]𝜓 → [𝑦 / 𝑥]𝜒))) |
6 | 1, 5 | sylib 217 | . 2 ⊢ (∀𝑥(𝜑 → (𝜓 → 𝜒)) → ([𝑦 / 𝑥]𝜑 → ([𝑦 / 𝑥]𝜓 → [𝑦 / 𝑥]𝜒))) |
7 | frege12 42159 | . 2 ⊢ ((∀𝑥(𝜑 → (𝜓 → 𝜒)) → ([𝑦 / 𝑥]𝜑 → ([𝑦 / 𝑥]𝜓 → [𝑦 / 𝑥]𝜒))) → (∀𝑥(𝜑 → (𝜓 → 𝜒)) → ([𝑦 / 𝑥]𝜓 → ([𝑦 / 𝑥]𝜑 → [𝑦 / 𝑥]𝜒)))) | |
8 | 6, 7 | ax-mp 5 | 1 ⊢ (∀𝑥(𝜑 → (𝜓 → 𝜒)) → ([𝑦 / 𝑥]𝜓 → ([𝑦 / 𝑥]𝜑 → [𝑦 / 𝑥]𝜒))) |
Colors of variables: wff setvar class |
Syntax hints: → wi 4 ∀wal 1540 [wsb 2068 |
This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1798 ax-4 1812 ax-5 1914 ax-6 1972 ax-7 2012 ax-10 2138 ax-12 2172 ax-frege1 42136 ax-frege2 42137 ax-frege8 42155 ax-frege58b 42247 |
This theorem depends on definitions: df-bi 206 df-an 398 df-or 847 df-ex 1783 df-nf 1787 df-sb 2069 |
This theorem is referenced by: (None) |
Copyright terms: Public domain | W3C validator |