Metamath Proof Explorer


Theorem srads

Description: Distance function of a subring algebra. (Contributed by Mario Carneiro, 4-Oct-2015) (Revised by Thierry Arnoux, 16-Jun-2019)

Ref Expression
Hypotheses srapart.a φ A = subringAlg W S
srapart.s φ S Base W
Assertion srads φ dist W = dist A

Proof

Step Hyp Ref Expression
1 srapart.a φ A = subringAlg W S
2 srapart.s φ S Base W
3 df-ds dist = Slot 12
4 1nn0 1 0
5 2nn 2
6 4 5 decnncl 12
7 1nn 1
8 2nn0 2 0
9 8nn0 8 0
10 8lt10 8 < 10
11 7 8 9 10 declti 8 < 12
12 11 olci 12 < 5 8 < 12
13 1 2 3 6 12 sralem φ dist W = dist A