    class
    	FIBONACCI

    General
    	cluster: base
    	description: "The Fibonacci number sequence"

    Ancestors
    	COUNTABLE_SEQUENCE* [G]

    Queries
    	After: BOOLEAN
    	all_lower_fibonacci (n: INTEGER_32): ARRAY [BOOLEAN]
    	changeable_comparison_criterion: BOOLEAN
    	exhausted: BOOLEAN
    	Extendible: BOOLEAN
    	First: INTEGER_32
    	for_all (test: FUNCTION [ANY, TUPLE [INTEGER_32], BOOLEAN]): BOOLEAN
    	Full: BOOLEAN
    	higher_fibonacci (n: INTEGER_32): INTEGER_32
    	i_th (i: INTEGER_32): INTEGER_32
    	index: INTEGER_32
    	index_of (v: [like item] INTEGER_32; i: INTEGER_32): INTEGER_32
    	Is_empty: BOOLEAN
    	is_fibonacci (n: INTEGER_32): BOOLEAN
    	is_inserted (v: INTEGER_32): BOOLEAN
    	item: INTEGER_32
    	lower_fibonacci (n: INTEGER_32): INTEGER_32
    	object_comparison: BOOLEAN
    	occurrences (v: [like item] INTEGER_32): INTEGER_32
    	off: BOOLEAN
    	Prunable: BOOLEAN
    	Readable: BOOLEAN
    	Second: INTEGER_32
    	there_exists (test: FUNCTION [ANY, TUPLE [INTEGER_32], BOOLEAN]): BOOLEAN
    	Writable: BOOLEAN

    Commands
    	compare_objects
    	compare_references
    	do_all (action: PROCEDURE [ANY, TUPLE [INTEGER_32]])
    	do_if (action: PROCEDURE [ANY, TUPLE [INTEGER_32]]; test: FUNCTION [ANY, TUPLE [INTEGER_32], BOOLEAN])
    	forth
    	search (v: [like item] INTEGER_32)
    	start