let Y be set ; :: thesis: for C being non empty set
for f being PartFunc of C,COMPLEX st f | Y is constant holds
( ( for r being Complex holds (r (#) f) | Y is bounded ) & (- f) | Y is bounded & |.f.| | Y is bounded )

let C be non empty set ; :: thesis: for f being PartFunc of C,COMPLEX st f | Y is constant holds
( ( for r being Complex holds (r (#) f) | Y is bounded ) & (- f) | Y is bounded & |.f.| | Y is bounded )

let f be PartFunc of C,COMPLEX; :: thesis: ( f | Y is constant implies ( ( for r being Complex holds (r (#) f) | Y is bounded ) & (- f) | Y is bounded & |.f.| | Y is bounded ) )
assume A1: f | Y is constant ; :: thesis: ( ( for r being Complex holds (r (#) f) | Y is bounded ) & (- f) | Y is bounded & |.f.| | Y is bounded )
hence for r being Complex holds (r (#) f) | Y is bounded by Th78, Th80; :: thesis: ( (- f) | Y is bounded & |.f.| | Y is bounded )
thus (- f) | Y is bounded by A1, Th79, Th80; :: thesis: |.f.| | Y is bounded
|.f.| | Y is constant by A1, Th79;
hence |.f.| | Y is bounded ; :: thesis: verum