tbldo.sa revision 1.1       1 *	MOTOROLA MICROPROCESSOR & MEMORY TECHNOLOGY GROUP
      2 *	M68000 Hi-Performance Microprocessor Division
      3 *	M68040 Software Package 
      4 *
      5 *	M68040 Software Package Copyright (c) 1993, 1994 Motorola Inc.
      6 *	All rights reserved.
      7 *
      8 *	THE SOFTWARE is provided on an "AS IS" basis and without warranty.
      9 *	To the maximum extent permitted by applicable law,
     10 *	MOTOROLA DISCLAIMS ALL WARRANTIES WHETHER EXPRESS OR IMPLIED,
     11 *	INCLUDING IMPLIED WARRANTIES OF MERCHANTABILITY OR FITNESS FOR A
     12 *	PARTICULAR PURPOSE and any warranty against infringement with
     13 *	regard to the SOFTWARE (INCLUDING ANY MODIFIED VERSIONS THEREOF)
     14 *	and any accompanying written materials. 
     15 *
     16 *	To the maximum extent permitted by applicable law,
     17 *	IN NO EVENT SHALL MOTOROLA BE LIABLE FOR ANY DAMAGES WHATSOEVER
     18 *	(INCLUDING WITHOUT LIMITATION, DAMAGES FOR LOSS OF BUSINESS
     19 *	PROFITS, BUSINESS INTERRUPTION, LOSS OF BUSINESS INFORMATION, OR
     20 *	OTHER PECUNIARY LOSS) ARISING OF THE USE OR INABILITY TO USE THE
     21 *	SOFTWARE.  Motorola assumes no responsibility for the maintenance
     22 *	and support of the SOFTWARE.  
     23 *
     24 *	You are hereby granted a copyright license to use, modify, and
     25 *	distribute the SOFTWARE so long as this entire notice is retained
     26 *	without alteration in any modified and/or redistributed versions,
     27 *	and that such modified versions are clearly identified as such.
     28 *	No licenses are granted by implication, estoppel or otherwise
     29 *	under any patents or trademarks of Motorola, Inc.
     30 
     31 *
     32 *	tbldo.sa 3.1 12/10/90
     33 *
     34 * Modified:
     35 *	8/16/90	chinds	The table was constructed to use only one level
     36 *			of indirection in do_func for monoadic
     37 *			functions.  Dyadic functions require two
     38 *			levels, and the tables are still contained
     39 *			in do_func.  The table is arranged for 
     40 *			index with a 10-bit index, with the first
     41 *			7 bits the opcode, and the remaining 3
     42 *			the stag.  For dyadic functions, all
     43 *			valid addresses are to the generic entry
     44 *			point. 
     45 *
     46 
     47 TBLDO	IDNT    2,1 Motorola 040 Floating Point Software Package
     48 
     49 	section	8
     50 
     51 	xref	ld_pinf,ld_pone,ld_ppi2
     52 	xref	t_dz2,t_operr
     53 	xref	serror,sone,szero,sinf,snzrinx
     54 	xref	sopr_inf,spi_2,src_nan,szr_inf
     55 
     56 	xref	smovcr
     57 	xref	pmod,prem,pscale
     58 	xref	satanh,satanhd
     59 	xref	sacos,sacosd,sasin,sasind,satan,satand
     60 	xref	setox,setoxd,setoxm1,setoxm1d,setoxm1i
     61 	xref	sgetexp,sgetexpd,sgetman,sgetmand
     62 	xref	sint,sintd,sintrz
     63 	xref	ssincos,ssincosd,ssincosi,ssincosnan,ssincosz
     64 	xref	scos,scosd,ssin,ssind,stan,stand
     65 	xref	scosh,scoshd,ssinh,ssinhd,stanh,stanhd
     66 	xref	sslog10,sslog2,sslogn,sslognp1
     67 	xref	sslog10d,sslog2d,sslognd,slognp1d
     68 	xref	stentox,stentoxd,stwotox,stwotoxd
     69 
     70 *	instruction		;opcode-stag Notes
     71 	xdef	tblpre
     72 tblpre:
     73 	dc.l	smovcr		;$00-0 fmovecr all
     74 	dc.l	smovcr		;$00-1 fmovecr all
     75 	dc.l	smovcr		;$00-2 fmovecr all
     76 	dc.l	smovcr		;$00-3 fmovecr all
     77 	dc.l	smovcr		;$00-4 fmovecr all
     78 	dc.l	smovcr		;$00-5 fmovecr all
     79 	dc.l	smovcr		;$00-6 fmovecr all
     80 	dc.l	smovcr		;$00-7 fmovecr all
     81 
     82 	dc.l	sint		;$01-0 fint norm
     83 	dc.l	szero		;$01-1 fint zero 
     84 	dc.l	sinf		;$01-2 fint inf
     85 	dc.l	src_nan		;$01-3 fint nan
     86 	dc.l	sintd		;$01-4 fint denorm inx
     87 	dc.l	serror		;$01-5 fint ERROR
     88 	dc.l	serror		;$01-6 fint ERROR
     89 	dc.l	serror		;$01-7 fint ERROR
     90 
     91 	dc.l	ssinh		;$02-0 fsinh norm
     92 	dc.l	szero		;$02-1 fsinh zero
     93 	dc.l	sinf		;$02-2 fsinh inf
     94 	dc.l	src_nan		;$02-3 fsinh nan
     95 	dc.l	ssinhd		;$02-4 fsinh denorm
     96 	dc.l	serror		;$02-5 fsinh ERROR
     97 	dc.l	serror		;$02-6 fsinh ERROR
     98 	dc.l	serror		;$02-7 fsinh ERROR
     99 
    100 	dc.l	sintrz		;$03-0 fintrz norm
    101 	dc.l	szero		;$03-1 fintrz zero
    102 	dc.l	sinf		;$03-2 fintrz inf
    103 	dc.l	src_nan		;$03-3 fintrz nan
    104 	dc.l	snzrinx		;$03-4 fintrz denorm inx
    105 	dc.l	serror		;$03-5 fintrz ERROR
    106 	dc.l	serror		;$03-6 fintrz ERROR
    107 	dc.l	serror		;$03-7 fintrz ERROR
    108 
    109 	dc.l	serror		;$04-0 ERROR - illegal extension
    110 	dc.l	serror		;$04-1 ERROR - illegal extension
    111 	dc.l	serror		;$04-2 ERROR - illegal extension
    112 	dc.l	serror		;$04-3 ERROR - illegal extension
    113 	dc.l	serror		;$04-4 ERROR - illegal extension
    114 	dc.l	serror		;$04-5 ERROR - illegal extension
    115 	dc.l	serror		;$04-6 ERROR - illegal extension
    116 	dc.l	serror		;$04-7 ERROR - illegal extension
    117 
    118 	dc.l	serror		;$05-0 ERROR - illegal extension
    119 	dc.l	serror		;$05-1 ERROR - illegal extension
    120 	dc.l	serror		;$05-2 ERROR - illegal extension
    121 	dc.l	serror		;$05-3 ERROR - illegal extension
    122 	dc.l	serror		;$05-4 ERROR - illegal extension
    123 	dc.l	serror		;$05-5 ERROR - illegal extension
    124 	dc.l	serror		;$05-6 ERROR - illegal extension
    125 	dc.l	serror		;$05-7 ERROR - illegal extension
    126 
    127 	dc.l	sslognp1	;$06-0 flognp1 norm
    128 	dc.l	szero		;$06-1 flognp1 zero
    129 	dc.l	sopr_inf	;$06-2 flognp1 inf
    130 	dc.l	src_nan		;$06-3 flognp1 nan
    131 	dc.l	slognp1d	;$06-4 flognp1 denorm
    132 	dc.l	serror		;$06-5 flognp1 ERROR
    133 	dc.l	serror		;$06-6 flognp1 ERROR
    134 	dc.l	serror		;$06-7 flognp1 ERROR
    135 
    136 	dc.l	serror		;$07-0 ERROR - illegal extension
    137 	dc.l	serror		;$07-1 ERROR - illegal extension
    138 	dc.l	serror		;$07-2 ERROR - illegal extension
    139 	dc.l	serror		;$07-3 ERROR - illegal extension
    140 	dc.l	serror		;$07-4 ERROR - illegal extension
    141 	dc.l	serror		;$07-5 ERROR - illegal extension
    142 	dc.l	serror		;$07-6 ERROR - illegal extension
    143 	dc.l	serror		;$07-7 ERROR - illegal extension
    144 
    145 	dc.l	setoxm1		;$08-0 fetoxm1 norm
    146 	dc.l	szero		;$08-1 fetoxm1 zero
    147 	dc.l	setoxm1i	;$08-2 fetoxm1 inf
    148 	dc.l	src_nan		;$08-3 fetoxm1 nan
    149 	dc.l	setoxm1d	;$08-4 fetoxm1 denorm
    150 	dc.l	serror		;$08-5 fetoxm1 ERROR
    151 	dc.l	serror		;$08-6 fetoxm1 ERROR
    152 	dc.l	serror		;$08-7 fetoxm1 ERROR
    153 
    154 	dc.l	stanh		;$09-0 ftanh norm
    155 	dc.l	szero		;$09-1 ftanh zero
    156 	dc.l	sone		;$09-2 ftanh inf
    157 	dc.l	src_nan		;$09-3 ftanh nan
    158 	dc.l	stanhd		;$09-4 ftanh denorm
    159 	dc.l	serror		;$09-5 ftanh ERROR
    160 	dc.l	serror		;$09-6 ftanh ERROR
    161 	dc.l	serror		;$09-7 ftanh ERROR
    162 
    163 	dc.l	satan		;$0a-0 fatan norm
    164 	dc.l	szero		;$0a-1 fatan zero
    165 	dc.l	spi_2		;$0a-2 fatan inf
    166 	dc.l	src_nan		;$0a-3 fatan nan
    167 	dc.l	satand		;$0a-4 fatan denorm
    168 	dc.l	serror		;$0a-5 fatan ERROR
    169 	dc.l	serror		;$0a-6 fatan ERROR
    170 	dc.l	serror		;$0a-7 fatan ERROR
    171 
    172 	dc.l	serror		;$0b-0 ERROR - illegal extension
    173 	dc.l	serror		;$0b-1 ERROR - illegal extension
    174 	dc.l	serror		;$0b-2 ERROR - illegal extension
    175 	dc.l	serror		;$0b-3 ERROR - illegal extension
    176 	dc.l	serror		;$0b-4 ERROR - illegal extension
    177 	dc.l	serror		;$0b-5 ERROR - illegal extension
    178 	dc.l	serror		;$0b-6 ERROR - illegal extension
    179 	dc.l	serror		;$0b-7 ERROR - illegal extension
    180 
    181 	dc.l	sasin		;$0c-0 fasin norm
    182 	dc.l	szero		;$0c-1 fasin zero
    183 	dc.l	t_operr		;$0c-2 fasin inf
    184 	dc.l	src_nan		;$0c-3 fasin nan
    185 	dc.l	sasind		;$0c-4 fasin denorm
    186 	dc.l	serror		;$0c-5 fasin ERROR
    187 	dc.l	serror		;$0c-6 fasin ERROR
    188 	dc.l	serror		;$0c-7 fasin ERROR
    189 
    190 	dc.l	satanh		;$0d-0 fatanh norm
    191 	dc.l	szero		;$0d-1 fatanh zero
    192 	dc.l	t_operr		;$0d-2 fatanh inf
    193 	dc.l	src_nan		;$0d-3 fatanh nan
    194 	dc.l	satanhd		;$0d-4 fatanh denorm
    195 	dc.l	serror		;$0d-5 fatanh ERROR
    196 	dc.l	serror		;$0d-6 fatanh ERROR
    197 	dc.l	serror		;$0d-7 fatanh ERROR
    198 
    199 	dc.l	ssin		;$0e-0 fsin norm
    200 	dc.l	szero		;$0e-1 fsin zero
    201 	dc.l	t_operr		;$0e-2 fsin inf
    202 	dc.l	src_nan		;$0e-3 fsin nan
    203 	dc.l	ssind		;$0e-4 fsin denorm
    204 	dc.l	serror		;$0e-5 fsin ERROR
    205 	dc.l	serror		;$0e-6 fsin ERROR
    206 	dc.l	serror		;$0e-7 fsin ERROR
    207 
    208 	dc.l	stan		;$0f-0 ftan norm
    209 	dc.l	szero		;$0f-1 ftan zero
    210 	dc.l	t_operr		;$0f-2 ftan inf
    211 	dc.l	src_nan		;$0f-3 ftan nan
    212 	dc.l	stand		;$0f-4 ftan denorm
    213 	dc.l	serror		;$0f-5 ftan ERROR
    214 	dc.l	serror		;$0f-6 ftan ERROR
    215 	dc.l	serror		;$0f-7 ftan ERROR
    216 
    217 	dc.l	setox		;$10-0 fetox norm
    218 	dc.l	ld_pone		;$10-1 fetox zero
    219 	dc.l	szr_inf		;$10-2 fetox inf
    220 	dc.l	src_nan		;$10-3 fetox nan
    221 	dc.l	setoxd		;$10-4 fetox denorm
    222 	dc.l	serror		;$10-5 fetox ERROR
    223 	dc.l	serror		;$10-6 fetox ERROR
    224 	dc.l	serror		;$10-7 fetox ERROR
    225 
    226 	dc.l	stwotox		;$11-0 ftwotox norm
    227 	dc.l	ld_pone		;$11-1 ftwotox zero
    228 	dc.l	szr_inf		;$11-2 ftwotox inf
    229 	dc.l	src_nan		;$11-3 ftwotox nan
    230 	dc.l	stwotoxd	;$11-4 ftwotox denorm
    231 	dc.l	serror		;$11-5 ftwotox ERROR
    232 	dc.l	serror		;$11-6 ftwotox ERROR
    233 	dc.l	serror		;$11-7 ftwotox ERROR
    234 
    235 	dc.l	stentox		;$12-0 ftentox norm
    236 	dc.l	ld_pone		;$12-1 ftentox zero
    237 	dc.l	szr_inf		;$12-2 ftentox inf
    238 	dc.l	src_nan		;$12-3 ftentox nan
    239 	dc.l	stentoxd	;$12-4 ftentox denorm
    240 	dc.l	serror		;$12-5 ftentox ERROR
    241 	dc.l	serror		;$12-6 ftentox ERROR
    242 	dc.l	serror		;$12-7 ftentox ERROR
    243 
    244 	dc.l	serror		;$13-0 ERROR - illegal extension
    245 	dc.l	serror		;$13-1 ERROR - illegal extension
    246 	dc.l	serror		;$13-2 ERROR - illegal extension
    247 	dc.l	serror		;$13-3 ERROR - illegal extension
    248 	dc.l	serror		;$13-4 ERROR - illegal extension
    249 	dc.l	serror		;$13-5 ERROR - illegal extension
    250 	dc.l	serror		;$13-6 ERROR - illegal extension
    251 	dc.l	serror		;$13-7 ERROR - illegal extension
    252 
    253 	dc.l	sslogn		;$14-0 flogn norm
    254 	dc.l	t_dz2		;$14-1 flogn zero
    255 	dc.l	sopr_inf	;$14-2 flogn inf
    256 	dc.l	src_nan		;$14-3 flogn nan
    257 	dc.l	sslognd		;$14-4 flogn denorm
    258 	dc.l	serror		;$14-5 flogn ERROR
    259 	dc.l	serror		;$14-6 flogn ERROR
    260 	dc.l	serror		;$14-7 flogn ERROR
    261 
    262 	dc.l	sslog10		;$15-0 flog10 norm
    263 	dc.l	t_dz2		;$15-1 flog10 zero
    264 	dc.l	sopr_inf	;$15-2 flog10 inf
    265 	dc.l	src_nan		;$15-3 flog10 nan
    266 	dc.l	sslog10d	;$15-4 flog10 denorm
    267 	dc.l	serror		;$15-5 flog10 ERROR
    268 	dc.l	serror		;$15-6 flog10 ERROR
    269 	dc.l	serror		;$15-7 flog10 ERROR
    270 
    271 	dc.l	sslog2		;$16-0 flog2 norm
    272 	dc.l	t_dz2		;$16-1 flog2 zero
    273 	dc.l	sopr_inf	;$16-2 flog2 inf
    274 	dc.l	src_nan		;$16-3 flog2 nan
    275 	dc.l	sslog2d		;$16-4 flog2 denorm
    276 	dc.l	serror		;$16-5 flog2 ERROR
    277 	dc.l	serror		;$16-6 flog2 ERROR
    278 	dc.l	serror		;$16-7 flog2 ERROR
    279 
    280 	dc.l	serror		;$17-0 ERROR - illegal extension
    281 	dc.l	serror		;$17-1 ERROR - illegal extension
    282 	dc.l	serror		;$17-2 ERROR - illegal extension
    283 	dc.l	serror		;$17-3 ERROR - illegal extension
    284 	dc.l	serror		;$17-4 ERROR - illegal extension
    285 	dc.l	serror		;$17-5 ERROR - illegal extension
    286 	dc.l	serror		;$17-6 ERROR - illegal extension
    287 	dc.l	serror		;$17-7 ERROR - illegal extension
    288 
    289 	dc.l	serror		;$18-0 ERROR - illegal extension
    290 	dc.l	serror		;$18-1 ERROR - illegal extension
    291 	dc.l	serror		;$18-2 ERROR - illegal extension
    292 	dc.l	serror		;$18-3 ERROR - illegal extension
    293 	dc.l	serror		;$18-4 ERROR - illegal extension
    294 	dc.l	serror		;$18-5 ERROR - illegal extension
    295 	dc.l	serror		;$18-6 ERROR - illegal extension
    296 	dc.l	serror		;$18-7 ERROR - illegal extension
    297 
    298 	dc.l	scosh		;$19-0 fcosh norm
    299 	dc.l	ld_pone		;$19-1 fcosh zero
    300 	dc.l	ld_pinf		;$19-2 fcosh inf
    301 	dc.l	src_nan		;$19-3 fcosh nan
    302 	dc.l	scoshd		;$19-4 fcosh denorm
    303 	dc.l	serror		;$19-5 fcosh ERROR
    304 	dc.l	serror		;$19-6 fcosh ERROR
    305 	dc.l	serror		;$19-7 fcosh ERROR
    306 
    307 	dc.l	serror		;$1a-0 ERROR - illegal extension
    308 	dc.l	serror		;$1a-1 ERROR - illegal extension
    309 	dc.l	serror		;$1a-2 ERROR - illegal extension
    310 	dc.l	serror		;$1a-3 ERROR - illegal extension
    311 	dc.l	serror		;$1a-4 ERROR - illegal extension
    312 	dc.l	serror		;$1a-5 ERROR - illegal extension
    313 	dc.l	serror		;$1a-6 ERROR - illegal extension
    314 	dc.l	serror		;$1a-7 ERROR - illegal extension
    315 
    316 	dc.l	serror		;$1b-0 ERROR - illegal extension
    317 	dc.l	serror		;$1b-1 ERROR - illegal extension
    318 	dc.l	serror		;$1b-2 ERROR - illegal extension
    319 	dc.l	serror		;$1b-3 ERROR - illegal extension
    320 	dc.l	serror		;$1b-4 ERROR - illegal extension
    321 	dc.l	serror		;$1b-5 ERROR - illegal extension
    322 	dc.l	serror		;$1b-6 ERROR - illegal extension
    323 	dc.l	serror		;$1b-7 ERROR - illegal extension
    324 
    325 	dc.l	sacos		;$1c-0 facos norm
    326 	dc.l	ld_ppi2		;$1c-1 facos zero
    327 	dc.l	t_operr		;$1c-2 facos inf
    328 	dc.l	src_nan		;$1c-3 facos nan
    329 	dc.l	sacosd		;$1c-4 facos denorm
    330 	dc.l	serror		;$1c-5 facos ERROR
    331 	dc.l	serror		;$1c-6 facos ERROR
    332 	dc.l	serror		;$1c-7 facos ERROR
    333 
    334 	dc.l	scos		;$1d-0 fcos norm
    335 	dc.l	ld_pone		;$1d-1 fcos zero
    336 	dc.l	t_operr		;$1d-2 fcos inf
    337 	dc.l	src_nan		;$1d-3 fcos nan
    338 	dc.l	scosd		;$1d-4 fcos denorm
    339 	dc.l	serror		;$1d-5 fcos ERROR
    340 	dc.l	serror		;$1d-6 fcos ERROR
    341 	dc.l	serror		;$1d-7 fcos ERROR
    342 
    343 	dc.l	sgetexp		;$1e-0 fgetexp norm
    344 	dc.l	szero		;$1e-1 fgetexp zero
    345 	dc.l	t_operr		;$1e-2 fgetexp inf
    346 	dc.l	src_nan		;$1e-3 fgetexp nan
    347 	dc.l	sgetexpd	;$1e-4 fgetexp denorm
    348 	dc.l	serror		;$1e-5 fgetexp ERROR
    349 	dc.l	serror		;$1e-6 fgetexp ERROR
    350 	dc.l	serror		;$1e-7 fgetexp ERROR
    351 
    352 	dc.l	sgetman		;$1f-0 fgetman norm
    353 	dc.l	szero		;$1f-1 fgetman zero
    354 	dc.l	t_operr		;$1f-2 fgetman inf
    355 	dc.l	src_nan		;$1f-3 fgetman nan
    356 	dc.l	sgetmand	;$1f-4 fgetman denorm
    357 	dc.l	serror		;$1f-5 fgetman ERROR
    358 	dc.l	serror		;$1f-6 fgetman ERROR
    359 	dc.l	serror		;$1f-7 fgetman ERROR
    360 
    361 	dc.l	serror		;$20-0 ERROR - illegal extension
    362 	dc.l	serror		;$20-1 ERROR - illegal extension
    363 	dc.l	serror		;$20-2 ERROR - illegal extension
    364 	dc.l	serror		;$20-3 ERROR - illegal extension
    365 	dc.l	serror		;$20-4 ERROR - illegal extension
    366 	dc.l	serror		;$20-5 ERROR - illegal extension
    367 	dc.l	serror		;$20-6 ERROR - illegal extension
    368 	dc.l	serror		;$20-7 ERROR - illegal extension
    369 
    370 	dc.l	pmod		;$21-0 fmod all
    371 	dc.l	pmod		;$21-1 fmod all
    372 	dc.l	pmod		;$21-2 fmod all
    373 	dc.l	pmod		;$21-3 fmod all
    374 	dc.l	pmod		;$21-4 fmod all
    375 	dc.l	serror		;$21-5 fmod ERROR
    376 	dc.l	serror		;$21-6 fmod ERROR
    377 	dc.l	serror		;$21-7 fmod ERROR
    378 
    379 	dc.l	serror		;$22-0 ERROR - illegal extension
    380 	dc.l	serror		;$22-1 ERROR - illegal extension
    381 	dc.l	serror		;$22-2 ERROR - illegal extension
    382 	dc.l	serror		;$22-3 ERROR - illegal extension
    383 	dc.l	serror		;$22-4 ERROR - illegal extension
    384 	dc.l	serror		;$22-5 ERROR - illegal extension
    385 	dc.l	serror		;$22-6 ERROR - illegal extension
    386 	dc.l	serror		;$22-7 ERROR - illegal extension
    387 
    388 	dc.l	serror		;$23-0 ERROR - illegal extension
    389 	dc.l	serror		;$23-1 ERROR - illegal extension
    390 	dc.l	serror		;$23-2 ERROR - illegal extension
    391 	dc.l	serror		;$23-3 ERROR - illegal extension
    392 	dc.l	serror		;$23-4 ERROR - illegal extension
    393 	dc.l	serror		;$23-5 ERROR - illegal extension
    394 	dc.l	serror		;$23-6 ERROR - illegal extension
    395 	dc.l	serror		;$23-7 ERROR - illegal extension
    396 
    397 	dc.l	serror		;$24-0 ERROR - illegal extension
    398 	dc.l	serror		;$24-1 ERROR - illegal extension
    399 	dc.l	serror		;$24-2 ERROR - illegal extension
    400 	dc.l	serror		;$24-3 ERROR - illegal extension
    401 	dc.l	serror		;$24-4 ERROR - illegal extension
    402 	dc.l	serror		;$24-5 ERROR - illegal extension
    403 	dc.l	serror		;$24-6 ERROR - illegal extension
    404 	dc.l	serror		;$24-7 ERROR - illegal extension
    405 
    406 	dc.l	prem		;$25-0 frem all
    407 	dc.l	prem		;$25-1 frem all
    408 	dc.l	prem		;$25-2 frem all
    409 	dc.l	prem		;$25-3 frem all
    410 	dc.l	prem		;$25-4 frem all
    411 	dc.l	serror		;$25-5 frem ERROR
    412 	dc.l	serror		;$25-6 frem ERROR
    413 	dc.l	serror		;$25-7 frem ERROR
    414 
    415 	dc.l	pscale		;$26-0 fscale all
    416 	dc.l	pscale		;$26-1 fscale all
    417 	dc.l	pscale		;$26-2 fscale all
    418 	dc.l	pscale		;$26-3 fscale all
    419 	dc.l	pscale		;$26-4 fscale all
    420 	dc.l	serror		;$26-5 fscale ERROR
    421 	dc.l	serror		;$26-6 fscale ERROR
    422 	dc.l	serror		;$26-7 fscale ERROR
    423 
    424 	dc.l	serror		;$27-0 ERROR - illegal extension
    425 	dc.l	serror		;$27-1 ERROR - illegal extension
    426 	dc.l	serror		;$27-2 ERROR - illegal extension
    427 	dc.l	serror		;$27-3 ERROR - illegal extension
    428 	dc.l	serror		;$27-4 ERROR - illegal extension
    429 	dc.l	serror		;$27-5 ERROR - illegal extension
    430 	dc.l	serror		;$27-6 ERROR - illegal extension
    431 	dc.l	serror		;$27-7 ERROR - illegal extension
    432 
    433 	dc.l	serror		;$28-0 ERROR - illegal extension
    434 	dc.l	serror		;$28-1 ERROR - illegal extension
    435 	dc.l	serror		;$28-2 ERROR - illegal extension
    436 	dc.l	serror		;$28-3 ERROR - illegal extension
    437 	dc.l	serror		;$28-4 ERROR - illegal extension
    438 	dc.l	serror		;$28-5 ERROR - illegal extension
    439 	dc.l	serror		;$28-6 ERROR - illegal extension
    440 	dc.l	serror		;$28-7 ERROR - illegal extension
    441 
    442 	dc.l	serror		;$29-0 ERROR - illegal extension
    443 	dc.l	serror		;$29-1 ERROR - illegal extension
    444 	dc.l	serror		;$29-2 ERROR - illegal extension
    445 	dc.l	serror		;$29-3 ERROR - illegal extension
    446 	dc.l	serror		;$29-4 ERROR - illegal extension
    447 	dc.l	serror		;$29-5 ERROR - illegal extension
    448 	dc.l	serror		;$29-6 ERROR - illegal extension
    449 	dc.l	serror		;$29-7 ERROR - illegal extension
    450 
    451 	dc.l	serror		;$2a-0 ERROR - illegal extension
    452 	dc.l	serror		;$2a-1 ERROR - illegal extension
    453 	dc.l	serror		;$2a-2 ERROR - illegal extension
    454 	dc.l	serror		;$2a-3 ERROR - illegal extension
    455 	dc.l	serror		;$2a-4 ERROR - illegal extension
    456 	dc.l	serror		;$2a-5 ERROR - illegal extension
    457 	dc.l	serror		;$2a-6 ERROR - illegal extension
    458 	dc.l	serror		;$2a-7 ERROR - illegal extension
    459 
    460 	dc.l	serror		;$2b-0 ERROR - illegal extension
    461 	dc.l	serror		;$2b-1 ERROR - illegal extension
    462 	dc.l	serror		;$2b-2 ERROR - illegal extension
    463 	dc.l	serror		;$2b-3 ERROR - illegal extension
    464 	dc.l	serror		;$2b-4 ERROR - illegal extension
    465 	dc.l	serror		;$2b-5 ERROR - illegal extension
    466 	dc.l	serror		;$2b-6 ERROR - illegal extension
    467 	dc.l	serror		;$2b-7 ERROR - illegal extension
    468 
    469 	dc.l	serror		;$2c-0 ERROR - illegal extension
    470 	dc.l	serror		;$2c-1 ERROR - illegal extension
    471 	dc.l	serror		;$2c-2 ERROR - illegal extension
    472 	dc.l	serror		;$2c-3 ERROR - illegal extension
    473 	dc.l	serror		;$2c-4 ERROR - illegal extension
    474 	dc.l	serror		;$2c-5 ERROR - illegal extension
    475 	dc.l	serror		;$2c-6 ERROR - illegal extension
    476 	dc.l	serror		;$2c-7 ERROR - illegal extension
    477 
    478 	dc.l	serror		;$2d-0 ERROR - illegal extension
    479 	dc.l	serror		;$2d-1 ERROR - illegal extension
    480 	dc.l	serror		;$2d-2 ERROR - illegal extension
    481 	dc.l	serror		;$2d-3 ERROR - illegal extension
    482 	dc.l	serror		;$2d-4 ERROR - illegal extension
    483 	dc.l	serror		;$2d-5 ERROR - illegal extension
    484 	dc.l	serror		;$2d-6 ERROR - illegal extension
    485 	dc.l	serror		;$2d-7 ERROR - illegal extension
    486 
    487 	dc.l	serror		;$2e-0 ERROR - illegal extension
    488 	dc.l	serror		;$2e-1 ERROR - illegal extension
    489 	dc.l	serror		;$2e-2 ERROR - illegal extension
    490 	dc.l	serror		;$2e-3 ERROR - illegal extension
    491 	dc.l	serror		;$2e-4 ERROR - illegal extension
    492 	dc.l	serror		;$2e-5 ERROR - illegal extension
    493 	dc.l	serror		;$2e-6 ERROR - illegal extension
    494 	dc.l	serror		;$2e-7 ERROR - illegal extension
    495 
    496 	dc.l	serror		;$2f-0 ERROR - illegal extension
    497 	dc.l	serror		;$2f-1 ERROR - illegal extension
    498 	dc.l	serror		;$2f-2 ERROR - illegal extension
    499 	dc.l	serror		;$2f-3 ERROR - illegal extension
    500 	dc.l	serror		;$2f-4 ERROR - illegal extension
    501 	dc.l	serror		;$2f-5 ERROR - illegal extension
    502 	dc.l	serror		;$2f-6 ERROR - illegal extension
    503 	dc.l	serror		;$2f-7 ERROR - illegal extension
    504 
    505 	dc.l	ssincos		;$30-0 fsincos norm
    506 	dc.l	ssincosz	;$30-1 fsincos zero
    507 	dc.l	ssincosi	;$30-2 fsincos inf
    508 	dc.l	ssincosnan	;$30-3 fsincos nan
    509 	dc.l	ssincosd	;$30-4 fsincos denorm
    510 	dc.l	serror		;$30-5 fsincos ERROR
    511 	dc.l	serror		;$30-6 fsincos ERROR
    512 	dc.l	serror		;$30-7 fsincos ERROR
    513 
    514 	dc.l	ssincos		;$31-0 fsincos norm
    515 	dc.l	ssincosz	;$31-1 fsincos zero
    516 	dc.l	ssincosi	;$31-2 fsincos inf
    517 	dc.l	ssincosnan	;$31-3 fsincos nan
    518 	dc.l	ssincosd	;$31-4 fsincos denorm
    519 	dc.l	serror		;$31-5 fsincos ERROR
    520 	dc.l	serror		;$31-6 fsincos ERROR
    521 	dc.l	serror		;$31-7 fsincos ERROR
    522 
    523 	dc.l	ssincos		;$32-0 fsincos norm
    524 	dc.l	ssincosz	;$32-1 fsincos zero
    525 	dc.l	ssincosi	;$32-2 fsincos inf
    526 	dc.l	ssincosnan	;$32-3 fsincos nan
    527 	dc.l	ssincosd	;$32-4 fsincos denorm
    528 	dc.l	serror		;$32-5 fsincos ERROR
    529 	dc.l	serror		;$32-6 fsincos ERROR
    530 	dc.l	serror		;$32-7 fsincos ERROR
    531 
    532 	dc.l	ssincos		;$33-0 fsincos norm
    533 	dc.l	ssincosz	;$33-1 fsincos zero
    534 	dc.l	ssincosi	;$33-2 fsincos inf
    535 	dc.l	ssincosnan	;$33-3 fsincos nan
    536 	dc.l	ssincosd	;$33-4 fsincos denorm
    537 	dc.l	serror		;$33-5 fsincos ERROR
    538 	dc.l	serror		;$33-6 fsincos ERROR
    539 	dc.l	serror		;$33-7 fsincos ERROR
    540 
    541 	dc.l	ssincos		;$34-0 fsincos norm
    542 	dc.l	ssincosz	;$34-1 fsincos zero
    543 	dc.l	ssincosi	;$34-2 fsincos inf
    544 	dc.l	ssincosnan	;$34-3 fsincos nan
    545 	dc.l	ssincosd	;$34-4 fsincos denorm
    546 	dc.l	serror		;$34-5 fsincos ERROR
    547 	dc.l	serror		;$34-6 fsincos ERROR
    548 	dc.l	serror		;$34-7 fsincos ERROR
    549 
    550 	dc.l	ssincos		;$35-0 fsincos norm
    551 	dc.l	ssincosz	;$35-1 fsincos zero
    552 	dc.l	ssincosi	;$35-2 fsincos inf
    553 	dc.l	ssincosnan	;$35-3 fsincos nan
    554 	dc.l	ssincosd	;$35-4 fsincos denorm
    555 	dc.l	serror		;$35-5 fsincos ERROR
    556 	dc.l	serror		;$35-6 fsincos ERROR
    557 	dc.l	serror		;$35-7 fsincos ERROR
    558 
    559 	dc.l	ssincos		;$36-0 fsincos norm
    560 	dc.l	ssincosz	;$36-1 fsincos zero
    561 	dc.l	ssincosi	;$36-2 fsincos inf
    562 	dc.l	ssincosnan	;$36-3 fsincos nan
    563 	dc.l	ssincosd	;$36-4 fsincos denorm
    564 	dc.l	serror		;$36-5 fsincos ERROR
    565 	dc.l	serror		;$36-6 fsincos ERROR
    566 	dc.l	serror		;$36-7 fsincos ERROR
    567 
    568 	dc.l	ssincos		;$37-0 fsincos norm
    569 	dc.l	ssincosz	;$37-1 fsincos zero
    570 	dc.l	ssincosi	;$37-2 fsincos inf
    571 	dc.l	ssincosnan	;$37-3 fsincos nan
    572 	dc.l	ssincosd	;$37-4 fsincos denorm
    573 	dc.l	serror		;$37-5 fsincos ERROR
    574 	dc.l	serror		;$37-6 fsincos ERROR
    575 	dc.l	serror		;$37-7 fsincos ERROR
    576 
    577 	end
    578