Metropoli BBS
VIEWER: fdiv.txt MODE: TEXT (ASCII)
a # 1 60 R ' c#a fdiv b;rem                                             '
a # a,[1]  ' c#((1000X1Y1Ua)K1Y1Ub)+-1+(Rb)+0D(Rb#float b)_Ra#float a   '
a # a,[1]  ' c#((1Ya)_(1Yb)+c),1U(0,1U(c+Ra)Ya)div 0,1Ub                '
a # a,[1]  ' $0                                                         '
a # a,[1]  '"fdiv - multiprecision floating point division              '
a # a,[1]  '"from ''the apl handbook of techniques'' copyright 1978, ibm. '
a # a,[1]  '"-a, b, and c are multiprecision floating point values.     '
a # a,[1]  '" (see description for Gfadd)                               '
a # a,[1]  '"-the precision of the result is the same or slightly       '
a # a,[1]  '" greater than the smaller of the precisions of the two     '
a # a,[1]  '" operands.                                                 '
a # a,[1]  '"-uses: Gfloat Gdiv                                         '
a # a,[1]  '"-division by zero will return zero, as in Gcdiv.           '
Lfx a
[ RETURN TO DIRECTORY ]