Small bugfix: even when r == d, we need to adjust r and q.
[openssl.git] / crypto / bn / asm / vms.mar
1         .title  vax_bn_mul_add_word  unsigned multiply & add, 32*32+32+32=>64
2 ;
3 ; w.j.m. 15-jan-1999
4 ;
5 ; it's magic ...
6 ;
7 ; ULONG bn_mul_add_words(ULONG r[],ULONG a[],int n,ULONG w) {
8 ;       ULONG c = 0;
9 ;       int i;
10 ;       for(i = 0; i < n; i++) <c,r[i]> := r[i] + c + a[i] * w ;
11 ;       return c;
12 ; }
13
14 r=4 ;(AP)
15 a=8 ;(AP)
16 n=12 ;(AP)      n       by value (input)
17 w=16 ;(AP)      w       by value (input)
18
19
20         .psect  code,nowrt
21
22 .entry  bn_mul_add_words,^m<r2,r3,r4,r5,r6>
23
24         moval   @r(ap),r2
25         moval   @a(ap),r3
26         movl    n(ap),r4        ; assumed >0 by C code
27         movl    w(ap),r5
28         clrl    r6              ; c
29
30 0$:
31         emul    r5,(r3),(r2),r0         ; w, a[], r[] considered signed
32
33         ; fixup for "negative" r[]
34         tstl    (r2)
35         bgeq    10$
36         incl    r1
37 10$:
38
39         ; add in c
40         addl2   r6,r0
41         adwc    #0,r1
42
43         ; combined fixup for "negative" w, a[]
44         tstl    r5
45         bgeq    20$
46         addl2   (r3),r1
47 20$:
48         tstl    (r3)
49         bgeq    30$
50         addl2   r5,r1
51 30$:
52
53         movl    r0,(r2)+                ; store lo result in r[] & advance
54         addl    #4,r3                   ; advance a[]
55         movl    r1,r6                   ; store hi result => c
56
57         sobgtr  r4,0$
58
59         movl    r6,r0                   ; return c
60         ret
61 \f
62         .title  vax_bn_mul_word  unsigned multiply & add, 32*32+32=>64
63 ;
64 ; w.j.m. 15-jan-1999
65 ;
66 ; it's magic ...
67 ;
68 ; ULONG bn_mul_words(ULONG r[],ULONG a[],int n,ULONG w) {
69 ;       ULONG c = 0;
70 ;       int i;
71 ;       for(i = 0; i < num; i++) <c,r[i]> := a[i] * w + c ;
72 ;       return(c);
73 ; }
74
75 r=4 ;(AP)
76 a=8 ;(AP)
77 n=12 ;(AP)      n       by value (input)
78 w=16 ;(AP)      w       by value (input)
79
80
81         .psect  code,nowrt
82
83 .entry  bn_mul_words,^m<r2,r3,r4,r5,r6>
84
85         moval   @r(ap),r2       ; r2 -> r[]
86         moval   @a(ap),r3       ; r3 -> a[]
87         movl    n(ap),r4        ; r4 = loop count (assumed >0 by C code)
88         movl    w(ap),r5        ; r5 = w
89         clrl    r6              ; r6 = c
90
91 0$:
92         ; <r1,r0> := w * a[] + c
93         emul    r5,(r3),r6,r0           ; w, a[], c considered signed
94
95         ; fixup for "negative" c
96         tstl    r6                      ; c
97         bgeq    10$
98         incl    r1
99 10$:
100
101         ; combined fixup for "negative" w, a[]
102         tstl    r5                      ; w
103         bgeq    20$
104         addl2   (r3),r1                 ; a[]
105 20$:
106         tstl    (r3)                    ; a[]
107         bgeq    30$
108         addl2   r5,r1                   ; w
109 30$:
110
111         movl    r0,(r2)+                ; store lo result in r[] & advance
112         addl    #4,r3                   ; advance a[]
113         movl    r1,r6                   ; store hi result => c
114
115         sobgtr  r4,0$
116
117         movl    r6,r0                   ; return c
118         ret
119 \f
120         .title  vax_bn_sqr_words  unsigned square, 32*32=>64
121 ;
122 ; w.j.m. 15-jan-1999
123 ;
124 ; it's magic ...
125 ;
126 ; void bn_sqr_words(ULONG r[],ULONG a[],int n) {
127 ;       int i;
128 ;       for(i = 0; i < n; i++) <r[2*i+1],r[2*i]> := a[i] * a[i] ;
129 ; }
130
131 r=4 ;(AP)
132 a=8 ;(AP)
133 n=12 ;(AP)      n       by value (input)
134
135
136         .psect  code,nowrt
137
138 .entry  bn_sqr_words,^m<r2,r3,r4,r5>
139
140         moval   @r(ap),r2       ; r2 -> r[]
141         moval   @a(ap),r3       ; r3 -> a[]
142         movl    n(ap),r4        ; r4 = n (assumed >0 by C code)
143
144 0$:
145         movl    (r3)+,r5                ; r5 = a[] & advance
146
147         ; <r1,r0> := a[] * a[]
148         emul    r5,r5,#0,r0             ; a[] considered signed
149
150         ; fixup for "negative" a[]
151         tstl    r5                      ; a[]
152         bgeq    30$
153         addl2   r5,r1                   ; a[]
154         addl2   r5,r1                   ; a[]
155 30$:
156
157         movl    r0,(r2)+                ; store lo result in r[] & advance
158         movl    r1,(r2)+                ; store hi result in r[] & advance
159
160         sobgtr  r4,0$
161
162         movl    #1,r0                   ; return SS$_NORMAL
163         ret
164 \f
165         .title  vax_bn_div_words  unsigned divide
166 ;
167 ; Richard Levitte 20-Nov-2000
168 ;
169 ; ULONG bn_div_words(ULONG h, ULONG l, ULONG d)
170 ; {
171 ;       return ((ULONG)((((ULLONG)h)<<32)|l) / (ULLONG)d);
172 ; }
173 ;
174 ; Using EDIV would be very easy, if it didn't do signed calculations.
175 ; It doesn't accept a signed dividend, but accepts a signed divisor.
176 ; So, shifting down the dividend right one bit makes it positive, and
177 ; just makes us lose the lowest bit, which can be used afterwards as
178 ; an addition to the remainder.  All that needs to be done at the end
179 ; is a little bit of fiddling; shifting both quotient and remainder
180 ; one step to the left, and deal with the situation when the remainder
181 ; ends up being larger than the divisor.
182 ;
183 ; We end up doing something like this:
184 ;
185 ; l'    = l & 1
186 ; [h,l] = [h,l] >> 1
187 ; [q,r] = floor([h,l] / d)
188 ; if (q < 0) q = -q     # Because EDIV thought d was negative
189 ;
190 ; Now, we need to adjust back by multiplying quotient and remainder with 2,
191 ; and add the bit that dropped out when dividing by 2:
192 ;
193 ; r'    = r & 0x80000000
194 ; q     = q << 1
195 ; r     = (r << 1) + a'
196 ;
197 ; And now, the final adjustment if the remainder happens to get larger than
198 ; the divisor:
199 ;
200 ; if (r')
201 ;   {
202 ;     r = r - d
203 ;     q = q + 1
204 ;   }
205 ; while (r >= d)
206 ;   {
207 ;     r = r - d
208 ;     q = q + 1
209 ;   }
210 ;
211 ; return q
212
213 h=4 ;(AP)       h       by value (input)
214 l=8 ;(AP)       l       by value (input)
215 d=12 ;(AP)      d       by value (input)
216
217 ;lprim=r5
218 ;rprim=r6
219
220
221         .psect  code,nowrt
222
223 .entry  bn_div_words,^m<r2,r3,r4,r5,r6>
224         movl    l(ap),r2
225         movl    h(ap),r3
226         movl    d(ap),r4
227
228         movl    #0,r5
229         movl    #0,r6
230
231         rotl    #-1,r2,r2       ; l = l >> 1 (almost)
232         rotl    #-1,r3,r3       ; h = h >> 1 (almost)
233
234         tstl    r2
235         bgeq    1$
236         xorl2   #^X80000000,r2  ; fixup l so highest bit is 0
237         incl    r5              ; l' = 1
238 1$:
239         tstl    r3
240         bgeq    2$
241         xorl2   #^X80000000,r2  ; fixup l so highest bit is 1,
242                                 ; since that's what was lowest in h
243         xorl2   #^X80000000,r3  ; fixup h so highest bit is 0
244 2$:
245         tstl    r4
246         beql    666$            ; Uh-oh, the divisor is 0...
247
248         ediv    r4,r2,r2,r3     ; Do the actual division
249
250         tstl    r2
251         bgeq    3$
252         mnegl   r2,r2           ; if q < 0, negate it
253 3$:
254         tstl    r3
255         bgeq    4$
256         incl    r6              ; since the high bit in r is set, set r'
257 4$:
258         ashl    #1,r2,r2        ; q = q << 1
259         ashl    #1,r3,r3        ; r = r << 1
260         addl    r5,r3           ; r = r + a'
261
262         tstl    r6
263         beql    5$              ; if r'
264         subl    r4,r3           ;   r = r - d
265         incl    r2              ;   q = q + 1
266 5$:
267         cmpl    r3,r4
268         blssu   42$             ; while r >= d
269         subl    r4,r3           ;   r = r - d
270         incl    r2              ;   q = q + 1
271         brb     5$      
272 42$:
273 ;       movl    r3,r1
274         movl    r2,r0
275 666$:
276         ret
277 \f
278         .title  vax_bn_add_words  unsigned add of two arrays
279 ;
280 ; Richard Levitte 20-Nov-2000
281 ;
282 ; ULONG bn_add_words(ULONG r[], ULONG a[], ULONG b[], int n) {
283 ;       ULONG c = 0;
284 ;       int i;
285 ;       for (i = 0; i < n; i++) <c,r[i]> = a[i] + b[i] + c;
286 ;       return(c);
287 ; }
288
289 r=4 ;(AP)       r       by reference (output)
290 a=8 ;(AP)       a       by reference (input)
291 b=12 ;(AP)      b       by reference (input)
292 n=16 ;(AP)      n       by value (input)
293
294
295         .psect  code,nowrt
296
297 .entry  bn_add_words,^m<r2,r3,r4,r5,r6>
298
299         moval   @r(ap),r2
300         moval   @a(ap),r3
301         moval   @b(ap),r4
302         movl    n(ap),r5        ; assumed >0 by C code
303         clrl    r0              ; c
304
305         tstl    r5              ; carry = 0
306         bleq    666$
307
308 0$:
309         movl    (r3)+,r6        ; carry untouched
310         adwc    (r4)+,r6        ; carry used and touched
311         movl    r6,(r2)+        ; carry untouched
312         sobgtr  r5,0$           ; carry untouched
313
314         adwc    #0,r0
315 666$:
316         ret
317 \f
318         .title  vax_bn_sub_words  unsigned add of two arrays
319 ;
320 ; Richard Levitte 20-Nov-2000
321 ;
322 ; ULONG bn_sub_words(ULONG r[], ULONG a[], ULONG b[], int n) {
323 ;       ULONG c = 0;
324 ;       int i;
325 ;       for (i = 0; i < n; i++) <c,r[i]> = a[i] - b[i] - c;
326 ;       return(c);
327 ; }
328
329 r=4 ;(AP)       r       by reference (output)
330 a=8 ;(AP)       a       by reference (input)
331 b=12 ;(AP)      b       by reference (input)
332 n=16 ;(AP)      n       by value (input)
333
334
335         .psect  code,nowrt
336
337 .entry  bn_sub_words,^m<r2,r3,r4,r5,r6>
338
339         moval   @r(ap),r2
340         moval   @a(ap),r3
341         moval   @b(ap),r4
342         movl    n(ap),r5        ; assumed >0 by C code
343         clrl    r0              ; c
344
345         tstl    r5              ; carry = 0
346         bleq    666$
347
348 0$:
349         movl    (r3)+,r6        ; carry untouched
350         sbwc    (r4)+,r6        ; carry used and touched
351         movl    r6,(r2)+        ; carry untouched
352         sobgtr  r5,0$           ; carry untouched
353
354         adwc    #0,r0
355 666$:
356         ret
357 \f
358
359 ;r=4 ;(AP)
360 ;a=8 ;(AP)
361 ;b=12 ;(AP)
362 ;n=16 ;(AP)     n       by value (input)
363
364         .psect  code,nowrt
365
366 .entry  BN_MUL_COMBA8,^m<r2,r3,r4,r5,r6,r7,r8,r9,r10,r11>
367         movab   -924(sp),sp
368         clrq    r8
369
370         clrl    r10
371
372         movl    8(ap),r6
373         movzwl  2(r6),r3
374         movl    12(ap),r7
375         bicl3   #-65536,(r7),r2
376         movzwl  2(r7),r0
377         bicl2   #-65536,r0
378         bicl3   #-65536,(r6),-12(fp)
379         bicl3   #-65536,r3,-16(fp)
380         mull3   r0,-12(fp),-4(fp)
381         mull2   r2,-12(fp)
382         mull3   r2,-16(fp),-8(fp)
383         mull2   r0,-16(fp)
384         addl3   -4(fp),-8(fp),r0
385         bicl3   #0,r0,-4(fp)
386         cmpl    -4(fp),-8(fp)
387         bgequ   noname.45
388         addl2   #65536,-16(fp)
389 noname.45:
390         movzwl  -2(fp),r0
391         bicl2   #-65536,r0
392         addl2   r0,-16(fp)
393         bicl3   #-65536,-4(fp),r0
394         ashl    #16,r0,-8(fp)
395         addl3   -8(fp),-12(fp),r0
396         bicl3   #0,r0,-12(fp)
397         cmpl    -12(fp),-8(fp)
398         bgequ   noname.46
399         incl    -16(fp)
400 noname.46:
401         movl    -12(fp),r1
402         movl    -16(fp),r2
403         addl2   r1,r9
404         bicl2   #0,r9
405         cmpl    r9,r1
406         bgequ   noname.47
407         incl    r2
408 noname.47:
409         addl2   r2,r8
410         bicl2   #0,r8
411         cmpl    r8,r2
412         bgequ   noname.48
413         incl    r10
414 noname.48:
415
416         movl    4(ap),r11
417         movl    r9,(r11)
418
419         clrl    r9
420
421         movzwl  2(r6),r2
422         bicl3   #-65536,4(r7),r3
423         movzwl  6(r7),r0
424         bicl2   #-65536,r0
425         bicl3   #-65536,(r6),-28(fp)
426         bicl3   #-65536,r2,-32(fp)
427         mull3   r0,-28(fp),-20(fp)
428         mull2   r3,-28(fp)
429         mull3   r3,-32(fp),-24(fp)
430         mull2   r0,-32(fp)
431         addl3   -20(fp),-24(fp),r0
432         bicl3   #0,r0,-20(fp)
433         cmpl    -20(fp),-24(fp)
434         bgequ   noname.49
435         addl2   #65536,-32(fp)
436 noname.49:
437         movzwl  -18(fp),r0
438         bicl2   #-65536,r0
439         addl2   r0,-32(fp)
440         bicl3   #-65536,-20(fp),r0
441         ashl    #16,r0,-24(fp)
442         addl3   -24(fp),-28(fp),r0
443         bicl3   #0,r0,-28(fp)
444         cmpl    -28(fp),-24(fp)
445         bgequ   noname.50
446         incl    -32(fp)
447 noname.50:
448         movl    -28(fp),r1
449         movl    -32(fp),r2
450         addl2   r1,r8
451         bicl2   #0,r8
452         cmpl    r8,r1
453         bgequ   noname.51
454         incl    r2
455 noname.51:
456         addl2   r2,r10
457         bicl2   #0,r10
458         cmpl    r10,r2
459         bgequ   noname.52
460         incl    r9
461 noname.52:
462
463         movzwl  6(r6),r2
464         bicl3   #-65536,(r7),r3
465         movzwl  2(r7),r0
466         bicl2   #-65536,r0
467         bicl3   #-65536,4(r6),-44(fp)
468         bicl3   #-65536,r2,-48(fp)
469         mull3   r0,-44(fp),-36(fp)
470         mull2   r3,-44(fp)
471         mull3   r3,-48(fp),-40(fp)
472         mull2   r0,-48(fp)
473         addl3   -36(fp),-40(fp),r0
474         bicl3   #0,r0,-36(fp)
475         cmpl    -36(fp),-40(fp)
476         bgequ   noname.53
477         addl2   #65536,-48(fp)
478 noname.53:
479         movzwl  -34(fp),r0
480         bicl2   #-65536,r0
481         addl2   r0,-48(fp)
482         bicl3   #-65536,-36(fp),r0
483         ashl    #16,r0,-40(fp)
484         addl3   -40(fp),-44(fp),r0
485         bicl3   #0,r0,-44(fp)
486         cmpl    -44(fp),-40(fp)
487         bgequ   noname.54
488         incl    -48(fp)
489 noname.54:
490         movl    -44(fp),r1
491         movl    -48(fp),r2
492         addl2   r1,r8
493         bicl2   #0,r8
494         cmpl    r8,r1
495         bgequ   noname.55
496         incl    r2
497 noname.55:
498         addl2   r2,r10
499         bicl2   #0,r10
500         cmpl    r10,r2
501         bgequ   noname.56
502         incl    r9
503 noname.56:
504
505         movl    r8,4(r11)
506
507         clrl    r8
508
509         movzwl  10(r6),r2
510         bicl3   #-65536,(r7),r3
511         movzwl  2(r7),r0
512         bicl2   #-65536,r0
513         bicl3   #-65536,8(r6),-60(fp)
514         bicl3   #-65536,r2,-64(fp)
515         mull3   r0,-60(fp),-52(fp)
516         mull2   r3,-60(fp)
517         mull3   r3,-64(fp),-56(fp)
518         mull2   r0,-64(fp)
519         addl3   -52(fp),-56(fp),r0
520         bicl3   #0,r0,-52(fp)
521         cmpl    -52(fp),-56(fp)
522         bgequ   noname.57
523         addl2   #65536,-64(fp)
524 noname.57:
525         movzwl  -50(fp),r0
526         bicl2   #-65536,r0
527         addl2   r0,-64(fp)
528         bicl3   #-65536,-52(fp),r0
529         ashl    #16,r0,-56(fp)
530         addl3   -56(fp),-60(fp),r0
531         bicl3   #0,r0,-60(fp)
532         cmpl    -60(fp),-56(fp)
533         bgequ   noname.58
534         incl    -64(fp)
535 noname.58:
536         movl    -60(fp),r1
537         movl    -64(fp),r2
538         addl2   r1,r10
539         bicl2   #0,r10
540         cmpl    r10,r1
541         bgequ   noname.59
542         incl    r2
543 noname.59:
544         addl2   r2,r9
545         bicl2   #0,r9
546         cmpl    r9,r2
547         bgequ   noname.60
548         incl    r8
549 noname.60:
550
551         movzwl  6(r6),r2
552         bicl3   #-65536,4(r7),r3
553         movzwl  6(r7),r0
554         bicl2   #-65536,r0
555         bicl3   #-65536,4(r6),-76(fp)
556         bicl3   #-65536,r2,-80(fp)
557         mull3   r0,-76(fp),-68(fp)
558         mull2   r3,-76(fp)
559         mull3   r3,-80(fp),-72(fp)
560         mull2   r0,-80(fp)
561         addl3   -68(fp),-72(fp),r0
562         bicl3   #0,r0,-68(fp)
563         cmpl    -68(fp),-72(fp)
564         bgequ   noname.61
565         addl2   #65536,-80(fp)
566 noname.61:
567         movzwl  -66(fp),r0
568         bicl2   #-65536,r0
569         addl2   r0,-80(fp)
570         bicl3   #-65536,-68(fp),r0
571         ashl    #16,r0,-72(fp)
572         addl3   -72(fp),-76(fp),r0
573         bicl3   #0,r0,-76(fp)
574         cmpl    -76(fp),-72(fp)
575         bgequ   noname.62
576         incl    -80(fp)
577 noname.62:
578         movl    -76(fp),r1
579         movl    -80(fp),r2
580         addl2   r1,r10
581         bicl2   #0,r10
582         cmpl    r10,r1
583         bgequ   noname.63
584         incl    r2
585 noname.63:
586         addl2   r2,r9
587         bicl2   #0,r9
588         cmpl    r9,r2
589         bgequ   noname.64
590         incl    r8
591 noname.64:
592
593         movzwl  2(r6),r2
594         bicl3   #-65536,8(r7),r3
595         movzwl  10(r7),r0
596         bicl2   #-65536,r0
597         bicl3   #-65536,(r6),-92(fp)
598         bicl3   #-65536,r2,-96(fp)
599         mull3   r0,-92(fp),-84(fp)
600         mull2   r3,-92(fp)
601         mull3   r3,-96(fp),-88(fp)
602         mull2   r0,-96(fp)
603         addl3   -84(fp),-88(fp),r0
604         bicl3   #0,r0,-84(fp)
605         cmpl    -84(fp),-88(fp)
606         bgequ   noname.65
607         addl2   #65536,-96(fp)
608 noname.65:
609         movzwl  -82(fp),r0
610         bicl2   #-65536,r0
611         addl2   r0,-96(fp)
612         bicl3   #-65536,-84(fp),r0
613         ashl    #16,r0,-88(fp)
614         addl3   -88(fp),-92(fp),r0
615         bicl3   #0,r0,-92(fp)
616         cmpl    -92(fp),-88(fp)
617         bgequ   noname.66
618         incl    -96(fp)
619 noname.66:
620         movl    -92(fp),r1
621         movl    -96(fp),r2
622         addl2   r1,r10
623         bicl2   #0,r10
624         cmpl    r10,r1
625         bgequ   noname.67
626         incl    r2
627 noname.67:
628         addl2   r2,r9
629         bicl2   #0,r9
630         cmpl    r9,r2
631         bgequ   noname.68
632         incl    r8
633 noname.68:
634
635         movl    r10,8(r11)
636
637         clrl    r10
638
639         movzwl  2(r6),r2
640         bicl3   #-65536,12(r7),r3
641         movzwl  14(r7),r0
642         bicl2   #-65536,r0
643         bicl3   #-65536,(r6),-108(fp)
644         bicl3   #-65536,r2,-112(fp)
645         mull3   r0,-108(fp),-100(fp)
646         mull2   r3,-108(fp)
647         mull3   r3,-112(fp),-104(fp)
648         mull2   r0,-112(fp)
649         addl3   -100(fp),-104(fp),r0
650         bicl3   #0,r0,-100(fp)
651         cmpl    -100(fp),-104(fp)
652         bgequ   noname.69
653         addl2   #65536,-112(fp)
654 noname.69:
655         movzwl  -98(fp),r0
656         bicl2   #-65536,r0
657         addl2   r0,-112(fp)
658         bicl3   #-65536,-100(fp),r0
659         ashl    #16,r0,-104(fp)
660         addl3   -104(fp),-108(fp),r0
661         bicl3   #0,r0,-108(fp)
662         cmpl    -108(fp),-104(fp)
663         bgequ   noname.70
664         incl    -112(fp)
665 noname.70:
666         movl    -108(fp),r1
667         movl    -112(fp),r2
668         addl2   r1,r9
669         bicl2   #0,r9
670         cmpl    r9,r1
671         bgequ   noname.71
672         incl    r2
673 noname.71:
674         addl2   r2,r8
675         bicl2   #0,r8
676         cmpl    r8,r2
677         bgequ   noname.72
678         incl    r10
679 noname.72:
680
681         movzwl  6(r6),r2
682         bicl3   #-65536,8(r7),r3
683         movzwl  10(r7),r0
684         bicl2   #-65536,r0
685         bicl3   #-65536,4(r6),-124(fp)
686         bicl3   #-65536,r2,-128(fp)
687         mull3   r0,-124(fp),-116(fp)
688         mull2   r3,-124(fp)
689         mull3   r3,-128(fp),-120(fp)
690         mull2   r0,-128(fp)
691         addl3   -116(fp),-120(fp),r0
692         bicl3   #0,r0,-116(fp)
693         cmpl    -116(fp),-120(fp)
694         bgequ   noname.73
695         addl2   #65536,-128(fp)
696 noname.73:
697         movzwl  -114(fp),r0
698         bicl2   #-65536,r0
699         addl2   r0,-128(fp)
700         bicl3   #-65536,-116(fp),r0
701         ashl    #16,r0,-120(fp)
702         addl3   -120(fp),-124(fp),r0
703         bicl3   #0,r0,-124(fp)
704         cmpl    -124(fp),-120(fp)
705         bgequ   noname.74
706         incl    -128(fp)
707 noname.74:
708         movl    -124(fp),r1
709         movl    -128(fp),r2
710         addl2   r1,r9
711         bicl2   #0,r9
712         cmpl    r9,r1
713         bgequ   noname.75
714         incl    r2
715 noname.75:
716         addl2   r2,r8
717         bicl2   #0,r8
718         cmpl    r8,r2
719         bgequ   noname.76
720         incl    r10
721 noname.76:
722
723         movzwl  10(r6),r2
724         bicl3   #-65536,4(r7),r3
725         movzwl  6(r7),r0
726         bicl2   #-65536,r0
727         bicl3   #-65536,8(r6),-140(fp)
728         bicl3   #-65536,r2,-144(fp)
729         mull3   r0,-140(fp),-132(fp)
730         mull2   r3,-140(fp)
731         mull3   r3,-144(fp),-136(fp)
732         mull2   r0,-144(fp)
733         addl3   -132(fp),-136(fp),r0
734         bicl3   #0,r0,-132(fp)
735         cmpl    -132(fp),-136(fp)
736         bgequ   noname.77
737         addl2   #65536,-144(fp)
738 noname.77:
739         movzwl  -130(fp),r0
740         bicl2   #-65536,r0
741         addl2   r0,-144(fp)
742         bicl3   #-65536,-132(fp),r0
743         ashl    #16,r0,-136(fp)
744         addl3   -136(fp),-140(fp),r0
745         bicl3   #0,r0,-140(fp)
746         cmpl    -140(fp),-136(fp)
747         bgequ   noname.78
748         incl    -144(fp)
749 noname.78:
750         movl    -140(fp),r1
751         movl    -144(fp),r2
752         addl2   r1,r9
753         bicl2   #0,r9
754         cmpl    r9,r1
755         bgequ   noname.79
756         incl    r2
757 noname.79:
758         addl2   r2,r8
759         bicl2   #0,r8
760         cmpl    r8,r2
761         bgequ   noname.80
762         incl    r10
763 noname.80:
764
765         movzwl  14(r6),r2
766         bicl3   #-65536,(r7),r3
767         movzwl  2(r7),r0
768         bicl2   #-65536,r0
769         bicl3   #-65536,12(r6),-156(fp)
770         bicl3   #-65536,r2,-160(fp)
771         mull3   r0,-156(fp),-148(fp)
772         mull2   r3,-156(fp)
773         mull3   r3,-160(fp),-152(fp)
774         mull2   r0,-160(fp)
775         addl3   -148(fp),-152(fp),r0
776         bicl3   #0,r0,-148(fp)
777         cmpl    -148(fp),-152(fp)
778         bgequ   noname.81
779         addl2   #65536,-160(fp)
780 noname.81:
781         movzwl  -146(fp),r0
782         bicl2   #-65536,r0
783         addl2   r0,-160(fp)
784         bicl3   #-65536,-148(fp),r0
785         ashl    #16,r0,-152(fp)
786         addl3   -152(fp),-156(fp),r0
787         bicl3   #0,r0,-156(fp)
788         cmpl    -156(fp),-152(fp)
789         bgequ   noname.82
790         incl    -160(fp)
791 noname.82:
792         movl    -156(fp),r1
793         movl    -160(fp),r2
794         addl2   r1,r9
795         bicl2   #0,r9
796         cmpl    r9,r1
797         bgequ   noname.83
798         incl    r2
799 noname.83:
800         addl2   r2,r8
801         bicl2   #0,r8
802         cmpl    r8,r2
803         bgequ   noname.84
804         incl    r10
805 noname.84:
806
807         movl    r9,12(r11)
808
809         clrl    r9
810
811         movzwl  18(r6),r2
812         bicl3   #-65536,(r7),r3
813         movzwl  2(r7),r0
814         bicl2   #-65536,r0
815         bicl3   #-65536,16(r6),-172(fp)
816         bicl3   #-65536,r2,-176(fp)
817         mull3   r0,-172(fp),-164(fp)
818         mull2   r3,-172(fp)
819         mull3   r3,-176(fp),-168(fp)
820         mull2   r0,-176(fp)
821         addl3   -164(fp),-168(fp),r0
822         bicl3   #0,r0,-164(fp)
823         cmpl    -164(fp),-168(fp)
824         bgequ   noname.85
825         addl2   #65536,-176(fp)
826 noname.85:
827         movzwl  -162(fp),r0
828         bicl2   #-65536,r0
829         addl2   r0,-176(fp)
830         bicl3   #-65536,-164(fp),r0
831         ashl    #16,r0,-168(fp)
832         addl3   -168(fp),-172(fp),r0
833         bicl3   #0,r0,-172(fp)
834         cmpl    -172(fp),-168(fp)
835         bgequ   noname.86
836         incl    -176(fp)
837 noname.86:
838         movl    -172(fp),r1
839         movl    -176(fp),r2
840         addl2   r1,r8
841         bicl2   #0,r8
842         cmpl    r8,r1
843         bgequ   noname.87
844         incl    r2
845 noname.87:
846         addl2   r2,r10
847         bicl2   #0,r10
848         cmpl    r10,r2
849         bgequ   noname.88
850         incl    r9
851 noname.88:
852
853         movzwl  14(r6),r2
854         bicl3   #-65536,4(r7),r3
855         movzwl  6(r7),r0
856         bicl2   #-65536,r0
857         bicl3   #-65536,12(r6),-188(fp)
858         bicl3   #-65536,r2,-192(fp)
859         mull3   r0,-188(fp),-180(fp)
860         mull2   r3,-188(fp)
861         mull3   r3,-192(fp),-184(fp)
862         mull2   r0,-192(fp)
863         addl3   -180(fp),-184(fp),r0
864         bicl3   #0,r0,-180(fp)
865         cmpl    -180(fp),-184(fp)
866         bgequ   noname.89
867         addl2   #65536,-192(fp)
868 noname.89:
869         movzwl  -178(fp),r0
870         bicl2   #-65536,r0
871         addl2   r0,-192(fp)
872         bicl3   #-65536,-180(fp),r0
873         ashl    #16,r0,-184(fp)
874         addl3   -184(fp),-188(fp),r0
875         bicl3   #0,r0,-188(fp)
876         cmpl    -188(fp),-184(fp)
877         bgequ   noname.90
878         incl    -192(fp)
879 noname.90:
880         movl    -188(fp),r1
881         movl    -192(fp),r2
882         addl2   r1,r8
883         bicl2   #0,r8
884         cmpl    r8,r1
885         bgequ   noname.91
886         incl    r2
887 noname.91:
888         addl2   r2,r10
889         bicl2   #0,r10
890         cmpl    r10,r2
891         bgequ   noname.92
892         incl    r9
893 noname.92:
894
895         movzwl  10(r6),r2
896         bicl3   #-65536,8(r7),r3
897         movzwl  10(r7),r0
898         bicl2   #-65536,r0
899         bicl3   #-65536,8(r6),-204(fp)
900         bicl3   #-65536,r2,-208(fp)
901         mull3   r0,-204(fp),-196(fp)
902         mull2   r3,-204(fp)
903         mull3   r3,-208(fp),-200(fp)
904         mull2   r0,-208(fp)
905         addl3   -196(fp),-200(fp),r0
906         bicl3   #0,r0,-196(fp)
907         cmpl    -196(fp),-200(fp)
908         bgequ   noname.93
909         addl2   #65536,-208(fp)
910 noname.93:
911         movzwl  -194(fp),r0
912         bicl2   #-65536,r0
913         addl2   r0,-208(fp)
914         bicl3   #-65536,-196(fp),r0
915         ashl    #16,r0,-200(fp)
916         addl3   -200(fp),-204(fp),r0
917         bicl3   #0,r0,-204(fp)
918         cmpl    -204(fp),-200(fp)
919         bgequ   noname.94
920         incl    -208(fp)
921 noname.94:
922         movl    -204(fp),r1
923         movl    -208(fp),r2
924         addl2   r1,r8
925         bicl2   #0,r8
926         cmpl    r8,r1
927         bgequ   noname.95
928         incl    r2
929 noname.95:
930         addl2   r2,r10
931         bicl2   #0,r10
932         cmpl    r10,r2
933         bgequ   noname.96
934         incl    r9
935 noname.96:
936
937         movzwl  6(r6),r2
938         bicl3   #-65536,12(r7),r3
939         movzwl  14(r7),r0
940         bicl2   #-65536,r0
941         bicl3   #-65536,4(r6),-220(fp)
942         bicl3   #-65536,r2,-224(fp)
943         mull3   r0,-220(fp),-212(fp)
944         mull2   r3,-220(fp)
945         mull3   r3,-224(fp),-216(fp)
946         mull2   r0,-224(fp)
947         addl3   -212(fp),-216(fp),r0
948         bicl3   #0,r0,-212(fp)
949         cmpl    -212(fp),-216(fp)
950         bgequ   noname.97
951         addl2   #65536,-224(fp)
952 noname.97:
953         movzwl  -210(fp),r0
954         bicl2   #-65536,r0
955         addl2   r0,-224(fp)
956         bicl3   #-65536,-212(fp),r0
957         ashl    #16,r0,-216(fp)
958         addl3   -216(fp),-220(fp),r0
959         bicl3   #0,r0,-220(fp)
960         cmpl    -220(fp),-216(fp)
961         bgequ   noname.98
962         incl    -224(fp)
963 noname.98:
964         movl    -220(fp),r1
965         movl    -224(fp),r2
966         addl2   r1,r8
967         bicl2   #0,r8
968         cmpl    r8,r1
969         bgequ   noname.99
970         incl    r2
971 noname.99:
972         addl2   r2,r10
973         bicl2   #0,r10
974         cmpl    r10,r2
975         bgequ   noname.100
976         incl    r9
977 noname.100:
978
979         movzwl  2(r6),r2
980         bicl3   #-65536,16(r7),r3
981         movzwl  18(r7),r0
982         bicl2   #-65536,r0
983         bicl3   #-65536,(r6),-236(fp)
984         bicl3   #-65536,r2,-240(fp)
985         mull3   r0,-236(fp),-228(fp)
986         mull2   r3,-236(fp)
987         mull3   r3,-240(fp),-232(fp)
988         mull2   r0,-240(fp)
989         addl3   -228(fp),-232(fp),r0
990         bicl3   #0,r0,-228(fp)
991         cmpl    -228(fp),-232(fp)
992         bgequ   noname.101
993         addl2   #65536,-240(fp)
994 noname.101:
995         movzwl  -226(fp),r0
996         bicl2   #-65536,r0
997         addl2   r0,-240(fp)
998         bicl3   #-65536,-228(fp),r0
999         ashl    #16,r0,-232(fp)
1000         addl3   -232(fp),-236(fp),r0
1001         bicl3   #0,r0,-236(fp)
1002         cmpl    -236(fp),-232(fp)
1003         bgequ   noname.102
1004         incl    -240(fp)
1005 noname.102:
1006         movl    -236(fp),r1
1007         movl    -240(fp),r2
1008         addl2   r1,r8
1009         bicl2   #0,r8
1010         cmpl    r8,r1
1011         bgequ   noname.103
1012         incl    r2
1013 noname.103:
1014         addl2   r2,r10
1015         bicl2   #0,r10
1016         cmpl    r10,r2
1017         bgequ   noname.104
1018         incl    r9
1019 noname.104:
1020
1021         movl    r8,16(r11)
1022
1023         clrl    r8
1024
1025         movzwl  2(r6),r2
1026         bicl3   #-65536,20(r7),r3
1027         movzwl  22(r7),r0
1028         bicl2   #-65536,r0
1029         bicl3   #-65536,(r6),-252(fp)
1030         bicl3   #-65536,r2,-256(fp)
1031         mull3   r0,-252(fp),-244(fp)
1032         mull2   r3,-252(fp)
1033         mull3   r3,-256(fp),-248(fp)
1034         mull2   r0,-256(fp)
1035         addl3   -244(fp),-248(fp),r0
1036         bicl3   #0,r0,-244(fp)
1037         cmpl    -244(fp),-248(fp)
1038         bgequ   noname.105
1039         addl2   #65536,-256(fp)
1040 noname.105:
1041         movzwl  -242(fp),r0
1042         bicl2   #-65536,r0
1043         addl2   r0,-256(fp)
1044         bicl3   #-65536,-244(fp),r0
1045         ashl    #16,r0,-248(fp)
1046         addl3   -248(fp),-252(fp),r0
1047         bicl3   #0,r0,-252(fp)
1048         cmpl    -252(fp),-248(fp)
1049         bgequ   noname.106
1050         incl    -256(fp)
1051 noname.106:
1052         movl    -252(fp),r1
1053         movl    -256(fp),r2
1054         addl2   r1,r10
1055         bicl2   #0,r10
1056         cmpl    r10,r1
1057         bgequ   noname.107
1058         incl    r2
1059 noname.107:
1060         addl2   r2,r9
1061         bicl2   #0,r9
1062         cmpl    r9,r2
1063         bgequ   noname.108
1064         incl    r8
1065 noname.108:
1066
1067         movzwl  6(r6),r2
1068         bicl3   #-65536,16(r7),r3
1069         movzwl  18(r7),r0
1070         bicl2   #-65536,r0
1071         bicl3   #-65536,4(r6),-268(fp)
1072         bicl3   #-65536,r2,-272(fp)
1073         mull3   r0,-268(fp),-260(fp)
1074         mull2   r3,-268(fp)
1075         mull3   r3,-272(fp),-264(fp)
1076         mull2   r0,-272(fp)
1077         addl3   -260(fp),-264(fp),r0
1078         bicl3   #0,r0,-260(fp)
1079         cmpl    -260(fp),-264(fp)
1080         bgequ   noname.109
1081         addl2   #65536,-272(fp)
1082 noname.109:
1083         movzwl  -258(fp),r0
1084         bicl2   #-65536,r0
1085         addl2   r0,-272(fp)
1086         bicl3   #-65536,-260(fp),r0
1087         ashl    #16,r0,-264(fp)
1088         addl3   -264(fp),-268(fp),r0
1089         bicl3   #0,r0,-268(fp)
1090         cmpl    -268(fp),-264(fp)
1091         bgequ   noname.110
1092         incl    -272(fp)
1093 noname.110:
1094         movl    -268(fp),r1
1095         movl    -272(fp),r2
1096         addl2   r1,r10
1097         bicl2   #0,r10
1098         cmpl    r10,r1
1099         bgequ   noname.111
1100         incl    r2
1101 noname.111:
1102         addl2   r2,r9
1103         bicl2   #0,r9
1104         cmpl    r9,r2
1105         bgequ   noname.112
1106         incl    r8
1107 noname.112:
1108
1109         movzwl  10(r6),r2
1110         bicl3   #-65536,12(r7),r3
1111         movzwl  14(r7),r0
1112         bicl2   #-65536,r0
1113         bicl3   #-65536,8(r6),-284(fp)
1114         bicl3   #-65536,r2,-288(fp)
1115         mull3   r0,-284(fp),-276(fp)
1116         mull2   r3,-284(fp)
1117         mull3   r3,-288(fp),-280(fp)
1118         mull2   r0,-288(fp)
1119         addl3   -276(fp),-280(fp),r0
1120         bicl3   #0,r0,-276(fp)
1121         cmpl    -276(fp),-280(fp)
1122         bgequ   noname.113
1123         addl2   #65536,-288(fp)
1124 noname.113:
1125         movzwl  -274(fp),r0
1126         bicl2   #-65536,r0
1127         addl2   r0,-288(fp)
1128         bicl3   #-65536,-276(fp),r0
1129         ashl    #16,r0,-280(fp)
1130         addl3   -280(fp),-284(fp),r0
1131         bicl3   #0,r0,-284(fp)
1132         cmpl    -284(fp),-280(fp)
1133         bgequ   noname.114
1134         incl    -288(fp)
1135 noname.114:
1136         movl    -284(fp),r1
1137         movl    -288(fp),r2
1138         addl2   r1,r10
1139         bicl2   #0,r10
1140         cmpl    r10,r1
1141         bgequ   noname.115
1142         incl    r2
1143 noname.115:
1144         addl2   r2,r9
1145         bicl2   #0,r9
1146         cmpl    r9,r2
1147         bgequ   noname.116
1148         incl    r8
1149 noname.116:
1150
1151         movzwl  14(r6),r2
1152         bicl3   #-65536,8(r7),r3
1153         movzwl  10(r7),r0
1154         bicl2   #-65536,r0
1155         bicl3   #-65536,12(r6),-300(fp)
1156         bicl3   #-65536,r2,-304(fp)
1157         mull3   r0,-300(fp),-292(fp)
1158         mull2   r3,-300(fp)
1159         mull3   r3,-304(fp),-296(fp)
1160         mull2   r0,-304(fp)
1161         addl3   -292(fp),-296(fp),r0
1162         bicl3   #0,r0,-292(fp)
1163         cmpl    -292(fp),-296(fp)
1164         bgequ   noname.117
1165         addl2   #65536,-304(fp)
1166 noname.117:
1167         movzwl  -290(fp),r0
1168         bicl2   #-65536,r0
1169         addl2   r0,-304(fp)
1170         bicl3   #-65536,-292(fp),r0
1171         ashl    #16,r0,-296(fp)
1172         addl3   -296(fp),-300(fp),r0
1173         bicl3   #0,r0,-300(fp)
1174         cmpl    -300(fp),-296(fp)
1175         bgequ   noname.118
1176         incl    -304(fp)
1177 noname.118:
1178         movl    -300(fp),r1
1179         movl    -304(fp),r2
1180         addl2   r1,r10
1181         bicl2   #0,r10
1182         cmpl    r10,r1
1183         bgequ   noname.119
1184         incl    r2
1185 noname.119:
1186         addl2   r2,r9
1187         bicl2   #0,r9
1188         cmpl    r9,r2
1189         bgequ   noname.120
1190         incl    r8
1191 noname.120:
1192
1193         movzwl  18(r6),r2
1194         bicl3   #-65536,4(r7),r3
1195         movzwl  6(r7),r0
1196         bicl2   #-65536,r0
1197         bicl3   #-65536,16(r6),-316(fp)
1198         bicl3   #-65536,r2,-320(fp)
1199         mull3   r0,-316(fp),-308(fp)
1200         mull2   r3,-316(fp)
1201         mull3   r3,-320(fp),-312(fp)
1202         mull2   r0,-320(fp)
1203         addl3   -308(fp),-312(fp),r0
1204         bicl3   #0,r0,-308(fp)
1205         cmpl    -308(fp),-312(fp)
1206         bgequ   noname.121
1207         addl2   #65536,-320(fp)
1208 noname.121:
1209         movzwl  -306(fp),r0
1210         bicl2   #-65536,r0
1211         addl2   r0,-320(fp)
1212         bicl3   #-65536,-308(fp),r0
1213         ashl    #16,r0,-312(fp)
1214         addl3   -312(fp),-316(fp),r0
1215         bicl3   #0,r0,-316(fp)
1216         cmpl    -316(fp),-312(fp)
1217         bgequ   noname.122
1218         incl    -320(fp)
1219 noname.122:
1220         movl    -316(fp),r1
1221         movl    -320(fp),r2
1222         addl2   r1,r10
1223         bicl2   #0,r10
1224         cmpl    r10,r1
1225         bgequ   noname.123
1226         incl    r2
1227
1228 noname.123:
1229         addl2   r2,r9
1230         bicl2   #0,r9
1231         cmpl    r9,r2
1232         bgequ   noname.124
1233         incl    r8
1234 noname.124:
1235
1236         movzwl  22(r6),r2
1237         bicl3   #-65536,(r7),r3
1238         movzwl  2(r7),r0
1239         bicl2   #-65536,r0
1240         bicl3   #-65536,20(r6),-332(fp)
1241         bicl3   #-65536,r2,-336(fp)
1242         mull3   r0,-332(fp),-324(fp)
1243         mull2   r3,-332(fp)
1244         mull3   r3,-336(fp),-328(fp)
1245         mull2   r0,-336(fp)
1246         addl3   -324(fp),-328(fp),r0
1247         bicl3   #0,r0,-324(fp)
1248         cmpl    -324(fp),-328(fp)
1249         bgequ   noname.125
1250         addl2   #65536,-336(fp)
1251 noname.125:
1252         movzwl  -322(fp),r0
1253         bicl2   #-65536,r0
1254         addl2   r0,-336(fp)
1255         bicl3   #-65536,-324(fp),r0
1256         ashl    #16,r0,-328(fp)
1257         addl3   -328(fp),-332(fp),r0
1258         bicl3   #0,r0,-332(fp)
1259         cmpl    -332(fp),-328(fp)
1260         bgequ   noname.126
1261         incl    -336(fp)
1262 noname.126:
1263         movl    -332(fp),r1
1264         movl    -336(fp),r2
1265         addl2   r1,r10
1266         bicl2   #0,r10
1267         cmpl    r10,r1
1268         bgequ   noname.127
1269         incl    r2
1270 noname.127:
1271         addl2   r2,r9
1272         bicl2   #0,r9
1273         cmpl    r9,r2
1274         bgequ   noname.128
1275         incl    r8
1276 noname.128:
1277
1278         movl    r10,20(r11)
1279
1280         clrl    r10
1281
1282         movzwl  26(r6),r2
1283         bicl3   #-65536,(r7),r3
1284         movzwl  2(r7),r0
1285         bicl2   #-65536,r0
1286         bicl3   #-65536,24(r6),-348(fp)
1287         bicl3   #-65536,r2,-352(fp)
1288         mull3   r0,-348(fp),-340(fp)
1289         mull2   r3,-348(fp)
1290         mull3   r3,-352(fp),-344(fp)
1291         mull2   r0,-352(fp)
1292         addl3   -340(fp),-344(fp),r0
1293         bicl3   #0,r0,-340(fp)
1294         cmpl    -340(fp),-344(fp)
1295         bgequ   noname.129
1296         addl2   #65536,-352(fp)
1297 noname.129:
1298         movzwl  -338(fp),r0
1299         bicl2   #-65536,r0
1300         addl2   r0,-352(fp)
1301         bicl3   #-65536,-340(fp),r0
1302         ashl    #16,r0,-344(fp)
1303         addl3   -344(fp),-348(fp),r0
1304         bicl3   #0,r0,-348(fp)
1305         cmpl    -348(fp),-344(fp)
1306         bgequ   noname.130
1307         incl    -352(fp)
1308 noname.130:
1309         movl    -348(fp),r1
1310         movl    -352(fp),r2
1311         addl2   r1,r9
1312         bicl2   #0,r9
1313         cmpl    r9,r1
1314         bgequ   noname.131
1315         incl    r2
1316 noname.131:
1317         addl2   r2,r8
1318         bicl2   #0,r8
1319         cmpl    r8,r2
1320         bgequ   noname.132
1321         incl    r10
1322 noname.132:
1323
1324         movzwl  22(r6),r2
1325         bicl3   #-65536,4(r7),r3
1326         movzwl  6(r7),r0
1327         bicl2   #-65536,r0
1328         bicl3   #-65536,20(r6),-364(fp)
1329         bicl3   #-65536,r2,-368(fp)
1330         mull3   r0,-364(fp),-356(fp)
1331         mull2   r3,-364(fp)
1332         mull3   r3,-368(fp),-360(fp)
1333         mull2   r0,-368(fp)
1334         addl3   -356(fp),-360(fp),r0
1335         bicl3   #0,r0,-356(fp)
1336         cmpl    -356(fp),-360(fp)
1337         bgequ   noname.133
1338         addl2   #65536,-368(fp)
1339 noname.133:
1340         movzwl  -354(fp),r0
1341         bicl2   #-65536,r0
1342         addl2   r0,-368(fp)
1343         bicl3   #-65536,-356(fp),r0
1344         ashl    #16,r0,-360(fp)
1345         addl3   -360(fp),-364(fp),r0
1346         bicl3   #0,r0,-364(fp)
1347         cmpl    -364(fp),-360(fp)
1348         bgequ   noname.134
1349         incl    -368(fp)
1350 noname.134:
1351         movl    -364(fp),r1
1352         movl    -368(fp),r2
1353         addl2   r1,r9
1354         bicl2   #0,r9
1355         cmpl    r9,r1
1356         bgequ   noname.135
1357         incl    r2
1358 noname.135:
1359         addl2   r2,r8
1360         bicl2   #0,r8
1361         cmpl    r8,r2
1362         bgequ   noname.136
1363         incl    r10
1364 noname.136:
1365
1366         movzwl  18(r6),r2
1367         bicl3   #-65536,8(r7),r3
1368         movzwl  10(r7),r0
1369         bicl2   #-65536,r0
1370         bicl3   #-65536,16(r6),-380(fp)
1371         bicl3   #-65536,r2,-384(fp)
1372         mull3   r0,-380(fp),-372(fp)
1373         mull2   r3,-380(fp)
1374         mull3   r3,-384(fp),-376(fp)
1375         mull2   r0,-384(fp)
1376         addl3   -372(fp),-376(fp),r0
1377         bicl3   #0,r0,-372(fp)
1378         cmpl    -372(fp),-376(fp)
1379         bgequ   noname.137
1380         addl2   #65536,-384(fp)
1381 noname.137:
1382         movzwl  -370(fp),r0
1383         bicl2   #-65536,r0
1384         addl2   r0,-384(fp)
1385         bicl3   #-65536,-372(fp),r0
1386         ashl    #16,r0,-376(fp)
1387         addl3   -376(fp),-380(fp),r0
1388         bicl3   #0,r0,-380(fp)
1389         cmpl    -380(fp),-376(fp)
1390         bgequ   noname.138
1391         incl    -384(fp)
1392 noname.138:
1393         movl    -380(fp),r1
1394         movl    -384(fp),r2
1395         addl2   r1,r9
1396         bicl2   #0,r9
1397         cmpl    r9,r1
1398         bgequ   noname.139
1399         incl    r2
1400 noname.139:
1401         addl2   r2,r8
1402         bicl2   #0,r8
1403         cmpl    r8,r2
1404         bgequ   noname.140
1405         incl    r10
1406 noname.140:
1407
1408         movzwl  14(r6),r2
1409         bicl3   #-65536,12(r7),r3
1410         movzwl  14(r7),r0
1411         bicl2   #-65536,r0
1412         bicl3   #-65536,12(r6),-396(fp)
1413         bicl3   #-65536,r2,-400(fp)
1414         mull3   r0,-396(fp),-388(fp)
1415         mull2   r3,-396(fp)
1416         mull3   r3,-400(fp),-392(fp)
1417         mull2   r0,-400(fp)
1418         addl3   -388(fp),-392(fp),r0
1419         bicl3   #0,r0,-388(fp)
1420         cmpl    -388(fp),-392(fp)
1421         bgequ   noname.141
1422         addl2   #65536,-400(fp)
1423 noname.141:
1424         movzwl  -386(fp),r0
1425         bicl2   #-65536,r0
1426         addl2   r0,-400(fp)
1427         bicl3   #-65536,-388(fp),r0
1428         ashl    #16,r0,-392(fp)
1429         addl3   -392(fp),-396(fp),r0
1430         bicl3   #0,r0,-396(fp)
1431         cmpl    -396(fp),-392(fp)
1432         bgequ   noname.142
1433         incl    -400(fp)
1434 noname.142:
1435         movl    -396(fp),r1
1436         movl    -400(fp),r2
1437         addl2   r1,r9
1438         bicl2   #0,r9
1439         cmpl    r9,r1
1440         bgequ   noname.143
1441         incl    r2
1442 noname.143:
1443         addl2   r2,r8
1444         bicl2   #0,r8
1445         cmpl    r8,r2
1446         bgequ   noname.144
1447         incl    r10
1448 noname.144:
1449
1450         movzwl  10(r6),r2
1451         bicl3   #-65536,16(r7),r3
1452         movzwl  18(r7),r0
1453         bicl2   #-65536,r0
1454         bicl3   #-65536,8(r6),-412(fp)
1455         bicl3   #-65536,r2,-416(fp)
1456         mull3   r0,-412(fp),-404(fp)
1457         mull2   r3,-412(fp)
1458         mull3   r3,-416(fp),-408(fp)
1459         mull2   r0,-416(fp)
1460         addl3   -404(fp),-408(fp),r0
1461         bicl3   #0,r0,-404(fp)
1462         cmpl    -404(fp),-408(fp)
1463         bgequ   noname.145
1464         addl2   #65536,-416(fp)
1465 noname.145:
1466         movzwl  -402(fp),r0
1467         bicl2   #-65536,r0
1468         addl2   r0,-416(fp)
1469         bicl3   #-65536,-404(fp),r0
1470         ashl    #16,r0,-408(fp)
1471         addl3   -408(fp),-412(fp),r0
1472         bicl3   #0,r0,-412(fp)
1473         cmpl    -412(fp),-408(fp)
1474         bgequ   noname.146
1475         incl    -416(fp)
1476 noname.146:
1477         movl    -412(fp),r1
1478         movl    -416(fp),r2
1479         addl2   r1,r9
1480         bicl2   #0,r9
1481         cmpl    r9,r1
1482         bgequ   noname.147
1483         incl    r2
1484 noname.147:
1485         addl2   r2,r8
1486         bicl2   #0,r8
1487         cmpl    r8,r2
1488         bgequ   noname.148
1489         incl    r10
1490 noname.148:
1491
1492         movzwl  6(r6),r2
1493         bicl3   #-65536,20(r7),r3
1494         movzwl  22(r7),r0
1495         bicl2   #-65536,r0
1496         bicl3   #-65536,4(r6),-428(fp)
1497         bicl3   #-65536,r2,-432(fp)
1498         mull3   r0,-428(fp),-420(fp)
1499         mull2   r3,-428(fp)
1500         mull3   r3,-432(fp),-424(fp)
1501         mull2   r0,-432(fp)
1502         addl3   -420(fp),-424(fp),r0
1503         bicl3   #0,r0,-420(fp)
1504         cmpl    -420(fp),-424(fp)
1505         bgequ   noname.149
1506         addl2   #65536,-432(fp)
1507 noname.149:
1508         movzwl  -418(fp),r0
1509         bicl2   #-65536,r0
1510         addl2   r0,-432(fp)
1511         bicl3   #-65536,-420(fp),r0
1512         ashl    #16,r0,-424(fp)
1513         addl3   -424(fp),-428(fp),r0
1514         bicl3   #0,r0,-428(fp)
1515         cmpl    -428(fp),-424(fp)
1516         bgequ   noname.150
1517         incl    -432(fp)
1518 noname.150:
1519         movl    -428(fp),r1
1520         movl    -432(fp),r2
1521         addl2   r1,r9
1522         bicl2   #0,r9
1523         cmpl    r9,r1
1524         bgequ   noname.151
1525         incl    r2
1526 noname.151:
1527         addl2   r2,r8
1528         bicl2   #0,r8
1529         cmpl    r8,r2
1530         bgequ   noname.152
1531         incl    r10
1532 noname.152:
1533
1534         movzwl  2(r6),r2
1535         bicl3   #-65536,24(r7),r3
1536         movzwl  26(r7),r0
1537         bicl2   #-65536,r0
1538         bicl3   #-65536,(r6),-444(fp)
1539         bicl3   #-65536,r2,-448(fp)
1540         mull3   r0,-444(fp),-436(fp)
1541         mull2   r3,-444(fp)
1542         mull3   r3,-448(fp),-440(fp)
1543         mull2   r0,-448(fp)
1544         addl3   -436(fp),-440(fp),r0
1545         bicl3   #0,r0,-436(fp)
1546         cmpl    -436(fp),-440(fp)
1547         bgequ   noname.153
1548         addl2   #65536,-448(fp)
1549 noname.153:
1550         movzwl  -434(fp),r0
1551         bicl2   #-65536,r0
1552         addl2   r0,-448(fp)
1553         bicl3   #-65536,-436(fp),r0
1554         ashl    #16,r0,-440(fp)
1555         addl3   -440(fp),-444(fp),r0
1556         bicl3   #0,r0,-444(fp)
1557         cmpl    -444(fp),-440(fp)
1558         bgequ   noname.154
1559         incl    -448(fp)
1560 noname.154:
1561         movl    -444(fp),r1
1562         movl    -448(fp),r2
1563         addl2   r1,r9
1564         bicl2   #0,r9
1565         cmpl    r9,r1
1566         bgequ   noname.155
1567         incl    r2
1568 noname.155:
1569         addl2   r2,r8
1570         bicl2   #0,r8
1571         cmpl    r8,r2
1572         bgequ   noname.156
1573         incl    r10
1574 noname.156:
1575
1576         movl    r9,24(r11)
1577
1578         clrl    r9
1579
1580         movzwl  2(r6),r2
1581         bicl3   #-65536,28(r7),r3
1582         movzwl  30(r7),r0
1583         bicl2   #-65536,r0
1584         bicl3   #-65536,(r6),-460(fp)
1585         bicl3   #-65536,r2,-464(fp)
1586         mull3   r0,-460(fp),-452(fp)
1587         mull2   r3,-460(fp)
1588         mull3   r3,-464(fp),-456(fp)
1589         mull2   r0,-464(fp)
1590         addl3   -452(fp),-456(fp),r0
1591         bicl3   #0,r0,-452(fp)
1592         cmpl    -452(fp),-456(fp)
1593         bgequ   noname.157
1594         addl2   #65536,-464(fp)
1595 noname.157:
1596         movzwl  -450(fp),r0
1597         bicl2   #-65536,r0
1598         addl2   r0,-464(fp)
1599         bicl3   #-65536,-452(fp),r0
1600         ashl    #16,r0,-456(fp)
1601         addl3   -456(fp),-460(fp),r0
1602         bicl3   #0,r0,-460(fp)
1603         cmpl    -460(fp),-456(fp)
1604         bgequ   noname.158
1605         incl    -464(fp)
1606 noname.158:
1607         movl    -460(fp),r1
1608         movl    -464(fp),r2
1609         addl2   r1,r8
1610         bicl2   #0,r8
1611         cmpl    r8,r1
1612         bgequ   noname.159
1613         incl    r2
1614 noname.159:
1615         addl2   r2,r10
1616         bicl2   #0,r10
1617         cmpl    r10,r2
1618         bgequ   noname.160
1619         incl    r9
1620 noname.160:
1621
1622         movzwl  6(r6),r2
1623         bicl3   #-65536,24(r7),r3
1624         movzwl  26(r7),r0
1625         bicl2   #-65536,r0
1626         bicl3   #-65536,4(r6),-476(fp)
1627         bicl3   #-65536,r2,-480(fp)
1628         mull3   r0,-476(fp),-468(fp)
1629         mull2   r3,-476(fp)
1630         mull3   r3,-480(fp),-472(fp)
1631         mull2   r0,-480(fp)
1632         addl3   -468(fp),-472(fp),r0
1633         bicl3   #0,r0,-468(fp)
1634         cmpl    -468(fp),-472(fp)
1635         bgequ   noname.161
1636         addl2   #65536,-480(fp)
1637 noname.161:
1638         movzwl  -466(fp),r0
1639         bicl2   #-65536,r0
1640         addl2   r0,-480(fp)
1641         bicl3   #-65536,-468(fp),r0
1642         ashl    #16,r0,-472(fp)
1643         addl3   -472(fp),-476(fp),r0
1644         bicl3   #0,r0,-476(fp)
1645         cmpl    -476(fp),-472(fp)
1646         bgequ   noname.162
1647         incl    -480(fp)
1648 noname.162:
1649         movl    -476(fp),r1
1650         movl    -480(fp),r2
1651         addl2   r1,r8
1652         bicl2   #0,r8
1653         cmpl    r8,r1
1654         bgequ   noname.163
1655         incl    r2
1656 noname.163:
1657         addl2   r2,r10
1658         bicl2   #0,r10
1659         cmpl    r10,r2
1660         bgequ   noname.164
1661         incl    r9
1662 noname.164:
1663
1664         movzwl  10(r6),r2
1665         bicl3   #-65536,20(r7),r3
1666         movzwl  22(r7),r0
1667         bicl2   #-65536,r0
1668         bicl3   #-65536,8(r6),-492(fp)
1669         bicl3   #-65536,r2,-496(fp)
1670         mull3   r0,-492(fp),-484(fp)
1671         mull2   r3,-492(fp)
1672         mull3   r3,-496(fp),-488(fp)
1673         mull2   r0,-496(fp)
1674         addl3   -484(fp),-488(fp),r0
1675         bicl3   #0,r0,-484(fp)
1676         cmpl    -484(fp),-488(fp)
1677         bgequ   noname.165
1678         addl2   #65536,-496(fp)
1679 noname.165:
1680         movzwl  -482(fp),r0
1681         bicl2   #-65536,r0
1682         addl2   r0,-496(fp)
1683         bicl3   #-65536,-484(fp),r0
1684         ashl    #16,r0,-488(fp)
1685         addl3   -488(fp),-492(fp),r0
1686         bicl3   #0,r0,-492(fp)
1687         cmpl    -492(fp),-488(fp)
1688         bgequ   noname.166
1689         incl    -496(fp)
1690 noname.166:
1691         movl    -492(fp),r1
1692         movl    -496(fp),r2
1693         addl2   r1,r8
1694         bicl2   #0,r8
1695         cmpl    r8,r1
1696         bgequ   noname.167
1697         incl    r2
1698 noname.167:
1699         addl2   r2,r10
1700         bicl2   #0,r10
1701         cmpl    r10,r2
1702         bgequ   noname.168
1703         incl    r9
1704 noname.168:
1705
1706         movzwl  14(r6),r2
1707         bicl3   #-65536,16(r7),r3
1708         movzwl  18(r7),r0
1709         bicl2   #-65536,r0
1710         bicl3   #-65536,12(r6),-508(fp)
1711         bicl3   #-65536,r2,-512(fp)
1712         mull3   r0,-508(fp),-500(fp)
1713         mull2   r3,-508(fp)
1714         mull3   r3,-512(fp),-504(fp)
1715         mull2   r0,-512(fp)
1716         addl3   -500(fp),-504(fp),r0
1717         bicl3   #0,r0,-500(fp)
1718         cmpl    -500(fp),-504(fp)
1719         bgequ   noname.169
1720         addl2   #65536,-512(fp)
1721 noname.169:
1722         movzwl  -498(fp),r0
1723         bicl2   #-65536,r0
1724         addl2   r0,-512(fp)
1725         bicl3   #-65536,-500(fp),r0
1726         ashl    #16,r0,-504(fp)
1727         addl3   -504(fp),-508(fp),r0
1728         bicl3   #0,r0,-508(fp)
1729         cmpl    -508(fp),-504(fp)
1730         bgequ   noname.170
1731         incl    -512(fp)
1732 noname.170:
1733         movl    -508(fp),r1
1734         movl    -512(fp),r2
1735         addl2   r1,r8
1736         bicl2   #0,r8
1737         cmpl    r8,r1
1738         bgequ   noname.171
1739         incl    r2
1740 noname.171:
1741         addl2   r2,r10
1742         bicl2   #0,r10
1743         cmpl    r10,r2
1744         bgequ   noname.172
1745         incl    r9
1746 noname.172:
1747
1748         movzwl  18(r6),r2
1749         bicl3   #-65536,12(r7),r3
1750         movzwl  14(r7),r0
1751         bicl2   #-65536,r0
1752         bicl3   #-65536,16(r6),-524(fp)
1753         bicl3   #-65536,r2,-528(fp)
1754         mull3   r0,-524(fp),-516(fp)
1755         mull2   r3,-524(fp)
1756         mull3   r3,-528(fp),-520(fp)
1757         mull2   r0,-528(fp)
1758         addl3   -516(fp),-520(fp),r0
1759         bicl3   #0,r0,-516(fp)
1760         cmpl    -516(fp),-520(fp)
1761         bgequ   noname.173
1762         addl2   #65536,-528(fp)
1763 noname.173:
1764         movzwl  -514(fp),r0
1765         bicl2   #-65536,r0
1766         addl2   r0,-528(fp)
1767         bicl3   #-65536,-516(fp),r0
1768         ashl    #16,r0,-520(fp)
1769         addl3   -520(fp),-524(fp),r0
1770         bicl3   #0,r0,-524(fp)
1771         cmpl    -524(fp),-520(fp)
1772         bgequ   noname.174
1773         incl    -528(fp)
1774 noname.174:
1775         movl    -524(fp),r1
1776         movl    -528(fp),r2
1777         addl2   r1,r8
1778         bicl2   #0,r8
1779         cmpl    r8,r1
1780         bgequ   noname.175
1781         incl    r2
1782 noname.175:
1783         addl2   r2,r10
1784         bicl2   #0,r10
1785         cmpl    r10,r2
1786         bgequ   noname.176
1787         incl    r9
1788 noname.176:
1789
1790         movzwl  22(r6),r2
1791         bicl3   #-65536,8(r7),r3
1792         movzwl  10(r7),r0
1793         bicl2   #-65536,r0
1794         bicl3   #-65536,20(r6),-540(fp)
1795         bicl3   #-65536,r2,-544(fp)
1796         mull3   r0,-540(fp),-532(fp)
1797         mull2   r3,-540(fp)
1798         mull3   r3,-544(fp),-536(fp)
1799         mull2   r0,-544(fp)
1800         addl3   -532(fp),-536(fp),r0
1801         bicl3   #0,r0,-532(fp)
1802         cmpl    -532(fp),-536(fp)
1803         bgequ   noname.177
1804         addl2   #65536,-544(fp)
1805 noname.177:
1806         movzwl  -530(fp),r0
1807         bicl2   #-65536,r0
1808         addl2   r0,-544(fp)
1809         bicl3   #-65536,-532(fp),r0
1810         ashl    #16,r0,-536(fp)
1811         addl3   -536(fp),-540(fp),r0
1812         bicl3   #0,r0,-540(fp)
1813         cmpl    -540(fp),-536(fp)
1814         bgequ   noname.178
1815         incl    -544(fp)
1816 noname.178:
1817         movl    -540(fp),r1
1818         movl    -544(fp),r2
1819         addl2   r1,r8
1820         bicl2   #0,r8
1821         cmpl    r8,r1
1822         bgequ   noname.179
1823         incl    r2
1824 noname.179:
1825         addl2   r2,r10
1826         bicl2   #0,r10
1827         cmpl    r10,r2
1828         bgequ   noname.180
1829         incl    r9
1830 noname.180:
1831
1832         movzwl  26(r6),r2
1833         bicl3   #-65536,4(r7),r3
1834         movzwl  6(r7),r0
1835         bicl2   #-65536,r0
1836         bicl3   #-65536,24(r6),-556(fp)
1837         bicl3   #-65536,r2,-560(fp)
1838         mull3   r0,-556(fp),-548(fp)
1839         mull2   r3,-556(fp)
1840         mull3   r3,-560(fp),-552(fp)
1841         mull2   r0,-560(fp)
1842         addl3   -548(fp),-552(fp),r0
1843         bicl3   #0,r0,-548(fp)
1844         cmpl    -548(fp),-552(fp)
1845         bgequ   noname.181
1846         addl2   #65536,-560(fp)
1847 noname.181:
1848         movzwl  -546(fp),r0
1849         bicl2   #-65536,r0
1850         addl2   r0,-560(fp)
1851         bicl3   #-65536,-548(fp),r0
1852         ashl    #16,r0,-552(fp)
1853         addl3   -552(fp),-556(fp),r0
1854         bicl3   #0,r0,-556(fp)
1855         cmpl    -556(fp),-552(fp)
1856         bgequ   noname.182
1857         incl    -560(fp)
1858 noname.182:
1859         movl    -556(fp),r1
1860         movl    -560(fp),r2
1861         addl2   r1,r8
1862         bicl2   #0,r8
1863         cmpl    r8,r1
1864         bgequ   noname.183
1865         incl    r2
1866 noname.183:
1867         addl2   r2,r10
1868         bicl2   #0,r10
1869         cmpl    r10,r2
1870         bgequ   noname.184
1871         incl    r9
1872 noname.184:
1873
1874         movzwl  30(r6),r2
1875         bicl3   #-65536,(r7),r3
1876         movzwl  2(r7),r0
1877         bicl2   #-65536,r0
1878         bicl3   #-65536,28(r6),-572(fp)
1879         bicl3   #-65536,r2,-576(fp)
1880         mull3   r0,-572(fp),-564(fp)
1881         mull2   r3,-572(fp)
1882         mull3   r3,-576(fp),-568(fp)
1883         mull2   r0,-576(fp)
1884         addl3   -564(fp),-568(fp),r0
1885         bicl3   #0,r0,-564(fp)
1886         cmpl    -564(fp),-568(fp)
1887         bgequ   noname.185
1888         addl2   #65536,-576(fp)
1889 noname.185:
1890         movzwl  -562(fp),r0
1891         bicl2   #-65536,r0
1892         addl2   r0,-576(fp)
1893         bicl3   #-65536,-564(fp),r0
1894         ashl    #16,r0,-568(fp)
1895         addl3   -568(fp),-572(fp),r0
1896         bicl3   #0,r0,-572(fp)
1897         cmpl    -572(fp),-568(fp)
1898         bgequ   noname.186
1899         incl    -576(fp)
1900 noname.186:
1901         movl    -572(fp),r1
1902         movl    -576(fp),r2
1903         addl2   r1,r8
1904         bicl2   #0,r8
1905         cmpl    r8,r1
1906         bgequ   noname.187
1907         incl    r2
1908 noname.187:
1909         addl2   r2,r10
1910         bicl2   #0,r10
1911         cmpl    r10,r2
1912         bgequ   noname.188
1913         incl    r9
1914 noname.188:
1915
1916         movl    r8,28(r11)
1917
1918         clrl    r8
1919
1920         movzwl  30(r6),r2
1921         bicl3   #-65536,4(r7),r3
1922         movzwl  6(r7),r0
1923         bicl2   #-65536,r0
1924         bicl3   #-65536,28(r6),-588(fp)
1925         bicl3   #-65536,r2,-592(fp)
1926         mull3   r0,-588(fp),-580(fp)
1927         mull2   r3,-588(fp)
1928         mull3   r3,-592(fp),-584(fp)
1929         mull2   r0,-592(fp)
1930         addl3   -580(fp),-584(fp),r0
1931         bicl3   #0,r0,-580(fp)
1932         cmpl    -580(fp),-584(fp)
1933         bgequ   noname.189
1934         addl2   #65536,-592(fp)
1935 noname.189:
1936         movzwl  -578(fp),r0
1937         bicl2   #-65536,r0
1938         addl2   r0,-592(fp)
1939         bicl3   #-65536,-580(fp),r0
1940         ashl    #16,r0,-584(fp)
1941         addl3   -584(fp),-588(fp),r0
1942         bicl3   #0,r0,-588(fp)
1943         cmpl    -588(fp),-584(fp)
1944         bgequ   noname.190
1945         incl    -592(fp)
1946 noname.190:
1947         movl    -588(fp),r1
1948         movl    -592(fp),r2
1949         addl2   r1,r10
1950         bicl2   #0,r10
1951         cmpl    r10,r1
1952         bgequ   noname.191
1953         incl    r2
1954 noname.191:
1955         addl2   r2,r9
1956         bicl2   #0,r9
1957         cmpl    r9,r2
1958         bgequ   noname.192
1959         incl    r8
1960 noname.192:
1961
1962         movzwl  26(r6),r2
1963         bicl3   #-65536,8(r7),r3
1964         movzwl  10(r7),r0
1965         bicl2   #-65536,r0
1966         bicl3   #-65536,24(r6),-604(fp)
1967         bicl3   #-65536,r2,-608(fp)
1968         mull3   r0,-604(fp),-596(fp)
1969         mull2   r3,-604(fp)
1970         mull3   r3,-608(fp),-600(fp)
1971         mull2   r0,-608(fp)
1972         addl3   -596(fp),-600(fp),r0
1973         bicl3   #0,r0,-596(fp)
1974         cmpl    -596(fp),-600(fp)
1975         bgequ   noname.193
1976         addl2   #65536,-608(fp)
1977 noname.193:
1978         movzwl  -594(fp),r0
1979         bicl2   #-65536,r0
1980         addl2   r0,-608(fp)
1981         bicl3   #-65536,-596(fp),r0
1982         ashl    #16,r0,-600(fp)
1983         addl3   -600(fp),-604(fp),r0
1984         bicl3   #0,r0,-604(fp)
1985         cmpl    -604(fp),-600(fp)
1986         bgequ   noname.194
1987         incl    -608(fp)
1988 noname.194:
1989         movl    -604(fp),r1
1990         movl    -608(fp),r2
1991         addl2   r1,r10
1992         bicl2   #0,r10
1993         cmpl    r10,r1
1994         bgequ   noname.195
1995         incl    r2
1996 noname.195:
1997         addl2   r2,r9
1998         bicl2   #0,r9
1999         cmpl    r9,r2
2000         bgequ   noname.196
2001         incl    r8
2002 noname.196:
2003
2004         movzwl  22(r6),r2
2005         bicl3   #-65536,12(r7),r3
2006         movzwl  14(r7),r0
2007         bicl2   #-65536,r0
2008         bicl3   #-65536,20(r6),-620(fp)
2009         bicl3   #-65536,r2,-624(fp)
2010         mull3   r0,-620(fp),-612(fp)
2011         mull2   r3,-620(fp)
2012         mull3   r3,-624(fp),-616(fp)
2013         mull2   r0,-624(fp)
2014         addl3   -612(fp),-616(fp),r0
2015         bicl3   #0,r0,-612(fp)
2016         cmpl    -612(fp),-616(fp)
2017         bgequ   noname.197
2018         addl2   #65536,-624(fp)
2019 noname.197:
2020         movzwl  -610(fp),r0
2021         bicl2   #-65536,r0
2022         addl2   r0,-624(fp)
2023         bicl3   #-65536,-612(fp),r0
2024         ashl    #16,r0,-616(fp)
2025         addl3   -616(fp),-620(fp),r0
2026         bicl3   #0,r0,-620(fp)
2027         cmpl    -620(fp),-616(fp)
2028         bgequ   noname.198
2029         incl    -624(fp)
2030 noname.198:
2031         movl    -620(fp),r1
2032         movl    -624(fp),r2
2033         addl2   r1,r10
2034         bicl2   #0,r10
2035         cmpl    r10,r1
2036         bgequ   noname.199
2037         incl    r2
2038 noname.199:
2039         addl2   r2,r9
2040         bicl2   #0,r9
2041         cmpl    r9,r2
2042         bgequ   noname.200
2043         incl    r8
2044 noname.200:
2045
2046         movzwl  18(r6),r2
2047         bicl3   #-65536,16(r7),r3
2048         movzwl  18(r7),r0
2049         bicl2   #-65536,r0
2050         bicl3   #-65536,16(r6),-636(fp)
2051         bicl3   #-65536,r2,-640(fp)
2052         mull3   r0,-636(fp),-628(fp)
2053         mull2   r3,-636(fp)
2054         mull3   r3,-640(fp),-632(fp)
2055         mull2   r0,-640(fp)
2056         addl3   -628(fp),-632(fp),r0
2057         bicl3   #0,r0,-628(fp)
2058         cmpl    -628(fp),-632(fp)
2059         bgequ   noname.201
2060         addl2   #65536,-640(fp)
2061 noname.201:
2062         movzwl  -626(fp),r0
2063         bicl2   #-65536,r0
2064         addl2   r0,-640(fp)
2065         bicl3   #-65536,-628(fp),r0
2066         ashl    #16,r0,-632(fp)
2067         addl3   -632(fp),-636(fp),r0
2068         bicl3   #0,r0,-636(fp)
2069         cmpl    -636(fp),-632(fp)
2070         bgequ   noname.202
2071         incl    -640(fp)
2072 noname.202:
2073         movl    -636(fp),r1
2074         movl    -640(fp),r2
2075         addl2   r1,r10
2076         bicl2   #0,r10
2077         cmpl    r10,r1
2078         bgequ   noname.203
2079         incl    r2
2080 noname.203:
2081         addl2   r2,r9
2082         bicl2   #0,r9
2083         cmpl    r9,r2
2084         bgequ   noname.204
2085         incl    r8
2086 noname.204:
2087
2088         movzwl  14(r6),r2
2089         bicl3   #-65536,20(r7),r3
2090         movzwl  22(r7),r0
2091         bicl2   #-65536,r0
2092         bicl3   #-65536,12(r6),-652(fp)
2093         bicl3   #-65536,r2,-656(fp)
2094         mull3   r0,-652(fp),-644(fp)
2095         mull2   r3,-652(fp)
2096         mull3   r3,-656(fp),-648(fp)
2097         mull2   r0,-656(fp)
2098         addl3   -644(fp),-648(fp),r0
2099         bicl3   #0,r0,-644(fp)
2100         cmpl    -644(fp),-648(fp)
2101         bgequ   noname.205
2102         addl2   #65536,-656(fp)
2103 noname.205:
2104         movzwl  -642(fp),r0
2105         bicl2   #-65536,r0
2106         addl2   r0,-656(fp)
2107         bicl3   #-65536,-644(fp),r0
2108         ashl    #16,r0,-648(fp)
2109         addl3   -648(fp),-652(fp),r0
2110         bicl3   #0,r0,-652(fp)
2111         cmpl    -652(fp),-648(fp)
2112         bgequ   noname.206
2113         incl    -656(fp)
2114 noname.206:
2115         movl    -652(fp),r1
2116         movl    -656(fp),r2
2117         addl2   r1,r10
2118         bicl2   #0,r10
2119         cmpl    r10,r1
2120         bgequ   noname.207
2121         incl    r2
2122 noname.207:
2123         addl2   r2,r9
2124         bicl2   #0,r9
2125         cmpl    r9,r2
2126         bgequ   noname.208
2127         incl    r8
2128 noname.208:
2129
2130         movzwl  10(r6),r2
2131         bicl3   #-65536,24(r7),r3
2132         movzwl  26(r7),r0
2133         bicl2   #-65536,r0
2134         bicl3   #-65536,8(r6),-668(fp)
2135         bicl3   #-65536,r2,-672(fp)
2136         mull3   r0,-668(fp),-660(fp)
2137         mull2   r3,-668(fp)
2138         mull3   r3,-672(fp),-664(fp)
2139         mull2   r0,-672(fp)
2140         addl3   -660(fp),-664(fp),r0
2141         bicl3   #0,r0,-660(fp)
2142         cmpl    -660(fp),-664(fp)
2143         bgequ   noname.209
2144         addl2   #65536,-672(fp)
2145 noname.209:
2146         movzwl  -658(fp),r0
2147         bicl2   #-65536,r0
2148         addl2   r0,-672(fp)
2149         bicl3   #-65536,-660(fp),r0
2150         ashl    #16,r0,-664(fp)
2151         addl3   -664(fp),-668(fp),r0
2152         bicl3   #0,r0,-668(fp)
2153         cmpl    -668(fp),-664(fp)
2154         bgequ   noname.210
2155         incl    -672(fp)
2156 noname.210:
2157         movl    -668(fp),r1
2158         movl    -672(fp),r2
2159         addl2   r1,r10
2160         bicl2   #0,r10
2161         cmpl    r10,r1
2162         bgequ   noname.211
2163         incl    r2
2164 noname.211:
2165         addl2   r2,r9
2166         bicl2   #0,r9
2167         cmpl    r9,r2
2168         bgequ   noname.212
2169         incl    r8
2170 noname.212:
2171
2172         movzwl  6(r6),r2
2173         bicl3   #-65536,28(r7),r3
2174         movzwl  30(r7),r0
2175         bicl2   #-65536,r0
2176         bicl3   #-65536,4(r6),-684(fp)
2177         bicl3   #-65536,r2,-688(fp)
2178         mull3   r0,-684(fp),-676(fp)
2179         mull2   r3,-684(fp)
2180         mull3   r3,-688(fp),-680(fp)
2181         mull2   r0,-688(fp)
2182         addl3   -676(fp),-680(fp),r0
2183         bicl3   #0,r0,-676(fp)
2184         cmpl    -676(fp),-680(fp)
2185         bgequ   noname.213
2186         addl2   #65536,-688(fp)
2187 noname.213:
2188         movzwl  -674(fp),r0
2189         bicl2   #-65536,r0
2190         addl2   r0,-688(fp)
2191         bicl3   #-65536,-676(fp),r0
2192         ashl    #16,r0,-680(fp)
2193         addl3   -680(fp),-684(fp),r0
2194         bicl3   #0,r0,-684(fp)
2195         cmpl    -684(fp),-680(fp)
2196         bgequ   noname.214
2197         incl    -688(fp)
2198 noname.214:
2199         movl    -684(fp),r1
2200         movl    -688(fp),r2
2201         addl2   r1,r10
2202         bicl2   #0,r10
2203         cmpl    r10,r1
2204         bgequ   noname.215
2205         incl    r2
2206 noname.215:
2207         addl2   r2,r9
2208         bicl2   #0,r9
2209         cmpl    r9,r2
2210         bgequ   noname.216
2211         incl    r8
2212 noname.216:
2213
2214         movl    r10,32(r11)
2215
2216         clrl    r10
2217
2218         movzwl  10(r6),r2
2219         bicl3   #-65536,28(r7),r3
2220         movzwl  30(r7),r0
2221         bicl2   #-65536,r0
2222         bicl3   #-65536,8(r6),-700(fp)
2223         bicl3   #-65536,r2,-704(fp)
2224         mull3   r0,-700(fp),-692(fp)
2225         mull2   r3,-700(fp)
2226         mull3   r3,-704(fp),-696(fp)
2227         mull2   r0,-704(fp)
2228         addl3   -692(fp),-696(fp),r0
2229         bicl3   #0,r0,-692(fp)
2230         cmpl    -692(fp),-696(fp)
2231         bgequ   noname.217
2232         addl2   #65536,-704(fp)
2233 noname.217:
2234         movzwl  -690(fp),r0
2235         bicl2   #-65536,r0
2236         addl2   r0,-704(fp)
2237         bicl3   #-65536,-692(fp),r0
2238         ashl    #16,r0,-696(fp)
2239         addl3   -696(fp),-700(fp),r0
2240         bicl3   #0,r0,-700(fp)
2241         cmpl    -700(fp),-696(fp)
2242         bgequ   noname.218
2243         incl    -704(fp)
2244 noname.218:
2245         movl    -700(fp),r1
2246         movl    -704(fp),r2
2247         addl2   r1,r9
2248         bicl2   #0,r9
2249         cmpl    r9,r1
2250         bgequ   noname.219
2251         incl    r2
2252 noname.219:
2253         addl2   r2,r8
2254         bicl2   #0,r8
2255         cmpl    r8,r2
2256         bgequ   noname.220
2257         incl    r10
2258 noname.220:
2259
2260         movzwl  14(r6),r2
2261         bicl3   #-65536,24(r7),r3
2262         movzwl  26(r7),r0
2263         bicl2   #-65536,r0
2264         bicl3   #-65536,12(r6),-716(fp)
2265         bicl3   #-65536,r2,-720(fp)
2266         mull3   r0,-716(fp),-708(fp)
2267         mull2   r3,-716(fp)
2268         mull3   r3,-720(fp),-712(fp)
2269         mull2   r0,-720(fp)
2270         addl3   -708(fp),-712(fp),r0
2271         bicl3   #0,r0,-708(fp)
2272         cmpl    -708(fp),-712(fp)
2273         bgequ   noname.221
2274         addl2   #65536,-720(fp)
2275 noname.221:
2276         movzwl  -706(fp),r0
2277         bicl2   #-65536,r0
2278         addl2   r0,-720(fp)
2279         bicl3   #-65536,-708(fp),r0
2280         ashl    #16,r0,-712(fp)
2281         addl3   -712(fp),-716(fp),r0
2282         bicl3   #0,r0,-716(fp)
2283         cmpl    -716(fp),-712(fp)
2284         bgequ   noname.222
2285         incl    -720(fp)
2286 noname.222:
2287         movl    -716(fp),r1
2288         movl    -720(fp),r2
2289         addl2   r1,r9
2290         bicl2   #0,r9
2291         cmpl    r9,r1
2292         bgequ   noname.223
2293         incl    r2
2294 noname.223:
2295         addl2   r2,r8
2296         bicl2   #0,r8
2297         cmpl    r8,r2
2298         bgequ   noname.224
2299         incl    r10
2300 noname.224:
2301
2302         movzwl  18(r6),r2
2303         bicl3   #-65536,20(r7),r3
2304         movzwl  22(r7),r0
2305         bicl2   #-65536,r0
2306         bicl3   #-65536,16(r6),-732(fp)
2307         bicl3   #-65536,r2,-736(fp)
2308         mull3   r0,-732(fp),-724(fp)
2309         mull2   r3,-732(fp)
2310         mull3   r3,-736(fp),-728(fp)
2311         mull2   r0,-736(fp)
2312         addl3   -724(fp),-728(fp),r0
2313         bicl3   #0,r0,-724(fp)
2314         cmpl    -724(fp),-728(fp)
2315         bgequ   noname.225
2316         addl2   #65536,-736(fp)
2317 noname.225:
2318         movzwl  -722(fp),r0
2319         bicl2   #-65536,r0
2320         addl2   r0,-736(fp)
2321         bicl3   #-65536,-724(fp),r0
2322         ashl    #16,r0,-728(fp)
2323         addl3   -728(fp),-732(fp),r0
2324         bicl3   #0,r0,-732(fp)
2325         cmpl    -732(fp),-728(fp)
2326         bgequ   noname.226
2327         incl    -736(fp)
2328 noname.226:
2329         movl    -732(fp),r1
2330         movl    -736(fp),r2
2331         addl2   r1,r9
2332         bicl2   #0,r9
2333         cmpl    r9,r1
2334         bgequ   noname.227
2335         incl    r2
2336 noname.227:
2337         addl2   r2,r8
2338         bicl2   #0,r8
2339         cmpl    r8,r2
2340         bgequ   noname.228
2341         incl    r10
2342 noname.228:
2343
2344         movzwl  22(r6),r2
2345         bicl3   #-65536,16(r7),r3
2346         movzwl  18(r7),r0
2347         bicl2   #-65536,r0
2348         bicl3   #-65536,20(r6),-748(fp)
2349         bicl3   #-65536,r2,-752(fp)
2350         mull3   r0,-748(fp),-740(fp)
2351         mull2   r3,-748(fp)
2352         mull3   r3,-752(fp),-744(fp)
2353         mull2   r0,-752(fp)
2354         addl3   -740(fp),-744(fp),r0
2355         bicl3   #0,r0,-740(fp)
2356         cmpl    -740(fp),-744(fp)
2357         bgequ   noname.229
2358         addl2   #65536,-752(fp)
2359 noname.229:
2360         movzwl  -738(fp),r0
2361         bicl2   #-65536,r0
2362         addl2   r0,-752(fp)
2363         bicl3   #-65536,-740(fp),r0
2364         ashl    #16,r0,-744(fp)
2365         addl3   -744(fp),-748(fp),r0
2366         bicl3   #0,r0,-748(fp)
2367         cmpl    -748(fp),-744(fp)
2368         bgequ   noname.230
2369         incl    -752(fp)
2370 noname.230:
2371         movl    -748(fp),r1
2372         movl    -752(fp),r2
2373         addl2   r1,r9
2374         bicl2   #0,r9
2375         cmpl    r9,r1
2376         bgequ   noname.231
2377         incl    r2
2378 noname.231:
2379         addl2   r2,r8
2380         bicl2   #0,r8
2381         cmpl    r8,r2
2382         bgequ   noname.232
2383         incl    r10
2384 noname.232:
2385
2386         movzwl  26(r6),r2
2387         bicl3   #-65536,12(r7),r3
2388         movzwl  14(r7),r0
2389         bicl2   #-65536,r0
2390         bicl3   #-65536,24(r6),-764(fp)
2391         bicl3   #-65536,r2,-768(fp)
2392         mull3   r0,-764(fp),-756(fp)
2393         mull2   r3,-764(fp)
2394         mull3   r3,-768(fp),-760(fp)
2395         mull2   r0,-768(fp)
2396         addl3   -756(fp),-760(fp),r0
2397         bicl3   #0,r0,-756(fp)
2398         cmpl    -756(fp),-760(fp)
2399         bgequ   noname.233
2400         addl2   #65536,-768(fp)
2401 noname.233:
2402         movzwl  -754(fp),r0
2403         bicl2   #-65536,r0
2404         addl2   r0,-768(fp)
2405         bicl3   #-65536,-756(fp),r0
2406         ashl    #16,r0,-760(fp)
2407         addl3   -760(fp),-764(fp),r0
2408         bicl3   #0,r0,-764(fp)
2409         cmpl    -764(fp),-760(fp)
2410         bgequ   noname.234
2411         incl    -768(fp)
2412 noname.234:
2413         movl    -764(fp),r1
2414         movl    -768(fp),r2
2415         addl2   r1,r9
2416         bicl2   #0,r9
2417         cmpl    r9,r1
2418         bgequ   noname.235
2419         incl    r2
2420 noname.235:
2421         addl2   r2,r8
2422         bicl2   #0,r8
2423         cmpl    r8,r2
2424         bgequ   noname.236
2425         incl    r10
2426 noname.236:
2427
2428         bicl3   #-65536,28(r6),r3
2429         movzwl  30(r6),r1
2430         bicl2   #-65536,r1
2431         bicl3   #-65536,8(r7),r2
2432         movzwl  10(r7),r0
2433         bicl2   #-65536,r0
2434         movl    r3,r5
2435         movl    r1,r4
2436         mull3   r0,r5,-772(fp)
2437         mull2   r2,r5
2438         mull3   r2,r4,-776(fp)
2439         mull2   r0,r4
2440         addl3   -772(fp),-776(fp),r0
2441         bicl3   #0,r0,-772(fp)
2442         cmpl    -772(fp),-776(fp)
2443         bgequ   noname.237
2444         addl2   #65536,r4
2445 noname.237:
2446         movzwl  -770(fp),r0
2447         bicl2   #-65536,r0
2448         addl2   r0,r4
2449         bicl3   #-65536,-772(fp),r0
2450         ashl    #16,r0,-776(fp)
2451         addl2   -776(fp),r5
2452         bicl2   #0,r5
2453         cmpl    r5,-776(fp)
2454         bgequ   noname.238
2455         incl    r4
2456 noname.238:
2457         movl    r5,r1
2458         movl    r4,r2
2459         addl2   r1,r9
2460         bicl2   #0,r9
2461         cmpl    r9,r1
2462         bgequ   noname.239
2463         incl    r2
2464 noname.239:
2465         addl2   r2,r8
2466         bicl2   #0,r8
2467         cmpl    r8,r2
2468         bgequ   noname.240
2469         incl    r10
2470 noname.240:
2471
2472         movl    r9,36(r11)
2473
2474         clrl    r9
2475
2476         bicl3   #-65536,28(r6),r3
2477         movzwl  30(r6),r1
2478         bicl2   #-65536,r1
2479         bicl3   #-65536,12(r7),r2
2480         movzwl  14(r7),r0
2481         bicl2   #-65536,r0
2482         movl    r3,r5
2483         movl    r1,r4
2484         mull3   r0,r5,-780(fp)
2485         mull2   r2,r5
2486         mull3   r2,r4,-784(fp)
2487         mull2   r0,r4
2488         addl3   -780(fp),-784(fp),r0
2489         bicl3   #0,r0,-780(fp)
2490         cmpl    -780(fp),-784(fp)
2491         bgequ   noname.241
2492         addl2   #65536,r4
2493 noname.241:
2494         movzwl  -778(fp),r0
2495         bicl2   #-65536,r0
2496         addl2   r0,r4
2497         bicl3   #-65536,-780(fp),r0
2498         ashl    #16,r0,-784(fp)
2499         addl2   -784(fp),r5
2500         bicl2   #0,r5
2501         cmpl    r5,-784(fp)
2502         bgequ   noname.242
2503         incl    r4
2504 noname.242:
2505         movl    r5,r1
2506         movl    r4,r2
2507         addl2   r1,r8
2508         bicl2   #0,r8
2509         cmpl    r8,r1
2510         bgequ   noname.243
2511         incl    r2
2512 noname.243:
2513         addl2   r2,r10
2514         bicl2   #0,r10
2515         cmpl    r10,r2
2516         bgequ   noname.244
2517         incl    r9
2518 noname.244:
2519
2520         bicl3   #-65536,24(r6),r3
2521         movzwl  26(r6),r1
2522         bicl2   #-65536,r1
2523         bicl3   #-65536,16(r7),r2
2524         movzwl  18(r7),r0
2525         bicl2   #-65536,r0
2526         movl    r3,r5
2527         movl    r1,r4
2528         mull3   r0,r5,-788(fp)
2529         mull2   r2,r5
2530         mull3   r2,r4,-792(fp)
2531         mull2   r0,r4
2532         addl3   -788(fp),-792(fp),r0
2533         bicl3   #0,r0,-788(fp)
2534         cmpl    -788(fp),-792(fp)
2535         bgequ   noname.245
2536         addl2   #65536,r4
2537 noname.245:
2538         movzwl  -786(fp),r0
2539         bicl2   #-65536,r0
2540         addl2   r0,r4
2541         bicl3   #-65536,-788(fp),r0
2542         ashl    #16,r0,-792(fp)
2543         addl2   -792(fp),r5
2544         bicl2   #0,r5
2545         cmpl    r5,-792(fp)
2546         bgequ   noname.246
2547         incl    r4
2548 noname.246:
2549         movl    r5,r1
2550         movl    r4,r2
2551         addl2   r1,r8
2552         bicl2   #0,r8
2553         cmpl    r8,r1
2554         bgequ   noname.247
2555         incl    r2
2556 noname.247:
2557         addl2   r2,r10
2558         bicl2   #0,r10
2559         cmpl    r10,r2
2560         bgequ   noname.248
2561         incl    r9
2562 noname.248:
2563
2564         bicl3   #-65536,20(r6),r3
2565         movzwl  22(r6),r1
2566         bicl2   #-65536,r1
2567         bicl3   #-65536,20(r7),r2
2568         movzwl  22(r7),r0
2569         bicl2   #-65536,r0
2570         movl    r3,r5
2571         movl    r1,r4
2572         mull3   r0,r5,-796(fp)
2573         mull2   r2,r5
2574         mull3   r2,r4,-800(fp)
2575         mull2   r0,r4
2576         addl3   -796(fp),-800(fp),r0
2577         bicl3   #0,r0,-796(fp)
2578         cmpl    -796(fp),-800(fp)
2579         bgequ   noname.249
2580         addl2   #65536,r4
2581 noname.249:
2582         movzwl  -794(fp),r0
2583         bicl2   #-65536,r0
2584         addl2   r0,r4
2585         bicl3   #-65536,-796(fp),r0
2586         ashl    #16,r0,-800(fp)
2587         addl2   -800(fp),r5
2588         bicl2   #0,r5
2589         cmpl    r5,-800(fp)
2590         bgequ   noname.250
2591         incl    r4
2592 noname.250:
2593         movl    r5,r1
2594         movl    r4,r2
2595         addl2   r1,r8
2596         bicl2   #0,r8
2597         cmpl    r8,r1
2598         bgequ   noname.251
2599         incl    r2
2600 noname.251:
2601         addl2   r2,r10
2602         bicl2   #0,r10
2603         cmpl    r10,r2
2604         bgequ   noname.252
2605         incl    r9
2606 noname.252:
2607
2608         bicl3   #-65536,16(r6),r3
2609         movzwl  18(r6),r1
2610         bicl2   #-65536,r1
2611         bicl3   #-65536,24(r7),r2
2612         movzwl  26(r7),r0
2613         bicl2   #-65536,r0
2614         movl    r3,r5
2615         movl    r1,r4
2616         mull3   r0,r5,-804(fp)
2617         mull2   r2,r5
2618         mull3   r2,r4,-808(fp)
2619         mull2   r0,r4
2620         addl3   -804(fp),-808(fp),r0
2621         bicl3   #0,r0,-804(fp)
2622         cmpl    -804(fp),-808(fp)
2623         bgequ   noname.253
2624         addl2   #65536,r4
2625 noname.253:
2626         movzwl  -802(fp),r0
2627         bicl2   #-65536,r0
2628         addl2   r0,r4
2629         bicl3   #-65536,-804(fp),r0
2630         ashl    #16,r0,-808(fp)
2631         addl2   -808(fp),r5
2632         bicl2   #0,r5
2633         cmpl    r5,-808(fp)
2634         bgequ   noname.254
2635         incl    r4
2636 noname.254:
2637         movl    r5,r1
2638         movl    r4,r2
2639         addl2   r1,r8
2640         bicl2   #0,r8
2641         cmpl    r8,r1
2642         bgequ   noname.255
2643         incl    r2
2644 noname.255:
2645         addl2   r2,r10
2646         bicl2   #0,r10
2647         cmpl    r10,r2
2648         bgequ   noname.256
2649         incl    r9
2650 noname.256:
2651
2652         bicl3   #-65536,12(r6),r3
2653         movzwl  14(r6),r1
2654         bicl2   #-65536,r1
2655         bicl3   #-65536,28(r7),r2
2656         movzwl  30(r7),r0
2657         bicl2   #-65536,r0
2658         movl    r3,r5
2659         movl    r1,r4
2660         mull3   r0,r5,-812(fp)
2661         mull2   r2,r5
2662         mull3   r2,r4,-816(fp)
2663         mull2   r0,r4
2664         addl3   -812(fp),-816(fp),r0
2665         bicl3   #0,r0,-812(fp)
2666         cmpl    -812(fp),-816(fp)
2667         bgequ   noname.257
2668         addl2   #65536,r4
2669 noname.257:
2670         movzwl  -810(fp),r0
2671         bicl2   #-65536,r0
2672         addl2   r0,r4
2673         bicl3   #-65536,-812(fp),r0
2674         ashl    #16,r0,-816(fp)
2675         addl2   -816(fp),r5
2676         bicl2   #0,r5
2677         cmpl    r5,-816(fp)
2678         bgequ   noname.258
2679         incl    r4
2680 noname.258:
2681         movl    r5,r1
2682         movl    r4,r2
2683         addl2   r1,r8
2684         bicl2   #0,r8
2685         cmpl    r8,r1
2686         bgequ   noname.259
2687         incl    r2
2688 noname.259:
2689         addl2   r2,r10
2690         bicl2   #0,r10
2691         cmpl    r10,r2
2692         bgequ   noname.260
2693         incl    r9
2694 noname.260:
2695
2696         movl    r8,40(r11)
2697
2698         clrl    r8
2699
2700         bicl3   #-65536,16(r6),r3
2701         movzwl  18(r6),r2
2702         bicl3   #-65536,28(r7),r1
2703         movzwl  30(r7),r0
2704         bicl2   #-65536,r0
2705         movl    r3,r4
2706         bicl3   #-65536,r2,-828(fp)
2707         mull3   r0,r4,-820(fp)
2708         mull2   r1,r4
2709         mull3   r1,-828(fp),-824(fp)
2710         mull2   r0,-828(fp)
2711         addl3   -820(fp),-824(fp),r0
2712         bicl3   #0,r0,-820(fp)
2713         cmpl    -820(fp),-824(fp)
2714         bgequ   noname.261
2715         addl2   #65536,-828(fp)
2716 noname.261:
2717         movzwl  -818(fp),r0
2718         bicl2   #-65536,r0
2719         addl2   r0,-828(fp)
2720         bicl3   #-65536,-820(fp),r0
2721         ashl    #16,r0,-824(fp)
2722         addl2   -824(fp),r4
2723         bicl2   #0,r4
2724         cmpl    r4,-824(fp)
2725         bgequ   noname.262
2726         incl    -828(fp)
2727 noname.262:
2728         movl    r4,r1
2729         movl    -828(fp),r2
2730         addl2   r1,r10
2731         bicl2   #0,r10
2732         cmpl    r10,r1
2733         bgequ   noname.263
2734         incl    r2
2735 noname.263:
2736         addl2   r2,r9
2737         bicl2   #0,r9
2738         cmpl    r9,r2
2739         bgequ   noname.264
2740         incl    r8
2741 noname.264:
2742
2743         movzwl  22(r6),r2
2744         bicl3   #-65536,24(r7),r3
2745         movzwl  26(r7),r0
2746         bicl2   #-65536,r0
2747         bicl3   #-65536,20(r6),-840(fp)
2748         bicl3   #-65536,r2,-844(fp)
2749         mull3   r0,-840(fp),-832(fp)
2750         mull2   r3,-840(fp)
2751         mull3   r3,-844(fp),-836(fp)
2752         mull2   r0,-844(fp)
2753         addl3   -832(fp),-836(fp),r0
2754         bicl3   #0,r0,-832(fp)
2755         cmpl    -832(fp),-836(fp)
2756         bgequ   noname.265
2757         addl2   #65536,-844(fp)
2758 noname.265:
2759         movzwl  -830(fp),r0
2760         bicl2   #-65536,r0
2761         addl2   r0,-844(fp)
2762         bicl3   #-65536,-832(fp),r0
2763         ashl    #16,r0,-836(fp)
2764         addl3   -836(fp),-840(fp),r0
2765         bicl3   #0,r0,-840(fp)
2766         cmpl    -840(fp),-836(fp)
2767         bgequ   noname.266
2768         incl    -844(fp)
2769 noname.266:
2770         movl    -840(fp),r1
2771         movl    -844(fp),r2
2772         addl2   r1,r10
2773         bicl2   #0,r10
2774         cmpl    r10,r1
2775         bgequ   noname.267
2776         incl    r2
2777 noname.267:
2778         addl2   r2,r9
2779         bicl2   #0,r9
2780         cmpl    r9,r2
2781         bgequ   noname.268
2782         incl    r8
2783 noname.268:
2784
2785         bicl3   #-65536,24(r6),r3
2786         movzwl  26(r6),r1
2787         bicl2   #-65536,r1
2788         bicl3   #-65536,20(r7),r2
2789         movzwl  22(r7),r0
2790         bicl2   #-65536,r0
2791         movl    r3,r5
2792         movl    r1,r4
2793         mull3   r0,r5,-848(fp)
2794         mull2   r2,r5
2795         mull3   r2,r4,-852(fp)
2796         mull2   r0,r4
2797         addl3   -848(fp),-852(fp),r0
2798         bicl3   #0,r0,-848(fp)
2799         cmpl    -848(fp),-852(fp)
2800         bgequ   noname.269
2801         addl2   #65536,r4
2802 noname.269:
2803         movzwl  -846(fp),r0
2804         bicl2   #-65536,r0
2805         addl2   r0,r4
2806         bicl3   #-65536,-848(fp),r0
2807         ashl    #16,r0,-852(fp)
2808         addl2   -852(fp),r5
2809         bicl2   #0,r5
2810         cmpl    r5,-852(fp)
2811         bgequ   noname.270
2812         incl    r4
2813 noname.270:
2814         movl    r5,r1
2815         movl    r4,r2
2816         addl2   r1,r10
2817         bicl2   #0,r10
2818         cmpl    r10,r1
2819         bgequ   noname.271
2820         incl    r2
2821 noname.271:
2822         addl2   r2,r9
2823         bicl2   #0,r9
2824         cmpl    r9,r2
2825         bgequ   noname.272
2826         incl    r8
2827 noname.272:
2828
2829         bicl3   #-65536,28(r6),r3
2830         movzwl  30(r6),r1
2831         bicl2   #-65536,r1
2832         bicl3   #-65536,16(r7),r2
2833         movzwl  18(r7),r0
2834         bicl2   #-65536,r0
2835         movl    r3,r5
2836         movl    r1,r4
2837         mull3   r0,r5,-856(fp)
2838         mull2   r2,r5
2839         mull3   r2,r4,-860(fp)
2840         mull2   r0,r4
2841         addl3   -856(fp),-860(fp),r0
2842         bicl3   #0,r0,-856(fp)
2843         cmpl    -856(fp),-860(fp)
2844         bgequ   noname.273
2845         addl2   #65536,r4
2846 noname.273:
2847         movzwl  -854(fp),r0
2848         bicl2   #-65536,r0
2849         addl2   r0,r4
2850         bicl3   #-65536,-856(fp),r0
2851         ashl    #16,r0,-860(fp)
2852         addl2   -860(fp),r5
2853         bicl2   #0,r5
2854         cmpl    r5,-860(fp)
2855         bgequ   noname.274
2856         incl    r4
2857 noname.274:
2858         movl    r5,r1
2859         movl    r4,r2
2860         addl2   r1,r10
2861         bicl2   #0,r10
2862         cmpl    r10,r1
2863         bgequ   noname.275
2864         incl    r2
2865 noname.275:
2866         addl2   r2,r9
2867         bicl2   #0,r9
2868         cmpl    r9,r2
2869         bgequ   noname.276
2870         incl    r8
2871 noname.276:
2872
2873         movl    r10,44(r11)
2874
2875         clrl    r10
2876
2877         bicl3   #-65536,28(r6),r3
2878         movzwl  30(r6),r1
2879         bicl2   #-65536,r1
2880         bicl3   #-65536,20(r7),r2
2881         movzwl  22(r7),r0
2882         bicl2   #-65536,r0
2883         movl    r3,r5
2884         movl    r1,r4
2885         mull3   r0,r5,-864(fp)
2886         mull2   r2,r5
2887         mull3   r2,r4,-868(fp)
2888         mull2   r0,r4
2889         addl3   -864(fp),-868(fp),r0
2890         bicl3   #0,r0,-864(fp)
2891         cmpl    -864(fp),-868(fp)
2892         bgequ   noname.277
2893         addl2   #65536,r4
2894 noname.277:
2895         movzwl  -862(fp),r0
2896         bicl2   #-65536,r0
2897         addl2   r0,r4
2898         bicl3   #-65536,-864(fp),r0
2899         ashl    #16,r0,-868(fp)
2900         addl2   -868(fp),r5
2901         bicl2   #0,r5
2902         cmpl    r5,-868(fp)
2903         bgequ   noname.278
2904         incl    r4
2905 noname.278:
2906         movl    r5,r1
2907         movl    r4,r2
2908         addl2   r1,r9
2909         bicl2   #0,r9
2910         cmpl    r9,r1
2911         bgequ   noname.279
2912         incl    r2
2913 noname.279:
2914         addl2   r2,r8
2915         bicl2   #0,r8
2916         cmpl    r8,r2
2917         bgequ   noname.280
2918         incl    r10
2919 noname.280:
2920
2921         bicl3   #-65536,24(r6),r3
2922         movzwl  26(r6),r1
2923         bicl2   #-65536,r1
2924         bicl3   #-65536,24(r7),r2
2925         movzwl  26(r7),r0
2926         bicl2   #-65536,r0
2927         movl    r3,r5
2928         movl    r1,r4
2929         mull3   r0,r5,-872(fp)
2930         mull2   r2,r5
2931         mull3   r2,r4,-876(fp)
2932         mull2   r0,r4
2933         addl3   -872(fp),-876(fp),r0
2934         bicl3   #0,r0,-872(fp)
2935         cmpl    -872(fp),-876(fp)
2936         bgequ   noname.281
2937         addl2   #65536,r4
2938 noname.281:
2939         movzwl  -870(fp),r0
2940         bicl2   #-65536,r0
2941         addl2   r0,r4
2942         bicl3   #-65536,-872(fp),r0
2943         ashl    #16,r0,-876(fp)
2944         addl2   -876(fp),r5
2945         bicl2   #0,r5
2946         cmpl    r5,-876(fp)
2947         bgequ   noname.282
2948         incl    r4
2949 noname.282:
2950         movl    r5,r1
2951         movl    r4,r2
2952         addl2   r1,r9
2953         bicl2   #0,r9
2954         cmpl    r9,r1
2955         bgequ   noname.283
2956         incl    r2
2957 noname.283:
2958         addl2   r2,r8
2959         bicl2   #0,r8
2960         cmpl    r8,r2
2961         bgequ   noname.284
2962         incl    r10
2963 noname.284:
2964
2965         bicl3   #-65536,20(r6),r3
2966         movzwl  22(r6),r1
2967         bicl2   #-65536,r1
2968         bicl3   #-65536,28(r7),r2
2969         movzwl  30(r7),r0
2970         bicl2   #-65536,r0
2971         movl    r3,r5
2972         movl    r1,r4
2973         mull3   r0,r5,-880(fp)
2974         mull2   r2,r5
2975         mull3   r2,r4,-884(fp)
2976         mull2   r0,r4
2977         addl3   -880(fp),-884(fp),r0
2978         bicl3   #0,r0,-880(fp)
2979         cmpl    -880(fp),-884(fp)
2980         bgequ   noname.285
2981         addl2   #65536,r4
2982 noname.285:
2983         movzwl  -878(fp),r0
2984         bicl2   #-65536,r0
2985         addl2   r0,r4
2986         bicl3   #-65536,-880(fp),r0
2987         ashl    #16,r0,-884(fp)
2988         addl2   -884(fp),r5
2989         bicl2   #0,r5
2990         cmpl    r5,-884(fp)
2991         bgequ   noname.286
2992         incl    r4
2993 noname.286:
2994         movl    r5,r1
2995         movl    r4,r2
2996         addl2   r1,r9
2997         bicl2   #0,r9
2998         cmpl    r9,r1
2999         bgequ   noname.287
3000         incl    r2
3001 noname.287:
3002         addl2   r2,r8
3003         bicl2   #0,r8
3004         cmpl    r8,r2
3005         bgequ   noname.288
3006         incl    r10
3007 noname.288:
3008
3009         movl    r9,48(r11)
3010
3011         clrl    r9
3012
3013         bicl3   #-65536,24(r6),r3
3014         movzwl  26(r6),r1
3015         bicl2   #-65536,r1
3016         bicl3   #-65536,28(r7),r2
3017         movzwl  30(r7),r0
3018         bicl2   #-65536,r0
3019         movl    r3,r5
3020         movl    r1,r4
3021         mull3   r0,r5,-888(fp)
3022         mull2   r2,r5
3023         mull3   r2,r4,-892(fp)
3024         mull2   r0,r4
3025         addl3   -888(fp),-892(fp),r0
3026         bicl3   #0,r0,-888(fp)
3027         cmpl    -888(fp),-892(fp)
3028         bgequ   noname.289
3029         addl2   #65536,r4
3030 noname.289:
3031         movzwl  -886(fp),r0
3032         bicl2   #-65536,r0
3033         addl2   r0,r4
3034         bicl3   #-65536,-888(fp),r0
3035         ashl    #16,r0,-892(fp)
3036         addl2   -892(fp),r5
3037         bicl2   #0,r5
3038         cmpl    r5,-892(fp)
3039         bgequ   noname.290
3040         incl    r4
3041 noname.290:
3042         movl    r5,r1
3043         movl    r4,r2
3044         addl2   r1,r8
3045         bicl2   #0,r8
3046         cmpl    r8,r1
3047         bgequ   noname.291
3048         incl    r2
3049 noname.291:
3050         addl2   r2,r10
3051         bicl2   #0,r10
3052         cmpl    r10,r2
3053         bgequ   noname.292
3054         incl    r9
3055 noname.292:
3056
3057         movzwl  30(r6),r2
3058         bicl3   #-65536,24(r7),r3
3059         movzwl  26(r7),r0
3060         bicl2   #-65536,r0
3061         bicl3   #-65536,28(r6),-904(fp)
3062         bicl3   #-65536,r2,-908(fp)
3063         mull3   r0,-904(fp),-896(fp)
3064         mull2   r3,-904(fp)
3065         mull3   r3,-908(fp),-900(fp)
3066         mull2   r0,-908(fp)
3067         addl3   -896(fp),-900(fp),r0
3068         bicl3   #0,r0,-896(fp)
3069         cmpl    -896(fp),-900(fp)
3070         bgequ   noname.293
3071         addl2   #65536,-908(fp)
3072 noname.293:
3073         movzwl  -894(fp),r0
3074         bicl2   #-65536,r0
3075         addl2   r0,-908(fp)
3076         bicl3   #-65536,-896(fp),r0
3077         ashl    #16,r0,-900(fp)
3078         addl3   -900(fp),-904(fp),r0
3079         bicl3   #0,r0,-904(fp)
3080         cmpl    -904(fp),-900(fp)
3081         bgequ   noname.294
3082         incl    -908(fp)
3083 noname.294:
3084         movl    -904(fp),r1
3085         movl    -908(fp),r2
3086         addl2   r1,r8
3087         bicl2   #0,r8
3088         cmpl    r8,r1
3089         bgequ   noname.295
3090         incl    r2
3091 noname.295:
3092         addl2   r2,r10
3093         bicl2   #0,r10
3094         cmpl    r10,r2
3095         bgequ   noname.296
3096         incl    r9
3097 noname.296:
3098
3099         movl    r8,52(r11)
3100
3101         clrl    r8
3102
3103         movzwl  30(r6),r2
3104         bicl3   #-65536,28(r7),r3
3105         movzwl  30(r7),r0
3106         bicl2   #-65536,r0
3107         bicl3   #-65536,28(r6),-920(fp)
3108         bicl3   #-65536,r2,-924(fp)
3109         mull3   r0,-920(fp),-912(fp)
3110         mull2   r3,-920(fp)
3111         mull3   r3,-924(fp),-916(fp)
3112         mull2   r0,-924(fp)
3113         addl3   -912(fp),-916(fp),r0
3114         bicl3   #0,r0,-912(fp)
3115         cmpl    -912(fp),-916(fp)
3116         bgequ   noname.297
3117         addl2   #65536,-924(fp)
3118 noname.297:
3119         movzwl  -910(fp),r0
3120         bicl2   #-65536,r0
3121         addl2   r0,-924(fp)
3122         bicl3   #-65536,-912(fp),r0
3123         ashl    #16,r0,-916(fp)
3124         addl3   -916(fp),-920(fp),r0
3125         bicl3   #0,r0,-920(fp)
3126         cmpl    -920(fp),-916(fp)
3127         bgequ   noname.298
3128         incl    -924(fp)
3129 noname.298:
3130         movl    -920(fp),r1
3131         movl    -924(fp),r2
3132         addl2   r1,r10
3133         bicl2   #0,r10
3134         cmpl    r10,r1
3135         bgequ   noname.299
3136         incl    r2
3137 noname.299:
3138         addl2   r2,r9
3139         bicl2   #0,r9
3140         cmpl    r9,r2
3141         bgequ   noname.300
3142         incl    r8
3143 noname.300:
3144
3145         movl    r10,56(r11)
3146
3147         movl    r9,60(r11)
3148
3149         ret     
3150
3151 \f
3152
3153 ;r=4 ;(AP)
3154 ;a=8 ;(AP)
3155 ;b=12 ;(AP)
3156 ;n=16 ;(AP)     n       by value (input)
3157
3158         .psect  code,nowrt
3159
3160 .entry  BN_MUL_COMBA4,^m<r2,r3,r4,r5,r6,r7,r8,r9,r10,r11>
3161         movab   -156(sp),sp
3162
3163         clrq    r9
3164
3165         clrl    r8
3166
3167         movl    8(ap),r6
3168         bicl3   #-65536,(r6),r3
3169         movzwl  2(r6),r2
3170         bicl2   #-65536,r2
3171         movl    12(ap),r7
3172         bicl3   #-65536,(r7),r1
3173         movzwl  2(r7),r0
3174         bicl2   #-65536,r0
3175         movl    r3,r5
3176         movl    r2,r4
3177         mull3   r0,r5,-4(fp)
3178         mull2   r1,r5
3179         mull3   r1,r4,-8(fp)
3180         mull2   r0,r4
3181         addl3   -4(fp),-8(fp),r0
3182         bicl3   #0,r0,-4(fp)
3183         cmpl    -4(fp),-8(fp)
3184         bgequ   noname.303
3185         addl2   #65536,r4
3186 noname.303:
3187         movzwl  -2(fp),r0
3188         bicl2   #-65536,r0
3189         addl2   r0,r4
3190         bicl3   #-65536,-4(fp),r0
3191         ashl    #16,r0,-8(fp)
3192         addl2   -8(fp),r5
3193         bicl2   #0,r5
3194         cmpl    r5,-8(fp)
3195         bgequ   noname.304
3196         incl    r4
3197 noname.304:
3198         movl    r5,r1
3199         movl    r4,r2
3200         addl2   r1,r10
3201         bicl2   #0,r10
3202         cmpl    r10,r1
3203         bgequ   noname.305
3204         incl    r2
3205 noname.305:
3206         addl2   r2,r9
3207         bicl2   #0,r9
3208         cmpl    r9,r2
3209         bgequ   noname.306
3210         incl    r8
3211 noname.306:
3212
3213         movl    4(ap),r11
3214         movl    r10,(r11)
3215
3216         clrl    r10
3217
3218         bicl3   #-65536,(r6),r3
3219         movzwl  2(r6),r1
3220         bicl2   #-65536,r1
3221         bicl3   #-65536,4(r7),r2
3222         movzwl  6(r7),r0
3223         bicl2   #-65536,r0
3224         movl    r3,r5
3225         movl    r1,r4
3226         mull3   r0,r5,-12(fp)
3227         mull2   r2,r5
3228         mull3   r2,r4,-16(fp)
3229         mull2   r0,r4
3230         addl3   -12(fp),-16(fp),r0
3231         bicl3   #0,r0,-12(fp)
3232         cmpl    -12(fp),-16(fp)
3233         bgequ   noname.307
3234         addl2   #65536,r4
3235 noname.307:
3236         movzwl  -10(fp),r0
3237         bicl2   #-65536,r0
3238         addl2   r0,r4
3239         bicl3   #-65536,-12(fp),r0
3240         ashl    #16,r0,-16(fp)
3241         addl2   -16(fp),r5
3242         bicl2   #0,r5
3243         cmpl    r5,-16(fp)
3244         bgequ   noname.308
3245         incl    r4
3246 noname.308:
3247         movl    r5,r1
3248         movl    r4,r2
3249         addl2   r1,r9
3250         bicl2   #0,r9
3251         cmpl    r9,r1
3252         bgequ   noname.309
3253         incl    r2
3254 noname.309:
3255         addl2   r2,r8
3256         bicl2   #0,r8
3257         cmpl    r8,r2
3258         bgequ   noname.310
3259         incl    r10
3260 noname.310:
3261
3262         bicl3   #-65536,4(r6),r3
3263         movzwl  6(r6),r1
3264         bicl2   #-65536,r1
3265         bicl3   #-65536,(r7),r2
3266         movzwl  2(r7),r0
3267         bicl2   #-65536,r0
3268         movl    r3,r5
3269         movl    r1,r4
3270         mull3   r0,r5,-20(fp)
3271         mull2   r2,r5
3272         mull3   r2,r4,-24(fp)
3273         mull2   r0,r4
3274         addl3   -20(fp),-24(fp),r0
3275         bicl3   #0,r0,-20(fp)
3276         cmpl    -20(fp),-24(fp)
3277         bgequ   noname.311
3278         addl2   #65536,r4
3279 noname.311:
3280         movzwl  -18(fp),r0
3281         bicl2   #-65536,r0
3282         addl2   r0,r4
3283         bicl3   #-65536,-20(fp),r0
3284         ashl    #16,r0,-24(fp)
3285         addl2   -24(fp),r5
3286         bicl2   #0,r5
3287         cmpl    r5,-24(fp)
3288         bgequ   noname.312
3289         incl    r4
3290 noname.312:
3291         movl    r5,r1
3292         movl    r4,r2
3293         addl2   r1,r9
3294         bicl2   #0,r9
3295         cmpl    r9,r1
3296         bgequ   noname.313
3297         incl    r2
3298 noname.313:
3299         addl2   r2,r8
3300         bicl2   #0,r8
3301         cmpl    r8,r2
3302         bgequ   noname.314
3303         incl    r10
3304 noname.314:
3305
3306         movl    r9,4(r11)
3307
3308         clrl    r9
3309
3310         bicl3   #-65536,8(r6),r3
3311         movzwl  10(r6),r1
3312         bicl2   #-65536,r1
3313         bicl3   #-65536,(r7),r2
3314         movzwl  2(r7),r0
3315         bicl2   #-65536,r0
3316         movl    r3,r5
3317         movl    r1,r4
3318         mull3   r0,r5,-28(fp)
3319         mull2   r2,r5
3320         mull3   r2,r4,-32(fp)
3321         mull2   r0,r4
3322         addl3   -28(fp),-32(fp),r0
3323         bicl3   #0,r0,-28(fp)
3324         cmpl    -28(fp),-32(fp)
3325         bgequ   noname.315
3326         addl2   #65536,r4
3327 noname.315:
3328         movzwl  -26(fp),r0
3329         bicl2   #-65536,r0
3330         addl2   r0,r4
3331         bicl3   #-65536,-28(fp),r0
3332         ashl    #16,r0,-32(fp)
3333         addl2   -32(fp),r5
3334         bicl2   #0,r5
3335         cmpl    r5,-32(fp)
3336         bgequ   noname.316
3337         incl    r4
3338 noname.316:
3339         movl    r5,r1
3340         movl    r4,r2
3341         addl2   r1,r8
3342         bicl2   #0,r8
3343         cmpl    r8,r1
3344         bgequ   noname.317
3345         incl    r2
3346 noname.317:
3347         addl2   r2,r10
3348         bicl2   #0,r10
3349         cmpl    r10,r2
3350         bgequ   noname.318
3351         incl    r9
3352 noname.318:
3353
3354         bicl3   #-65536,4(r6),r3
3355         movzwl  6(r6),r1
3356         bicl2   #-65536,r1
3357         bicl3   #-65536,4(r7),r2
3358         movzwl  6(r7),r0
3359         bicl2   #-65536,r0
3360         movl    r3,r5
3361         movl    r1,r4
3362         mull3   r0,r5,-36(fp)
3363         mull2   r2,r5
3364         mull3   r2,r4,-40(fp)
3365         mull2   r0,r4
3366         addl3   -36(fp),-40(fp),r0
3367         bicl3   #0,r0,-36(fp)
3368         cmpl    -36(fp),-40(fp)
3369         bgequ   noname.319
3370         addl2   #65536,r4
3371 noname.319:
3372         movzwl  -34(fp),r0
3373         bicl2   #-65536,r0
3374         addl2   r0,r4
3375         bicl3   #-65536,-36(fp),r0
3376         ashl    #16,r0,-40(fp)
3377         addl2   -40(fp),r5
3378         bicl2   #0,r5
3379         cmpl    r5,-40(fp)
3380         bgequ   noname.320
3381         incl    r4
3382 noname.320:
3383         movl    r5,r1
3384         movl    r4,r2
3385         addl2   r1,r8
3386         bicl2   #0,r8
3387         cmpl    r8,r1
3388         bgequ   noname.321
3389         incl    r2
3390 noname.321:
3391         addl2   r2,r10
3392         bicl2   #0,r10
3393         cmpl    r10,r2
3394         bgequ   noname.322
3395         incl    r9
3396 noname.322:
3397
3398         bicl3   #-65536,(r6),r3
3399         movzwl  2(r6),r1
3400         bicl2   #-65536,r1
3401         bicl3   #-65536,8(r7),r2
3402         movzwl  10(r7),r0
3403         bicl2   #-65536,r0
3404         movl    r3,r5
3405         movl    r1,r4
3406         mull3   r0,r5,-44(fp)
3407         mull2   r2,r5
3408         mull3   r2,r4,-48(fp)
3409         mull2   r0,r4
3410         addl3   -44(fp),-48(fp),r0
3411         bicl3   #0,r0,-44(fp)
3412         cmpl    -44(fp),-48(fp)
3413         bgequ   noname.323
3414         addl2   #65536,r4
3415 noname.323:
3416         movzwl  -42(fp),r0
3417         bicl2   #-65536,r0
3418         addl2   r0,r4
3419         bicl3   #-65536,-44(fp),r0
3420         ashl    #16,r0,-48(fp)
3421         addl2   -48(fp),r5
3422         bicl2   #0,r5
3423         cmpl    r5,-48(fp)
3424         bgequ   noname.324
3425         incl    r4
3426 noname.324:
3427         movl    r5,r1
3428         movl    r4,r2
3429         addl2   r1,r8
3430         bicl2   #0,r8
3431         cmpl    r8,r1
3432         bgequ   noname.325
3433         incl    r2
3434 noname.325:
3435         addl2   r2,r10
3436         bicl2   #0,r10
3437         cmpl    r10,r2
3438         bgequ   noname.326
3439         incl    r9
3440 noname.326:
3441
3442         movl    r8,8(r11)
3443
3444         clrl    r8
3445
3446         bicl3   #-65536,(r6),r3
3447         movzwl  2(r6),r2
3448         bicl3   #-65536,12(r7),r1
3449         movzwl  14(r7),r0
3450         bicl2   #-65536,r0
3451         movl    r3,r4
3452         bicl3   #-65536,r2,-60(fp)
3453         mull3   r0,r4,-52(fp)
3454         mull2   r1,r4
3455         mull3   r1,-60(fp),-56(fp)
3456         mull2   r0,-60(fp)
3457         addl3   -52(fp),-56(fp),r0
3458         bicl3   #0,r0,-52(fp)
3459         cmpl    -52(fp),-56(fp)
3460         bgequ   noname.327
3461         addl2   #65536,-60(fp)
3462 noname.327:
3463         movzwl  -50(fp),r0
3464         bicl2   #-65536,r0
3465         addl2   r0,-60(fp)
3466         bicl3   #-65536,-52(fp),r0
3467         ashl    #16,r0,-56(fp)
3468         addl2   -56(fp),r4
3469         bicl2   #0,r4
3470         cmpl    r4,-56(fp)
3471         bgequ   noname.328
3472         incl    -60(fp)
3473 noname.328:
3474         movl    r4,r1
3475         movl    -60(fp),r2
3476         addl2   r1,r10
3477         bicl2   #0,r10
3478         cmpl    r10,r1
3479         bgequ   noname.329
3480         incl    r2
3481 noname.329:
3482         addl2   r2,r9
3483         bicl2   #0,r9
3484         cmpl    r9,r2
3485         bgequ   noname.330
3486         incl    r8
3487 noname.330:
3488
3489         movzwl  6(r6),r2
3490         bicl3   #-65536,8(r7),r3
3491         movzwl  10(r7),r0
3492         bicl2   #-65536,r0
3493         bicl3   #-65536,4(r6),-72(fp)
3494         bicl3   #-65536,r2,-76(fp)
3495         mull3   r0,-72(fp),-64(fp)
3496         mull2   r3,-72(fp)
3497         mull3   r3,-76(fp),-68(fp)
3498         mull2   r0,-76(fp)
3499         addl3   -64(fp),-68(fp),r0
3500         bicl3   #0,r0,-64(fp)
3501         cmpl    -64(fp),-68(fp)
3502         bgequ   noname.331
3503         addl2   #65536,-76(fp)
3504 noname.331:
3505         movzwl  -62(fp),r0
3506         bicl2   #-65536,r0
3507         addl2   r0,-76(fp)
3508         bicl3   #-65536,-64(fp),r0
3509         ashl    #16,r0,-68(fp)
3510         addl3   -68(fp),-72(fp),r0
3511         bicl3   #0,r0,-72(fp)
3512         cmpl    -72(fp),-68(fp)
3513         bgequ   noname.332
3514         incl    -76(fp)
3515 noname.332:
3516         movl    -72(fp),r1
3517         movl    -76(fp),r2
3518         addl2   r1,r10
3519         bicl2   #0,r10
3520         cmpl    r10,r1
3521         bgequ   noname.333
3522         incl    r2
3523 noname.333:
3524         addl2   r2,r9
3525         bicl2   #0,r9
3526         cmpl    r9,r2
3527         bgequ   noname.334
3528         incl    r8
3529 noname.334:
3530
3531         bicl3   #-65536,8(r6),r3
3532         movzwl  10(r6),r1
3533         bicl2   #-65536,r1
3534         bicl3   #-65536,4(r7),r2
3535         movzwl  6(r7),r0
3536         bicl2   #-65536,r0
3537         movl    r3,r5
3538         movl    r1,r4
3539         mull3   r0,r5,-80(fp)
3540         mull2   r2,r5
3541         mull3   r2,r4,-84(fp)
3542         mull2   r0,r4
3543         addl3   -80(fp),-84(fp),r0
3544         bicl3   #0,r0,-80(fp)
3545         cmpl    -80(fp),-84(fp)
3546         bgequ   noname.335
3547         addl2   #65536,r4
3548 noname.335:
3549         movzwl  -78(fp),r0
3550         bicl2   #-65536,r0
3551         addl2   r0,r4
3552         bicl3   #-65536,-80(fp),r0
3553         ashl    #16,r0,-84(fp)
3554         addl2   -84(fp),r5
3555         bicl2   #0,r5
3556         cmpl    r5,-84(fp)
3557         bgequ   noname.336
3558         incl    r4
3559 noname.336:
3560         movl    r5,r1
3561         movl    r4,r2
3562         addl2   r1,r10
3563         bicl2   #0,r10
3564         cmpl    r10,r1
3565         bgequ   noname.337
3566         incl    r2
3567 noname.337:
3568         addl2   r2,r9
3569         bicl2   #0,r9
3570         cmpl    r9,r2
3571         bgequ   noname.338
3572         incl    r8
3573 noname.338:
3574
3575         bicl3   #-65536,12(r6),r3
3576         movzwl  14(r6),r1
3577         bicl2   #-65536,r1
3578         bicl3   #-65536,(r7),r2
3579         movzwl  2(r7),r0
3580         bicl2   #-65536,r0
3581         movl    r3,r5
3582         movl    r1,r4
3583         mull3   r0,r5,-88(fp)
3584         mull2   r2,r5
3585         mull3   r2,r4,-92(fp)
3586         mull2   r0,r4
3587         addl3   -88(fp),-92(fp),r0
3588         bicl3   #0,r0,-88(fp)
3589         cmpl    -88(fp),-92(fp)
3590         bgequ   noname.339
3591         addl2   #65536,r4
3592 noname.339:
3593         movzwl  -86(fp),r0
3594         bicl2   #-65536,r0
3595         addl2   r0,r4
3596         bicl3   #-65536,-88(fp),r0
3597         ashl    #16,r0,-92(fp)
3598         addl2   -92(fp),r5
3599         bicl2   #0,r5
3600         cmpl    r5,-92(fp)
3601         bgequ   noname.340
3602         incl    r4
3603 noname.340:
3604         movl    r5,r1
3605         movl    r4,r2
3606         addl2   r1,r10
3607         bicl2   #0,r10
3608         cmpl    r10,r1
3609         bgequ   noname.341
3610         incl    r2
3611 noname.341:
3612         addl2   r2,r9
3613         bicl2   #0,r9
3614         cmpl    r9,r2
3615         bgequ   noname.342
3616         incl    r8
3617 noname.342:
3618
3619         movl    r10,12(r11)
3620
3621         clrl    r10
3622
3623         bicl3   #-65536,12(r6),r3
3624         movzwl  14(r6),r1
3625         bicl2   #-65536,r1
3626         bicl3   #-65536,4(r7),r2
3627         movzwl  6(r7),r0
3628         bicl2   #-65536,r0
3629         movl    r3,r5
3630         movl    r1,r4
3631         mull3   r0,r5,-96(fp)
3632         mull2   r2,r5
3633         mull3   r2,r4,-100(fp)
3634         mull2   r0,r4
3635         addl3   -96(fp),-100(fp),r0
3636         bicl3   #0,r0,-96(fp)
3637         cmpl    -96(fp),-100(fp)
3638         bgequ   noname.343
3639         addl2   #65536,r4
3640 noname.343:
3641         movzwl  -94(fp),r0
3642         bicl2   #-65536,r0
3643         addl2   r0,r4
3644         bicl3   #-65536,-96(fp),r0
3645         ashl    #16,r0,-100(fp)
3646         addl2   -100(fp),r5
3647         bicl2   #0,r5
3648         cmpl    r5,-100(fp)
3649         bgequ   noname.344
3650         incl    r4
3651 noname.344:
3652         movl    r5,r1
3653         movl    r4,r2
3654         addl2   r1,r9
3655         bicl2   #0,r9
3656         cmpl    r9,r1
3657         bgequ   noname.345
3658         incl    r2
3659 noname.345:
3660         addl2   r2,r8
3661         bicl2   #0,r8
3662         cmpl    r8,r2
3663         bgequ   noname.346
3664         incl    r10
3665 noname.346:
3666
3667         bicl3   #-65536,8(r6),r3
3668         movzwl  10(r6),r1
3669         bicl2   #-65536,r1
3670         bicl3   #-65536,8(r7),r2
3671         movzwl  10(r7),r0
3672         bicl2   #-65536,r0
3673         movl    r3,r5
3674         movl    r1,r4
3675         mull3   r0,r5,-104(fp)
3676         mull2   r2,r5
3677         mull3   r2,r4,-108(fp)
3678         mull2   r0,r4
3679         addl3   -104(fp),-108(fp),r0
3680         bicl3   #0,r0,-104(fp)
3681         cmpl    -104(fp),-108(fp)
3682         bgequ   noname.347
3683         addl2   #65536,r4
3684 noname.347:
3685         movzwl  -102(fp),r0
3686         bicl2   #-65536,r0
3687         addl2   r0,r4
3688         bicl3   #-65536,-104(fp),r0
3689         ashl    #16,r0,-108(fp)
3690         addl2   -108(fp),r5
3691         bicl2   #0,r5
3692         cmpl    r5,-108(fp)
3693         bgequ   noname.348
3694         incl    r4
3695 noname.348:
3696         movl    r5,r1
3697         movl    r4,r2
3698         addl2   r1,r9
3699         bicl2   #0,r9
3700         cmpl    r9,r1
3701         bgequ   noname.349
3702         incl    r2
3703 noname.349:
3704         addl2   r2,r8
3705         bicl2   #0,r8
3706         cmpl    r8,r2
3707         bgequ   noname.350
3708         incl    r10
3709 noname.350:
3710
3711         bicl3   #-65536,4(r6),r3
3712         movzwl  6(r6),r1
3713         bicl2   #-65536,r1
3714         bicl3   #-65536,12(r7),r2
3715         movzwl  14(r7),r0
3716         bicl2   #-65536,r0
3717         movl    r3,r5
3718         movl    r1,r4
3719         mull3   r0,r5,-112(fp)
3720         mull2   r2,r5
3721         mull3   r2,r4,-116(fp)
3722         mull2   r0,r4
3723         addl3   -112(fp),-116(fp),r0
3724         bicl3   #0,r0,-112(fp)
3725         cmpl    -112(fp),-116(fp)
3726         bgequ   noname.351
3727         addl2   #65536,r4
3728 noname.351:
3729         movzwl  -110(fp),r0
3730         bicl2   #-65536,r0
3731         addl2   r0,r4
3732         bicl3   #-65536,-112(fp),r0
3733         ashl    #16,r0,-116(fp)
3734         addl2   -116(fp),r5
3735         bicl2   #0,r5
3736         cmpl    r5,-116(fp)
3737         bgequ   noname.352
3738         incl    r4
3739 noname.352:
3740         movl    r5,r1
3741         movl    r4,r2
3742         addl2   r1,r9
3743         bicl2   #0,r9
3744         cmpl    r9,r1
3745         bgequ   noname.353
3746         incl    r2
3747 noname.353:
3748         addl2   r2,r8
3749         bicl2   #0,r8
3750         cmpl    r8,r2
3751         bgequ   noname.354
3752         incl    r10
3753 noname.354:
3754
3755         movl    r9,16(r11)
3756
3757         clrl    r9
3758
3759         bicl3   #-65536,8(r6),r3
3760         movzwl  10(r6),r1
3761         bicl2   #-65536,r1
3762         bicl3   #-65536,12(r7),r2
3763         movzwl  14(r7),r0
3764         bicl2   #-65536,r0
3765         movl    r3,r5
3766         movl    r1,r4
3767         mull3   r0,r5,-120(fp)
3768         mull2   r2,r5
3769         mull3   r2,r4,-124(fp)
3770         mull2   r0,r4
3771         addl3   -120(fp),-124(fp),r0
3772         bicl3   #0,r0,-120(fp)
3773         cmpl    -120(fp),-124(fp)
3774         bgequ   noname.355
3775         addl2   #65536,r4
3776 noname.355:
3777         movzwl  -118(fp),r0
3778         bicl2   #-65536,r0
3779         addl2   r0,r4
3780         bicl3   #-65536,-120(fp),r0
3781         ashl    #16,r0,-124(fp)
3782         addl2   -124(fp),r5
3783         bicl2   #0,r5
3784         cmpl    r5,-124(fp)
3785         bgequ   noname.356
3786         incl    r4
3787 noname.356:
3788         movl    r5,r1
3789         movl    r4,r2
3790         addl2   r1,r8
3791         bicl2   #0,r8
3792         cmpl    r8,r1
3793         bgequ   noname.357
3794         incl    r2
3795 noname.357:
3796         addl2   r2,r10
3797         bicl2   #0,r10
3798         cmpl    r10,r2
3799         bgequ   noname.358
3800         incl    r9
3801 noname.358:
3802
3803         movzwl  14(r6),r2
3804         bicl3   #-65536,8(r7),r3
3805         movzwl  10(r7),r0
3806         bicl2   #-65536,r0
3807         bicl3   #-65536,12(r6),-136(fp)
3808         bicl3   #-65536,r2,-140(fp)
3809         mull3   r0,-136(fp),-128(fp)
3810         mull2   r3,-136(fp)
3811         mull3   r3,-140(fp),-132(fp)
3812         mull2   r0,-140(fp)
3813         addl3   -128(fp),-132(fp),r0
3814         bicl3   #0,r0,-128(fp)
3815         cmpl    -128(fp),-132(fp)
3816         bgequ   noname.359
3817         addl2   #65536,-140(fp)
3818 noname.359:
3819         movzwl  -126(fp),r0
3820         bicl2   #-65536,r0
3821         addl2   r0,-140(fp)
3822         bicl3   #-65536,-128(fp),r0
3823         ashl    #16,r0,-132(fp)
3824         addl3   -132(fp),-136(fp),r0
3825         bicl3   #0,r0,-136(fp)
3826         cmpl    -136(fp),-132(fp)
3827         bgequ   noname.360
3828         incl    -140(fp)
3829 noname.360:
3830         movl    -136(fp),r1
3831         movl    -140(fp),r2
3832         addl2   r1,r8
3833         bicl2   #0,r8
3834         cmpl    r8,r1
3835         bgequ   noname.361
3836         incl    r2
3837 noname.361:
3838         addl2   r2,r10
3839         bicl2   #0,r10
3840         cmpl    r10,r2
3841         bgequ   noname.362
3842         incl    r9
3843 noname.362:
3844
3845         movl    r8,20(r11)
3846
3847         clrl    r8
3848
3849         movzwl  14(r6),r2
3850         bicl3   #-65536,12(r7),r3
3851         movzwl  14(r7),r0
3852         bicl2   #-65536,r0
3853         bicl3   #-65536,12(r6),-152(fp)
3854         bicl3   #-65536,r2,-156(fp)
3855         mull3   r0,-152(fp),-144(fp)
3856         mull2   r3,-152(fp)
3857         mull3   r3,-156(fp),-148(fp)
3858         mull2   r0,-156(fp)
3859         addl3   -144(fp),-148(fp),r0
3860         bicl3   #0,r0,-144(fp)
3861         cmpl    -144(fp),-148(fp)
3862         bgequ   noname.363
3863         addl2   #65536,-156(fp)
3864 noname.363:
3865         movzwl  -142(fp),r0
3866         bicl2   #-65536,r0
3867         addl2   r0,-156(fp)
3868         bicl3   #-65536,-144(fp),r0
3869         ashl    #16,r0,-148(fp)
3870         addl3   -148(fp),-152(fp),r0
3871         bicl3   #0,r0,-152(fp)
3872         cmpl    -152(fp),-148(fp)
3873         bgequ   noname.364
3874         incl    -156(fp)
3875 noname.364:
3876         movl    -152(fp),r1
3877         movl    -156(fp),r2
3878         addl2   r1,r10
3879         bicl2   #0,r10
3880         cmpl    r10,r1
3881         bgequ   noname.365
3882         incl    r2
3883 noname.365:
3884         addl2   r2,r9
3885         bicl2   #0,r9
3886         cmpl    r9,r2
3887         bgequ   noname.366
3888         incl    r8
3889 noname.366:
3890
3891         movl    r10,24(r11)
3892
3893         movl    r9,28(r11)
3894
3895         ret     
3896
3897 \f
3898
3899 ;r=4 ;(AP)
3900 ;a=8 ;(AP)
3901 ;b=12 ;(AP)
3902 ;n=16 ;(AP)     n       by value (input)
3903
3904         .psect  code,nowrt
3905
3906 .entry  BN_SQR_COMBA8,^m<r2,r3,r4,r5,r6,r7,r8,r9>
3907         movab   -444(sp),sp
3908
3909         clrq    r8
3910
3911         clrl    r7
3912
3913         movl    8(ap),r4
3914         movl    (r4),r3
3915         bicl3   #-65536,r3,-4(fp)
3916         extzv   #16,#16,r3,r0
3917         bicl3   #-65536,r0,r3
3918         movl    -4(fp),r0
3919         mull3   r0,r3,-8(fp)
3920         mull3   r0,r0,-4(fp)
3921         mull2   r3,r3
3922         bicl3   #32767,-8(fp),r0
3923         extzv   #15,#17,r0,r0
3924         addl2   r0,r3
3925         bicl3   #-65536,-8(fp),r0
3926         ashl    #17,r0,-8(fp)
3927         addl3   -4(fp),-8(fp),r0
3928         bicl3   #0,r0,-4(fp)
3929         cmpl    -4(fp),-8(fp)
3930         bgequ   noname.369
3931         incl    r3
3932 noname.369:
3933         movl    -4(fp),r1
3934         movl    r3,r2
3935         addl2   r1,r9
3936         bicl2   #0,r9
3937         cmpl    r9,r1
3938         bgequ   noname.370
3939         incl    r2
3940 noname.370:
3941         addl2   r2,r8
3942         bicl2   #0,r8
3943         cmpl    r8,r2
3944         bgequ   noname.371
3945         incl    r7
3946 noname.371:
3947
3948         movl    r9,@4(ap)
3949
3950         clrl    r9
3951
3952         movzwl  6(r4),r2
3953         bicl3   #-65536,(r4),r3
3954         movzwl  2(r4),r0
3955         bicl2   #-65536,r0
3956         bicl3   #-65536,4(r4),-20(fp)
3957         bicl3   #-65536,r2,-24(fp)
3958         mull3   r0,-20(fp),-12(fp)
3959         mull2   r3,-20(fp)
3960         mull3   r3,-24(fp),-16(fp)
3961         mull2   r0,-24(fp)
3962         addl3   -12(fp),-16(fp),r0
3963         bicl3   #0,r0,-12(fp)
3964         cmpl    -12(fp),-16(fp)
3965         bgequ   noname.372
3966         addl2   #65536,-24(fp)
3967 noname.372:
3968         movzwl  -10(fp),r0
3969         bicl2   #-65536,r0
3970         addl2   r0,-24(fp)
3971         bicl3   #-65536,-12(fp),r0
3972         ashl    #16,r0,-16(fp)
3973         addl3   -16(fp),-20(fp),r0
3974         bicl3   #0,r0,-20(fp)
3975         cmpl    -20(fp),-16(fp)
3976         bgequ   noname.373
3977         incl    -24(fp)
3978 noname.373:
3979         movl    -20(fp),r3
3980         movl    -24(fp),r2
3981         bbc     #31,r2,noname.374
3982         incl    r9
3983 noname.374:
3984         addl2   r2,r2
3985         bicl2   #0,r2
3986         bbc     #31,r3,noname.375
3987         incl    r2
3988 noname.375:
3989         addl2   r3,r3
3990         bicl2   #0,r3
3991         addl2   r3,r8
3992         bicl2   #0,r8
3993         cmpl    r8,r3
3994         bgequ   noname.376
3995         incl    r2
3996         bicl3   #0,r2,r0
3997         bneq    noname.376
3998         incl    r9
3999 noname.376:
4000         addl2   r2,r7
4001         bicl2   #0,r7
4002         cmpl    r7,r2
4003         bgequ   noname.377
4004         incl    r9
4005 noname.377:
4006
4007         movl    4(ap),r0
4008         movl    r8,4(r0)
4009
4010         clrl    r8
4011
4012         movl    8(ap),r4
4013         movl    4(r4),r3
4014         bicl3   #-65536,r3,-28(fp)
4015         extzv   #16,#16,r3,r0
4016         bicl3   #-65536,r0,r3
4017         movl    -28(fp),r0
4018         mull3   r0,r3,-32(fp)
4019         mull3   r0,r0,-28(fp)
4020         mull2   r3,r3
4021         bicl3   #32767,-32(fp),r0
4022         extzv   #15,#17,r0,r0
4023         addl2   r0,r3
4024         bicl3   #-65536,-32(fp),r0
4025         ashl    #17,r0,-32(fp)
4026         addl3   -28(fp),-32(fp),r0
4027         bicl3   #0,r0,-28(fp)
4028         cmpl    -28(fp),-32(fp)
4029         bgequ   noname.378
4030         incl    r3
4031 noname.378:
4032         movl    -28(fp),r1
4033         movl    r3,r2
4034         addl2   r1,r7
4035         bicl2   #0,r7
4036         cmpl    r7,r1
4037         bgequ   noname.379
4038         incl    r2
4039 noname.379:
4040         addl2   r2,r9
4041         bicl2   #0,r9
4042         cmpl    r9,r2
4043         bgequ   noname.380
4044         incl    r8
4045 noname.380:
4046
4047         movzwl  10(r4),r2
4048         bicl3   #-65536,(r4),r3
4049         movzwl  2(r4),r0
4050         bicl2   #-65536,r0
4051         bicl3   #-65536,8(r4),-44(fp)
4052         bicl3   #-65536,r2,-48(fp)
4053         mull3   r0,-44(fp),-36(fp)
4054         mull2   r3,-44(fp)
4055         mull3   r3,-48(fp),-40(fp)
4056         mull2   r0,-48(fp)
4057         addl3   -36(fp),-40(fp),r0
4058         bicl3   #0,r0,-36(fp)
4059         cmpl    -36(fp),-40(fp)
4060         bgequ   noname.381
4061         addl2   #65536,-48(fp)
4062 noname.381:
4063         movzwl  -34(fp),r0
4064         bicl2   #-65536,r0
4065         addl2   r0,-48(fp)
4066         bicl3   #-65536,-36(fp),r0
4067         ashl    #16,r0,-40(fp)
4068         addl3   -40(fp),-44(fp),r0
4069         bicl3   #0,r0,-44(fp)
4070         cmpl    -44(fp),-40(fp)
4071         bgequ   noname.382
4072         incl    -48(fp)
4073 noname.382:
4074         movl    -44(fp),r3
4075         movl    -48(fp),r2
4076         bbc     #31,r2,noname.383
4077         incl    r8
4078 noname.383:
4079         addl2   r2,r2
4080         bicl2   #0,r2
4081         bbc     #31,r3,noname.384
4082         incl    r2
4083 noname.384:
4084         addl2   r3,r3
4085         bicl2   #0,r3
4086         addl2   r3,r7
4087         bicl2   #0,r7
4088         cmpl    r7,r3
4089         bgequ   noname.385
4090         incl    r2
4091         bicl3   #0,r2,r0
4092         bneq    noname.385
4093         incl    r8
4094 noname.385:
4095         addl2   r2,r9
4096         bicl2   #0,r9
4097         cmpl    r9,r2
4098         bgequ   noname.386
4099         incl    r8
4100 noname.386:
4101
4102         movl    4(ap),r0
4103         movl    r7,8(r0)
4104
4105         clrl    r7
4106
4107         movl    8(ap),r0
4108         movzwl  14(r0),r2
4109         bicl3   #-65536,(r0),r3
4110         movzwl  2(r0),r1
4111         bicl2   #-65536,r1
4112         bicl3   #-65536,12(r0),-60(fp)
4113         bicl3   #-65536,r2,-64(fp)
4114         mull3   r1,-60(fp),-52(fp)
4115         mull2   r3,-60(fp)
4116         mull3   r3,-64(fp),-56(fp)
4117         mull2   r1,-64(fp)
4118         addl3   -52(fp),-56(fp),r0
4119         bicl3   #0,r0,-52(fp)
4120         cmpl    -52(fp),-56(fp)
4121         bgequ   noname.387
4122         addl2   #65536,-64(fp)
4123 noname.387:
4124         movzwl  -50(fp),r0
4125         bicl2   #-65536,r0
4126         addl2   r0,-64(fp)
4127         bicl3   #-65536,-52(fp),r0
4128         ashl    #16,r0,-56(fp)
4129         addl3   -56(fp),-60(fp),r0
4130         bicl3   #0,r0,-60(fp)
4131         cmpl    -60(fp),-56(fp)
4132         bgequ   noname.388
4133         incl    -64(fp)
4134 noname.388:
4135         movl    -60(fp),r3
4136         movl    -64(fp),r2
4137         bbc     #31,r2,noname.389
4138         incl    r7
4139 noname.389:
4140         addl2   r2,r2
4141         bicl2   #0,r2
4142         bbc     #31,r3,noname.390
4143         incl    r2
4144 noname.390:
4145         addl2   r3,r3
4146         bicl2   #0,r3
4147         addl2   r3,r9
4148         bicl2   #0,r9
4149         cmpl    r9,r3
4150         bgequ   noname.391
4151         incl    r2
4152         bicl3   #0,r2,r0
4153         bneq    noname.391
4154         incl    r7
4155 noname.391:
4156         addl2   r2,r8
4157         bicl2   #0,r8
4158         cmpl    r8,r2
4159         bgequ   noname.392
4160         incl    r7
4161 noname.392:
4162
4163         movl    8(ap),r0
4164         movzwl  10(r0),r2
4165         bicl3   #-65536,4(r0),r3
4166         movzwl  6(r0),r1
4167         bicl2   #-65536,r1
4168         bicl3   #-65536,8(r0),-76(fp)
4169         bicl3   #-65536,r2,-80(fp)
4170         mull3   r1,-76(fp),-68(fp)
4171         mull2   r3,-76(fp)
4172         mull3   r3,-80(fp),-72(fp)
4173         mull2   r1,-80(fp)
4174         addl3   -68(fp),-72(fp),r0
4175         bicl3   #0,r0,-68(fp)
4176         cmpl    -68(fp),-72(fp)
4177         bgequ   noname.393
4178         addl2   #65536,-80(fp)
4179 noname.393:
4180         movzwl  -66(fp),r0
4181         bicl2   #-65536,r0
4182         addl2   r0,-80(fp)
4183         bicl3   #-65536,-68(fp),r0
4184         ashl    #16,r0,-72(fp)
4185         addl3   -72(fp),-76(fp),r0
4186         bicl3   #0,r0,-76(fp)
4187         cmpl    -76(fp),-72(fp)
4188         bgequ   noname.394
4189         incl    -80(fp)
4190 noname.394:
4191         movl    -76(fp),r3
4192         movl    -80(fp),r2
4193         bbc     #31,r2,noname.395
4194         incl    r7
4195 noname.395:
4196         addl2   r2,r2
4197         bicl2   #0,r2
4198         bbc     #31,r3,noname.396
4199         incl    r2
4200 noname.396:
4201         addl2   r3,r3
4202         bicl2   #0,r3
4203         addl2   r3,r9
4204         bicl2   #0,r9
4205         cmpl    r9,r3
4206         bgequ   noname.397
4207         incl    r2
4208         bicl3   #0,r2,r0
4209         bneq    noname.397
4210         incl    r7
4211 noname.397:
4212         addl2   r2,r8
4213         bicl2   #0,r8
4214         cmpl    r8,r2
4215         bgequ   noname.398
4216         incl    r7
4217 noname.398:
4218
4219         movl    4(ap),r0
4220         movl    r9,12(r0)
4221
4222         clrl    r9
4223
4224         movl    8(ap),r2
4225         movl    8(r2),r4
4226         bicl3   #-65536,r4,-84(fp)
4227         extzv   #16,#16,r4,r0
4228         bicl3   #-65536,r0,r4
4229         movl    -84(fp),r0
4230         mull3   r0,r4,-88(fp)
4231         mull3   r0,r0,-84(fp)
4232         mull2   r4,r4
4233         bicl3   #32767,-88(fp),r0
4234         extzv   #15,#17,r0,r0
4235         addl2   r0,r4
4236         bicl3   #-65536,-88(fp),r0
4237         ashl    #17,r0,-88(fp)
4238         addl3   -84(fp),-88(fp),r0
4239         bicl3   #0,r0,-84(fp)
4240         cmpl    -84(fp),-88(fp)
4241         bgequ   noname.399
4242         incl    r4
4243 noname.399:
4244         movl    -84(fp),r1
4245         movl    r4,r3
4246         addl2   r1,r8
4247         bicl2   #0,r8
4248         cmpl    r8,r1
4249         bgequ   noname.400
4250         incl    r3
4251 noname.400:
4252         addl2   r3,r7