Lines Matching refs:bi
6 local($a,$ai,$b,$bi,$c0,$c1,$c2,$pos,$i,$na,$nb)=@_;
11 &comment("mul a[$ai]*b[$bi]");
15 # &mov("edx",&DWP($bi*4,$b,"",0));
34 local($r,$a,$ai,$bi,$c0,$c1,$c2,$pos,$i,$na,$nb)=@_;
39 &comment("sqr a[$ai]*a[$bi]");
43 # &mov("edx",&DWP($bi*4,$b,"",0));
45 if ($ai == $bi)
63 local($r,$a,$ai,$bi,$c0,$c1,$c2,$pos,$i,$na,$nb)=@_;
68 &comment("sqr a[$ai]*a[$bi]");
72 # &mov("edx",&DWP($bi*4,$a,"",0));
74 if ($ai == $bi)
97 local($i,$as,$ae,$bs,$be,$ai,$bi);
129 $bi=$bs;
147 $nb=($bi+1);
154 #printf STDERR "[$ai,$bi] -> [$na,$nb]\n";
155 &mul_add_c($a,$ai,$b,$bi,$c0,$c1,$c2,$v,$i,$na,$nb);
164 $bi++;
188 local($i,$as,$ae,$bs,$be,$ai,$bi);
218 $bi=$bs;
225 if (($ai-1) < ($bi+1))
235 $nb=$bi+1;
242 if ($ai == $bi)
244 &sqr_add_c($r,$a,$ai,$bi,
249 &sqr_add_c2($r,$a,$ai,$bi,
260 $bi++;