 TYPE
    fdt$digits_in_exponent = mlt$exponent_style;

*copyc mlt$exponent_style
*copyc mlt$sign_treatment
