let F be Graph-yielding Function; :: thesis: ex p being one-to-one Function st
( dom p = dom F & rng p = dom F & ( for x being object st x in dom F holds
ex G1, G2 being _Graph st
( G1 = F . x & G2 = F . (p . x) & G2 is G1 -Disomorphic ) ) )

reconsider p = id (dom F) as one-to-one Function ;
take p ; :: thesis: ( dom p = dom F & rng p = dom F & ( for x being object st x in dom F holds
ex G1, G2 being _Graph st
( G1 = F . x & G2 = F . (p . x) & G2 is G1 -Disomorphic ) ) )

thus ( dom p = dom F & rng p = dom F ) ; :: thesis: for x being object st x in dom F holds
ex G1, G2 being _Graph st
( G1 = F . x & G2 = F . (p . x) & G2 is G1 -Disomorphic )

let x be object ; :: thesis: ( x in dom F implies ex G1, G2 being _Graph st
( G1 = F . x & G2 = F . (p . x) & G2 is G1 -Disomorphic ) )

assume A1: x in dom F ; :: thesis: ex G1, G2 being _Graph st
( G1 = F . x & G2 = F . (p . x) & G2 is G1 -Disomorphic )

then reconsider G = F . x as _Graph by GLIB_000:def 53;
take G ; :: thesis: ex G2 being _Graph st
( G = F . x & G2 = F . (p . x) & G2 is G -Disomorphic )

take G ; :: thesis: ( G = F . x & G = F . (p . x) & G is G -Disomorphic )
thus G = F . x ; :: thesis: ( G = F . (p . x) & G is G -Disomorphic )
thus G = F . (p . x) by A1, FUNCT_1:18; :: thesis: G is G -Disomorphic
thus G is G -Disomorphic by GLIB_010:53; :: thesis: verum