theorem Th4: :: FUNCSDOM:4

for A being non empty set
for f, h being Element of Funcs (A,REAL)
for a being Real holds
( h = (RealFuncExtMult A) . [a,f] iff for x being Element of A holds h . x = a * (f . x) )