a # 1 61 R ' z # float x ' a # a,[1] '"float - convert to multiprecision floating point. ' a # a,[1] '"from ''the apl handbook of techniques'' copyright 1978, ibm. ' a # a,[1] '"-if x is scalar, it will be converted to an mp floating ' a # a,[1] '" point number of precision 3. ' a # a,[1] '"-see the description of mp floating point format for Hfadd. ' a # a,[1] '"-uses Hcan. ' a # a,[1] ' $(0<Rz#x)/0 ' a # a,[1] ' x#D10000000@(x=0)+|x ' a # a,[1] ' z#(x_2),1Ucan zX10000000*2_x ' Lfx a