91
Print_Cursor_Array:
for I in A'Range loop
Put (Element (A (I)));
-- freq
Put (' ');
Put (Key (A (I)));
-- word
New_Line;
end loop Print_Cursor_Array;