class
	ECOM_DECIMAL

General
	cluster: structures
	description: "COM Decimal Structure.  Wrapping COM DECIMAL type"
	create: make_from_double, make_from_pointer, make

Ancestors
	ECOM_STRUCTURE*
	NUMERIC*

Queries
	absolute: ECOM_DECIMAL
	ceiled_integer_portion: ECOM_DECIMAL
	divisible (other: ECOM_DECIMAL): BOOLEAN
	exists: BOOLEAN
	exponentiable (other: ECOM_DECIMAL): BOOLEAN
	infix "*" (other: [like Current] ECOM_DECIMAL): [like Current] ECOM_DECIMAL
	infix "+" (other: [like Current] ECOM_DECIMAL): [like Current] ECOM_DECIMAL
	infix "-" (other: [like Current] ECOM_DECIMAL): [like Current] ECOM_DECIMAL
	infix "/" (other: [like Current] ECOM_DECIMAL): [like Current] ECOM_DECIMAL
	infix "^" (other: [like Current] ECOM_DECIMAL): [like Current] ECOM_DECIMAL
	is_equal (other: [like Current] ECOM_DECIMAL): BOOLEAN
	item: POINTER
	one: ECOM_DECIMAL
	prefix "+": [like Current] ECOM_DECIMAL
	prefix "-": [like Current] ECOM_DECIMAL
	rounded (value: INTEGER_32): ECOM_DECIMAL
	scale: INTEGER_32
	shared: BOOLEAN
	structure_size: INTEGER_32
	truncated_to_double: REAL_64
	truncated_to_integer_portion: ECOM_DECIMAL
	zero: ECOM_DECIMAL

Commands
	copy (other: [like Current] ECOM_DECIMAL)
	dispose
	initialize
	initialize_with_character (a_character: CHARACTER_8)
	make
	make_from_double (dbl_value: REAL_64)
	memory_copy (source_pointer: POINTER; length: INTEGER_32)
	set_shared
	set_unshared
	set_value (source: [like Current] ECOM_DECIMAL)