Pt Definition

# In the diagram, P=Pt(L1,L2) .

# The point of intersection of lines L1 and L2
# Both L1 and L2 are of the form a*x+b*y+c. Maple solves the system of two
# linear equations with the two unknowns x, y, and then returns the unique solution.

Pt:=proc(L1,L2) local q:

q:=solve({L1,L2},{x,y}):

normal( [ subs(q,x) , subs(q,y) ]:

end:

Definitions Theorems