Piecewise[{{ln(abs(x)), abs(x) > 1}, {-x^2 + 1, abs(x) < 1}}]