Argument Definitions (+ indicates altered content)

CHARACTER*11 Y DOUBLE PRECISION X

Description

Encode a number x using Fortran F or D format into a string y. If the absolute value of x is greater than 9999, use D format, otherwise use F format.

Source file:	FormatFD.f

Intrinsic Functions Called

DOUBLE PRECISION DABS