  TYPE
    oct$fill_sequence = array [1 .. *] of 0 .. 0ff(16);

