let T be 1-sorted ; :: thesis: for S being non empty 1-sorted
for f being Function of T,S st rng f = [#] S & f is one-to-one holds
( dom (f " ) = [#] S & rng (f " ) = [#] T )
let S be non empty 1-sorted ; :: thesis: for f being Function of T,S st rng f = [#] S & f is one-to-one holds
( dom (f " ) = [#] S & rng (f " ) = [#] T )
let f be Function of T,S; :: thesis: ( rng f = [#] S & f is one-to-one implies ( dom (f " ) = [#] S & rng (f " ) = [#] T ) )
assume that
A1: rng f = [#] S and
A2: f is one-to-one ; :: thesis: ( dom (f " ) = [#] S & rng (f " ) = [#] T )
thus dom (f " ) = dom (f " ) by A1, A2, Def4
.= [#] S by A1, A2, FUNCT_1:54 ; :: thesis: rng (f " ) = [#] T
thus rng (f " ) = rng (f " ) by A1, A2, Def4
.= dom f by A2, FUNCT_1:55
.= [#] T by FUNCT_2:def 1 ; :: thesis: verum