Theorem bnj976 32792

Description: First-order logic and set theory. (Contributed by Jonathan Ben-Naim, 3-Jun-2011.) (New usage is discouraged.)

Hypotheses

Ref	Expression
bnj976.1	|- ( ch <-> ( N e. D /\ f Fn N /\ ph /\ ps ) )
bnj976.2	|- ( ph' <-> [. G / f ]. ph )
bnj976.3	|- ( ps' <-> [. G / f ]. ps )
bnj976.4	|- ( ch' <-> [. G / f ]. ch )
bnj976.5	|- G e. _V

Assertion

Ref	Expression
bnj976	|- ( ch' <-> ( N e. D /\ G Fn N /\ ph' /\ ps' ) )

Distinct variable groups:   D, f   f, N

Allowed substitution hints:   ph( f)   ps( f)   ch( f)   G( f)   ph'( f)   ps'( f)   ch'( f)

Proof of Theorem bnj976

Dummy variable h is distinct from all other variables.

Step	Hyp	Ref	Expression
1		bnj976.4	. 2 |- ( ch' <-> [. G / f ]. ch )
2		sbcco 3349	. 2 |- ( [. G / h ]. [. h / f ]. ch <-> [. G / f ]. ch )
3		bnj976.5	. . 3 |- G e. _V
4		bnj252 32712	. . . . . 6 |- ( ( N e. D /\ f Fn N /\ ph /\ ps ) <-> ( N e. D /\ ( f Fn N /\ ph /\ ps ) ) )
5	4	sbcbii 3386	. . . . 5 |- ( [. h / f ]. ( N e. D /\ f Fn N /\ ph /\ ps ) <-> [. h / f ]. ( N e. D /\ ( f Fn N /\ ph /\ ps ) ) )
6		bnj976.1	. . . . . 6 |- ( ch <-> ( N e. D /\ f Fn N /\ ph /\ ps ) )
7	6	sbcbii 3386	. . . . 5 |- ( [. h / f ]. ch <-> [. h / f ]. ( N e. D /\ f Fn N /\ ph /\ ps ) )
8		vex 3111	. . . . . . . 8 |- h e. _V
9	8	bnj525 32751	. . . . . . 7 |- ( [. h / f ]. N e. D <-> N e. D )
10		sbc3an 3389	. . . . . . . 8 |- ( [. h / f ]. ( f Fn N /\ ph /\ ps ) <-> ( [. h / f ]. f Fn N /\ [. h / f ]. ph /\ [. h / f ]. ps ) )
11		bnj62 32730	. . . . . . . . 9 |- ( [. h / f ]. f Fn N <-> h Fn N )
12	11	3anbi1i 1182	. . . . . . . 8 |- ( ( [. h / f ]. f Fn N /\ [. h / f ]. ph /\ [. h / f ]. ps ) <-> ( h Fn N /\ [. h / f ]. ph /\ [. h / f ]. ps ) )
13	10, 12	bitri 249	. . . . . . 7 |- ( [. h / f ]. ( f Fn N /\ ph /\ ps ) <-> ( h Fn N /\ [. h / f ]. ph /\ [. h / f ]. ps ) )
14	9, 13	anbi12i 697	. . . . . 6 |- ( ( [. h / f ]. N e. D /\ [. h / f ]. ( f Fn N /\ ph /\ ps ) ) <-> ( N e. D /\ ( h Fn N /\ [. h / f ]. ph /\ [. h / f ]. ps ) ) )
15		sbcan 3369	. . . . . 6 |- ( [. h / f ]. ( N e. D /\ ( f Fn N /\ ph /\ ps ) ) <-> ( [. h / f ]. N e. D /\ [. h / f ]. ( f Fn N /\ ph /\ ps ) ) )
16		bnj252 32712	. . . . . 6 |- ( ( N e. D /\ h Fn N /\ [. h / f ]. ph /\ [. h / f ]. ps ) <-> ( N e. D /\ ( h Fn N /\ [. h / f ]. ph /\ [. h / f ]. ps ) ) )
17	14, 15, 16	3bitr4ri 278	. . . . 5 |- ( ( N e. D /\ h Fn N /\ [. h / f ]. ph /\ [. h / f ]. ps ) <-> [. h / f ]. ( N e. D /\ ( f Fn N /\ ph /\ ps ) ) )
18	5, 7, 17	3bitr4i 277	. . . 4 |- ( [. h / f ]. ch <-> ( N e. D /\ h Fn N /\ [. h / f ]. ph /\ [. h / f ]. ps ) )
19		fneq1 5662	. . . . . . 7 |- ( h = G -> ( h Fn N <-> G Fn N ) )
20		sbceq1a 3337	. . . . . . . 8 |- ( h = G -> ( [. h / f ]. ph <-> [. G / h ]. [. h / f ]. ph ) )
21		bnj976.2	. . . . . . . . 9 |- ( ph' <-> [. G / f ]. ph )
22		sbcco 3349	. . . . . . . . 9 |- ( [. G / h ]. [. h / f ]. ph <-> [. G / f ]. ph )
23	21, 22	bitr4i 252	. . . . . . . 8 |- ( ph' <-> [. G / h ]. [. h / f ]. ph )
24	20, 23	syl6bbr 263	. . . . . . 7 |- ( h = G -> ( [. h / f ]. ph <-> ph' ) )
25		sbceq1a 3337	. . . . . . . 8 |- ( h = G -> ( [. h / f ]. ps <-> [. G / h ]. [. h / f ]. ps ) )
26		bnj976.3	. . . . . . . . 9 |- ( ps' <-> [. G / f ]. ps )
27		sbcco 3349	. . . . . . . . 9 |- ( [. G / h ]. [. h / f ]. ps <-> [. G / f ]. ps )
28	26, 27	bitr4i 252	. . . . . . . 8 |- ( ps' <-> [. G / h ]. [. h / f ]. ps )
29	25, 28	syl6bbr 263	. . . . . . 7 |- ( h = G -> ( [. h / f ]. ps <-> ps' ) )
30	19, 24, 29	3anbi123d 1294	. . . . . 6 |- ( h = G -> ( ( h Fn N /\ [. h / f ]. ph /\ [. h / f ]. ps ) <-> ( G Fn N /\ ph' /\ ps' ) ) )
31	30	anbi2d 703	. . . . 5 |- ( h = G -> ( ( N e. D /\ ( h Fn N /\ [. h / f ]. ph /\ [. h / f ]. ps ) ) <-> ( N e. D /\ ( G Fn N /\ ph' /\ ps' ) ) ) )
32		bnj252 32712	. . . . 5 |- ( ( N e. D /\ G Fn N /\ ph' /\ ps' ) <-> ( N e. D /\ ( G Fn N /\ ph' /\ ps' ) ) )
33	31, 16, 32	3bitr4g 288	. . . 4 |- ( h = G -> ( ( N e. D /\ h Fn N /\ [. h / f ]. ph /\ [. h / f ]. ps ) <-> ( N e. D /\ G Fn N /\ ph' /\ ps' ) ) )
34	18, 33	syl5bb 257	. . 3 |- ( h = G -> ( [. h / f ]. ch <-> ( N e. D /\ G Fn N /\ ph' /\ ps' ) ) )
35	3, 34	sbcie 3361	. 2 |- ( [. G / h ]. [. h / f ]. ch <-> ( N e. D /\ G Fn N /\ ph' /\ ps' ) )
36	1, 2, 35	3bitr2i 273	1 |- ( ch' <-> ( N e. D /\ G Fn N /\ ph' /\ ps' ) )

Syntax hints:   <-> wb 184   /\ wa 369   /\ w3a 968   = wceq 1374   e. wcel 1762   _Vcvv 3108   [.wsbc 3326   Fn wfn 5576   /\ w-bnj17 32695

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1596  ax-4 1607  ax-5 1675  ax-6 1714  ax-7 1734  ax-10 1781  ax-11 1786  ax-12 1798  ax-13 1963  ax-ext 2440

This theorem depends on definitions:  df-bi 185  df-or 370  df-an 371  df-3an 970  df-tru 1377  df-ex 1592  df-nf 1595  df-sb 1707  df-clab 2448  df-cleq 2454  df-clel 2457  df-nfc 2612  df-rab 2818  df-v 3110  df-sbc 3327  df-dif 3474  df-un 3476  df-in 3478  df-ss 3485  df-nul 3781  df-if 3935  df-sn 4023  df-pr 4025  df-op 4029  df-br 4443  df-opab 4501  df-rel 5001  df-cnv 5002  df-co 5003  df-dm 5004  df-fun 5583  df-fn 5584  df-bnj17 32696

This theorem is referenced by:  bnj910  32962  bnj999  32971  bnj907  32979