#DrawPt(A,NA): Given a point A, and a name NA
#puts the label NA at A
DrawPt:=proc(A,NA) local d:
textplot([A[1],A[2],NA],axes=none,numpoints=3000):end: