    deferred class
    	EV_POSITIONABLE

    General
    	cluster: interface
    	description: "Abstraction for objects whos position can be set."
    	keywords: "position, width, height"

    Ancestors
    	EV_POSITIONED*

    Queries
    	data: ANY
    	height: INTEGER_32
    	is_destroyed: BOOLEAN
    	minimum_height: INTEGER_32
    	minimum_width: INTEGER_32
    	width: INTEGER_32
    	x_position: INTEGER_32
    	y_position: INTEGER_32

    Commands
    	copy (other: [like Current] EV_POSITIONABLE)
    	destroy
    	set_data (some_data: [like data] ANY)
    	set_height (a_height: INTEGER_32)
    	set_position (a_x, a_y: INTEGER_32)
    	set_size (a_width, a_height: INTEGER_32)
    	set_width (a_width: INTEGER_32)
    	set_x_position (a_x: INTEGER_32)
    	set_y_position (a_y: INTEGER_32)