Theorem supmaxlem 4588

Description: A set that contains a greatest element satisfies the antecedent in supremum theorems. This allows sup(A, B, R) to be used in some situations without the completeness axiom. (Contributed by Jeff Hoffman, 17-Jun-2008.)

Assertion

Ref	Expression
supmaxlem	|- ((C e. A /\ C e. B /\ A.z e. B -. CRz) -> E.x e. A (A.y e. B -. xRy /\ A.y e. A (yRx -> E.z e. B yRz)))

Distinct variable groups:   x,A   x,y,z,B   x,C,y,z   x,R,y,z

Proof of Theorem supmaxlem

Step	Hyp	Ref	Expression
1		breq1 2622	. . . . . . 7 |- (x = C -> (xRy <-> CRy))
2	1	negbid 611	. . . . . 6 |- (x = C -> (-. xRy <-> -. CRy))
3	2	ralbidv 1663	. . . . 5 |- (x = C -> (A.y e. B -. xRy <-> A.y e. B -. CRy))
4		breq2 2623	. . . . . . 7 |- (x = C -> (yRx <-> yRC))
5	4	imbi1d 613	. . . . . 6 |- (x = C -> ((yRx -> E.z e. B yRz) <-> (yRC -> E.z e. B yRz)))
6	5	ralbidv 1663	. . . . 5 |- (x = C -> (A.y e. A (yRx -> E.z e. B yRz) <-> A.y e. A (yRC -> E.z e. B yRz)))
7	3, 6	anbi12d 628	. . . 4 |- (x = C -> ((A.y e. B -. xRy /\ A.y e. A (yRx -> E.z e. B yRz)) <-> (A.y e. B -. CRy /\ A.y e. A (yRC -> E.z e. B yRz))))
8	7	rcla4ev 1877	. . 3 |- ((C e. A /\ (A.y e. B -. CRy /\ A.y e. A (yRC -> E.z e. B yRz))) -> E.x e. A (A.y e. B -. xRy /\ A.y e. A (yRx -> E.z e. B yRz)))
9		breq2 2623	. . . . . . . 8 |- (z = y -> (CRz <-> CRy))
10	9	negbid 611	. . . . . . 7 |- (z = y -> (-. CRz <-> -. CRy))
11	10	cbvralv 1800	. . . . . 6 |- (A.z e. B -. CRz <-> A.y e. B -. CRy)
12	11	biimp 151	. . . . 5 |- (A.z e. B -. CRz -> A.y e. B -. CRy)
13		breq2 2623	. . . . . . . . 9 |- (z = C -> (yRz <-> yRC))
14	13	rcla4ev 1877	. . . . . . . 8 |- ((C e. B /\ yRC) -> E.z e. B yRz)
15	14	ex 373	. . . . . . 7 |- (C e. B -> (yRC -> E.z e. B yRz))
16	15	a1d 12	. . . . . 6 |- (C e. B -> (y e. A -> (yRC -> E.z e. B yRz)))
17	16	r19.21aiv 1713	. . . . 5 |- (C e. B -> A.y e. A (yRC -> E.z e. B yRz))
18	12, 17	anim12i 333	. . . 4 |- ((A.z e. B -. CRz /\ C e. B) -> (A.y e. B -. CRy /\ A.y e. A (yRC -> E.z e. B yRz)))
19	18	ancoms 436	. . 3 |- ((C e. B /\ A.z e. B -. CRz) -> (A.y e. B -. CRy /\ A.y e. A (yRC -> E.z e. B yRz)))
20	8, 19	sylan2 451	. 2 |- ((C e. A /\ (C e. B /\ A.z e. B -. CRz)) -> E.x e. A (A.y e. B -. xRy /\ A.y e. A (yRx -> E.z e. B yRz)))
21	20	3impb 829	1 |- ((C e. A /\ C e. B /\ A.z e. B -. CRz) -> E.x e. A (A.y e. B -. xRy /\ A.y e. A (yRx -> E.z e. B yRz)))

Syntax hints:  -. wn 2   -> wi 3   /\ wa 223   /\ w3a 775   = wceq 956   e. wcel 958  A.wral 1645  E.wrex 1646   class class class wbr 2619

This theorem is referenced by:  supmax 4589

This theorem was proved from axioms:  ax-1 4  ax-2 5  ax-3 6  ax-mp 7  ax-7 962  ax-gen 963  ax-8 964  ax-10 966  ax-12 968  ax-17 971  ax-4 973  ax-5o 975  ax-6o 978  ax-9o 1123  ax-10o 1140  ax-16 1210  ax-11o 1218  ax-ext 1459

This theorem depends on definitions:  df-bi 147  df-or 224  df-an 225  df-3an 777  df-ex 981  df-sb 1172  df-clab 1464  df-cleq 1469  df-clel 1472  df-ral 1649  df-rex 1650  df-v 1812  df-un 2050  df-sn 2412  df-pr 2413  df-op 2416  df-br 2620

Copyright terms: Public domain