 TYPE
    fdt$integer_output_format = record
      field_width: fdt$integer_field_width, {w FORTRAN descriptor}
      minimum_output_digits: fdt$minimum_output_digits, {m FORTRAN descriptor}
      sign_treatment: fdt$sign_treatment,
    recend;

*copyc fdt$integer_field_width
*copyc fdt$minimum_output_digits
*copyc fdt$sign_treatment
