| Step |
Hyp |
Ref |
Expression |
| 1 |
|
smfpreimale.s |
|- ( ph -> S e. SAlg ) |
| 2 |
|
smfpreimale.f |
|- ( ph -> F e. ( SMblFn ` S ) ) |
| 3 |
|
smfpreimale.d |
|- D = dom F |
| 4 |
|
smfpreimale.a |
|- ( ph -> A e. RR ) |
| 5 |
1 3
|
issmfle |
|- ( ph -> ( F e. ( SMblFn ` S ) <-> ( D C_ U. S /\ F : D --> RR /\ A. a e. RR { x e. D | ( F ` x ) <_ a } e. ( S |`t D ) ) ) ) |
| 6 |
2 5
|
mpbid |
|- ( ph -> ( D C_ U. S /\ F : D --> RR /\ A. a e. RR { x e. D | ( F ` x ) <_ a } e. ( S |`t D ) ) ) |
| 7 |
6
|
simp3d |
|- ( ph -> A. a e. RR { x e. D | ( F ` x ) <_ a } e. ( S |`t D ) ) |
| 8 |
|
breq2 |
|- ( a = A -> ( ( F ` x ) <_ a <-> ( F ` x ) <_ A ) ) |
| 9 |
8
|
rabbidv |
|- ( a = A -> { x e. D | ( F ` x ) <_ a } = { x e. D | ( F ` x ) <_ A } ) |
| 10 |
9
|
eleq1d |
|- ( a = A -> ( { x e. D | ( F ` x ) <_ a } e. ( S |`t D ) <-> { x e. D | ( F ` x ) <_ A } e. ( S |`t D ) ) ) |
| 11 |
10
|
rspcva |
|- ( ( A e. RR /\ A. a e. RR { x e. D | ( F ` x ) <_ a } e. ( S |`t D ) ) -> { x e. D | ( F ` x ) <_ A } e. ( S |`t D ) ) |
| 12 |
4 7 11
|
syl2anc |
|- ( ph -> { x e. D | ( F ` x ) <_ A } e. ( S |`t D ) ) |