Lines Matching refs:bi
28 local($a,$ai,$b,$bi,$c0,$c1,$c2,$pos,$i,$na,$nb)=@_;
33 &comment("mul a[$ai]*b[$bi]");
56 local($r,$a,$ai,$bi,$c0,$c1,$c2,$pos,$i,$na,$nb)=@_;
61 &comment("sqr a[$ai]*a[$bi]");
67 if ($ai == $bi)
85 local($r,$a,$ai,$bi,$c0,$c1,$c2,$pos,$i,$na,$nb)=@_;
90 &comment("sqr a[$ai]*a[$bi]");
96 if ($ai == $bi)
119 local($i,$as,$ae,$bs,$be,$ai,$bi);
151 $bi=$bs;
169 $nb=($bi+1);
177 &mul_add_c($a,$ai,$b,$bi,$c0,$c1,$c2,$v,$i,$na,$nb);
186 $bi++;
210 local($i,$as,$ae,$bs,$be,$ai,$bi);
240 $bi=$bs;
247 if (($ai-1) < ($bi+1))
257 $nb=$bi+1;
264 if ($ai == $bi)
266 &sqr_add_c($r,$a,$ai,$bi,
271 &sqr_add_c2($r,$a,$ai,$bi,
282 $bi++;