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