CLASS {Array_str|ings} , UNTESTED:
BASE CLASS {Array} .
FUNCTION New_array_s|tr|ings ( STR A|rray_to_copy_in [*] ) ==> {Array_str} , NEW
METHOD Insert|_array_str|ings ( INT At|_index , STR A|rray_to_insert_in [*] )
METHOD . [ INT Index INDEXING STR ] ==> STR
OVERRIDE Sort
METHOD Sort_no_case
----------------------------------------------------------------- 'sorting'