double_to_decimal
extern void double_to_decimal(double *, decimal_mode *, decimal_record *,
double_to_decimal(&arg, &dm, &dr, &ef);
double_to_decimal(&arg, &dm, &dr, &ef);
double_to_decimal(&number, &dm, &dr, &fef);