| Step |
Hyp |
Ref |
Expression |
| 1 |
|
tgrest |
|- ( ( J e. Top /\ A e. V ) -> ( topGen ` ( J |`t A ) ) = ( ( topGen ` J ) |`t A ) ) |
| 2 |
|
tgtop |
|- ( J e. Top -> ( topGen ` J ) = J ) |
| 3 |
2
|
adantr |
|- ( ( J e. Top /\ A e. V ) -> ( topGen ` J ) = J ) |
| 4 |
3
|
oveq1d |
|- ( ( J e. Top /\ A e. V ) -> ( ( topGen ` J ) |`t A ) = ( J |`t A ) ) |
| 5 |
1 4
|
eqtrd |
|- ( ( J e. Top /\ A e. V ) -> ( topGen ` ( J |`t A ) ) = ( J |`t A ) ) |
| 6 |
|
topbas |
|- ( J e. Top -> J e. TopBases ) |
| 7 |
6
|
adantr |
|- ( ( J e. Top /\ A e. V ) -> J e. TopBases ) |
| 8 |
|
restbas |
|- ( J e. TopBases -> ( J |`t A ) e. TopBases ) |
| 9 |
|
tgcl |
|- ( ( J |`t A ) e. TopBases -> ( topGen ` ( J |`t A ) ) e. Top ) |
| 10 |
7 8 9
|
3syl |
|- ( ( J e. Top /\ A e. V ) -> ( topGen ` ( J |`t A ) ) e. Top ) |
| 11 |
5 10
|
eqeltrrd |
|- ( ( J e. Top /\ A e. V ) -> ( J |`t A ) e. Top ) |