    class
    	EV_ENVIRONMENT

    General
    	cluster: interface
    	description: "Facilities for inspecting global environment information."
    	keywords: "environment, application, global, system"
    	create: default_create

    Ancestors
    	EV_ANY*

    Queries
    	application: EV_APPLICATION
    	data: ANY
    	default_pointer_style_height: INTEGER_32
    	default_pointer_style_width: INTEGER_32
    	font_families: LINEAR [STRING_32]
    	font_families_8: LINEAR [STRING_8]
    	has_printer: BOOLEAN
    	is_destroyed: BOOLEAN
    	mouse_wheel_scroll_lines: INTEGER_32
    	supported_image_formats: LINEAR [STRING_32]

    Commands
    	copy (other: [like Current] EV_ENVIRONMENT)
    	destroy
    	set_data (some_data: [like data] ANY)