 TYPE
    fdt$variable_attributes = array [1 .. * ] of fdt$variable_attribute;

*copyc fdt$variable_attribute
