draw_line/[5,6]
     draw_line(+Drawable, +X1, +Y1, +X2, +Y2)
     draw_line(+Drawable, +Gc, +X1, +Y1, +X2, +Y2)
     

Draw a line in Drawable from (X1,Y1) to (X2,Y2).