class
	ECOM_CURRENCY

General
	cluster: com.Structures
	description: "COM Currency Structure"
	create: make_from_decimal, make_from_pointer, make

Ancestors
	ECOM_STRUCTURE
	NUMERIC

Queries
	infix "-" (other: ECOM_CURRENCY): ECOM_CURRENCY
	infix "+" (other: ECOM_CURRENCY): ECOM_CURRENCY
	infix "^" (other: NUMERIC): NUMERIC
	infix "/" (other: ECOM_CURRENCY): ECOM_CURRENCY
	infix "*" (other: ECOM_CURRENCY): ECOM_CURRENCY
	prefix "-": ECOM_CURRENCY
	prefix "+": ECOM_CURRENCY
	absolute: ECOM_CURRENCY
	ceiled_integer_portion: ECOM_CURRENCY
	divisible (other: ECOM_CURRENCY): BOOLEAN
	exists: BOOLEAN
	exponentiable (other: ECOM_CURRENCY): BOOLEAN
	high_bits: INTEGER
	is_equal (other: [like Current] ECOM_CURRENCY): BOOLEAN
	item: POINTER
	low_bits: INTEGER
	multiply_integer (an_integer: INTEGER): ECOM_CURRENCY
	one: ECOM_CURRENCY
	rounded (value: INTEGER): ECOM_CURRENCY
	shared: BOOLEAN
	structure_size: INTEGER
	to_integer: INTEGER
	truncated_to_double: DOUBLE
	truncated_to_integer_portion: ECOM_CURRENCY
	zero: ECOM_CURRENCY

Commands
	dispose
	initialize
	initialize_with_character (a_character: CHARACTER)
	make
	make_from_decimal (dec_value: ECOM_DECIMAL)
	memory_copy (source_pointer: POINTER; length: INTEGER)
	set_high_bits (an_integer: INTEGER)
	set_low_bits (an_integer: INTEGER)
	set_shared
	set_unshared
	set_value (source: [like Current] ECOM_CURRENCY)