T123

f(x) = If[x < -1, (2 * x) + 3, x + 1]
g(x) = If[x < -1, x^(2) + 1, (-2 * x)]
A = Point(g)
h = Tangent(A, g)
k = Slope(h)