Lines Matching refs:ym
106 local($ym,$ye) = split('E',$y);
107 &norm(&'bmul($xm,$ym),$xe+$ye);
119 local($ym,$ye) = split('E',$y);
120 ($xm,$xe,$ym,$ye) = ($ym,$ye,$xm,$xe) if ($xe < $ye);
121 &norm(&'badd($ym,$xm.('0' x ($xe-$ye))),$ye);
140 local($ym,$ye) = split('E',$y);
143 $scale = length($ym)-1 if (length($ym)-1 > $scale);
144 $scale = $scale + length($ym) - length($xm);
145 &norm(&round(&'bdiv($xm.('0' x $scale),$ym),&'babs($ym)),
231 ( local($xm,$xe,$ym,$ye) = split('E', $x."E$y"),
233 || &bigint'cmp($xm,$ym))