let f, g be ManySortedFunction of the Sorts of A * the ResultSort of S,(OSClass R) * the ResultSort of S; :: thesis: ( ( for o being OperSymbol of S holds f . o = OSQuotRes R,o ) & ( for o being OperSymbol of S holds g . o = OSQuotRes R,o ) implies f = g )
assume that
A3: for o being OperSymbol of S holds f . o = OSQuotRes R,o and
A4: for o being OperSymbol of S holds g . o = OSQuotRes R,o ; :: thesis: f = g
now
let i be set ; :: thesis: ( i in the carrier' of S implies f . i = g . i )
assume i in the carrier' of S ; :: thesis: f . i = g . i
then reconsider i1 = i as OperSymbol of S ;
( f . i1 = OSQuotRes R,i1 & g . i1 = OSQuotRes R,i1 ) by A3, A4;
hence f . i = g . i ; :: thesis: verum
end;
hence f = g by PBOOLE:3; :: thesis: verum