Metamath Proof Explorer


Theorem estrcbasbas

Description: An element of the base set of the base set of the category of extensible structures (i.e. the base set of an extensible structure) belongs to the considered weak universe. (Contributed by AV, 22-Mar-2020)

Ref Expression
Hypotheses estrcbasbas.c
|- C = ( ExtStrCat ` U )
estrcbasbas.b
|- B = ( Base ` C )
estrcbasbas.u
|- ( ph -> U e. WUni )
Assertion estrcbasbas
|- ( ( ph /\ E e. B ) -> ( Base ` E ) e. U )

Proof

Step Hyp Ref Expression
1 estrcbasbas.c
 |-  C = ( ExtStrCat ` U )
2 estrcbasbas.b
 |-  B = ( Base ` C )
3 estrcbasbas.u
 |-  ( ph -> U e. WUni )
4 1 3 estrcbas
 |-  ( ph -> U = ( Base ` C ) )
5 2 4 eqtr4id
 |-  ( ph -> B = U )
6 5 eleq2d
 |-  ( ph -> ( E e. B <-> E e. U ) )
7 baseid
 |-  Base = Slot ( Base ` ndx )
8 simpl
 |-  ( ( U e. WUni /\ E e. U ) -> U e. WUni )
9 simpr
 |-  ( ( U e. WUni /\ E e. U ) -> E e. U )
10 7 8 9 wunstr
 |-  ( ( U e. WUni /\ E e. U ) -> ( Base ` E ) e. U )
11 10 ex
 |-  ( U e. WUni -> ( E e. U -> ( Base ` E ) e. U ) )
12 3 11 syl
 |-  ( ph -> ( E e. U -> ( Base ` E ) e. U ) )
13 6 12 sylbid
 |-  ( ph -> ( E e. B -> ( Base ` E ) e. U ) )
14 13 imp
 |-  ( ( ph /\ E e. B ) -> ( Base ` E ) e. U )