now :: thesis: for y being object holds
( ( y in [.((3 / 4) * PI),PI.] implies ex x being object st
( x in dom (arcsec2 | [.(- (sqrt 2)),(- 1).]) & y = (arcsec2 | [.(- (sqrt 2)),(- 1).]) . x ) ) & ( ex x being object st
( x in dom (arcsec2 | [.(- (sqrt 2)),(- 1).]) & y = (arcsec2 | [.(- (sqrt 2)),(- 1).]) . x ) implies y in [.((3 / 4) * PI),PI.] ) )

let y be object ; :: thesis: ( ( y in [.((3 / 4) * PI),PI.] implies ex x being object st
( x in dom (arcsec2 | [.(- (sqrt 2)),(- 1).]) & y = (arcsec2 | [.(- (sqrt 2)),(- 1).]) . x ) ) & ( ex x being object st
( x in dom (arcsec2 | [.(- (sqrt 2)),(- 1).]) & y = (arcsec2 | [.(- (sqrt 2)),(- 1).]) . x ) implies y in [.((3 / 4) * PI),PI.] ) )
thus ( y in [.((3 / 4) * PI),PI.] implies ex x being object st
( x in dom (arcsec2 | [.(- (sqrt 2)),(- 1).]) & y = (arcsec2 | [.(- (sqrt 2)),(- 1).]) . x ) ) :: thesis: ( ex x being object st
( x in dom (arcsec2 | [.(- (sqrt 2)),(- 1).]) & y = (arcsec2 | [.(- (sqrt 2)),(- 1).]) . x ) implies y in [.((3 / 4) * PI),PI.] )

proof

assume A1: y in [.((3 / 4) * PI),PI.] ; :: thesis: ex x being object st
( x in dom (arcsec2 | [.(- (sqrt 2)),(- 1).]) & y = (arcsec2 | [.(- (sqrt 2)),(- 1).]) . x )
then reconsider y1 = y as Real ;
( - (sqrt 2) < - 1 & y1 in [.(arcsec2 . (- (sqrt 2))),(arcsec2 . (- 1)).] \/ [.(arcsec2 . (- 1)),(arcsec2 . (- (sqrt 2))).] ) by A1, Th74, SQUARE_1:19, XBOOLE_0:def 3, XREAL_1:24;
then consider x being Real such that
A2: ( x in [.(- (sqrt 2)),(- 1).] & y1 = arcsec2 . x ) by Th46, Th94, FCONT_2:15;
take x ; :: thesis: ( x in dom (arcsec2 | [.(- (sqrt 2)),(- 1).]) & y = (arcsec2 | [.(- (sqrt 2)),(- 1).]) . x )
thus ( x in dom (arcsec2 | [.(- (sqrt 2)),(- 1).]) & y = (arcsec2 | [.(- (sqrt 2)),(- 1).]) . x ) by A2, Th46, FUNCT_1:49, RELAT_1:62; :: thesis: verum

end;

thus ( ex x being object st
( x in dom (arcsec2 | [.(- (sqrt 2)),(- 1).]) & y = (arcsec2 | [.(- (sqrt 2)),(- 1).]) . x ) implies y in [.((3 / 4) * PI),PI.] ) :: thesis: verum

proof

given x being object such that A3: x in dom (arcsec2 | [.(- (sqrt 2)),(- 1).]) and
A4: y = (arcsec2 | [.(- (sqrt 2)),(- 1).]) . x ; :: thesis: y in [.((3 / 4) * PI),PI.]
A5: dom (arcsec2 | [.(- (sqrt 2)),(- 1).]) = [.(- (sqrt 2)),(- 1).] by Th46, RELAT_1:62;
then y = arcsec2 . x by A3, A4, FUNCT_1:49;
hence y in [.((3 / 4) * PI),PI.] by A3, A5, Th86; :: thesis: verum

end;

end;

hence rng (arcsec2 | [.(- (sqrt 2)),(- 1).]) = [.((3 / 4) * PI),PI.] by FUNCT_1:def 3; :: thesis: verum