|                        Machine Code Listing of stode-1.s 


       .data
_BDATA:
stode._00083:                     |> 000000
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,4
       .byte 0,0,0,0
       .byte 0,0,6,200
       .byte 0,0,0,0
       .byte 0,0,0,0
stode._00080:                     |> 00002C
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,2
       .byte 0,0,0,200
       .byte 0,0,0,192
stode._00078:                     |> 000048
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,3
       .byte 0,0,7,92
       .byte 0,0,0,0
       .byte 0,0,0,0
stode._00076:                     |> 00006C
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,2
       .byte 0,0,0,160
       .byte 0,0,0,152
stode._00074:                     |> 000088
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,2
       .byte 0,0,0,176
       .byte 0,0,0,168
stode._00072:                     |> 0000A4
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,3
       .byte 0,0,7,92
       .byte 0,0,0,0
       .byte 0,0,0,0
stode._00063:                     |> 0000C8
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,3
       .byte 0,0,7,92
       .byte 0,0,0,0
       .byte 0,0,0,0
stode._00058:                     |> 0000EC
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,4
       .byte 0,0,0,0
       .byte 0,0,6,200
       .byte 0,0,0,0
       .byte 0,0,0,0
stode._00056:                     |> 000118
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,3
       .byte 0,0,7,92
       .byte 0,0,0,0
       .byte 0,0,0,0
stode._00054:                     |> 00013C
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,4
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
stode._00051:                     |> 000168
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,3
       .byte 0,0,7,92
       .byte 0,0,0,0
       .byte 0,0,0,0
stode._00047:                     |> 00018C
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,11
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
stode._00046:                     |> 0001F0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,4
       .byte 0,0,0,0
       .byte 0,0,6,200
       .byte 0,0,0,0
       .byte 0,0,0,0
stode._00039:                     |> 00021C
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,2
       .byte 0,0,0,184
       .byte 0,0,1,132
stode._00036:                     |> 000238
       .byte 0,0,6,130
       .byte 0,0,6,210
       .byte 0,0,8,182
stode._00033:                     |> 000244
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,3
       .byte 0,0,7,68
       .byte 0,0,0,128
       .byte 0,0,5,112
stode._00032:                     |> 000268
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,2
       .byte 0,0,0,200
       .byte 0,0,0,192
stode._00030:                     |> 000284
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,3
       .byte 0,0,7,92
       .byte 0,0,0,0
       .byte 0,0,0,0
stode._00027:                     |> 0002A8
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,0
       .byte 0,0,0,3
       .byte 0,0,7,68
       .byte 0,0,0,128
       .byte 0,0,5,112
       .byte 0,0,0,0
       .bss
_BBSS:
stode.rhup:                       |> 000000
       .=.+8
stode.r:                          |> 000008
       .=.+8
stode.rhdn:                       |> 000010
       .=.+8
stode.rhsm:                       |> 000018
       .=.+8
stode._00029:                     |> 000020
       .=.+8
stode._00079:                     |> 000028
       .=.+8
stode._00038:                     |> 000030
       .=.+8
stode.told:                       |> 000038
       .=.+8
stode._00077:                     |> 000040
       .=.+8
stode._00055:                     |> 000048
       .=.+8
stode._00075:                     |> 000050
       .=.+8
stode.delp:                       |> 000058
       .=.+8
stode._00073:                     |> 000060
       .=.+8
stode._00062:                     |> 000068
       .=.+8
stode.dcon:                       |> 000070
       .=.+8
stode._00031:                     |> 000078
       .=.+8
stode._00071:                     |> 000080
       .=.+8
stode._00050:                     |> 000088
       .=.+8
stode.del:                        |> 000090
       .=.+8
stode.exsm:                       |> 000098
       .=.+8
stode.dsm:                        |> 0000A0
       .=.+8
stode.exup:                       |> 0000A8
       .=.+8
stode.dup:                        |> 0000B0
       .=.+8
stode.rh:                         |> 0000B8
       .=.+8
stode.exdn:                       |> 0000C0
       .=.+8
stode.ddn:                        |> 0000C8
       .=.+8
stode.i1:                         |> 0000D0
       .=.+4
stode.newq:                       |> 0000D4
       .=.+4
stode.iret:                       |> 0000D8
       .=.+4
stode._00049:                     |> 0000DC
       .=.+4
stode._00059:                     |> 0000E0
       .=.+4
stode._00069:                     |> 0000E4
       .=.+4
stode.iredo:                      |> 0000E8
       .=.+4
stode._00018:                     |> 0000EC
       .=.+4
stode._00028:                     |> 0000F0
       .=.+4
stode._00048:                     |> 0000F4
       .=.+4
stode._00068:                     |> 0000F8
       .=.+4
stode._00037:                     |> 0000FC
       .=.+4
stode._00057:                     |> 000100
       .=.+4
stode._00067:                     |> 000104
       .=.+4
stode.m:                          |> 000108
       .=.+4
stode._00016:                     |> 00010C
       .=.+4
stode._00026:                     |> 000110
       .=.+4
stode._00066:                     |> 000114
       .=.+4
stode._00086:                     |> 000118
       .=.+4
stode._00025:                     |> 00011C
       .=.+4
stode._00035:                     |> 000120
       .=.+4
stode._00045:                     |> 000124
       .=.+4
stode._00065:                     |> 000128
       .=.+4
stode._00085:                     |> 00012C
       .=.+4
stode._00024:                     |> 000130
       .=.+4
stode._00034:                     |> 000134
       .=.+4
stode._00044:                     |> 000138
       .=.+4
stode._00064:                     |> 00013C
       .=.+4
stode._00084:                     |> 000140
       .=.+4
stode._00043:                     |> 000144
       .=.+4
stode._00053:                     |> 000148
       .=.+4
stode.ncf:                        |> 00014C
       .=.+4
stode._00022:                     |> 000150
       .=.+4
stode._00042:                     |> 000154
       .=.+4
stode._00052:                     |> 000158
       .=.+4
stode._00082:                     |> 00015C
       .=.+4
stode._00041:                     |> 000160
       .=.+4
stode._00061:                     |> 000164
       .=.+4
stode._00081:                     |> 000168
       .=.+4
stode.j:                          |> 00016C
       .=.+4
stode._00020:                     |> 000170
       .=.+4
stode._00060:                     |> 000174
       .=.+4
stode._00070:                     |> 000178
       .=.+4
stode.i:                          |> 00017C
       .=.+4
stode.jb:                         |> 000180
       .=.+4
stode._00040:                     |> 000184
       .=.+4
       .comm _ls0001_,1912
       .text
_BTEXT:

| Literal Pool
       .byte 0,0,0,0              |> 0
       .byte 0,0,0,0              |> 4
       .byte 0,0,0,0              |> 8
       .byte 0,0,0,0              |> 12
       .byte 0,0,0,1              |> 16
       .byte 0,0,0,2              |> 20
       .byte 64,195,136,0         |> 24
       .byte 0,0,0,0              |> 28
       .byte 63,240,0,0           |> 32
       .byte 0,0,0,0              |> 36
       .byte 63,230,102,102       |> 40
       .byte 102,102,102,102      |> 44
       .byte 0,0,0,3              |> 48
       .byte 0,0,0,13             |> 52
       .byte 63,224,0,0           |> 56
       .byte 0,0,0,0              |> 60
       .byte 63,244,204,204       |> 64
       .byte 204,204,204,205      |> 68
       .byte 62,181,207,117       |> 72
       .byte 29,185,78,107        |> 76
       .byte 0,0,0,4              |> 80
       .byte 0,0,0,5              |> 84
       .byte 0,0,0,6              |> 88
       .byte 0,0,0,7              |> 92
       .byte 0,0,0,8              |> 96
       .byte 0,0,0,9              |> 100
       .byte 0,0,0,10             |> 104
       .byte 0,0,0,0              |> 108
       .byte 63,201,153,153       |> 112
       .byte 153,153,153,154      |> 116
       .byte 63,248,0,0           |> 120
       .byte 0,0,0,0              |> 124
       .byte 64,0,0,0             |> 128
       .byte 0,0,0,0              |> 132
       .byte 63,240,0,10          |> 136
       .byte 124,90,196,114       |> 140
       .byte 63,208,0,0           |> 144
       .byte 0,0,0,0              |> 148
       .byte 63,246,102,102       |> 152
       .byte 102,102,102,102      |> 156
       .byte 62,183,124,244       |> 160
       .byte 71,101,25,95         |> 164
       .byte 63,243,51,51         |> 168
       .byte 51,51,51,51          |> 172
       .byte 62,180,33,245        |> 176
       .byte 244,13,131,118       |> 180
       .byte 63,241,153,153       |> 184
       .byte 153,153,153,154      |> 188
       .byte 63,185,153,153       |> 192
       .byte 153,153,153,154      |> 196
       .byte 255,255,255,255      |> 200
       .byte 255,255,255,254      |> 204
       .byte 255,255,255,253      |> 208
       .byte 0,0,0,0              |> 212
       .byte 64,36,0,0            |> 216
       .byte 0,0,0,0              |> 220

       .globl _cfode_
       .globl _dpwr_fortran_
       .globl _djpwr_fortran_
       .globl _vnorx_
       .globl __mcount_
                                  | LINE 1
       
       .globl _stode_
_stode_:                          |> 00E0 
       link a6,#-8                |> 00E0  4E56 FFF8
       movl a0,a6@(-4)            |> 00E4  2D48 FFFC
       movl _BTEXT+0,a0           |> 00E8  2079 0000 0000
       jsr __mcount_              |> 00EE  4EB9 0000 0000
       movl a6@(-4),a0            |> 00F4  206E FFFC
       nop                        |> 00F8  4E71
       movl a0@(40),stode._00016  |> 00FA  23E8 0028 0000 010C
       movl a0@(44),stode._00018  |> 0102  23E8 002C 0000 00EC
       movl a0@(48),stode._00020  |> 010A  23E8 0030 0000 0170
       movl a0@(52),stode._00022  |> 0112  23E8 0034 0000 0150
       movl a0@(12),a1            |> 011A  2268 000C
       movl a1@,d0                |> 011E  2011
       movl d0,stode._00024       |> 0120  23C0 0000 0130
       movl stode._00024,d0       |> 0126  2039 0000 0130
       movl d0,stode._00025       |> 012C  23C0 0000 011C
       movl stode._00025,d0       |> 0132  2039 0000 011C
       addql #1,d0                |> 0138  5280
       movl d0,stode._00026       |> 013A  23C0 0000 0110
       nop                        |> 0140  4E71
                                  | LINE 95
       clrl _ls0001_+1852         |> 0142  42B9 0000 073C
                                  | LINE 96
       fmoved _ls0001_+1736,fp0   |> 0148  FA39 FC40 0000 06C8
       fmoved fp0,stode.told      |> 0150  FA39 FC50 0000 0038
                                  | LINE 97
       clrl stode.ncf             |> 0158  42B9 0000 014C
                                  | LINE 98
       clrl _ls0001_+1836         |> 015E  42B9 0000 072C
                                  | LINE 99
       clrl _ls0001_+1840         |> 0164  42B9 0000 0730
                                  | LINE 100
       clrl _ls0001_+1844         |> 016A  42B9 0000 0734
                                  | LINE 101
       clrl _ls0001_+1832         |> 0170  42B9 0000 0728
                                  | LINE 102
       fmoved _BTEXT+8,fp0        |> 0176  FA39 FC40 0000 0008
       fmoved fp0,stode.delp      |> 017E  FA39 FC50 0000 0058
                                  | LINE 103
       tstl _ls0001_+1848         |> 0186  4AB9 0000 0738
       bgt  stode.label_200       |> 018C  6E00 0728
       nop                        |> 0190  4E71
                                  | LINE 104
       cmpl #-1,_ls0001_+1848     |> 0192  0CB9 FFFF FFFF 0000 0738
       beq  stode.label_100       |> 019C  6700 00C4
       nop                        |> 01A0  4E71
                                  | LINE 105
       cmpl #-2,_ls0001_+1848     |> 01A2  0CB9 FFFF FFFE 0000 0738
       beq  stode.label_160       |> 01AC  6700 04D4
       nop                        |> 01B0  4E71
                                  | LINE 114
       movl _ls0001_+1868,d0      |> 01B2  2039 0000 074C
       addql #1,d0                |> 01B8  5280
       movl d0,_ls0001_+1816      |> 01BA  23C0 0000 0718
                                  | LINE 115
       movl _BTEXT+16,d0          |> 01C0  2039 0000 0010
       movl d0,_ls0001_+1888      |> 01C6  23C0 0000 0760
                                  | LINE 116
       movl _BTEXT+20,d0          |> 01CC  2039 0000 0014
       movl d0,_ls0001_+1856      |> 01D2  23C0 0000 0740
                                  | LINE 117
       movl _BTEXT+20,d0          |> 01D8  2039 0000 0014
       movl d0,_ls0001_+1808      |> 01DE  23C0 0000 0710
                                  | LINE 118
       fmoved _BTEXT+24,fp0       |> 01E4  FA39 FC40 0000 0018
       fmoved fp0,_ls0001_+1384   |> 01EC  FA39 FC50 0000 0568
                                  | LINE 119
       fmoved _BTEXT+8,fp0        |> 01F4  FA39 FC40 0000 0008
       fmoved fp0,_ls0001_+1728   |> 01FC  FA39 FC50 0000 06C0
                                  | LINE 120
       fmoved _BTEXT+32,fp0       |> 0204  FA39 FC40 0000 0020
       fmoved fp0,_ls0001_+1688   |> 020C  FA39 FC50 0000 0698
                                  | LINE 121
       fmoved _BTEXT+40,fp0       |> 0214  FA39 FC40 0000 0028
       fmoved fp0,_ls0001_+16     |> 021C  FA39 FC50 0000 0010
                                  | LINE 122
       fmoved _ls0001_+1696,fp0   |> 0224  FA39 FC40 0000 06A0
       fmoved fp0,_ls0001_+1376   |> 022C  FA39 FC50 0000 0560
                                  | LINE 123
       movl _ls0001_+1860,d0      |> 0234  2039 0000 0744
       movl d0,_ls0001_+1820      |> 023A  23C0 0000 071C
                                  | LINE 124
       clrl _ls0001_+1828         |> 0240  42B9 0000 0724
                                  | LINE 125
       movl _ls0001_+1864,d0      |> 0246  2039 0000 0748
       movl d0,_ls0001_+1812      |> 024C  23C0 0000 0714
                                  | LINE 126
       movl _BTEXT+48,d0          |> 0252  2039 0000 0030
       movl d0,stode.iret         |> 0258  23C0 0000 00D8
                                  | LINE 127
       bra  stode.label_LV        |> 025E  6000 02F2
stode.label_100:
       movl _ls0001_+1864,d0      |> 0262  2039 0000 0748
       movl d0,_ls0001_+1812      |> 0268  23C0 0000 0714
                                  | LINE 142
       movl _ls0001_+1868,d0      |> 026E  2039 0000 074C
       addql #1,d0                |> 0274  5280
       movl d0,_ls0001_+1816      |> 0276  23C0 0000 0718
                                  | LINE 143
       cmpl #1,_ls0001_+1808      |> 027C  0CB9 0000 0001 0000 0710
       bnes stode.label_LH        |> 0286  660C
       movl _BTEXT+20,d0          |> 0288  2039 0000 0014
       movl d0,_ls0001_+1808      |> 028E  23C0 0000 0710
stode.label_LH:
       nop                        |> 0294  4E71
                                  | LINE 144
       movl _ls0001_+1860,d0      |> 0296  2039 0000 0744
       cmpl _ls0001_+1820,d0      |> 029C  B0B9 0000 071C
       beqs stode.label_110       |> 02A2  6752
       nop                        |> 02A4  4E71
                                  | LINE 145
       clrl d0                    |> 02A6  4280
       lea stode._00027+24:l[d0:l:l],a1
                                  |> 02A8  43F0 0DB0 0000 02C0
       movl a1,a0                 |> 02B0  2049
       jsr _cfode_                |> 02B2  4EB9 0000 0000
       movl a6@(-4),a0            |> 02B8  206E FFFC
       nop                        |> 02BC  4E71
                                  | LINE 146
       movl _ls0001_+1860,d0      |> 02BE  2039 0000 0744
       movl d0,_ls0001_+1820      |> 02C4  23C0 0000 071C
                                  | LINE 147
       movl _ls0001_+1888,d0      |> 02CA  2039 0000 0760
       cmpl _ls0001_+1868,d0      |> 02D0  B0B9 0000 074C
       bgts stode.label_120       |> 02D6  6E30
       nop                        |> 02D8  4E71
                                  | LINE 148
       movl _ls0001_+1856,d0      |> 02DA  2039 0000 0740
       movl d0,_ls0001_+1808      |> 02E0  23C0 0000 0710
                                  | LINE 149
       movl _BTEXT+16,d0          |> 02E6  2039 0000 0010
       movl d0,stode.iret         |> 02EC  23C0 0000 00D8
                                  | LINE 150
       bra  stode.label_150       |> 02F2  6000 0276
stode.label_110:
       movl _ls0001_+1888,d0      |> 02F6  2039 0000 0760
       cmpl _ls0001_+1868,d0      |> 02FC  B0B9 0000 074C
       ble  stode.label_160       |> 0302  6F00 037E
       nop                        |> 0306  4E71
                                  | LINE 152
stode.label_120:
       movl _ls0001_+1868,d0      |> 0308  2039 0000 074C
       movl d0,_ls0001_+1888      |> 030E  23C0 0000 0760
                                  | LINE 153
       movl _ls0001_+1816,d0      |> 0314  2039 0000 0718
       movl d0,_ls0001_+1856      |> 031A  23C0 0000 0740
                                  | LINE 154
       movl _BTEXT+16,d0          |> 0320  2039 0000 0010
       movl d0,stode.i            |> 0326  23C0 0000 017C
       movl _ls0001_+1856,d0      |> 032C  2039 0000 0740
       movl d0,stode._00028       |> 0332  23C0 0000 00F0
       movl stode.i,d0            |> 0338  2039 0000 017C
       cmpl stode._00028,d0       |> 033E  B0B9 0000 00F0
       bgts stode.label_LGB       |> 0344  6E4E
stode.label_LGA:
       nop                        |> 0346  4E71
                                  | LINE 155
       movl _ls0001_+1888,d0      |> 0348  2039 0000 0760
       mulsl _BTEXT+52,d0,d0      |> 034E  4C39 0800 0000 0034
       movl stode.i,d1            |> 0356  2239 0000 017C
       addl d0,d1                 |> 035C  D280
       fmoved _ls0001_+128-112:l[d1:l:d],fp0
                                  |> 035E  FA30 FC40 1FB0 0000 0010
       movl stode.i,d0            |> 0368  2039 0000 017C
       fmoved fp0,_ls0001_+24-8:l[d0:l:d]
                                  |> 036E  FA30 FC50 0FB0 0000 0010
       movl stode.i,d0            |> 0378  2039 0000 017C
       addql #1,d0                |> 037E  5280
       movl d0,stode.i            |> 0380  23C0 0000 017C
       movl stode.i,d0            |> 0386  2039 0000 017C
       cmpl stode._00028,d0       |> 038C  B0B9 0000 00F0
       bles stode.label_LGA       |> 0392  6FB2
stode.label_LGB:
       nop                        |> 0394  4E71
                                  | LINE 156
       movl _ls0001_+1888,d0      |> 0396  2039 0000 0760
       movl a0@(12),a1            |> 039C  2268 000C
       movl a1@,d1                |> 03A0  2211
       mulsl d1,d0,d0             |> 03A2  4C01 0800
       movl d0,_ls0001_+1824      |> 03A6  23C0 0000 0720
                                  | LINE 157
       clrl d0                    |> 03AC  4280
       fmoved _ls0001_+24:l[d0:l:b],fp1
                                  |> 03AE  FA30 FCC0 09B0 0000 0018
       fmuld _ls0001_+1728,fp1,fp0
                                  |> 03B8  FA39 E403 0000 06C0
       fdivd _ls0001_+1688,fp0,fp0
                                  |> 03C0  FA39 E006 0000 0698
       fmoved fp0,_ls0001_+1728   |> 03C8  FA39 FC50 0000 06C0
                                  | LINE 158
       clrl d0                    |> 03D0  4280
       fmoved _ls0001_+24:l[d0:l:b],fp0
                                  |> 03D2  FA30 FC40 09B0 0000 0018
       fmoved fp0,_ls0001_+1688   |> 03DC  FA39 FC50 0000 0698
                                  | LINE 159
       movl _ls0001_+1888,d0      |> 03E4  2039 0000 0760
       addql #2,d0                |> 03EA  5480
       fmoveld d0,fp1             |> 03EC  FA00 5CC0
       frdivd _BTEXT+56,fp1,fp0   |> 03F0  FA39 E407 0000 0038
       fmoved fp0,_ls0001_+8      |> 03F8  FA39 FC50 0000 0008
                                  | LINE 160
       movl a0@(24),a1            |> 0400  2268 0018
       movl _BTEXT+16,d0          |> 0404  2039 0000 0010
       movl a1,stode._00030+24:l[d0:l:l]
                                  |> 040A  2189 0DB0 0000 029C
       movl a0@(20),a1            |> 0412  2268 0014
       movl _BTEXT+20,d0          |> 0416  2039 0000 0014
       movl a1,stode._00030+24:l[d0:l:l]
                                  |> 041C  2189 0DB0 0000 029C
       clrl d0                    |> 0424  4280
       lea stode._00030+24:l[d0:l:l],a1
                                  |> 0426  43F0 0DB0 0000 029C
       movl a1,a0                 |> 042E  2049
       jsr _vnorx_                |> 0430  4EB9 0000 0000
       movl a6@(-4),a0            |> 0436  206E FFFC
       nop                        |> 043A  4E71
       fmoved fp0,fp0             |> 043C  FA08 FC40
       fmoved fp0,stode._00029    |> 0440  FA39 FC50 0000 0020
       movl _ls0001_+1856,d0      |> 0448  2039 0000 0740
       mulsl _BTEXT+48,d0,d0      |> 044E  4C39 0800 0000 0030
       movl _BTEXT+16,d1          |> 0456  2239 0000 0010
       addl d0,d1                 |> 045C  D280
       fmoved _ls0001_+1392-32:l[d1:l:d],fp1
                                  |> 045E  FA30 FCC0 1FB0 0000 0550
       frdivd stode._00029,fp1,fp0
                                  |> 0468  FA39 E407 0000 0020
       fmoved fp0,stode.ddn       |> 0470  FA39 FC50 0000 00C8
                                  | LINE 161
       fmoveld _ls0001_+1856,fp1  |> 0478  FA39 5CC0 0000 0740
       frdivd _BTEXT+32,fp1,fp0   |> 0480  FA39 E407 0000 0020
       fmoved fp0,stode.exdn      |> 0488  FA39 FC50 0000 00C0
                                  | LINE 162
       clrl d0                    |> 0490  4280
       lea stode._00032+20:l[d0:l:l],a1
                                  |> 0492  43F0 0DB0 0000 027C
       movl a1,a0                 |> 049A  2049
       jsr _dpwr_fortran_         |> 049C  4EB9 0000 0000
       movl a6@(-4),a0            |> 04A2  206E FFFC
       nop                        |> 04A6  4E71
       fmoved fp0,fp0             |> 04A8  FA08 FC40
       fmoved fp0,stode._00031    |> 04AC  FA39 FC50 0000 0078
       fmoved _BTEXT+64,fp0       |> 04B4  FA39 FC40 0000 0040
       fmuld stode._00031,fp0,fp0 |> 04BC  FA39 E003 0000 0078
       faddd _BTEXT+72,fp0,fp0    |> 04C4  FA39 E001 0000 0048
       frdivd _BTEXT+32,fp0,fp1   |> 04CC  FA39 E087 0000 0020
       fmoved fp1,stode.rhdn      |> 04D4  FA39 FCD0 0000 0010
                                  | LINE 163
       fmoved stode.rhdn,fp0      |> 04DC  FA39 FC40 0000 0010
       fmind _BTEXT+32,fp0,fp0    |> 04E4  FA39 E009 0000 0020
       fmoved fp0,stode.rh        |> 04EC  FA39 FC50 0000 00B8
                                  | LINE 164
       movl _BTEXT+48,d0          |> 04F4  2039 0000 0030
       movl d0,stode.iredo        |> 04FA  23C0 0000 00E8
                                  | LINE 165
       fmoved _ls0001_+1696,fp0   |> 0500  FA39 FC40 0000 06A0
       fmoved _ls0001_+1376,fp1   |> 0508  FA39 FCC0 0000 0560
       fcmpd fp1,fp0              |> 0510  FA09 E002
       fbeq  stode.label_170      |> 0514  FA81 01BC
       nop                        |> 0518  4E71
                                  | LINE 166
       fmoved _ls0001_+1696,fp0   |> 051A  FA39 FC40 0000 06A0
       fdivd _ls0001_+1376,fp0,fp0
                                  |> 0522  FA39 E006 0000 0560
       fabsd fp0,fp0              |> 052A  FA08 E021
       fmind stode.rh,fp0,fp1     |> 052E  FA39 E089 0000 00B8
       fmoved fp1,stode.rh        |> 0536  FA39 FCD0 0000 00B8
                                  | LINE 167
       fmoved _ls0001_+1376,fp0   |> 053E  FA39 FC40 0000 0560
       fmoved fp0,_ls0001_+1696   |> 0546  FA39 FC50 0000 06A0
                                  | LINE 168
       bra  stode.label_175       |> 054E  6000 01A2
stode.label_LV:
       clrl d0                    |> 0552  4280
       lea stode._00033+24:l[d0:l:l],a1
                                  |> 0554  43F0 0DB0 0000 025C
       movl a1,a0                 |> 055C  2049
       jsr _cfode_                |> 055E  4EB9 0000 0000
       movl a6@(-4),a0            |> 0564  206E FFFC
       nop                        |> 0568  4E71
                                  | LINE 175
stode.label_150:
       movl _BTEXT+16,d0          |> 056A  2039 0000 0010
       movl d0,stode.i            |> 0570  23C0 0000 017C
       movl _ls0001_+1856,d0      |> 0576  2039 0000 0740
       movl d0,stode._00034       |> 057C  23C0 0000 0134
       movl stode.i,d0            |> 0582  2039 0000 017C
       cmpl stode._00034,d0       |> 0588  B0B9 0000 0134
       bgts stode.label_LGE       |> 058E  6E4E
stode.label_LGD:
       nop                        |> 0590  4E71
                                  | LINE 176
       movl _ls0001_+1888,d0      |> 0592  2039 0000 0760
       mulsl _BTEXT+52,d0,d0      |> 0598  4C39 0800 0000 0034
       movl stode.i,d1            |> 05A0  2239 0000 017C
       addl d0,d1                 |> 05A6  D280
       fmoved _ls0001_+128-112:l[d1:l:d],fp0
                                  |> 05A8  FA30 FC40 1FB0 0000 0010
       movl stode.i,d0            |> 05B2  2039 0000 017C
       fmoved fp0,_ls0001_+24-8:l[d0:l:d]
                                  |> 05B8  FA30 FC50 0FB0 0000 0010
       movl stode.i,d0            |> 05C2  2039 0000 017C
       addql #1,d0                |> 05C8  5280
       movl d0,stode.i            |> 05CA  23C0 0000 017C
       movl stode.i,d0            |> 05D0  2039 0000 017C
       cmpl stode._00034,d0       |> 05D6  B0B9 0000 0134
       bles stode.label_LGD       |> 05DC  6FB2
stode.label_LGE:
       nop                        |> 05DE  4E71
                                  | LINE 177
       movl _ls0001_+1888,d0      |> 05E0  2039 0000 0760
       movl a0@(12),a1            |> 05E6  2268 000C
       movl a1@,d1                |> 05EA  2211
       mulsl d1,d0,d0             |> 05EC  4C01 0800
       movl d0,_ls0001_+1824      |> 05F0  23C0 0000 0720
                                  | LINE 178
       clrl d0                    |> 05F6  4280
       fmoved _ls0001_+24:l[d0:l:b],fp1
                                  |> 05F8  FA30 FCC0 09B0 0000 0018
       fmuld _ls0001_+1728,fp1,fp0
                                  |> 0602  FA39 E403 0000 06C0
       fdivd _ls0001_+1688,fp0,fp0
                                  |> 060A  FA39 E006 0000 0698
       fmoved fp0,_ls0001_+1728   |> 0612  FA39 FC50 0000 06C0
                                  | LINE 179
       clrl d0                    |> 061A  4280
       fmoved _ls0001_+24:l[d0:l:b],fp0
                                  |> 061C  FA30 FC40 09B0 0000 0018
       fmoved fp0,_ls0001_+1688   |> 0626  FA39 FC50 0000 0698
                                  | LINE 180
       movl _ls0001_+1888,d0      |> 062E  2039 0000 0760
       addql #2,d0                |> 0634  5480
       fmoveld d0,fp1             |> 0636  FA00 5CC0
       frdivd _BTEXT+56,fp1,fp0   |> 063A  FA39 E407 0000 0038
       fmoved fp0,_ls0001_+8      |> 0642  FA39 FC50 0000 0008
                                  | LINE 181
       movl stode.iret,d0         |> 064A  2039 0000 00D8
       movl d0,stode._00035       |> 0650  23C0 0000 0120
       cmpl #1,stode._00035       |> 0656  0CB9 0000 0001 0000 0120
       blts stode.label_160       |> 0660  6D20
       nop                        |> 0662  4E71
       cmpl #3,stode._00035       |> 0664  0CB9 0000 0003 0000 0120
       bgts stode.label_160       |> 066E  6E12
       nop                        |> 0670  4E71
       movl stode._00035,d0       |> 0672  2039 0000 0120
       movl stode._00036-4:l[d0:l:l],a1
                                  |> 0678  2270 0DB0 0000 0234
       jmp a1@                    |> 0680  4ED1
                                  | LINE 188
stode.label_160:
       fmoved _ls0001_+1696,fp0   |> 0682  FA39 FC40 0000 06A0
       fmoved _ls0001_+1376,fp1   |> 068A  FA39 FCC0 0000 0560
       fcmpd fp1,fp0              |> 0692  FA09 E002
       fbeq  stode.label_200      |> 0696  FA81 021E
       nop                        |> 069A  4E71
                                  | LINE 189
       fmoved _ls0001_+1696,fp0   |> 069C  FA39 FC40 0000 06A0
       fdivd _ls0001_+1376,fp0,fp0
                                  |> 06A4  FA39 E006 0000 0560
       fmoved fp0,stode.rh        |> 06AC  FA39 FC50 0000 00B8
                                  | LINE 190
       fmoved _ls0001_+1376,fp0   |> 06B4  FA39 FC40 0000 0560
       fmoved fp0,_ls0001_+1696   |> 06BC  FA39 FC50 0000 06A0
                                  | LINE 191
       movl _BTEXT+48,d0          |> 06C4  2039 0000 0030
       movl d0,stode.iredo        |> 06CA  23C0 0000 00E8
                                  | LINE 192
       bras stode.label_175       |> 06D0  6020
stode.label_170:
       fabsd _ls0001_+1696,fp1    |> 06D2  FA39 E0A1 0000 06A0
       frdivd _ls0001_+1704,fp1,fp0
                                  |> 06DA  FA39 E407 0000 06A8
       fmaxd stode.rh,fp0,fp1     |> 06E2  FA39 E088 0000 00B8
       fmoved fp1,stode.rh        |> 06EA  FA39 FCD0 0000 00B8
                                  | LINE 194
stode.label_175:
       fmoved stode.rh,fp0        |> 06F2  FA39 FC40 0000 00B8
       fmind _ls0001_+1384,fp0,fp0
                                  |> 06FA  FA39 E009 0000 0568
       fmoved fp0,stode.rh        |> 0702  FA39 FC50 0000 00B8
                                  | LINE 195
       fabsd _ls0001_+1696,fp0    |> 070A  FA39 E021 0000 06A0
       fmuld _ls0001_+1712,fp0,fp0
                                  |> 0712  FA39 E003 0000 06B0
       fmuld stode.rh,fp0,fp0     |> 071A  FA39 E003 0000 00B8
       fmaxd _BTEXT+32,fp0,fp1    |> 0722  FA39 E088 0000 0020
       frdivd stode.rh,fp1,fp0    |> 072A  FA39 E407 0000 00B8
       fmoved fp0,stode.rh        |> 0732  FA39 FC50 0000 00B8
                                  | LINE 196
       fmoved _BTEXT+32,fp0       |> 073A  FA39 FC40 0000 0020
       fmoved fp0,stode.r         |> 0742  FA39 FC50 0000 0008
                                  | LINE 197
       movl _BTEXT+20,d0          |> 074A  2039 0000 0014
       movl d0,stode.j            |> 0750  23C0 0000 016C
       movl _ls0001_+1856,d0      |> 0756  2039 0000 0740
       movl d0,stode._00037       |> 075C  23C0 0000 00FC
       movl stode.j,d0            |> 0762  2039 0000 016C
       cmpl stode._00037,d0       |> 0768  B0B9 0000 00FC
       bgt  stode.label_LGL       |> 076E  6E00 00FC
stode.label_LGI:
       nop                        |> 0772  4E71
                                  | LINE 199
       movl stode.j,d0            |> 0774  2039 0000 016C
       subql #1,d0                |> 077A  5380
       movl d0,stode._00040       |> 077C  23C0 0000 0184
       clrl d0                    |> 0782  4280
       lea stode._00039+20:l[d0:l:l],a1
                                  |> 0784  43F0 0DB0 0000 0230
       movl a1,a0                 |> 078C  2049
       jsr _djpwr_fortran_        |> 078E  4EB9 0000 0000
       movl a6@(-4),a0            |> 0794  206E FFFC
       nop                        |> 0798  4E71
       fmoved fp0,fp0             |> 079A  FA08 FC40
       fmoved fp0,stode._00038    |> 079E  FA39 FC50 0000 0030
       fmoved stode._00038,fp0    |> 07A6  FA39 FC40 0000 0030
       fmoved fp0,stode.r         |> 07AE  FA39 FC50 0000 0008
                                  | LINE 200
       movl _BTEXT+16,d0          |> 07B6  2039 0000 0010
       movl d0,stode.i            |> 07BC  23C0 0000 017C
       movl _ls0001_+1884,d0      |> 07C2  2039 0000 075C
       movl d0,stode._00041       |> 07C8  23C0 0000 0160
       movl stode.i,d0            |> 07CE  2039 0000 017C
       cmpl stode._00041,d0       |> 07D4  B0B9 0000 0160
       bgts stode.label_LGK       |> 07DA  6E72
stode.label_LGJ:
       nop                        |> 07DC  4E71
                                  | LINE 201
       movl stode.j,d0            |> 07DE  2039 0000 016C
       mulsl stode._00025,d0,d0   |> 07E4  4C39 0800 0000 011C
       movl stode.i,d1            |> 07EC  2239 0000 017C
       addl d0,d1                 |> 07F2  D280
       subl stode._00026,d1       |> 07F4  92B9 0000 0110
       movl a0@(8),a1             |> 07FA  2268 0008
       fmoved a1@(0:b)[d1:l:d],fp0
                                  |> 07FE  FA31 FC40 1E00
       fmuld stode.r,fp0,fp0      |> 0804  FA39 E003 0000 0008
       movl stode.j,d0            |> 080C  2039 0000 016C
       mulsl stode._00025,d0,d0   |> 0812  4C39 0800 0000 011C
       movl stode.i,d1            |> 081A  2239 0000 017C
       addl d0,d1                 |> 0820  D280
       subl stode._00026,d1       |> 0822  92B9 0000 0110
       movl a0@(8),a1             |> 0828  2268 0008
       fmoved fp0,a1@(0:b)[d1:l:d]
                                  |> 082C  FA31 FC50 1E00
       movl stode.i,d0            |> 0832  2039 0000 017C
       addql #1,d0                |> 0838  5280
       movl d0,stode.i            |> 083A  23C0 0000 017C
       movl stode.i,d0            |> 0840  2039 0000 017C
       cmpl stode._00041,d0       |> 0846  B0B9 0000 0160
       bles stode.label_LGJ       |> 084C  6F8E
stode.label_LGK:
       movl stode.j,d0            |> 084E  2039 0000 016C
       addql #1,d0                |> 0854  5280
       movl d0,stode.j            |> 0856  23C0 0000 016C
       movl stode.j,d0            |> 085C  2039 0000 016C
       cmpl stode._00037,d0       |> 0862  B0B9 0000 00FC
       ble  stode.label_LGI       |> 0868  6F00 FF08
stode.label_LGL:
       nop                        |> 086C  4E71
                                  | LINE 202
       fmoved _ls0001_+1696,fp0   |> 086E  FA39 FC40 0000 06A0
       fmuld stode.rh,fp0,fp0     |> 0876  FA39 E003 0000 00B8
       fmoved fp0,_ls0001_+1696   |> 087E  FA39 FC50 0000 06A0
                                  | LINE 203
       fmoved _ls0001_+1728,fp0   |> 0886  FA39 FC40 0000 06C0
       fmuld stode.rh,fp0,fp0     |> 088E  FA39 E003 0000 00B8
       fmoved fp0,_ls0001_+1728   |> 0896  FA39 FC50 0000 06C0
                                  | LINE 204
       movl _ls0001_+1856,d0      |> 089E  2039 0000 0740
       movl d0,_ls0001_+1808      |> 08A4  23C0 0000 0710
                                  | LINE 205
       tstl stode.iredo           |> 08AA  4AB9 0000 00E8
       beq  stode.label_690       |> 08B0  6700 16FE
       nop                        |> 08B4  4E71
                                  | LINE 214
stode.label_200:
       fmoved _ls0001_+1728,fp0   |> 08B6  FA39 FC40 0000 06C0
       fsubd _BTEXT+32,fp0,fp0    |> 08BE  FA39 E004 0000 0020
       fabsd fp0,fp0              |> 08C6  FA08 E021
       fmoved _ls0001_+1680,fp1   |> 08CA  FA39 FCC0 0000 0690
       fcmpd fp1,fp0              |> 08D2  FA09 E002
       fble  stode.label_LBK      |> 08D6  FA95 000E
       movl _ls0001_+1864,d0      |> 08DA  2039 0000 0748
       movl d0,_ls0001_+1812      |> 08E0  23C0 0000 0714
stode.label_LBK:
       nop                        |> 08E6  4E71
                                  | LINE 215
       movl _ls0001_+1828,d0      |> 08E8  2039 0000 0724
       addl _ls0001_+1876,d0      |> 08EE  D0B9 0000 0754
       cmpl _ls0001_+1892,d0      |> 08F4  B0B9 0000 0764
       bgts stode.label_LBM       |> 08FA  6E0C
       movl _ls0001_+1864,d0      |> 08FC  2039 0000 0748
       movl d0,_ls0001_+1812      |> 0902  23C0 0000 0714
stode.label_LBM:
       nop                        |> 0908  4E71
                                  | LINE 216
       fmoved _ls0001_+1736,fp0   |> 090A  FA39 FC40 0000 06C8
       faddd _ls0001_+1696,fp0,fp0
                                  |> 0912  FA39 E001 0000 06A0
       fmoved fp0,_ls0001_+1736   |> 091A  FA39 FC50 0000 06C8
                                  | LINE 217
       movl _ls0001_+1824,d0      |> 0922  2039 0000 0720
       addql #1,d0                |> 0928  5280
       movl d0,stode.i1           |> 092A  23C0 0000 00D0
                                  | LINE 218
       movl _BTEXT+16,d0          |> 0930  2039 0000 0010
       movl d0,stode.jb           |> 0936  23C0 0000 0180
       movl _ls0001_+1888,d0      |> 093C  2039 0000 0760
       movl d0,stode._00042       |> 0942  23C0 0000 0154
       movl stode.jb,d0           |> 0948  2039 0000 0180
       cmpl stode._00042,d0       |> 094E  B0B9 0000 0154
       bgt  stode.label_LGS       |> 0954  6E00 00C6
stode.label_LGP:
       nop                        |> 0958  4E71
                                  | LINE 219
       movl stode.i1,d0           |> 095A  2039 0000 00D0
       movl a0@(12),a1            |> 0960  2268 000C
       movl a1@,d1                |> 0964  2211
       subl d1,d0                 |> 0966  9081
       movl d0,stode.i1           |> 0968  23C0 0000 00D0
                                  | LINE 222
       movl stode.i1,d0           |> 096E  2039 0000 00D0
       movl d0,stode._00043       |> 0974  23C0 0000 0144
       movl stode._00043,d0       |> 097A  2039 0000 0144
       movl d0,stode.i            |> 0980  23C0 0000 017C
       movl _ls0001_+1824,d0      |> 0986  2039 0000 0720
       movl d0,stode._00044       |> 098C  23C0 0000 0138
       movl stode.i,d0            |> 0992  2039 0000 017C
       cmpl stode._00044,d0       |> 0998  B0B9 0000 0138
       bgts stode.label_LGR       |> 099E  6E5A
stode.label_LGQ:
       nop                        |> 09A0  4E71
                                  | LINE 223
       movl stode.i,d0            |> 09A2  2039 0000 017C
       movl a0@(16),a1            |> 09A8  2268 0010
       fmoved a1@(-8:b)[d0:l:d],fp0
                                  |> 09AC  FA31 FC40 0EF8
       movl stode.i,d0            |> 09B2  2039 0000 017C
       movl a0@(12),a1            |> 09B8  2268 000C
       movl a1@,d1                |> 09BC  2211
       addl d1,d0                 |> 09BE  D081
       movl a0@(16),a1            |> 09C0  2268 0010
       fmoved a1@(-8:b)[d0:l:d],fp1
                                  |> 09C4  FA31 FCC0 0EF8
       faddd fp1,fp0,fp0          |> 09CA  FA09 E001
       movl stode.i,d0            |> 09CE  2039 0000 017C
       movl a0@(16),a1            |> 09D4  2268 0010
       fmoved fp0,a1@(-8:b)[d0:l:d]
                                  |> 09D8  FA31 FC50 0EF8
       movl stode.i,d0            |> 09DE  2039 0000 017C
       addql #1,d0                |> 09E4  5280
       movl d0,stode.i            |> 09E6  23C0 0000 017C
       movl stode.i,d0            |> 09EC  2039 0000 017C
       cmpl stode._00044,d0       |> 09F2  B0B9 0000 0138
       bles stode.label_LGQ       |> 09F8  6FA6
stode.label_LGR:
       nop                        |> 09FA  4E71
                                  | LINE 224
       nop                        |> 09FC  4E71
       movl stode.jb,d0           |> 09FE  2039 0000 0180
       addql #1,d0                |> 0A04  5280
       movl d0,stode.jb           |> 0A06  23C0 0000 0180
       movl stode.jb,d0           |> 0A0C  2039 0000 0180
       cmpl stode._00042,d0       |> 0A12  B0B9 0000 0154
       ble  stode.label_LGP       |> 0A18  6F00 FF3E
stode.label_LGS:
       nop                        |> 0A1C  4E71
                                  | LINE 231
stode.label_220:
       clrl stode.m               |> 0A1E  42B9 0000 0108
                                  | LINE 232
       movl _BTEXT+16,d0          |> 0A24  2039 0000 0010
       movl d0,stode.i            |> 0A2A  23C0 0000 017C
       movl _ls0001_+1884,d0      |> 0A30  2039 0000 075C
       movl d0,stode._00045       |> 0A36  23C0 0000 0124
       movl stode.i,d0            |> 0A3C  2039 0000 017C
       cmpl stode._00045,d0       |> 0A42  B0B9 0000 0124
       bgts stode.label_LGU       |> 0A48  6E4A
stode.label_LGT:
       nop                        |> 0A4A  4E71
                                  | LINE 233
       movl stode.i,d0            |> 0A4C  2039 0000 017C
       addl stode._00025,d0       |> 0A52  D0B9 0000 011C
       subl stode._00026,d0       |> 0A58  90B9 0000 0110
       movl a0@(8),a1             |> 0A5E  2268 0008
       fmoved a1@(0:b)[d0:l:d],fp0
                                  |> 0A62  FA31 FC40 0E00
       movl stode.i,d0            |> 0A68  2039 0000 017C
       movl a0@(4),a1             |> 0A6E  2268 0004
       fmoved fp0,a1@(-8:b)[d0:l:d]
                                  |> 0A72  FA31 FC50 0EF8
       movl stode.i,d0            |> 0A78  2039 0000 017C
       addql #1,d0                |> 0A7E  5280
       movl d0,stode.i            |> 0A80  23C0 0000 017C
       movl stode.i,d0            |> 0A86  2039 0000 017C
       cmpl stode._00045,d0       |> 0A8C  B0B9 0000 0124
       bles stode.label_LGT       |> 0A92  6FB6
stode.label_LGU:
       nop                        |> 0A94  4E71
                                  | LINE 234
       movl a0@,a1                |> 0A96  2250
       clrl d0                    |> 0A98  4280
       movl a1,stode._00046+28:l[d0:l:l]
                                  |> 0A9A  2189 0DB0 0000 020C
       movl a0@(4),a1             |> 0AA2  2268 0004
       movl _BTEXT+20,d0          |> 0AA6  2039 0000 0014
       movl a1,stode._00046+28:l[d0:l:l]
                                  |> 0AAC  2189 0DB0 0000 020C
       movl a0@(24),a1            |> 0AB4  2268 0018
       movl _BTEXT+48,d0          |> 0AB8  2039 0000 0030
       movl a1,stode._00046+28:l[d0:l:l]
                                  |> 0ABE  2189 0DB0 0000 020C
       clrl d0                    |> 0AC6  4280
       lea stode._00046+28:l[d0:l:l],a1
                                  |> 0AC8  43F0 0DB0 0000 020C
       movl a1,a0                 |> 0AD0  2049
       movl stode._00016,a1       |> 0AD2  2279 0000 010C
       jsr a1@                    |> 0AD8  4E91
       movl a6@(-4),a0            |> 0ADA  206E FFFC
       nop                        |> 0ADE  4E71
                                  | LINE 235
       movl _ls0001_+1896,d0      |> 0AE0  2039 0000 0768
       addql #1,d0                |> 0AE6  5280
       movl d0,_ls0001_+1896      |> 0AE8  23C0 0000 0768
                                  | LINE 236
       tstl _ls0001_+1812         |> 0AEE  4AB9 0000 0714
       ble  stode.label_250       |> 0AF4  6F00 0120
       nop                        |> 0AF8  4E71
                                  | LINE 242
       clrl _ls0001_+1812         |> 0AFA  42B9 0000 0714
                                  | LINE 243
       fmoved _BTEXT+32,fp0       |> 0B00  FA39 FC40 0000 0020
       fmoved fp0,_ls0001_+1728   |> 0B08  FA39 FC50 0000 06C0
                                  | LINE 244
       movl _ls0001_+1892,d0      |> 0B10  2039 0000 0764
       movl d0,_ls0001_+1828      |> 0B16  23C0 0000 0724
                                  | LINE 245
       fmoved _BTEXT+40,fp0       |> 0B1C  FA39 FC40 0000 0028
       fmoved fp0,_ls0001_+16     |> 0B24  FA39 FC50 0000 0010
                                  | LINE 246
       movl a0@,a1                |> 0B2C  2250
       clrl d0                    |> 0B2E  4280
       movl a1,stode._00047+56:l[d0:l:l]
                                  |> 0B30  2189 0DB0 0000 01C4
       movl a0@(4),a1             |> 0B38  2268 0004
       movl _BTEXT+16,d0          |> 0B3C  2039 0000 0010
       movl a1,stode._00047+56:l[d0:l:l]
                                  |> 0B42  2189 0DB0 0000 01C4
       movl a0@(8),a1             |> 0B4A  2268 0008
       movl _BTEXT+20,d0          |> 0B4E  2039 0000 0014
       movl a1,stode._00047+56:l[d0:l:l]
                                  |> 0B54  2189 0DB0 0000 01C4
       movl a0@(12),a1            |> 0B5C  2268 000C
       movl _BTEXT+48,d0          |> 0B60  2039 0000 0030
       movl a1,stode._00047+56:l[d0:l:l]
                                  |> 0B66  2189 0DB0 0000 01C4
       movl a0@(20),a1            |> 0B6E  2268 0014
       movl _BTEXT+80,d0          |> 0B72  2039 0000 0050
       movl a1,stode._00047+56:l[d0:l:l]
                                  |> 0B78  2189 0DB0 0000 01C4
       movl a0@(28),a1            |> 0B80  2268 001C
       movl _BTEXT+84,d0          |> 0B84  2039 0000 0054
       movl a1,stode._00047+56:l[d0:l:l]
                                  |> 0B8A  2189 0DB0 0000 01C4
       movl a0@(24),a1            |> 0B92  2268 0018
       movl _BTEXT+88,d0          |> 0B96  2039 0000 0058
       movl a1,stode._00047+56:l[d0:l:l]
                                  |> 0B9C  2189 0DB0 0000 01C4
       movl a0@(32),a1            |> 0BA4  2268 0020
       movl _BTEXT+92,d0          |> 0BA8  2039 0000 005C
       movl a1,stode._00047+56:l[d0:l:l]
                                  |> 0BAE  2189 0DB0 0000 01C4
       movl a0@(36),a1            |> 0BB6  2268 0024
       movl _BTEXT+96,d0          |> 0BBA  2039 0000 0060
       movl a1,stode._00047+56:l[d0:l:l]
                                  |> 0BC0  2189 0DB0 0000 01C4
       movl stode._00016,a1       |> 0BC8  2279 0000 010C
       movl _BTEXT+100,d0         |> 0BCE  2039 0000 0064
       movl a1,stode._00047+56:l[d0:l:l]
                                  |> 0BD4  2189 0DB0 0000 01C4
       movl stode._00018,a1       |> 0BDC  2279 0000 00EC
       movl _BTEXT+104,d0         |> 0BE2  2039 0000 0068
       movl a1,stode._00047+56:l[d0:l:l]
                                  |> 0BE8  2189 0DB0 0000 01C4
       clrl d0                    |> 0BF0  4280
       lea stode._00047+56:l[d0:l:l],a1
                                  |> 0BF2  43F0 0DB0 0000 01C4
       movl a1,a0                 |> 0BFA  2049
       movl stode._00020,a1       |> 0BFC  2279 0000 0170
       jsr a1@                    |> 0C02  4E91
       movl a6@(-4),a0            |> 0C04  206E FFFC
       nop                        |> 0C08  4E71
                                  | LINE 247
       tstl _ls0001_+1836         |> 0C0A  4AB9 0000 072C
       bne  stode.label_430       |> 0C10  6600 0630
       nop                        |> 0C14  4E71
                                  | LINE 248
stode.label_250:
       movl _BTEXT+16,d0          |> 0C16  2039 0000 0010
       movl d0,stode.i            |> 0C1C  23C0 0000 017C
       movl _ls0001_+1884,d0      |> 0C22  2039 0000 075C
       movl d0,stode._00048       |> 0C28  23C0 0000 00F4
       movl stode.i,d0            |> 0C2E  2039 0000 017C
       cmpl stode._00048,d0       |> 0C34  B0B9 0000 00F4
       bgts stode.label_LGY       |> 0C3A  6E36
stode.label_LGX:
       nop                        |> 0C3C  4E71
                                  | LINE 249
       fmoved _BTEXT+8,fp0        |> 0C3E  FA39 FC40 0000 0008
       movl stode.i,d0            |> 0C46  2039 0000 017C
       movl a0@(28),a1            |> 0C4C  2268 001C
       fmoved fp0,a1@(-8:b)[d0:l:d]
                                  |> 0C50  FA31 FC50 0EF8
       movl stode.i,d0            |> 0C56  2039 0000 017C
       addql #1,d0                |> 0C5C  5280
       movl d0,stode.i            |> 0C5E  23C0 0000 017C
       movl stode.i,d0            |> 0C64  2039 0000 017C
       cmpl stode._00048,d0       |> 0C6A  B0B9 0000 00F4
       bles stode.label_LGX       |> 0C70  6FCA
stode.label_LGY:
       nop                        |> 0C72  4E71
                                  | LINE 250
stode.label_270:
       tstl _ls0001_+1864         |> 0C74  4AB9 0000 0748
       bne  stode.label_350       |> 0C7A  6600 01EA
       nop                        |> 0C7E  4E71
                                  | LINE 255
       movl _BTEXT+16,d0          |> 0C80  2039 0000 0010
       movl d0,stode.i            |> 0C86  23C0 0000 017C
       movl _ls0001_+1884,d0      |> 0C8C  2039 0000 075C
       movl d0,stode._00049       |> 0C92  23C0 0000 00DC
       movl stode.i,d0            |> 0C98  2039 0000 017C
       cmpl stode._00049,d0       |> 0C9E  B0B9 0000 00DC
       bgt  stode.label_LHB       |> 0CA4  6E00 00A8
stode.label_LHA:
       nop                        |> 0CA8  4E71
                                  | LINE 256
       movl stode.i,d0            |> 0CAA  2039 0000 017C
       movl a0@(24),a1            |> 0CB0  2268 0018
       fmoved a1@(-8:b)[d0:l:d],fp1
                                  |> 0CB4  FA31 FCC0 0EF8
       fmuld _ls0001_+1696,fp1,fp0
                                  |> 0CBA  FA39 E403 0000 06A0
       movl _BTEXT+20,d0          |> 0CC2  2039 0000 0014
       mulsl stode._00025,d0,d0   |> 0CC8  4C39 0800 0000 011C
       movl stode.i,d1            |> 0CD0  2239 0000 017C
       addl d0,d1                 |> 0CD6  D280
       subl stode._00026,d1       |> 0CD8  92B9 0000 0110
       movl a0@(8),a1             |> 0CDE  2268 0008
       fmoved a1@(0:b)[d1:l:d],fp1
                                  |> 0CE2  FA31 FCC0 1E00
       fsubd fp1,fp0,fp0          |> 0CE8  FA09 E004
       movl stode.i,d0            |> 0CEC  2039 0000 017C
       movl a0@(24),a1            |> 0CF2  2268 0018
       fmoved fp0,a1@(-8:b)[d0:l:d]
                                  |> 0CF6  FA31 FC50 0EF8
                                  | LINE 257
       movl stode.i,d0            |> 0CFC  2039 0000 017C
       movl a0@(24),a1            |> 0D02  2268 0018
       fmoved a1@(-8:b)[d0:l:d],fp0
                                  |> 0D06  FA31 FC40 0EF8
       movl stode.i,d0            |> 0D0C  2039 0000 017C
       movl a0@(28),a1            |> 0D12  2268 001C
       fmoved a1@(-8:b)[d0:l:d],fp1
                                  |> 0D16  FA31 FCC0 0EF8
       fsubd fp1,fp0,fp0          |> 0D1C  FA09 E004
       movl stode.i,d0            |> 0D20  2039 0000 017C
       movl a0@(4),a1             |> 0D26  2268 0004
       fmoved fp0,a1@(-8:b)[d0:l:d]
                                  |> 0D2A  FA31 FC50 0EF8
       movl stode.i,d0            |> 0D30  2039 0000 017C
       addql #1,d0                |> 0D36  5280
       movl d0,stode.i            |> 0D38  23C0 0000 017C
       movl stode.i,d0            |> 0D3E  2039 0000 017C
       cmpl stode._00049,d0       |> 0D44  B0B9 0000 00DC
       ble  stode.label_LHA       |> 0D4A  6F00 FF5C
stode.label_LHB:
       nop                        |> 0D4E  4E71
                                  | LINE 258
       movl a0@(4),a1             |> 0D50  2268 0004
       movl _BTEXT+16,d0          |> 0D54  2039 0000 0010
       movl a1,stode._00051+24:l[d0:l:l]
                                  |> 0D5A  2189 0DB0 0000 0180
       movl a0@(20),a1            |> 0D62  2268 0014
       movl _BTEXT+20,d0          |> 0D66  2039 0000 0014
       movl a1,stode._00051+24:l[d0:l:l]
                                  |> 0D6C  2189 0DB0 0000 0180
       clrl d0                    |> 0D74  4280
       lea stode._00051+24:l[d0:l:l],a1
                                  |> 0D76  43F0 0DB0 0000 0180
       movl a1,a0                 |> 0D7E  2049
       jsr _vnorx_                |> 0D80  4EB9 0000 0000
       movl a6@(-4),a0            |> 0D86  206E FFFC
       nop                        |> 0D8A  4E71
       fmoved fp0,fp0             |> 0D8C  FA08 FC40
       fmoved fp0,stode._00050    |> 0D90  FA39 FC50 0000 0088
       fmoved stode._00050,fp0    |> 0D98  FA39 FC40 0000 0088
       fmoved fp0,stode.del       |> 0DA0  FA39 FC50 0000 0090
                                  | LINE 259
       movl _BTEXT+16,d0          |> 0DA8  2039 0000 0010
       movl d0,stode.i            |> 0DAE  23C0 0000 017C
       movl _ls0001_+1884,d0      |> 0DB4  2039 0000 075C
       movl d0,stode._00052       |> 0DBA  23C0 0000 0158
       movl stode.i,d0            |> 0DC0  2039 0000 017C
       cmpl stode._00052,d0       |> 0DC6  B0B9 0000 0158
       bgt  stode.label_LHD       |> 0DCC  6E00 0092
stode.label_LHC:
       nop                        |> 0DD0  4E71
                                  | LINE 260
       clrl d0                    |> 0DD2  4280
       fmoved _ls0001_+24:l[d0:l:b],fp0
                                  |> 0DD4  FA30 FC40 09B0 0000 0018
       movl stode.i,d0            |> 0DDE  2039 0000 017C
       movl a0@(24),a1            |> 0DE4  2268 0018
       fmoved a1@(-8:b)[d0:l:d],fp1
                                  |> 0DE8  FA31 FCC0 0EF8
       fmuld fp1,fp0,fp0          |> 0DEE  FA09 E003
       movl stode.i,d0            |> 0DF2  2039 0000 017C
       addl stode._00025,d0       |> 0DF8  D0B9 0000 011C
       subl stode._00026,d0       |> 0DFE  90B9 0000 0110
       movl a0@(8),a1             |> 0E04  2268 0008
       fmoved a1@(0:b)[d0:l:d],fp1
                                  |> 0E08  FA31 FCC0 0E00
       faddd fp0,fp1,fp1          |> 0E0E  FA08 E481
       movl stode.i,d0            |> 0E12  2039 0000 017C
       movl a0@(4),a1             |> 0E18  2268 0004
       fmoved fp1,a1@(-8:b)[d0:l:d]
                                  |> 0E1C  FA31 FCD0 0EF8
                                  | LINE 261
       movl stode.i,d0            |> 0E22  2039 0000 017C
       movl a0@(24),a1            |> 0E28  2268 0018
       fmoved a1@(-8:b)[d0:l:d],fp0
                                  |> 0E2C  FA31 FC40 0EF8
       movl stode.i,d0            |> 0E32  2039 0000 017C
       movl a0@(28),a1            |> 0E38  2268 001C
       fmoved fp0,a1@(-8:b)[d0:l:d]
                                  |> 0E3C  FA31 FC50 0EF8
       movl stode.i,d0            |> 0E42  2039 0000 017C
       addql #1,d0                |> 0E48  5280
       movl d0,stode.i            |> 0E4A  23C0 0000 017C
       movl stode.i,d0            |> 0E50  2039 0000 017C
       cmpl stode._00052,d0       |> 0E56  B0B9 0000 0158
       ble  stode.label_LHC       |> 0E5C  6F00 FF72
stode.label_LHD:
       nop                        |> 0E60  4E71
                                  | LINE 262
       bra  stode.label_400       |> 0E62  6000 024E
stode.label_350:
       movl _BTEXT+16,d0          |> 0E66  2039 0000 0010
       movl d0,stode.i            |> 0E6C  23C0 0000 017C
       movl _ls0001_+1884,d0      |> 0E72  2039 0000 075C
       movl d0,stode._00053       |> 0E78  23C0 0000 0148
       movl stode.i,d0            |> 0E7E  2039 0000 017C
       cmpl stode._00053,d0       |> 0E84  B0B9 0000 0148
       bgt  stode.label_LHF       |> 0E8A  6E00 0088
stode.label_LHE:
       nop                        |> 0E8E  4E71
                                  | LINE 269
       movl stode.i,d0            |> 0E90  2039 0000 017C
       movl a0@(24),a1            |> 0E96  2268 0018
       fmoved a1@(-8:b)[d0:l:d],fp1
                                  |> 0E9A  FA31 FCC0 0EF8
       fmuld _ls0001_+1696,fp1,fp0
                                  |> 0EA0  FA39 E403 0000 06A0
       movl _BTEXT+20,d0          |> 0EA8  2039 0000 0014
       mulsl stode._00025,d0,d0   |> 0EAE  4C39 0800 0000 011C
       movl stode.i,d1            |> 0EB6  2239 0000 017C
       addl d0,d1                 |> 0EBC  D280
       subl stode._00026,d1       |> 0EBE  92B9 0000 0110
       movl a0@(8),a1             |> 0EC4  2268 0008
       fmoved a1@(0:b)[d1:l:d],fp1
                                  |> 0EC8  FA31 FCC0 1E00
       movl stode.i,d0            |> 0ECE  2039 0000 017C
       movl a0@(28),a1            |> 0ED4  2268 001C
       fmoved a1@(-8:b)[d0:l:d],fp2
                                  |> 0ED8  FA31 FD40 0EF8
       faddd fp2,fp1,fp1          |> 0EDE  FA0A E481
       fsubd fp1,fp0,fp0          |> 0EE2  FA09 E004
       movl stode.i,d0            |> 0EE6  2039 0000 017C
       movl a0@(4),a1             |> 0EEC  2268 0004
       fmoved fp0,a1@(-8:b)[d0:l:d]
                                  |> 0EF0  FA31 FC50 0EF8
       movl stode.i,d0            |> 0EF6  2039 0000 017C
       addql #1,d0                |> 0EFC  5280
       movl d0,stode.i            |> 0EFE  23C0 0000 017C
       movl stode.i,d0            |> 0F04  2039 0000 017C
       cmpl stode._00053,d0       |> 0F0A  B0B9 0000 0148
       ble  stode.label_LHE       |> 0F10  6F00 FF7C
stode.label_LHF:
       nop                        |> 0F14  4E71
                                  | LINE 270
       movl a0@(32),a1            |> 0F16  2268 0020
       clrl d0                    |> 0F1A  4280
       movl a1,stode._00054+28:l[d0:l:l]
                                  |> 0F1C  2189 0DB0 0000 0158
       movl a0@(36),a1            |> 0F24  2268 0024
       movl _BTEXT+16,d0          |> 0F28  2039 0000 0010
       movl a1,stode._00054+28:l[d0:l:l]
                                  |> 0F2E  2189 0DB0 0000 0158
       movl a0@(4),a1             |> 0F36  2268 0004
       movl _BTEXT+20,d0          |> 0F3A  2039 0000 0014
       movl a1,stode._00054+28:l[d0:l:l]
                                  |> 0F40  2189 0DB0 0000 0158
       movl a0@(24),a1            |> 0F48  2268 0018
       movl _BTEXT+48,d0          |> 0F4C  2039 0000 0030
       movl a1,stode._00054+28:l[d0:l:l]
                                  |> 0F52  2189 0DB0 0000 0158
       clrl d0                    |> 0F5A  4280
       lea stode._00054+28:l[d0:l:l],a1
                                  |> 0F5C  43F0 0DB0 0000 0158
       movl a1,a0                 |> 0F64  2049
       movl stode._00022,a1       |> 0F66  2279 0000 0150
       jsr a1@                    |> 0F6C  4E91
       movl a6@(-4),a0            |> 0F6E  206E FFFC
       nop                        |> 0F72  4E71
                                  | LINE 271
       tstl _ls0001_+1840         |> 0F74  4AB9 0000 0730
       blt  stode.label_430       |> 0F7A  6D00 02C6
       nop                        |> 0F7E  4E71
                                  | LINE 272
       tstl _ls0001_+1840         |> 0F80  4AB9 0000 0730
       bgt  stode.label_410       |> 0F86  6E00 0288
       nop                        |> 0F8A  4E71
                                  | LINE 273
       movl a0@(4),a1             |> 0F8C  2268 0004
       movl _BTEXT+16,d0          |> 0F90  2039 0000 0010
       movl a1,stode._00056+24:l[d0:l:l]
                                  |> 0F96  2189 0DB0 0000 0130
       movl a0@(20),a1            |> 0F9E  2268 0014
       movl _BTEXT+20,d0          |> 0FA2  2039 0000 0014
       movl a1,stode._00056+24:l[d0:l:l]
                                  |> 0FA8  2189 0DB0 0000 0130
       clrl d0                    |> 0FB0  4280
       lea stode._00056+24:l[d0:l:l],a1
                                  |> 0FB2  43F0 0DB0 0000 0130
       movl a1,a0                 |> 0FBA  2049
       jsr _vnorx_                |> 0FBC  4EB9 0000 0000
       movl a6@(-4),a0            |> 0FC2  206E FFFC
       nop                        |> 0FC6  4E71
       fmoved fp0,fp0             |> 0FC8  FA08 FC40
       fmoved fp0,stode._00055    |> 0FCC  FA39 FC50 0000 0048
       fmoved stode._00055,fp0    |> 0FD4  FA39 FC40 0000 0048
       fmoved fp0,stode.del       |> 0FDC  FA39 FC50 0000 0090
                                  | LINE 274
       movl _BTEXT+16,d0          |> 0FE4  2039 0000 0010
       movl d0,stode.i            |> 0FEA  23C0 0000 017C
       movl _ls0001_+1884,d0      |> 0FF0  2039 0000 075C
       movl d0,stode._00057       |> 0FF6  23C0 0000 0100
       movl stode.i,d0            |> 0FFC  2039 0000 017C
       cmpl stode._00057,d0       |> 1002  B0B9 0000 0100
       bgt  stode.label_LHJ       |> 1008  6E00 00A6
stode.label_LHI:
       nop                        |> 100C  4E71
                                  | LINE 275
       movl stode.i,d0            |> 100E  2039 0000 017C
       movl a0@(28),a1            |> 1014  2268 001C
       fmoved a1@(-8:b)[d0:l:d],fp0
                                  |> 1018  FA31 FC40 0EF8
       movl stode.i,d0            |> 101E  2039 0000 017C
       movl a0@(4),a1             |> 1024  2268 0004
       fmoved a1@(-8:b)[d0:l:d],fp1
                                  |> 1028  FA31 FCC0 0EF8
       faddd fp1,fp0,fp0          |> 102E  FA09 E001
       movl stode.i,d0            |> 1032  2039 0000 017C
       movl a0@(28),a1            |> 1038  2268 001C
       fmoved fp0,a1@(-8:b)[d0:l:d]
                                  |> 103C  FA31 FC50 0EF8
                                  | LINE 276
       clrl d0                    |> 1042  4280
       fmoved _ls0001_+24:l[d0:l:b],fp0
                                  |> 1044  FA30 FC40 09B0 0000 0018
       movl stode.i,d0            |> 104E  2039 0000 017C
       movl a0@(28),a1            |> 1054  2268 001C
       fmoved a1@(-8:b)[d0:l:d],fp1
                                  |> 1058  FA31 FCC0 0EF8
       fmuld fp1,fp0,fp0          |> 105E  FA09 E003
       movl stode.i,d0            |> 1062  2039 0000 017C
       addl stode._00025,d0       |> 1068  D0B9 0000 011C
       subl stode._00026,d0       |> 106E  90B9 0000 0110
       movl a0@(8),a1             |> 1074  2268 0008
       fmoved a1@(0:b)[d0:l:d],fp1
                                  |> 1078  FA31 FCC0 0E00
       faddd fp0,fp1,fp1          |> 107E  FA08 E481
       movl stode.i,d0            |> 1082  2039 0000 017C
       movl a0@(4),a1             |> 1088  2268 0004
       fmoved fp1,a1@(-8:b)[d0:l:d]
                                  |> 108C  FA31 FCD0 0EF8
       movl stode.i,d0            |> 1092  2039 0000 017C
       addql #1,d0                |> 1098  5280
       movl d0,stode.i            |> 109A  23C0 0000 017C
       movl stode.i,d0            |> 10A0  2039 0000 017C
       cmpl stode._00057,d0       |> 10A6  B0B9 0000 0100
       ble  stode.label_LHI       |> 10AC  6F00 FF5E
stode.label_LHJ:
       nop                        |> 10B0  4E71
                                  | LINE 281
stode.label_400:
       tstl stode.m               |> 10B2  4AB9 0000 0108
       beqs stode.label_LCT       |> 10B8  672C
       fmoved _BTEXT+112,fp0      |> 10BA  FA39 FC40 0000 0070
       fmuld _ls0001_+16,fp0,fp0  |> 10C2  FA39 E003 0000 0010
       fmoved stode.del,fp1       |> 10CA  FA39 FCC0 0000 0090
       fdivd stode.delp,fp1,fp1   |> 10D2  FA39 E486 0000 0058
       fmaxd fp1,fp0,fp0          |> 10DA  FA09 E008
       fmoved fp0,_ls0001_+16     |> 10DE  FA39 FC50 0000 0010
stode.label_LCT:
       nop                        |> 10E6  4E71
                                  | LINE 282
       fmoved _BTEXT+120,fp0      |> 10E8  FA39 FC40 0000 0078
       fmuld _ls0001_+16,fp0,fp0  |> 10F0  FA39 E003 0000 0010
       fmind _BTEXT+32,fp0,fp1    |> 10F8  FA39 E089 0000 0020
       fmuld stode.del,fp1,fp0    |> 1100  FA39 E403 0000 0090
       movl _ls0001_+1888,d0      |> 1108  2039 0000 0760
       mulsl _BTEXT+48,d0,d0      |> 110E  4C39 0800 0000 0030
       movl _BTEXT+20,d1          |> 1116  2239 0000 0014
       addl d0,d1                 |> 111C  D280
       fmoved _ls0001_+1392-32:l[d1:l:d],fp1
                                  |> 111E  FA30 FCC0 1FB0 0000 0550
       fmuld _ls0001_+8,fp1,fp1   |> 1128  FA39 E483 0000 0008
       fdivd fp1,fp0,fp0          |> 1130  FA09 E006
       fmoved fp0,stode.dcon      |> 1134  FA39 FC50 0000 0070
                                  | LINE 283
       fmoved stode.dcon,fp0      |> 113C  FA39 FC40 0000 0070
       fmoved _BTEXT+32,fp1       |> 1144  FA39 FCC0 0000 0020
       fcmpd fp1,fp0              |> 114C  FA09 E002
       fble  stode.label_450      |> 1150  FA95 029C
       nop                        |> 1154  4E71
                                  | LINE 284
       movl stode.m,d0            |> 1156  2039 0000 0108
       addql #1,d0                |> 115C  5280
       movl d0,stode.m            |> 115E  23C0 0000 0108
                                  | LINE 285
       movl stode.m,d0            |> 1164  2039 0000 0108
       cmpl _ls0001_+1872,d0      |> 116A  B0B9 0000 0750
       beq  stode.label_410       |> 1170  6700 009E
       nop                        |> 1174  4E71
                                  | LINE 286
       cmpl #2,stode.m            |> 1176  0CB9 0000 0002 0000 0108
       blts stode.label_LCX       |> 1180  6D20
       fmoved _BTEXT+128,fp0      |> 1182  FA39 FC40 0000 0080
       fmuld stode.delp,fp0,fp0   |> 118A  FA39 E003 0000 0058
       fmoved stode.del,fp1       |> 1192  FA39 FCC0 0000 0090
       fcmpd fp0,fp1              |> 119A  FA08 E402
       fbgt  stode.label_410      |> 119E  FA92 0070
stode.label_LCX:
       nop                        |> 11A2  4E71
                                  | LINE 287
       fmoved stode.del,fp0       |> 11A4  FA39 FC40 0000 0090
       fmoved fp0,stode.delp      |> 11AC  FA39 FC50 0000 0058
                                  | LINE 288
       movl a0@,a1                |> 11B4  2250
       clrl d0                    |> 11B6  4280
       movl a1,stode._00058+28:l[d0:l:l]
                                  |> 11B8  2189 0DB0 0000 0108
       movl a0@(4),a1             |> 11C0  2268 0004
       movl _BTEXT+20,d0          |> 11C4  2039 0000 0014
       movl a1,stode._00058+28:l[d0:l:l]
                                  |> 11CA  2189 0DB0 0000 0108
       movl a0@(24),a1            |> 11D2  2268 0018
       movl _BTEXT+48,d0          |> 11D6  2039 0000 0030
       movl a1,stode._00058+28:l[d0:l:l]
                                  |> 11DC  2189 0DB0 0000 0108
       clrl d0                    |> 11E4  4280
       lea stode._00058+28:l[d0:l:l],a1
                                  |> 11E6  43F0 0DB0 0000 0108
       movl a1,a0                 |> 11EE  2049
       movl stode._00016,a1       |> 11F0  2279 0000 010C
       jsr a1@                    |> 11F6  4E91
       movl a6@(-4),a0            |> 11F8  206E FFFC
       nop                        |> 11FC  4E71
                                  | LINE 289
       movl _ls0001_+1896,d0      |> 11FE  2039 0000 0768
       addql #1,d0                |> 1204  5280
       movl d0,_ls0001_+1896      |> 1206  23C0 0000 0768
                                  | LINE 290
       bra  stode.label_270       |> 120C  6000 FA66
stode.label_410:
       tstl _ls0001_+1864         |> 1210  4AB9 0000 0748
       beqs stode.label_430       |> 1216  672A
       cmpl #1,_ls0001_+1844      |> 1218  0CB9 0000 0001 0000 0734
       beqs stode.label_430       |> 1222  671E
       nop                        |> 1224  4E71
                                  | LINE 299
       movl _BTEXT+16,d0          |> 1226  2039 0000 0010
       movl d0,_ls0001_+1832      |> 122C  23C0 0000 0728
                                  | LINE 300
       movl _ls0001_+1864,d0      |> 1232  2039 0000 0748
       movl d0,_ls0001_+1812      |> 1238  23C0 0000 0714
                                  | LINE 301
       bra  stode.label_220       |> 123E  6000 F7DE
stode.label_430:
       movl _BTEXT+20,d0          |> 1242  2039 0000 0014
       movl d0,_ls0001_+1832      |> 1248  23C0 0000 0728
                                  | LINE 303
       movl stode.ncf,d0          |> 124E  2039 0000 014C
       addql #1,d0                |> 1254  5280
       movl d0,stode.ncf          |> 1256  23C0 0000 014C
                                  | LINE 304
       fmoved _BTEXT+128,fp0      |> 125C  FA39 FC40 0000 0080
       fmoved fp0,_ls0001_+1384   |> 1264  FA39 FC50 0000 0568
                                  | LINE 305
       fmoved stode.told,fp0      |> 126C  FA39 FC40 0000 0038
       fmoved fp0,_ls0001_+1736   |> 1274  FA39 FC50 0000 06C8
                                  | LINE 306
       movl _ls0001_+1824,d0      |> 127C  2039 0000 0720
       addql #1,d0                |> 1282  5280
       movl d0,stode.i1           |> 1284  23C0 0000 00D0
                                  | LINE 307
       movl _BTEXT+16,d0          |> 128A  2039 0000 0010
       movl d0,stode.jb           |> 1290  23C0 0000 0180
       movl _ls0001_+1888,d0      |> 1296  2039 0000 0760
       movl d0,stode._00059       |> 129C  23C0 0000 00E0
       movl stode.jb,d0           |> 12A2  2039 0000 0180
       cmpl stode._00059,d0       |> 12A8  B0B9 0000 00E0
       bgt  stode.label_LHU       |> 12AE  6E00 00C6
stode.label_LHR:
       nop                        |> 12B2  4E71
                                  | LINE 308
       movl stode.i1,d0           |> 12B4  2039 0000 00D0
       movl a0@(12),a1            |> 12BA  2268 000C
       movl a1@,d1                |> 12BE  2211
       subl d1,d0                 |> 12C0  9081
       movl d0,stode.i1           |> 12C2  23C0 0000 00D0
                                  | LINE 311
       movl stode.i1,d0           |> 12C8  2039 0000 00D0
       movl d0,stode._00060       |> 12CE  23C0 0000 0174
       movl stode._00060,d0       |> 12D4  2039 0000 0174
       movl d0,stode.i            |> 12DA  23C0 0000 017C
       movl _ls0001_+1824,d0      |> 12E0  2039 0000 0720
       movl d0,stode._00061       |> 12E6  23C0 0000 0164
       movl stode.i,d0            |> 12EC  2039 0000 017C
       cmpl stode._00061,d0       |> 12F2  B0B9 0000 0164
       bgts stode.label_LHT       |> 12F8  6E5A
stode.label_LHS:
       nop                        |> 12FA  4E71
                                  | LINE 312
       movl stode.i,d0            |> 12FC  2039 0000 017C
       movl a0@(16),a1            |> 1302  2268 0010
       fmoved a1@(-8:b)[d0:l:d],fp0
                                  |> 1306  FA31 FC40 0EF8
       movl stode.i,d0            |> 130C  2039 0000 017C
       movl a0@(12),a1            |> 1312  2268 000C
       movl a1@,d1                |> 1316  2211
       addl d1,d0                 |> 1318  D081
       movl a0@(16),a1            |> 131A  2268 0010
       fmoved a1@(-8:b)[d0:l:d],fp1
                                  |> 131E  FA31 FCC0 0EF8
       fsubd fp1,fp0,fp0          |> 1324  FA09 E004
       movl stode.i,d0            |> 1328  2039 0000 017C
       movl a0@(16),a1            |> 132E  2268 0010
       fmoved fp0,a1@(-8:b)[d0:l:d]
                                  |> 1332  FA31 FC50 0EF8
       movl stode.i,d0            |> 1338  2039 0000 017C
       addql #1,d0                |> 133E  5280
       movl d0,stode.i            |> 1340  23C0 0000 017C
       movl stode.i,d0            |> 1346  2039 0000 017C
       cmpl stode._00061,d0       |> 134C  B0B9 0000 0164
       bles stode.label_LHS       |> 1352  6FA6
stode.label_LHT:
       nop                        |> 1354  4E71
                                  | LINE 313
       nop                        |> 1356  4E71
       movl stode.jb,d0           |> 1358  2039 0000 0180
       addql #1,d0                |> 135E  5280
       movl d0,stode.jb           |> 1360  23C0 0000 0180
       movl stode.jb,d0           |> 1366  2039 0000 0180
       cmpl stode._00059,d0       |> 136C  B0B9 0000 00E0
       ble  stode.label_LHR       |> 1372  6F00 FF3E
stode.label_LHU:
       nop                        |> 1376  4E71
                                  | LINE 314
       tstl _ls0001_+1836         |> 1378  4AB9 0000 072C
       blt  stode.label_680       |> 137E  6D00 0C20
       tstl _ls0001_+1840         |> 1382  4AB9 0000 0730
       blt  stode.label_680       |> 1388  6D00 0C16
       nop                        |> 138C  4E71
                                  | LINE 315
       fmoved _ls0001_+1704,fp0   |> 138E  FA39 FC40 0000 06A8
       fmuld _BTEXT+136,fp0,fp0   |> 1396  FA39 E003 0000 0088
       fabsd _ls0001_+1696,fp1    |> 139E  FA39 E0A1 0000 06A0
       fcmpd fp0,fp1              |> 13A6  FA08 E402
       fble  stode.label_670      |> 13AA  FA95 0BE4
       nop                        |> 13AE  4E71
                                  | LINE 316
       movl stode.ncf,d0          |> 13B0  2039 0000 014C
       cmpl _ls0001_+1880,d0      |> 13B6  B0B9 0000 0758
       beq  stode.label_670       |> 13BC  6700 0BD2
       nop                        |> 13C0  4E71
                                  | LINE 317
       fmoved _BTEXT+144,fp0      |> 13C2  FA39 FC40 0000 0090
       fmoved fp0,stode.rh        |> 13CA  FA39 FC50 0000 00B8
                                  | LINE 318
       movl _ls0001_+1864,d0      |> 13D2  2039 0000 0748
       movl d0,_ls0001_+1812      |> 13D8  23C0 0000 0714
                                  | LINE 319
       movl _BTEXT+16,d0          |> 13DE  2039 0000 0010
       movl d0,stode.iredo        |> 13E4  23C0 0000 00E8
                                  | LINE 320
       bra  stode.label_170       |> 13EA  6000 F2E6
stode.label_450:
       clrl _ls0001_+1844         |> 13EE  42B9 0000 0734
                                  | LINE 328
       tstl stode.m               |> 13F4  4AB9 0000 0108
       bnes stode.label_LDL       |> 13FA  6630
       movl _ls0001_+1888,d0      |> 13FC  2039 0000 0760
       mulsl _BTEXT+48,d0,d0      |> 1402  4C39 0800 0000 0030
       movl _BTEXT+20,d1          |> 140A  2239 0000 0014
       addl d0,d1                 |> 1410  D280
       fmoved _ls0001_+1392-32:l[d1:l:d],fp1
                                  |> 1412  FA30 FCC0 1FB0 0000 0550
       frdivd stode.del,fp1,fp0   |> 141C  FA39 E407 0000 0090
       fmoved fp0,stode.dsm       |> 1424  FA39 FC50 0000 00A0
stode.label_LDL:
       nop                        |> 142C  4E71
                                  | LINE 329
       tstl stode.m               |> 142E  4AB9 0000 0108
       bles stode.label_LDN       |> 1434  6F78
       movl a0@(28),a1            |> 1436  2268 001C
       movl _BTEXT+16,d0          |> 143A  2039 0000 0010
       movl a1,stode._00063+24:l[d0:l:l]
                                  |> 1440  2189 0DB0 0000 00E0
       movl a0@(20),a1            |> 1448  2268 0014
       movl _BTEXT+20,d0          |> 144C  2039 0000 0014
       movl a1,stode._00063+24:l[d0:l:l]
                                  |> 1452  2189 0DB0 0000 00E0
       clrl d0                    |> 145A  4280
       lea stode._00063+24:l[d0:l:l],a1
                                  |> 145C  43F0 0DB0 0000 00E0
       movl a1,a0                 |> 1464  2049
       jsr _vnorx_                |> 1466  4EB9 0000 0000
       movl a6@(-4),a0            |> 146C  206E FFFC
       nop                        |> 1470  4E71
       fmoved fp0,fp0             |> 1472  FA08 FC40
       fmoved fp0,stode._00062    |> 1476  FA39 FC50 0000 0068
       movl _ls0001_+1888,d0      |> 147E  2039 0000 0760
       mulsl _BTEXT+48,d0,d0      |> 1484  4C39 0800 0000 0030
       movl _BTEXT+20,d1          |> 148C  2239 0000 0014
       addl d0,d1                 |> 1492  D280
       fmoved _ls0001_+1392-32:l[d1:l:d],fp1
                                  |> 1494  FA30 FCC0 1FB0 0000 0550
       frdivd stode._00062,fp1,fp0
                                  |> 149E  FA39 E407 0000 0068
       fmoved fp0,stode.dsm       |> 14A6  FA39 FC50 0000 00A0
stode.label_LDN:
       nop                        |> 14AE  4E71
                                  | LINE 330
       fmoved stode.dsm,fp0       |> 14B0  FA39 FC40 0000 00A0
       fmoved _BTEXT+32,fp1       |> 14B8  FA39 FCC0 0000 0020
       fcmpd fp1,fp0              |> 14C0  FA09 E002
       fbgt  stode.label_500      |> 14C4  FA92 01FC
       nop                        |> 14C8  4E71
                                  | LINE 341
       clrl _ls0001_+1852         |> 14CA  42B9 0000 073C
                                  | LINE 342
       clrl stode.iredo           |> 14D0  42B9 0000 00E8
                                  | LINE 343
       movl _ls0001_+1892,d0      |> 14D6  2039 0000 0764
       addql #1,d0                |> 14DC  5280
       movl d0,_ls0001_+1892      |> 14DE  23C0 0000 0764
                                  | LINE 344
       fmoved _ls0001_+1696,fp0   |> 14E4  FA39 FC40 0000 06A0
       fmoved fp0,_ls0001_+1720   |> 14EC  FA39 FC50 0000 06B8
                                  | LINE 345
       movl _ls0001_+1888,d0      |> 14F4  2039 0000 0760
       movl d0,_ls0001_+1904      |> 14FA  23C0 0000 0770
                                  | LINE 346
       movl _BTEXT+16,d0          |> 1500  2039 0000 0010
       movl d0,stode.j            |> 1506  23C0 0000 016C
       movl _ls0001_+1856,d0      |> 150C  2039 0000 0740
       movl d0,stode._00064       |> 1512  23C0 0000 013C
       movl stode.j,d0            |> 1518  2039 0000 016C
       cmpl stode._00064,d0       |> 151E  B0B9 0000 013C
       bgt  stode.label_LIF       |> 1524  6E00 00DE
stode.label_LIC:
       nop                        |> 1528  4E71
                                  | LINE 347
       movl _BTEXT+16,d0          |> 152A  2039 0000 0010
       movl d0,stode.i            |> 1530  23C0 0000 017C
       movl _ls0001_+1884,d0      |> 1536  2039 0000 075C
       movl d0,stode._00065       |> 153C  23C0 0000 0128
       movl stode.i,d0            |> 1542  2039 0000 017C
       cmpl stode._00065,d0       |> 1548  B0B9 0000 0128
       bgt  stode.label_LIE       |> 154E  6E00 0096
stode.label_LID:
       nop                        |> 1552  4E71
                                  | LINE 348
       movl stode.j,d0            |> 1554  2039 0000 016C
       fmoved _ls0001_+24-8:l[d0:l:d],fp0
                                  |> 155A  FA30 FC40 0FB0 0000 0010
       movl stode.i,d0            |> 1564  2039 0000 017C
       movl a0@(28),a1            |> 156A  2268 001C
       fmoved a1@(-8:b)[d0:l:d],fp1
                                  |> 156E  FA31 FCC0 0EF8
       fmuld fp1,fp0,fp0          |> 1574  FA09 E003
       movl stode.j,d0            |> 1578  2039 0000 016C
       mulsl stode._00025,d0,d0   |> 157E  4C39 0800 0000 011C
       movl stode.i,d1            |> 1586  2239 0000 017C
       addl d0,d1                 |> 158C  D280
       subl stode._00026,d1       |> 158E  92B9 0000 0110
       movl a0@(8),a1             |> 1594  2268 0008
       fmoved a1@(0:b)[d1:l:d],fp1
                                  |> 1598  FA31 FCC0 1E00
       faddd fp0,fp1,fp1          |> 159E  FA08 E481
       movl stode.j,d0            |> 15A2  2039 0000 016C
       mulsl stode._00025,d0,d0   |> 15A8  4C39 0800 0000 011C
       movl stode.i,d1            |> 15B0  2239 0000 017C
       addl d0,d1                 |> 15B6  D280
       subl stode._00026,d1       |> 15B8  92B9 0000 0110
       movl a0@(8),a1             |> 15BE  2268 0008
       fmoved fp1,a1@(0:b)[d1:l:d]
                                  |> 15C2  FA31 FCD0 1E00
       movl stode.i,d0            |> 15C8  2039 0000 017C
       addql #1,d0                |> 15CE  5280
       movl d0,stode.i            |> 15D0  23C0 0000 017C
       movl stode.i,d0            |> 15D6  2039 0000 017C
       cmpl stode._00065,d0       |> 15DC  B0B9 0000 0128
       ble  stode.label_LID       |> 15E2  6F00 FF6E
stode.label_LIE:
       movl stode.j,d0            |> 15E6  2039 0000 016C
       addql #1,d0                |> 15EC  5280
       movl d0,stode.j            |> 15EE  23C0 0000 016C
       movl stode.j,d0            |> 15F4  2039 0000 016C
       cmpl stode._00064,d0       |> 15FA  B0B9 0000 013C
       ble  stode.label_LIC       |> 1600  6F00 FF26
stode.label_LIF:
       nop                        |> 1604  4E71
                                  | LINE 349
       movl _ls0001_+1808,d0      |> 1606  2039 0000 0710
       subql #1,d0                |> 160C  5380
       movl d0,_ls0001_+1808      |> 160E  23C0 0000 0710
                                  | LINE 350
       tstl _ls0001_+1808         |> 1614  4AB9 0000 0710
       beq  stode.label_520       |> 161A  6700 0222
       nop                        |> 161E  4E71
                                  | LINE 351
       cmpl #1,_ls0001_+1808      |> 1620  0CB9 0000 0001 0000 0710
       bgt  stode.label_700       |> 162A  6E00 0994
       nop                        |> 162E  4E71
                                  | LINE 352
       movl _ls0001_+1856,d0      |> 1630  2039 0000 0740
       cmpl _ls0001_+1816,d0      |> 1636  B0B9 0000 0718
       beq  stode.label_700       |> 163C  6700 0982
       nop                        |> 1640  4E71
                                  | LINE 353
       movl _BTEXT+16,d0          |> 1642  2039 0000 0010
       movl d0,stode.i            |> 1648  23C0 0000 017C
       movl _ls0001_+1884,d0      |> 164E  2039 0000 075C
       movl d0,stode._00066       |> 1654  23C0 0000 0114
       movl stode.i,d0            |> 165A  2039 0000 017C
       cmpl stode._00066,d0       |> 1660  B0B9 0000 0114
       bgts stode.label_LIK       |> 1666  6E54
stode.label_LIJ:
       nop                        |> 1668  4E71
                                  | LINE 354
       movl stode.i,d0            |> 166A  2039 0000 017C
       movl a0@(28),a1            |> 1670  2268 001C
       fmoved a1@(-8:b)[d0:l:d],fp0
                                  |> 1674  FA31 FC40 0EF8
       movl _ls0001_+1816,d0      |> 167A  2039 0000 0718
       mulsl stode._00025,d0,d0   |> 1680  4C39 0800 0000 011C
       movl stode.i,d1            |> 1688  2239 0000 017C
       addl d0,d1                 |> 168E  D280
       subl stode._00026,d1       |> 1690  92B9 0000 0110
       movl a0@(8),a1             |> 1696  2268 0008
       fmoved fp0,a1@(0:b)[d1:l:d]
                                  |> 169A  FA31 FC50 1E00
       movl stode.i,d0            |> 16A0  2039 0000 017C
       addql #1,d0                |> 16A6  5280
       movl d0,stode.i            |> 16A8  23C0 0000 017C
       movl stode.i,d0            |> 16AE  2039 0000 017C
       cmpl stode._00066,d0       |> 16B4  B0B9 0000 0114
       bles stode.label_LIJ       |> 16BA  6FAC
stode.label_LIK:
       nop                        |> 16BC  4E71
                                  | LINE 355
       bra  stode.label_700       |> 16BE  6000 0900
stode.label_500:
       movl _ls0001_+1852,d0      |> 16C2  2039 0000 073C
       subql #1,d0                |> 16C8  5380
       movl d0,_ls0001_+1852      |> 16CA  23C0 0000 073C
                                  | LINE 364
       fmoved stode.told,fp0      |> 16D0  FA39 FC40 0000 0038
       fmoved fp0,_ls0001_+1736   |> 16D8  FA39 FC50 0000 06C8
                                  | LINE 365
       movl _ls0001_+1824,d0      |> 16E0  2039 0000 0720
       addql #1,d0                |> 16E6  5280
       movl d0,stode.i1           |> 16E8  23C0 0000 00D0
                                  | LINE 366
       movl _BTEXT+16,d0          |> 16EE  2039 0000 0010
       movl d0,stode.jb           |> 16F4  23C0 0000 0180
       movl _ls0001_+1888,d0      |> 16FA  2039 0000 0760
       movl d0,stode._00067       |> 1700  23C0 0000 0104
       movl stode.jb,d0           |> 1706  2039 0000 0180
       cmpl stode._00067,d0       |> 170C  B0B9 0000 0104
       bgt  stode.label_LIO       |> 1712  6E00 00C6
stode.label_LIL:
       nop                        |> 1716  4E71
                                  | LINE 367
       movl stode.i1,d0           |> 1718  2039 0000 00D0
       movl a0@(12),a1            |> 171E  2268 000C
       movl a1@,d1                |> 1722  2211
       subl d1,d0                 |> 1724  9081
       movl d0,stode.i1           |> 1726  23C0 0000 00D0
                                  | LINE 370
       movl stode.i1,d0           |> 172C  2039 0000 00D0
       movl d0,stode._00068       |> 1732  23C0 0000 00F8
       movl stode._00068,d0       |> 1738  2039 0000 00F8
       movl d0,stode.i            |> 173E  23C0 0000 017C
       movl _ls0001_+1824,d0      |> 1744  2039 0000 0720
       movl d0,stode._00069       |> 174A  23C0 0000 00E4
       movl stode.i,d0            |> 1750  2039 0000 017C
       cmpl stode._00069,d0       |> 1756  B0B9 0000 00E4
       bgts stode.label_LIN       |> 175C  6E5A
stode.label_LIM:
       nop                        |> 175E  4E71
                                  | LINE 371
       movl stode.i,d0            |> 1760  2039 0000 017C
       movl a0@(16),a1            |> 1766  2268 0010
       fmoved a1@(-8:b)[d0:l:d],fp0
                                  |> 176A  FA31 FC40 0EF8
       movl stode.i,d0            |> 1770  2039 0000 017C
       movl a0@(12),a1            |> 1776  2268 000C
       movl a1@,d1                |> 177A  2211
       addl d1,d0                 |> 177C  D081
       movl a0@(16),a1            |> 177E  2268 0010
       fmoved a1@(-8:b)[d0:l:d],fp1
                                  |> 1782  FA31 FCC0 0EF8
       fsubd fp1,fp0,fp0          |> 1788  FA09 E004
       movl stode.i,d0            |> 178C  2039 0000 017C
       movl a0@(16),a1            |> 1792  2268 0010
       fmoved fp0,a1@(-8:b)[d0:l:d]
                                  |> 1796  FA31 FC50 0EF8
       movl stode.i,d0            |> 179C  2039 0000 017C
       addql #1,d0                |> 17A2  5280
       movl d0,stode.i            |> 17A4  23C0 0000 017C
       movl stode.i,d0            |> 17AA  2039 0000 017C
       cmpl stode._00069,d0       |> 17B0  B0B9 0000 00E4
       bles stode.label_LIM       |> 17B6  6FA6
stode.label_LIN:
       nop                        |> 17B8  4E71
                                  | LINE 372
       nop                        |> 17BA  4E71
       movl stode.jb,d0           |> 17BC  2039 0000 0180
       addql #1,d0                |> 17C2  5280
       movl d0,stode.jb           |> 17C4  23C0 0000 0180
       movl stode.jb,d0           |> 17CA  2039 0000 0180
       cmpl stode._00067,d0       |> 17D0  B0B9 0000 0104
       ble  stode.label_LIL       |> 17D6  6F00 FF3E
stode.label_LIO:
       nop                        |> 17DA  4E71
                                  | LINE 373
       fmoved _BTEXT+128,fp0      |> 17DC  FA39 FC40 0000 0080
       fmoved fp0,_ls0001_+1384   |> 17E4  FA39 FC50 0000 0568
                                  | LINE 374
       fmoved _ls0001_+1704,fp0   |> 17EC  FA39 FC40 0000 06A8
       fmuld _BTEXT+136,fp0,fp0   |> 17F4  FA39 E003 0000 0088
       fabsd _ls0001_+1696,fp1    |> 17FC  FA39 E0A1 0000 06A0
       fcmpd fp0,fp1              |> 1804  FA08 E402
       fble  stode.label_660      |> 1808  FA95 0776
       nop                        |> 180C  4E71
                                  | LINE 375
       cmpl #-3,_ls0001_+1852     |> 180E  0CB9 FFFF FFFD 0000 073C
       ble  stode.label_640       |> 1818  6F00 0570
       nop                        |> 181C  4E71
                                  | LINE 376
       movl _BTEXT+20,d0          |> 181E  2039 0000 0014
       movl d0,stode.iredo        |> 1824  23C0 0000 00E8
                                  | LINE 377
       fmoved _BTEXT+8,fp0        |> 182A  FA39 FC40 0000 0008
       fmoved fp0,stode.rhup      |> 1832  FA39 FC50 0000 0000
                                  | LINE 378
       bra  stode.label_540       |> 183A  6000 0194
stode.label_520:
       fmoved _BTEXT+8,fp0        |> 183E  FA39 FC40 0000 0008
       fmoved fp0,stode.rhup      |> 1846  FA39 FC50 0000 0000
                                  | LINE 389
       movl _ls0001_+1856,d0      |> 184E  2039 0000 0740
       cmpl _ls0001_+1816,d0      |> 1854  B0B9 0000 0718
       beq  stode.label_540       |> 185A  6700 0174
       nop                        |> 185E  4E71
                                  | LINE 390
       movl _BTEXT+16,d0          |> 1860  2039 0000 0010
       movl d0,stode.i            |> 1866  23C0 0000 017C
       movl _ls0001_+1884,d0      |> 186C  2039 0000 075C
       movl d0,stode._00070       |> 1872  23C0 0000 0178
       movl stode.i,d0            |> 1878  2039 0000 017C
       cmpl stode._00070,d0       |> 187E  B0B9 0000 0178
       bgts stode.label_LIT       |> 1884  6E68
stode.label_LIS:
       nop                        |> 1886  4E71
                                  | LINE 391
       movl stode.i,d0            |> 1888  2039 0000 017C
       movl a0@(28),a1            |> 188E  2268 001C
       fmoved a1@(-8:b)[d0:l:d],fp0
                                  |> 1892  FA31 FC40 0EF8
       movl _ls0001_+1816,d0      |> 1898  2039 0000 0718
       mulsl stode._00025,d0,d0   |> 189E  4C39 0800 0000 011C
       movl stode.i,d1            |> 18A6  2239 0000 017C
       addl d0,d1                 |> 18AC  D280
       subl stode._00026,d1       |> 18AE  92B9 0000 0110
       movl a0@(8),a1             |> 18B4  2268 0008
       fmoved a1@(0:b)[d1:l:d],fp1
                                  |> 18B8  FA31 FCC0 1E00
       fsubd fp1,fp0,fp0          |> 18BE  FA09 E004
       movl stode.i,d0            |> 18C2  2039 0000 017C
       movl a0@(24),a1            |> 18C8  2268 0018
       fmoved fp0,a1@(-8:b)[d0:l:d]
                                  |> 18CC  FA31 FC50 0EF8
       movl stode.i,d0            |> 18D2  2039 0000 017C
       addql #1,d0                |> 18D8  5280
       movl d0,stode.i            |> 18DA  23C0 0000 017C
       movl stode.i,d0            |> 18E0  2039 0000 017C
       cmpl stode._00070,d0       |> 18E6  B0B9 0000 0178
       bles stode.label_LIS       |> 18EC  6F98
stode.label_LIT:
       nop                        |> 18EE  4E71
                                  | LINE 392
       movl a0@(24),a1            |> 18F0  2268 0018
       movl _BTEXT+16,d0          |> 18F4  2039 0000 0010
       movl a1,stode._00072+24:l[d0:l:l]
                                  |> 18FA  2189 0DB0 0000 00BC
       movl a0@(20),a1            |> 1902  2268 0014
       movl _BTEXT+20,d0          |> 1906  2039 0000 0014
       movl a1,stode._00072+24:l[d0:l:l]
                                  |> 190C  2189 0DB0 0000 00BC
       clrl d0                    |> 1914  4280
       lea stode._00072+24:l[d0:l:l],a1
                                  |> 1916  43F0 0DB0 0000 00BC
       movl a1,a0                 |> 191E  2049
       jsr _vnorx_                |> 1920  4EB9 0000 0000
       movl a6@(-4),a0            |> 1926  206E FFFC
       nop                        |> 192A  4E71
       fmoved fp0,fp0             |> 192C  FA08 FC40
       fmoved fp0,stode._00071    |> 1930  FA39 FC50 0000 0080
       movl _ls0001_+1888,d0      |> 1938  2039 0000 0760
       mulsl _BTEXT+48,d0,d0      |> 193E  4C39 0800 0000 0030
       movl _BTEXT+48,d1          |> 1946  2239 0000 0030
       addl d0,d1                 |> 194C  D280
       fmoved _ls0001_+1392-32:l[d1:l:d],fp1
                                  |> 194E  FA30 FCC0 1FB0 0000 0550
       frdivd stode._00071,fp1,fp0
                                  |> 1958  FA39 E407 0000 0080
       fmoved fp0,stode.dup       |> 1960  FA39 FC50 0000 00B0
                                  | LINE 393
       movl _ls0001_+1856,d0      |> 1968  2039 0000 0740
       addql #1,d0                |> 196E  5280
       fmoveld d0,fp1             |> 1970  FA00 5CC0
       frdivd _BTEXT+32,fp1,fp0   |> 1974  FA39 E407 0000 0020
       fmoved fp0,stode.exup      |> 197C  FA39 FC50 0000 00A8
                                  | LINE 394
       clrl d0                    |> 1984  4280
       lea stode._00074+20:l[d0:l:l],a1
                                  |> 1986  43F0 0DB0 0000 009C
       movl a1,a0                 |> 198E  2049
       jsr _dpwr_fortran_         |> 1990  4EB9 0000 0000
       movl a6@(-4),a0            |> 1996  206E FFFC
       nop                        |> 199A  4E71
       fmoved fp0,fp0             |> 199C  FA08 FC40
       fmoved fp0,stode._00073    |> 19A0  FA39 FC50 0000 0060
       fmoved _BTEXT+152,fp0      |> 19A8  FA39 FC40 0000 0098
       fmuld stode._00073,fp0,fp0 |> 19B0  FA39 E003 0000 0060
       faddd _BTEXT+160,fp0,fp0   |> 19B8  FA39 E001 0000 00A0
       frdivd _BTEXT+32,fp0,fp1   |> 19C0  FA39 E087 0000 0020
       fmoved fp1,stode.rhup      |> 19C8  FA39 FCD0 0000 0000
                                  | LINE 395
stode.label_540:
       fmoveld _ls0001_+1856,fp1  |> 19D0  FA39 5CC0 0000 0740
       frdivd _BTEXT+32,fp1,fp0   |> 19D8  FA39 E407 0000 0020
       fmoved fp0,stode.exsm      |> 19E0  FA39 FC50 0000 0098
                                  | LINE 396
       clrl d0                    |> 19E8  4280
       lea stode._00076+20:l[d0:l:l],a1
                                  |> 19EA  43F0 0DB0 0000 0080
       movl a1,a0                 |> 19F2  2049
       jsr _dpwr_fortran_         |> 19F4  4EB9 0000 0000
       movl a6@(-4),a0            |> 19FA  206E FFFC
       nop                        |> 19FE  4E71
       fmoved fp0,fp0             |> 1A00  FA08 FC40
       fmoved fp0,stode._00075    |> 1A04  FA39 FC50 0000 0050
       fmoved _BTEXT+168,fp0      |> 1A0C  FA39 FC40 0000 00A8
       fmuld stode._00075,fp0,fp0 |> 1A14  FA39 E003 0000 0050
       faddd _BTEXT+176,fp0,fp0   |> 1A1C  FA39 E001 0000 00B0
       frdivd _BTEXT+32,fp0,fp1   |> 1A24  FA39 E087 0000 0020
       fmoved fp1,stode.rhsm      |> 1A2C  FA39 FCD0 0000 0018
                                  | LINE 397
       fmoved _BTEXT+8,fp0        |> 1A34  FA39 FC40 0000 0008
       fmoved fp0,stode.rhdn      |> 1A3C  FA39 FC50 0000 0010
                                  | LINE 398
       cmpl #1,_ls0001_+1888      |> 1A44  0CB9 0000 0001 0000 0760
       beq  stode.label_560       |> 1A4E  6700 0100
       nop                        |> 1A52  4E71
                                  | LINE 399
       movl _ls0001_+1856,d0      |> 1A54  2039 0000 0740
       mulsl stode._00025,d0,d0   |> 1A5A  4C39 0800 0000 011C
       movl _BTEXT+16,d1          |> 1A62  2239 0000 0010
       addl d0,d1                 |> 1A68  D280
       subl stode._00026,d1       |> 1A6A  92B9 0000 0110
       movl a0@(8),a1             |> 1A70  2268 0008
       lea a1@(0:b)[d1:l:d],a1    |> 1A74  43F1 1E00
       movl _BTEXT+16,d0          |> 1A78  2039 0000 0010
       movl a1,stode._00078+24:l[d0:l:l]
                                  |> 1A7E  2189 0DB0 0000 0060
       movl a0@(20),a1            |> 1A86  2268 0014
       movl _BTEXT+20,d0          |> 1A8A  2039 0000 0014
       movl a1,stode._00078+24:l[d0:l:l]
                                  |> 1A90  2189 0DB0 0000 0060
       clrl d0                    |> 1A98  4280
       lea stode._00078+24:l[d0:l:l],a1
                                  |> 1A9A  43F0 0DB0 0000 0060
       movl a1,a0                 |> 1AA2  2049
       jsr _vnorx_                |> 1AA4  4EB9 0000 0000
       movl a6@(-4),a0            |> 1AAA  206E FFFC
       nop                        |> 1AAE  4E71
       fmoved fp0,fp0             |> 1AB0  FA08 FC40
       fmoved fp0,stode._00077    |> 1AB4  FA39 FC50 0000 0040
       movl _ls0001_+1888,d0      |> 1ABC  2039 0000 0760
       mulsl _BTEXT+48,d0,d0      |> 1AC2  4C39 0800 0000 0030
       movl _BTEXT+16,d1          |> 1ACA  2239 0000 0010
       addl d0,d1                 |> 1AD0  D280
       fmoved _ls0001_+1392-32:l[d1:l:d],fp1
                                  |> 1AD2  FA30 FCC0 1FB0 0000 0550
       frdivd stode._00077,fp1,fp0
                                  |> 1ADC  FA39 E407 0000 0040
       fmoved fp0,stode.ddn       |> 1AE4  FA39 FC50 0000 00C8
                                  | LINE 400
       fmoveld _ls0001_+1888,fp1  |> 1AEC  FA39 5CC0 0000 0760
       frdivd _BTEXT+32,fp1,fp0   |> 1AF4  FA39 E407 0000 0020
       fmoved fp0,stode.exdn      |> 1AFC  FA39 FC50 0000 00C0
                                  | LINE 401
       clrl d0                    |> 1B04  4280
       lea stode._00080+20:l[d0:l:l],a1
                                  |> 1B06  43F0 0DB0 0000 0040
       movl a1,a0                 |> 1B0E  2049
       jsr _dpwr_fortran_         |> 1B10  4EB9 0000 0000
       movl a6@(-4),a0            |> 1B16  206E FFFC
       nop                        |> 1B1A  4E71
       fmoved fp0,fp0             |> 1B1C  FA08 FC40
       fmoved fp0,stode._00079    |> 1B20  FA39 FC50 0000 0028
       fmoved _BTEXT+64,fp0       |> 1B28  FA39 FC40 0000 0040
       fmuld stode._00079,fp0,fp0 |> 1B30  FA39 E003 0000 0028
       faddd _BTEXT+72,fp0,fp0    |> 1B38  FA39 E001 0000 0048
       frdivd _BTEXT+32,fp0,fp1   |> 1B40  FA39 E087 0000 0020
       fmoved fp1,stode.rhdn      |> 1B48  FA39 FCD0 0000 0010
                                  | LINE 402
stode.label_560:
       fmoved stode.rhsm,fp0      |> 1B50  FA39 FC40 0000 0018
       fmoved stode.rhup,fp1      |> 1B58  FA39 FCC0 0000 0000
       fcmpd fp1,fp0              |> 1B60  FA09 E002
       fbge  stode.label_570      |> 1B64  FA93 0020
       nop                        |> 1B68  4E71
                                  | LINE 403
       fmoved stode.rhup,fp0      |> 1B6A  FA39 FC40 0000 0000
       fmoved stode.rhdn,fp1      |> 1B72  FA39 FCC0 0000 0010
       fcmpd fp1,fp0              |> 1B7A  FA09 E002
       fbgt  stode.label_590      |> 1B7E  FA92 0094
       nop                        |> 1B82  4E71
                                  | LINE 404
       bras stode.label_580       |> 1B84  603A
stode.label_570:
       fmoved stode.rhsm,fp0      |> 1B86  FA39 FC40 0000 0018
       fmoved stode.rhdn,fp1      |> 1B8E  FA39 FCC0 0000 0010
       fcmpd fp1,fp0              |> 1B96  FA09 E002
       fblt  stode.label_580      |> 1B9A  FA94 0024
       nop                        |> 1B9E  4E71
                                  | LINE 406
       movl _ls0001_+1888,d0      |> 1BA0  2039 0000 0760
       movl d0,stode.newq         |> 1BA6  23C0 0000 00D4
                                  | LINE 407
       fmoved stode.rhsm,fp0      |> 1BAC  FA39 FC40 0000 0018
       fmoved fp0,stode.rh        |> 1BB4  FA39 FC50 0000 00B8
                                  | LINE 408
       bra  stode.label_620       |> 1BBC  6000 0148
stode.label_580:
       movl _ls0001_+1888,d0      |> 1BC0  2039 0000 0760
       subql #1,d0                |> 1BC6  5380
       movl d0,stode.newq         |> 1BC8  23C0 0000 00D4
                                  | LINE 410
       fmoved stode.rhdn,fp0      |> 1BCE  FA39 FC40 0000 0010
       fmoved fp0,stode.rh        |> 1BD6  FA39 FC50 0000 00B8
                                  | LINE 411
       tstl _ls0001_+1852         |> 1BDE  4AB9 0000 073C
       bges stode.label_LEY       |> 1BE4  6C28
       fmoved stode.rh,fp0        |> 1BE6  FA39 FC40 0000 00B8
       fmoved _BTEXT+32,fp1       |> 1BEE  FA39 FCC0 0000 0020
       fcmpd fp1,fp0              |> 1BF6  FA09 E002
       fble  stode.label_LEY      |> 1BFA  FA95 0012
       fmoved _BTEXT+32,fp0       |> 1BFE  FA39 FC40 0000 0020
       fmoved fp0,stode.rh        |> 1C06  FA39 FC50 0000 00B8
stode.label_LEY:
       nop                        |> 1C0E  4E71
                                  | LINE 412
       bra  stode.label_620       |> 1C10  6000 00F4
stode.label_590:
       movl _ls0001_+1856,d0      |> 1C14  2039 0000 0740
       movl d0,stode.newq         |> 1C1A  23C0 0000 00D4
                                  | LINE 414
       fmoved stode.rhup,fp0      |> 1C20  FA39 FC40 0000 0000
       fmoved fp0,stode.rh        |> 1C28  FA39 FC50 0000 00B8
                                  | LINE 415
       fmoved stode.rh,fp0        |> 1C30  FA39 FC40 0000 00B8
       fmoved _BTEXT+184,fp1      |> 1C38  FA39 FCC0 0000 00B8
       fcmpd fp1,fp0              |> 1C40  FA09 E002
       fblt  stode.label_610      |> 1C44  FA94 00B0
       nop                        |> 1C48  4E71
                                  | LINE 416
       movl _ls0001_+1856,d0      |> 1C4A  2039 0000 0740
       fmoved _ls0001_+24-8:l[d0:l:d],fp0
                                  |> 1C50  FA30 FC40 0FB0 0000 0010
       fmoveld _ls0001_+1856,fp1  |> 1C5A  FA39 5CC0 0000 0740
       fdivd fp1,fp0,fp0          |> 1C62  FA09 E006
       fmoved fp0,stode.r         |> 1C66  FA39 FC50 0000 0008
                                  | LINE 417
       movl _BTEXT+16,d0          |> 1C6E  2039 0000 0010
       movl d0,stode.i            |> 1C74  23C0 0000 017C
       movl _ls0001_+1884,d0      |> 1C7A  2039 0000 075C
       movl d0,stode._00081       |> 1C80  23C0 0000 0168
       movl stode.i,d0            |> 1C86  2039 0000 017C
       cmpl stode._00081,d0       |> 1C8C  B0B9 0000 0168
       bgts stode.label_LJC       |> 1C92  6E5E
stode.label_LJB:
       nop                        |> 1C94  4E71
                                  | LINE 418
       movl stode.i,d0            |> 1C96  2039 0000 017C
       movl a0@(28),a1            |> 1C9C  2268 001C
       fmoved a1@(-8:b)[d0:l:d],fp0
                                  |> 1CA0  FA31 FC40 0EF8
       fmuld stode.r,fp0,fp0      |> 1CA6  FA39 E003 0000 0008
       movl stode.newq,d0         |> 1CAE  2039 0000 00D4
       addql #1,d0                |> 1CB4  5280
       mulsl stode._00025,d0,d0   |> 1CB6  4C39 0800 0000 011C
       movl stode.i,d1            |> 1CBE  2239 0000 017C
       addl d0,d1                 |> 1CC4  D280
       subl stode._00026,d1       |> 1CC6  92B9 0000 0110
       movl a0@(8),a1             |> 1CCC  2268 0008
       fmoved fp0,a1@(0:b)[d1:l:d]
                                  |> 1CD0  FA31 FC50 1E00
       movl stode.i,d0            |> 1CD6  2039 0000 017C
       addql #1,d0                |> 1CDC  5280
       movl d0,stode.i            |> 1CDE  23C0 0000 017C
       movl stode.i,d0            |> 1CE4  2039 0000 017C
       cmpl stode._00081,d0       |> 1CEA  B0B9 0000 0168
       bles stode.label_LJB       |> 1CF0  6FA2
stode.label_LJC:
       nop                        |> 1CF2  4E71
                                  | LINE 419
       bras stode.label_630       |> 1CF4  606A
stode.label_610:
       movl _BTEXT+48,d0          |> 1CF6  2039 0000 0030
       movl d0,_ls0001_+1808      |> 1CFC  23C0 0000 0710
                                  | LINE 421
       bra  stode.label_700       |> 1D02  6000 02BC
stode.label_620:
       tstl _ls0001_+1852         |> 1D06  4AB9 0000 073C
       bnes stode.label_LFE       |> 1D0C  6618
       fmoved stode.rh,fp0        |> 1D0E  FA39 FC40 0000 00B8
       fmoved _BTEXT+184,fp1      |> 1D16  FA39 FCC0 0000 00B8
       fcmpd fp1,fp0              |> 1D1E  FA09 E002
       fblt  stode.label_610      |> 1D22  FA94 FFD2
stode.label_LFE:
       nop                        |> 1D26  4E71
                                  | LINE 423
       cmpl #-2,_ls0001_+1852     |> 1D28  0CB9 FFFF FFFE 0000 073C
       bgts stode.label_LFG       |> 1D32  6E18
       fmoved stode.rh,fp0        |> 1D34  FA39 FC40 0000 00B8
       fmind _BTEXT+112,fp0,fp0   |> 1D3C  FA39 E009 0000 0070
       fmoved fp0,stode.rh        |> 1D44  FA39 FC50 0000 00B8
stode.label_LFG:
       nop                        |> 1D4C  4E71
                                  | LINE 429
       movl stode.newq,d0         |> 1D4E  2039 0000 00D4
       cmpl _ls0001_+1888,d0      |> 1D54  B0B9 0000 0760
       beq  stode.label_170       |> 1D5A  6700 E976
       nop                        |> 1D5E  4E71
                                  | LINE 430
stode.label_630:
       movl stode.newq,d0         |> 1D60  2039 0000 00D4
       movl d0,_ls0001_+1888      |> 1D66  23C0 0000 0760
                                  | LINE 431
       movl _ls0001_+1888,d0      |> 1D6C  2039 0000 0760
       addql #1,d0                |> 1D72  5280
       movl d0,_ls0001_+1856      |> 1D74  23C0 0000 0740
                                  | LINE 432
       movl _BTEXT+20,d0          |> 1D7A  2039 0000 0014
       movl d0,stode.iret         |> 1D80  23C0 0000 00D8
                                  | LINE 433
       bra  stode.label_150       |> 1D86  6000 E7E2
stode.label_640:
       cmpl #-10,_ls0001_+1852    |> 1D8A  0CB9 FFFF FFF6 0000 073C
       beq  stode.label_660       |> 1D94  6700 01EA
       nop                        |> 1D98  4E71
                                  | LINE 444
       fmoved _BTEXT+192,fp0      |> 1D9A  FA39 FC40 0000 00C0
       fmoved fp0,stode.rh        |> 1DA2  FA39 FC50 0000 00B8
                                  | LINE 445
       fabsd _ls0001_+1696,fp1    |> 1DAA  FA39 E0A1 0000 06A0
       frdivd _ls0001_+1704,fp1,fp0
                                  |> 1DB2  FA39 E407 0000 06A8
       fmaxd stode.rh,fp0,fp0     |> 1DBA  FA39 E008 0000 00B8
       fmoved fp0,stode.rh        |> 1DC2  FA39 FC50 0000 00B8
                                  | LINE 446
       fmoved _ls0001_+1696,fp0   |> 1DCA  FA39 FC40 0000 06A0
       fmuld stode.rh,fp0,fp0     |> 1DD2  FA39 E003 0000 00B8
       fmoved fp0,_ls0001_+1696   |> 1DDA  FA39 FC50 0000 06A0
                                  | LINE 447
       movl _BTEXT+16,d0          |> 1DE2  2039 0000 0010
       movl d0,stode.i            |> 1DE8  23C0 0000 017C
       movl _ls0001_+1884,d0      |> 1DEE  2039 0000 075C
       movl d0,stode._00082       |> 1DF4  23C0 0000 015C
       movl stode.i,d0            |> 1DFA  2039 0000 017C
       cmpl stode._00082,d0       |> 1E00  B0B9 0000 015C
       bgts stode.label_LJJ       |> 1E06  6E4A
stode.label_LJI:
       nop                        |> 1E08  4E71
                                  | LINE 448
       movl stode.i,d0            |> 1E0A  2039 0000 017C
       addl stode._00025,d0       |> 1E10  D0B9 0000 011C
       subl stode._00026,d0       |> 1E16  90B9 0000 0110
       movl a0@(8),a1             |> 1E1C  2268 0008
       fmoved a1@(0:b)[d0:l:d],fp0
                                  |> 1E20  FA31 FC40 0E00
       movl stode.i,d0            |> 1E26  2039 0000 017C
       movl a0@(4),a1             |> 1E2C  2268 0004
       fmoved fp0,a1@(-8:b)[d0:l:d]
                                  |> 1E30  FA31 FC50 0EF8
       movl stode.i,d0            |> 1E36  2039 0000 017C
       addql #1,d0                |> 1E3C  5280
       movl d0,stode.i            |> 1E3E  23C0 0000 017C
       movl stode.i,d0            |> 1E44  2039 0000 017C
       cmpl stode._00082,d0       |> 1E4A  B0B9 0000 015C
       bles stode.label_LJI       |> 1E50  6FB6
stode.label_LJJ:
       nop                        |> 1E52  4E71
                                  | LINE 449
       movl a0@,a1                |> 1E54  2250
       clrl d0                    |> 1E56  4280
       movl a1,stode._00083+28:l[d0:l:l]
                                  |> 1E58  2189 0DB0 0000 001C
       movl a0@(4),a1             |> 1E60  2268 0004
       movl _BTEXT+20,d0          |> 1E64  2039 0000 0014
       movl a1,stode._00083+28:l[d0:l:l]
                                  |> 1E6A  2189 0DB0 0000 001C
       movl a0@(24),a1            |> 1E72  2268 0018
       movl _BTEXT+48,d0          |> 1E76  2039 0000 0030
       movl a1,stode._00083+28:l[d0:l:l]
                                  |> 1E7C  2189 0DB0 0000 001C
       clrl d0                    |> 1E84  4280
       lea stode._00083+28:l[d0:l:l],a1
                                  |> 1E86  43F0 0DB0 0000 001C
       movl a1,a0                 |> 1E8E  2049
       movl stode._00016,a1       |> 1E90  2279 0000 010C
       jsr a1@                    |> 1E96  4E91
       movl a6@(-4),a0            |> 1E98  206E FFFC
       nop                        |> 1E9C  4E71
                                  | LINE 450
       movl _ls0001_+1896,d0      |> 1E9E  2039 0000 0768
       addql #1,d0                |> 1EA4  5280
       movl d0,_ls0001_+1896      |> 1EA6  23C0 0000 0768
                                  | LINE 451
       movl _BTEXT+16,d0          |> 1EAC  2039 0000 0010
       movl d0,stode.i            |> 1EB2  23C0 0000 017C
       movl _ls0001_+1884,d0      |> 1EB8  2039 0000 075C
       movl d0,stode._00084       |> 1EBE  23C0 0000 0140
       movl stode.i,d0            |> 1EC4  2039 0000 017C
       cmpl stode._00084,d0       |> 1ECA  B0B9 0000 0140
       bgts stode.label_LJL       |> 1ED0  6E5C
stode.label_LJK:
       nop                        |> 1ED2  4E71
                                  | LINE 452
       movl stode.i,d0            |> 1ED4  2039 0000 017C
       movl a0@(24),a1            |> 1EDA  2268 0018
       fmoved a1@(-8:b)[d0:l:d],fp1
                                  |> 1EDE  FA31 FCC0 0EF8
       fmuld _ls0001_+1696,fp1,fp0
                                  |> 1EE4  FA39 E403 0000 06A0
       movl _BTEXT+20,d0          |> 1EEC  2039 0000 0014
       mulsl stode._00025,d0,d0   |> 1EF2  4C39 0800 0000 011C
       movl stode.i,d1            |> 1EFA  2239 0000 017C
       addl d0,d1                 |> 1F00  D280
       subl stode._00026,d1       |> 1F02  92B9 0000 0110
       movl a0@(8),a1             |> 1F08  2268 0008
       fmoved fp0,a1@(0:b)[d1:l:d]
                                  |> 1F0C  FA31 FC50 1E00
       movl stode.i,d0            |> 1F12  2039 0000 017C
       addql #1,d0                |> 1F18  5280
       movl d0,stode.i            |> 1F1A  23C0 0000 017C
       movl stode.i,d0            |> 1F20  2039 0000 017C
       cmpl stode._00084,d0       |> 1F26  B0B9 0000 0140
       bles stode.label_LJK       |> 1F2C  6FA4
stode.label_LJL:
       nop                        |> 1F2E  4E71
                                  | LINE 453
       movl _ls0001_+1864,d0      |> 1F30  2039 0000 0748
       movl d0,_ls0001_+1812      |> 1F36  23C0 0000 0714
                                  | LINE 454
       movl _BTEXT+84,d0          |> 1F3C  2039 0000 0054
       movl d0,_ls0001_+1808      |> 1F42  23C0 0000 0710
                                  | LINE 455
       cmpl #1,_ls0001_+1888      |> 1F48  0CB9 0000 0001 0000 0760
       beq  stode.label_200       |> 1F52  6700 E962
       nop                        |> 1F56  4E71
                                  | LINE 456
       movl _BTEXT+16,d0          |> 1F58  2039 0000 0010
       movl d0,_ls0001_+1888      |> 1F5E  23C0 0000 0760
                                  | LINE 457
       movl _BTEXT+20,d0          |> 1F64  2039 0000 0014
       movl d0,_ls0001_+1856      |> 1F6A  23C0 0000 0740
                                  | LINE 458
       movl _BTEXT+48,d0          |> 1F70  2039 0000 0030
       movl d0,stode.iret         |> 1F76  23C0 0000 00D8
                                  | LINE 459
       bra  stode.label_150       |> 1F7C  6000 E5EC
stode.label_660:
       movl _BTEXT+200,d0         |> 1F80  2039 0000 00C8
       movl d0,_ls0001_+1852      |> 1F86  23C0 0000 073C
                                  | LINE 465
       bra  stode.label_720       |> 1F8C  6000 00D0
stode.label_670:
       movl _BTEXT+204,d0         |> 1F90  2039 0000 00CC
       movl d0,_ls0001_+1852      |> 1F96  23C0 0000 073C
                                  | LINE 467
       bra  stode.label_720       |> 1F9C  6000 00C0
stode.label_680:
       movl _BTEXT+208,d0         |> 1FA0  2039 0000 00D0
       movl d0,_ls0001_+1852      |> 1FA6  23C0 0000 073C
                                  | LINE 469
       bra  stode.label_720       |> 1FAC  6000 00B0
stode.label_690:
       fmoved _BTEXT+216,fp0      |> 1FB0  FA39 FC40 0000 00D8
       fmoved fp0,_ls0001_+1384   |> 1FB8  FA39 FC50 0000 0568
                                  | LINE 471
stode.label_700:
       movl _ls0001_+1904,d0      |> 1FC0  2039 0000 0770
       mulsl _BTEXT+48,d0,d0      |> 1FC6  4C39 0800 0000 0030
       movl _BTEXT+20,d1          |> 1FCE  2239 0000 0014
       addl d0,d1                 |> 1FD4  D280
       fmoved _ls0001_+1392-32:l[d1:l:d],fp1
                                  |> 1FD6  FA30 FCC0 1FB0 0000 0550
       frdivd _BTEXT+32,fp1,fp0   |> 1FE0  FA39 E407 0000 0020
       fmoved fp0,stode.r         |> 1FE8  FA39 FC50 0000 0008
                                  | LINE 472
       movl _BTEXT+16,d0          |> 1FF0  2039 0000 0010
       movl d0,stode.i            |> 1FF6  23C0 0000 017C
       movl _ls0001_+1884,d0      |> 1FFC  2039 0000 075C
       movl d0,stode._00085       |> 2002  23C0 0000 012C
       movl stode.i,d0            |> 2008  2039 0000 017C
       cmpl stode._00085,d0       |> 200E  B0B9 0000 012C
       bgts stode.label_LJO       |> 2014  6E46
stode.label_LJN:
       nop                        |> 2016  4E71
                                  | LINE 473
       movl stode.i,d0            |> 2018  2039 0000 017C
       movl a0@(28),a1            |> 201E  2268 001C
       fmoved a1@(-8:b)[d0:l:d],fp0
                                  |> 2022  FA31 FC40 0EF8
       fmuld stode.r,fp0,fp0      |> 2028  FA39 E003 0000 0008
       movl stode.i,d0            |> 2030  2039 0000 017C
       movl a0@(28),a1            |> 2036  2268 001C
       fmoved fp0,a1@(-8:b)[d0:l:d]
                                  |> 203A  FA31 FC50 0EF8
       movl stode.i,d0            |> 2040  2039 0000 017C
       addql #1,d0                |> 2046  5280
       movl d0,stode.i            |> 2048  23C0 0000 017C
       movl stode.i,d0            |> 204E  2039 0000 017C
       cmpl stode._00085,d0       |> 2054  B0B9 0000 012C
       bles stode.label_LJN       |> 205A  6FBA
stode.label_LJO:
       nop                        |> 205C  4E71
                                  | LINE 474
stode.label_720:
       fmoved _ls0001_+1696,fp0   |> 205E  FA39 FC40 0000 06A0
       fmoved fp0,_ls0001_+1376   |> 2066  FA39 FC50 0000 0560
                                  | LINE 475
       movl _BTEXT+16,d0          |> 206E  2039 0000 0010
       movl d0,_ls0001_+1848      |> 2074  23C0 0000 0738
                                  | LINE 476
       clrl stode._00086          |> 207A  42B9 0000 0118
                                  | LINE 478
       unlk a6                    |> 2080  4E5E
       rts                        |> 2082  4E75
