f_1: y = x!
f_2(x) = x^(x - 2)
text2: "f_2(x)=" + (LaTeX[f_2]) + ""
text1: "" + (LaTeX[f_1(x) = f_1]) + ""
P_1 = Intersect(f_2, f_1, (1, 1))
P_2 = Intersect(f_1, f_2, (4.918232001455326, 104.43815612749111))
text4: "P_1=" + (LaTeX[P_1]) + ""
text3: "P_2=" + (LaTeX[P_2]) + ""