Theorem bnj1204 34012

Description: Well-founded induction. The proof has been taken from Chapter 4 of Don Monk's notes on Set Theory. See http://euclid.colorado.edu/~monkd/setth.pdf. (Contributed by Jonathan Ben-Naim, 3-Jun-2011.) (New usage is discouraged.)

Hypothesis

Ref	Expression
bnj1204.1	⊢ (𝜓 ↔ ∀𝑦 ∈ 𝐴 (𝑦𝑅𝑥 → [𝑦 / 𝑥]𝜑))

Assertion

Ref	Expression
bnj1204	⊢ ((𝑅 FrSe 𝐴 ∧ ∀𝑥 ∈ 𝐴 (𝜓 → 𝜑)) → ∀𝑥 ∈ 𝐴 𝜑)

Distinct variable groups:   𝑥,𝐴,𝑦   𝑥,𝑅,𝑦   𝜑,𝑦

Allowed substitution hints:   𝜑(𝑥)   𝜓(𝑥,𝑦)

Proof of Theorem bnj1204

Dummy variable 𝑧 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		simp1 1137	. . . . . 6 ⊢ ((𝑅 FrSe 𝐴 ∧ ∀𝑥 ∈ 𝐴 (𝜓 → 𝜑) ∧ ∃𝑥 ∈ 𝐴 ¬ 𝜑) → 𝑅 FrSe 𝐴)
2		ssrab2 4077	. . . . . . 7 ⊢ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ⊆ 𝐴
3	2	a1i 11	. . . . . 6 ⊢ ((𝑅 FrSe 𝐴 ∧ ∀𝑥 ∈ 𝐴 (𝜓 → 𝜑) ∧ ∃𝑥 ∈ 𝐴 ¬ 𝜑) → {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ⊆ 𝐴)
4		simp3 1139	. . . . . . 7 ⊢ ((𝑅 FrSe 𝐴 ∧ ∀𝑥 ∈ 𝐴 (𝜓 → 𝜑) ∧ ∃𝑥 ∈ 𝐴 ¬ 𝜑) → ∃𝑥 ∈ 𝐴 ¬ 𝜑)
5		rabn0 4385	. . . . . . 7 ⊢ ({𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ≠ ∅ ↔ ∃𝑥 ∈ 𝐴 ¬ 𝜑)
6	4, 5	sylibr 233	. . . . . 6 ⊢ ((𝑅 FrSe 𝐴 ∧ ∀𝑥 ∈ 𝐴 (𝜓 → 𝜑) ∧ ∃𝑥 ∈ 𝐴 ¬ 𝜑) → {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ≠ ∅)
7		nfrab1 3452	. . . . . . . 8 ⊢ Ⅎ𝑥{𝑥 ∈ 𝐴 ∣ ¬ 𝜑}
8	7	nfcrii 2896	. . . . . . 7 ⊢ (𝑧 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} → ∀𝑥 𝑧 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑})
9	8	bnj1228 34011	. . . . . 6 ⊢ ((𝑅 FrSe 𝐴 ∧ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ⊆ 𝐴 ∧ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ≠ ∅) → ∃𝑥 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑}∀𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ¬ 𝑦𝑅𝑥)
10	1, 3, 6, 9	syl3anc 1372	. . . . 5 ⊢ ((𝑅 FrSe 𝐴 ∧ ∀𝑥 ∈ 𝐴 (𝜓 → 𝜑) ∧ ∃𝑥 ∈ 𝐴 ¬ 𝜑) → ∃𝑥 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑}∀𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ¬ 𝑦𝑅𝑥)
11		biid 261	. . . . 5 ⊢ (((𝑅 FrSe 𝐴 ∧ ∀𝑥 ∈ 𝐴 (𝜓 → 𝜑) ∧ ∃𝑥 ∈ 𝐴 ¬ 𝜑) ∧ 𝑥 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ∧ ∀𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ¬ 𝑦𝑅𝑥) ↔ ((𝑅 FrSe 𝐴 ∧ ∀𝑥 ∈ 𝐴 (𝜓 → 𝜑) ∧ ∃𝑥 ∈ 𝐴 ¬ 𝜑) ∧ 𝑥 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ∧ ∀𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ¬ 𝑦𝑅𝑥))
12		nfv 1918	. . . . . . 7 ⊢ Ⅎ𝑥 𝑅 FrSe 𝐴
13		nfra1 3282	. . . . . . 7 ⊢ Ⅎ𝑥∀𝑥 ∈ 𝐴 (𝜓 → 𝜑)
14		nfre1 3283	. . . . . . 7 ⊢ Ⅎ𝑥∃𝑥 ∈ 𝐴 ¬ 𝜑
15	12, 13, 14	nf3an 1905	. . . . . 6 ⊢ Ⅎ𝑥(𝑅 FrSe 𝐴 ∧ ∀𝑥 ∈ 𝐴 (𝜓 → 𝜑) ∧ ∃𝑥 ∈ 𝐴 ¬ 𝜑)
16	15	nf5ri 2189	. . . . 5 ⊢ ((𝑅 FrSe 𝐴 ∧ ∀𝑥 ∈ 𝐴 (𝜓 → 𝜑) ∧ ∃𝑥 ∈ 𝐴 ¬ 𝜑) → ∀𝑥(𝑅 FrSe 𝐴 ∧ ∀𝑥 ∈ 𝐴 (𝜓 → 𝜑) ∧ ∃𝑥 ∈ 𝐴 ¬ 𝜑))
17	10, 11, 16	bnj1521 33851	. . . 4 ⊢ ((𝑅 FrSe 𝐴 ∧ ∀𝑥 ∈ 𝐴 (𝜓 → 𝜑) ∧ ∃𝑥 ∈ 𝐴 ¬ 𝜑) → ∃𝑥((𝑅 FrSe 𝐴 ∧ ∀𝑥 ∈ 𝐴 (𝜓 → 𝜑) ∧ ∃𝑥 ∈ 𝐴 ¬ 𝜑) ∧ 𝑥 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ∧ ∀𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ¬ 𝑦𝑅𝑥))
18		eqid 2733	. . . . . 6 ⊢ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} = {𝑥 ∈ 𝐴 ∣ ¬ 𝜑}
19	18, 11	bnj1212 33799	. . . . 5 ⊢ (((𝑅 FrSe 𝐴 ∧ ∀𝑥 ∈ 𝐴 (𝜓 → 𝜑) ∧ ∃𝑥 ∈ 𝐴 ¬ 𝜑) ∧ 𝑥 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ∧ ∀𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ¬ 𝑦𝑅𝑥) → 𝑥 ∈ 𝐴)
20		nfra1 3282	. . . . . . . 8 ⊢ Ⅎ𝑦∀𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ¬ 𝑦𝑅𝑥
21		simp3 1139	. . . . . . . . . . . . . . 15 ⊢ ((𝑦 ∈ 𝐴 ∧ 𝑦𝑅𝑥 ∧ ∀𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ¬ 𝑦𝑅𝑥) → ∀𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ¬ 𝑦𝑅𝑥)
22	21	bnj1211 33797	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∈ 𝐴 ∧ 𝑦𝑅𝑥 ∧ ∀𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ¬ 𝑦𝑅𝑥) → ∀𝑦(𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} → ¬ 𝑦𝑅𝑥))
23		con2b 360	. . . . . . . . . . . . . . 15 ⊢ ((𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} → ¬ 𝑦𝑅𝑥) ↔ (𝑦𝑅𝑥 → ¬ 𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑}))
24	23	albii 1822	. . . . . . . . . . . . . 14 ⊢ (∀𝑦(𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} → ¬ 𝑦𝑅𝑥) ↔ ∀𝑦(𝑦𝑅𝑥 → ¬ 𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑}))
25	22, 24	sylib 217	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∈ 𝐴 ∧ 𝑦𝑅𝑥 ∧ ∀𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ¬ 𝑦𝑅𝑥) → ∀𝑦(𝑦𝑅𝑥 → ¬ 𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑}))
26		simp2 1138	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∈ 𝐴 ∧ 𝑦𝑅𝑥 ∧ ∀𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ¬ 𝑦𝑅𝑥) → 𝑦𝑅𝑥)
27		sp 2177	. . . . . . . . . . . . 13 ⊢ (∀𝑦(𝑦𝑅𝑥 → ¬ 𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑}) → (𝑦𝑅𝑥 → ¬ 𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑}))
28	25, 26, 27	sylc 65	. . . . . . . . . . . 12 ⊢ ((𝑦 ∈ 𝐴 ∧ 𝑦𝑅𝑥 ∧ ∀𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ¬ 𝑦𝑅𝑥) → ¬ 𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑})
29		simp1 1137	. . . . . . . . . . . 12 ⊢ ((𝑦 ∈ 𝐴 ∧ 𝑦𝑅𝑥 ∧ ∀𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ¬ 𝑦𝑅𝑥) → 𝑦 ∈ 𝐴)
30		nfcv 2904	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑥𝐴
31	30	elrabsf 3825	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ↔ (𝑦 ∈ 𝐴 ∧ [𝑦 / 𝑥] ¬ 𝜑))
32		vex 3479	. . . . . . . . . . . . . . . . . . 19 ⊢ 𝑦 ∈ V
33		sbcng 3827	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 ∈ V → ([𝑦 / 𝑥] ¬ 𝜑 ↔ ¬ [𝑦 / 𝑥]𝜑))
34	32, 33	ax-mp 5	. . . . . . . . . . . . . . . . . 18 ⊢ ([𝑦 / 𝑥] ¬ 𝜑 ↔ ¬ [𝑦 / 𝑥]𝜑)
35	34	anbi2i 624	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑦 ∈ 𝐴 ∧ [𝑦 / 𝑥] ¬ 𝜑) ↔ (𝑦 ∈ 𝐴 ∧ ¬ [𝑦 / 𝑥]𝜑))
36	31, 35	bitri 275	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ↔ (𝑦 ∈ 𝐴 ∧ ¬ [𝑦 / 𝑥]𝜑))
37	36	notbii 320	. . . . . . . . . . . . . . 15 ⊢ (¬ 𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ↔ ¬ (𝑦 ∈ 𝐴 ∧ ¬ [𝑦 / 𝑥]𝜑))
38		imnan 401	. . . . . . . . . . . . . . 15 ⊢ ((𝑦 ∈ 𝐴 → ¬ ¬ [𝑦 / 𝑥]𝜑) ↔ ¬ (𝑦 ∈ 𝐴 ∧ ¬ [𝑦 / 𝑥]𝜑))
39	37, 38	sylbb2 237	. . . . . . . . . . . . . 14 ⊢ (¬ 𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} → (𝑦 ∈ 𝐴 → ¬ ¬ [𝑦 / 𝑥]𝜑))
40	39	imp 408	. . . . . . . . . . . . 13 ⊢ ((¬ 𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ∧ 𝑦 ∈ 𝐴) → ¬ ¬ [𝑦 / 𝑥]𝜑)
41	40	notnotrd 133	. . . . . . . . . . . 12 ⊢ ((¬ 𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ∧ 𝑦 ∈ 𝐴) → [𝑦 / 𝑥]𝜑)
42	28, 29, 41	syl2anc 585	. . . . . . . . . . 11 ⊢ ((𝑦 ∈ 𝐴 ∧ 𝑦𝑅𝑥 ∧ ∀𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ¬ 𝑦𝑅𝑥) → [𝑦 / 𝑥]𝜑)
43	42	3expa 1119	. . . . . . . . . 10 ⊢ (((𝑦 ∈ 𝐴 ∧ 𝑦𝑅𝑥) ∧ ∀𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ¬ 𝑦𝑅𝑥) → [𝑦 / 𝑥]𝜑)
44	43	expcom 415	. . . . . . . . 9 ⊢ (∀𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ¬ 𝑦𝑅𝑥 → ((𝑦 ∈ 𝐴 ∧ 𝑦𝑅𝑥) → [𝑦 / 𝑥]𝜑))
45	44	expd 417	. . . . . . . 8 ⊢ (∀𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ¬ 𝑦𝑅𝑥 → (𝑦 ∈ 𝐴 → (𝑦𝑅𝑥 → [𝑦 / 𝑥]𝜑)))
46	20, 45	ralrimi 3255	. . . . . . 7 ⊢ (∀𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ¬ 𝑦𝑅𝑥 → ∀𝑦 ∈ 𝐴 (𝑦𝑅𝑥 → [𝑦 / 𝑥]𝜑))
47		bnj1204.1	. . . . . . 7 ⊢ (𝜓 ↔ ∀𝑦 ∈ 𝐴 (𝑦𝑅𝑥 → [𝑦 / 𝑥]𝜑))
48	46, 47	sylibr 233	. . . . . 6 ⊢ (∀𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ¬ 𝑦𝑅𝑥 → 𝜓)
49	48	3ad2ant3 1136	. . . . 5 ⊢ (((𝑅 FrSe 𝐴 ∧ ∀𝑥 ∈ 𝐴 (𝜓 → 𝜑) ∧ ∃𝑥 ∈ 𝐴 ¬ 𝜑) ∧ 𝑥 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ∧ ∀𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ¬ 𝑦𝑅𝑥) → 𝜓)
50		simp12 1205	. . . . 5 ⊢ (((𝑅 FrSe 𝐴 ∧ ∀𝑥 ∈ 𝐴 (𝜓 → 𝜑) ∧ ∃𝑥 ∈ 𝐴 ¬ 𝜑) ∧ 𝑥 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ∧ ∀𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ¬ 𝑦𝑅𝑥) → ∀𝑥 ∈ 𝐴 (𝜓 → 𝜑))
51		simp3 1139	. . . . . . 7 ⊢ ((𝑥 ∈ 𝐴 ∧ 𝜓 ∧ ∀𝑥 ∈ 𝐴 (𝜓 → 𝜑)) → ∀𝑥 ∈ 𝐴 (𝜓 → 𝜑))
52	51	bnj1211 33797	. . . . . 6 ⊢ ((𝑥 ∈ 𝐴 ∧ 𝜓 ∧ ∀𝑥 ∈ 𝐴 (𝜓 → 𝜑)) → ∀𝑥(𝑥 ∈ 𝐴 → (𝜓 → 𝜑)))
53		simp1 1137	. . . . . 6 ⊢ ((𝑥 ∈ 𝐴 ∧ 𝜓 ∧ ∀𝑥 ∈ 𝐴 (𝜓 → 𝜑)) → 𝑥 ∈ 𝐴)
54		simp2 1138	. . . . . 6 ⊢ ((𝑥 ∈ 𝐴 ∧ 𝜓 ∧ ∀𝑥 ∈ 𝐴 (𝜓 → 𝜑)) → 𝜓)
55		sp 2177	. . . . . 6 ⊢ (∀𝑥(𝑥 ∈ 𝐴 → (𝜓 → 𝜑)) → (𝑥 ∈ 𝐴 → (𝜓 → 𝜑)))
56	52, 53, 54, 55	syl3c 66	. . . . 5 ⊢ ((𝑥 ∈ 𝐴 ∧ 𝜓 ∧ ∀𝑥 ∈ 𝐴 (𝜓 → 𝜑)) → 𝜑)
57	19, 49, 50, 56	syl3anc 1372	. . . 4 ⊢ (((𝑅 FrSe 𝐴 ∧ ∀𝑥 ∈ 𝐴 (𝜓 → 𝜑) ∧ ∃𝑥 ∈ 𝐴 ¬ 𝜑) ∧ 𝑥 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ∧ ∀𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ¬ 𝑦𝑅𝑥) → 𝜑)
58		rabid 3453	. . . . . 6 ⊢ (𝑥 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ↔ (𝑥 ∈ 𝐴 ∧ ¬ 𝜑))
59	58	simprbi 498	. . . . 5 ⊢ (𝑥 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} → ¬ 𝜑)
60	59	3ad2ant2 1135	. . . 4 ⊢ (((𝑅 FrSe 𝐴 ∧ ∀𝑥 ∈ 𝐴 (𝜓 → 𝜑) ∧ ∃𝑥 ∈ 𝐴 ¬ 𝜑) ∧ 𝑥 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ∧ ∀𝑦 ∈ {𝑥 ∈ 𝐴 ∣ ¬ 𝜑} ¬ 𝑦𝑅𝑥) → ¬ 𝜑)
61	17, 57, 60	bnj1304 33819	. . 3 ⊢ ¬ (𝑅 FrSe 𝐴 ∧ ∀𝑥 ∈ 𝐴 (𝜓 → 𝜑) ∧ ∃𝑥 ∈ 𝐴 ¬ 𝜑)
62	61	bnj1224 33801	. 2 ⊢ ((𝑅 FrSe 𝐴 ∧ ∀𝑥 ∈ 𝐴 (𝜓 → 𝜑)) → ¬ ∃𝑥 ∈ 𝐴 ¬ 𝜑)
63		dfral2 3100	. 2 ⊢ (∀𝑥 ∈ 𝐴 𝜑 ↔ ¬ ∃𝑥 ∈ 𝐴 ¬ 𝜑)
64	62, 63	sylibr 233	1 ⊢ ((𝑅 FrSe 𝐴 ∧ ∀𝑥 ∈ 𝐴 (𝜓 → 𝜑)) → ∀𝑥 ∈ 𝐴 𝜑)

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 205   ∧ wa 397   ∧ w3a 1088  ∀wal 1540   ∈ wcel 2107   ≠ wne 2941  ∀wral 3062  ∃wrex 3071  {crab 3433  Vcvv 3475  [wsbc 3777   ⊆ wss 3948  ∅c0 4322   class class class wbr 5148   FrSe w-bnj15 33692

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-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2704  ax-rep 5285  ax-sep 5299  ax-nul 5306  ax-pow 5363  ax-pr 5427  ax-un 7722  ax-reg 9584  ax-inf2 9633

This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2535  df-eu 2564  df-clab 2711  df-cleq 2725  df-clel 2811  df-nfc 2886  df-ne 2942  df-ral 3063  df-rex 3072  df-reu 3378  df-rab 3434  df-v 3477  df-sbc 3778  df-csb 3894  df-dif 3951  df-un 3953  df-in 3955  df-ss 3965  df-pss 3967  df-nul 4323  df-if 4529  df-pw 4604  df-sn 4629  df-pr 4631  df-op 4635  df-uni 4909  df-iun 4999  df-br 5149  df-opab 5211  df-mpt 5232  df-tr 5266  df-id 5574  df-eprel 5580  df-po 5588  df-so 5589  df-fr 5631  df-we 5633  df-xp 5682  df-rel 5683  df-cnv 5684  df-co 5685  df-dm 5686  df-rn 5687  df-res 5688  df-ima 5689  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6493  df-fun 6543  df-fn 6544  df-f 6545  df-f1 6546  df-fo 6547  df-f1o 6548  df-fv 6549  df-om 7853  df-1o 8463  df-bnj17 33687  df-bnj14 33689  df-bnj13 33691  df-bnj15 33693  df-bnj18 33695  df-bnj19 33697

This theorem is referenced by:  bnj1417  34041