require "bigfloat.pl"; $FNUM = &fneg($FNUM); # negation $FNUM = &fabs($FNUM); # absolute value $CODE = &fcmp($FNUM, $FNUM); # comparison, like <=> $FNUM = &fadd($FNUM, $FNUM); # addition $FNUM = &fsub($FNUM, $FNUM); # subtraction $FNUM = &fmul($FNUM, $FNUM); # multiplication $FNUM = &fdiv($FNUM, $FNUM); # division $FNUM = &fdiv($FNUM, $FNUM, $SCALE); # division to SCALE places $FNUM = &fround($FNUM, $SCALE); # round to SCALE digits $FNUM = &ffround($FNUM, $SCALE); # round to SCALEth place $FNUM = &fnorm($FNUM); # normalization $FNUM = &fsqrt($FNUM); # square root, $FNUM = &fsqrt($FNUM, $SCALE); # square root, SCALE places $bigfloat'rnd_mode = 'even'; $bigfloat'div_scale = 40;