Database Software

Hi,

I am refering my Qs to following thread.
1130433

I required to find angle b/w two points but in the following code it is using 3 points.

g1 := point(50, 7); -- Point A
g2 := point(51, 7); -- Point B
g3 := point(50,10); -- Point C

angle1 := atan2(g2.sdo_point.x - g1.sdo_point.x,
g2.sdo_point.y - g1.sdo_point.y);
angle2 := atan2(g3.sdo_point.x - g1.sdo_point.x,
g3.sdo_point.y - g1.sdo_point.y);

any easir way is greatly appreciated.
Al