Metamath Proof Explorer


Theorem exps1

Description: Surreal exponentiation to one. (Contributed by Scott Fenton, 24-Jul-2025)

Ref Expression
Assertion exps1 Could not format assertion : No typesetting found for |- ( A e. No -> ( A ^su 1s ) = A ) with typecode |-

Proof

Step Hyp Ref Expression
1 1nns ⊢ 1 s ∈ ℕ s
2 expnnsval Could not format ( ( A e. No /\ 1s e. NN_s ) -> ( A ^su 1s ) = ( seq_s 1s ( x.s , ( NN_s X. { A } ) ) ` 1s ) ) : No typesetting found for |- ( ( A e. No /\ 1s e. NN_s ) -> ( A ^su 1s ) = ( seq_s 1s ( x.s , ( NN_s X. { A } ) ) ` 1s ) ) with typecode |-
3 1 2 mpan2 Could not format ( A e. No -> ( A ^su 1s ) = ( seq_s 1s ( x.s , ( NN_s X. { A } ) ) ` 1s ) ) : No typesetting found for |- ( A e. No -> ( A ^su 1s ) = ( seq_s 1s ( x.s , ( NN_s X. { A } ) ) ` 1s ) ) with typecode |-
4 1no ⊢ 1 s ∈ No
5 4 a1i ⊢ A ∈ No → 1 s ∈ No
6 5 seqs1 ⊢ A ∈ No → seq s 1 s ⋅ s ℕ s × A ⁡ 1 s = ℕ s × A ⁡ 1 s
7 fvconst2g ⊢ A ∈ No ∧ 1 s ∈ ℕ s → ℕ s × A ⁡ 1 s = A
8 1 7 mpan2 ⊢ A ∈ No → ℕ s × A ⁡ 1 s = A
9 3 6 8 3eqtrd Could not format ( A e. No -> ( A ^su 1s ) = A ) : No typesetting found for |- ( A e. No -> ( A ^su 1s ) = A ) with typecode |-