let A be symmetrical Subset of COMPLEX ; :: thesis: for F being PartFunc of REAL ,REAL st F is_odd_on A holds
F " is_odd_on A

let F be PartFunc of REAL ,REAL ; :: thesis: ( F is_odd_on A implies F " is_odd_on A )
assume F is_odd_on A ; :: thesis: F " is_odd_on A
then A1: ( A c= dom F & F | A is odd ) by Def8;
A2: A c= dom (F " ) by A1, VALUED_1:def 7;
A3: dom ((F " ) | A) = A by RELAT_1:91, A2;
for x being Real st x in dom ((F " ) | A) & - x in dom ((F " ) | A) holds
((F " ) | A) . (- x) = - (((F " ) | A) . x)
proof
let x be Real; :: thesis: ( x in dom ((F " ) | A) & - x in dom ((F " ) | A) implies ((F " ) | A) . (- x) = - (((F " ) | A) . x) )
assume A5: ( x in dom ((F " ) | A) & - x in dom ((F " ) | A) ) ; :: thesis: ((F " ) | A) . (- x) = - (((F " ) | A) . x)
then A6: ( x in dom (F | A) & - x in dom (F | A) ) by RELAT_1:91, A1, A3;
((F " ) | A) . (- x) = ((F " ) | A) /. (- x) by PARTFUN1:def 8, A5
.= (F " ) /. (- x) by PARTFUN2:35, A2, A3, A5
.= (F " ) . (- x) by PARTFUN1:def 8, A2, A3, A5
.= (F . (- x)) " by VALUED_1:def 7, A2, A3, A5
.= (F /. (- x)) " by PARTFUN1:def 8, A3, A1, A5
.= ((F | A) /. (- x)) " by PARTFUN2:35, A1, A3, A5
.= ((F | A) . (- x)) " by PARTFUN1:def 8, A6
.= (- ((F | A) . x)) " by A1, Def6, A6
.= (- ((F | A) /. x)) " by PARTFUN1:def 8, A6
.= (- (F /. x)) " by PARTFUN2:35, A1, A3, A5
.= (- (F . x)) " by PARTFUN1:def 8, A1, A3, A5
.= - ((F . x) " ) by XCMPLX_1:224
.= - ((F " ) . x) by VALUED_1:def 7, A2, A3, A5
.= - ((F " ) /. x) by PARTFUN1:def 8, A2, A3, A5
.= - (((F " ) | A) /. x) by PARTFUN2:35, A2, A3, A5
.= - (((F " ) | A) . x) by PARTFUN1:def 8, A5 ;
hence ((F " ) | A) . (- x) = - (((F " ) | A) . x) ; :: thesis: verum
end;
then ( (F " ) | A is with_symmetrical_domain & (F " ) | A is quasi_odd ) by Def6, A3, Def2;
hence F " is_odd_on A by A2, Def8; :: thesis: verum