    class
    	EV_FONT_CONSTANTS

    General
    	cluster: interface
    	description: "Facilities used by and for ues with EV_FONT."
    	keywords: "character, face, size, family, weight, shape, bold, italic"

    Ancestors
    	ANY

    Queries
    	Family_modern: INTEGER_32
    	Family_roman: INTEGER_32
    	Family_sans: INTEGER_32
    	Family_screen: INTEGER_32
    	Family_typewriter: INTEGER_32
    	Shape_italic: INTEGER_32
    	Shape_regular: INTEGER_32
    	valid_family (a_family: INTEGER_32): BOOLEAN
    	valid_shape (a_shape: INTEGER_32): BOOLEAN
    	valid_weight (a_weight: INTEGER_32): BOOLEAN
    	Weight_black: INTEGER_32
    	Weight_bold: INTEGER_32
    	Weight_regular: INTEGER_32
    	Weight_thin: INTEGER_32