let f be Function of R^1,R^1; :: thesis: for g being PartFunc of REAL,REAL
for x being Point of R^1 st f = g & g is_continuous_in x holds
f is_continuous_at x

let g be PartFunc of REAL,REAL; :: thesis: for x being Point of R^1 st f = g & g is_continuous_in x holds
f is_continuous_at x

let x be Point of R^1; :: thesis: ( f = g & g is_continuous_in x implies f is_continuous_at x )
assume that
A1: f = g and
A2: g is_continuous_in x ; :: thesis: f is_continuous_at x
let G be a_neighborhood of f . x; :: according to TMAP_1:def 2 :: thesis: ex b1 being a_neighborhood of x st f .: b1 c= G
consider Z being Neighbourhood of g . x such that
A3: Z c= G by A1, Th20;
consider N being Neighbourhood of x such that
A4: g .: N c= Z by A2, FCONT_1:5;
reconsider H = N as a_neighborhood of x by Th19, TOPMETR:17;
take H ; :: thesis: f .: H c= G
thus f .: H c= G by A1, A3, A4; :: thesis: verum