| Step |
Hyp |
Ref |
Expression |
| 1 |
|
ffun |
|- ( F : A --> B -> Fun F ) |
| 2 |
1
|
3ad2ant1 |
|- ( ( F : A --> B /\ S C_ A /\ X e. S ) -> Fun F ) |
| 3 |
2
|
adantr |
|- ( ( ( F : A --> B /\ S C_ A /\ X e. S ) /\ A. x e. S ( F ` x ) = ( F ` X ) ) -> Fun F ) |
| 4 |
|
funiunfv |
|- ( Fun F -> U_ y e. S ( F ` y ) = U. ( F " S ) ) |
| 5 |
3 4
|
syl |
|- ( ( ( F : A --> B /\ S C_ A /\ X e. S ) /\ A. x e. S ( F ` x ) = ( F ` X ) ) -> U_ y e. S ( F ` y ) = U. ( F " S ) ) |
| 6 |
|
simp3 |
|- ( ( F : A --> B /\ S C_ A /\ X e. S ) -> X e. S ) |
| 7 |
|
fveqeq2 |
|- ( x = y -> ( ( F ` x ) = ( F ` X ) <-> ( F ` y ) = ( F ` X ) ) ) |
| 8 |
7
|
cbvralvw |
|- ( A. x e. S ( F ` x ) = ( F ` X ) <-> A. y e. S ( F ` y ) = ( F ` X ) ) |
| 9 |
8
|
biimpi |
|- ( A. x e. S ( F ` x ) = ( F ` X ) -> A. y e. S ( F ` y ) = ( F ` X ) ) |
| 10 |
|
fveq2 |
|- ( y = X -> ( F ` y ) = ( F ` X ) ) |
| 11 |
10
|
iuneqconst |
|- ( ( X e. S /\ A. y e. S ( F ` y ) = ( F ` X ) ) -> U_ y e. S ( F ` y ) = ( F ` X ) ) |
| 12 |
6 9 11
|
syl2an |
|- ( ( ( F : A --> B /\ S C_ A /\ X e. S ) /\ A. x e. S ( F ` x ) = ( F ` X ) ) -> U_ y e. S ( F ` y ) = ( F ` X ) ) |
| 13 |
5 12
|
eqtr3d |
|- ( ( ( F : A --> B /\ S C_ A /\ X e. S ) /\ A. x e. S ( F ` x ) = ( F ` X ) ) -> U. ( F " S ) = ( F ` X ) ) |
| 14 |
13
|
ex |
|- ( ( F : A --> B /\ S C_ A /\ X e. S ) -> ( A. x e. S ( F ` x ) = ( F ` X ) -> U. ( F " S ) = ( F ` X ) ) ) |