    deferred class
    	EV_MODEL_DOUBLE_POINTED

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

    Ancestors
    	EV_MODEL_SINGLE_POINTED*

    Queries
    	point_a: EV_COORDINATE
    	point_a_x: INTEGER_32
    	point_a_x_relative: INTEGER_32
    	point_a_y: INTEGER_32
    	point_a_y_relative: INTEGER_32
    	point_b: EV_COORDINATE
    	point_b_relative: EV_COORDINATE
    	point_b_x: INTEGER_32
    	point_b_x_relative: INTEGER_32
    	point_b_y: INTEGER_32
    	point_b_y_relative: INTEGER_32
    	point_count: INTEGER_32
    	point_relative: EV_COORDINATE

    Commands
    	set_point_a_position (ax, ay: INTEGER_32)
    	set_point_a_position_relative (ax, ay: INTEGER_32)
    	set_point_b_position (ax, ay: INTEGER_32)
    	set_point_b_position_relative (ax, ay: INTEGER_32)