 TYPE
    fdt$visible_height = 1 .. fdc$maximum_y_position;

*copyc fdc$maximum_y_position
