    deferred class
    	EV_DOUBLE_POINTED_FIGURE

    General
    	cluster: interface
    	description: "Figures consisting of two points."
    	keywords: "figure, points"

    Ancestors
    	EV_SINGLE_POINTED_FIGURE*

    Queries
    	point_a: EV_RELATIVE_POINT
    	point_b: EV_RELATIVE_POINT
    	point_count: INTEGER_32

    Commands
    	set_point_a (a_point: EV_RELATIVE_POINT)
    	set_point_b (a_point: EV_RELATIVE_POINT)