a # 1 60 R ' c#fsqrt a;e;m                                              '
a # a,[1]  ' m#S0.5X1+(c#2|e#1Ya)_Ra#float a                            '
a # a,[1]  ' c#(m+D0.5Xe),1Usqrt 0,1U((Ra)+c_2Xm)Ya                     '
a # a,[1]  ' $0                                                         '
a # a,[1]  '"fsqrt - multiprecision floating point square root          '
a # a,[1]  '"from ''the apl handbook of techniques'' copyright 1978, ibm. '
a # a,[1]  '"-returns the multiprecision floating point form of the     '
a # a,[1]  '" square root of a.                                         '
a # a,[1]  '"-a may be scalar, mp integer, or mp floating point.        '
a # a,[1]  '"-the precision of the result is that of the operand.       '
a # a,[1]  '" (see the description for Gfadd.)                          '
a # a,[1]  '"-uses: Gfloat Gsqrt                                        '
Lfx a