let F be Field; :: thesis: for a being Element of NonZero F holds
( (omf F) . a,((ovf F) . (1. F),a) = 1. F & (omf F) . ((ovf F) . (1. F),a),a = 1. F )
let a be Element of NonZero F; :: thesis: ( (omf F) . a,((ovf F) . (1. F),a) = 1. F & (omf F) . ((ovf F) . (1. F),a),a = 1. F )
thus A1: (omf F) . a,((ovf F) . (1. F),a) =
(ovf F) . (a * (1. F)),a
by Th31
.=
(ovf F) . a,a
by REALSET2:25
.=
1. F
by Th29
; :: thesis: (omf F) . ((ovf F) . (1. F),a),a = 1. F
thus (omf F) . ((ovf F) . (1. F),a),a =
((ovf F) . (1. F),a) * a
.=
a * ((ovf F) . (1. F),a)
.=
1. F
by A1
; :: thesis: verum