let g1, g2 be PartFunc of (divs A),REAL; :: thesis: ( dom g1 = divs A & ( for D being Division of A st D in dom g1 holds
g1 . D = lower_sum (f,D) ) & dom g2 = divs A & ( for D being Division of A st D in dom g2 holds
g2 . D = lower_sum (f,D) ) implies g1 = g2 )

assume that
A9: dom g1 = divs A and
A10: for D being Division of A st D in dom g1 holds
g1 . D = lower_sum (f,D) and
A11: dom g2 = divs A and
A12: for D being Division of A st D in dom g2 holds
g2 . D = lower_sum (f,D) ; :: thesis: g1 = g2
now
let D be Element of divs A; :: thesis: ( D in dom g1 implies g1 . D = g2 . D )
reconsider D1 = D as Division of A by Def3;
assume D in dom g1 ; :: thesis: g1 . D = g2 . D
g1 . D = lower_sum (f,D1) by A9, A10;
hence g1 . D = g2 . D by A11, A12; :: thesis: verum
end;
hence g1 = g2 by A9, A11, PARTFUN1:34; :: thesis: verum