theorem MMLip3: :: FUZZY_5:60
for f being Function of REAL,REAL
for a, b, r, s being Real st ( for x being Real holds f . x = max (r,(min (s,((AffineMap (a,b)) . x)))) ) holds
f is Lipschitzian