To label the point in radical form:
In the Input Bar, I typed SurdText and chose SurdText[<Number>].
I then input the x-coordinates of the points of intersection; e.g.
SurdText[x(A)]. I attached the text to the point by specifying the
starting position of the text as (x(A)+0.1, y(A)). Repeated for B, but
used (x(B)-1, y(B)) to move it left.
Thanks for your help, Steve Phelps!
