mirror of
https://github.com/elliotnunn/mac-rom.git
synced 2024-06-01 07:41:58 +00:00
4325cdcc78
Resource forks are included only for .rsrc files. These are DeRezzed into their data fork. 'ckid' resources, from the Projector VCS, are not included. The Tools directory, containing mostly junk, is also excluded.
189 lines
7.2 KiB
Plaintext
189 lines
7.2 KiB
Plaintext
;EASE$$$ READ ONLY COPY of file Ò881ELEMS68KC.aÓ
|
|
; 1.1 CCH 11/11/1988 Fixed Header.
|
|
; 1.0 CCH 11/ 9/1988 Adding to EASE.
|
|
; OLD REVISIONS BELOW
|
|
;¥1.1 MSH 4/28/88 Fixing corrupted resource fork.
|
|
; 1.0 BBM 2/12/88 Adding file for the first time into EASEÉ
|
|
; END EASE MODIFICATION HISTORY
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
;; File: 881Elems68KC.a
|
|
;; Implementation of Elems68K for machines using the Motorola MC68881
|
|
;; Copyright Apple Computer, Inc. 1983,1984,1985,1986,1987
|
|
;; All Rights Reserved
|
|
;; Confidential and Proprietary to Apple Computer,Inc.
|
|
;;
|
|
;; 24 Jan 87 -S.McD. Made coefficients for polynomials 96 bits instead of 80.
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
|
; Coefficients for polynomial P in log approximation.
|
|
LOG21P
|
|
|
|
BLANKS ON
|
|
STRING ASIS
|
|
|
|
DC.W 5 ; degree of LOG21P
|
|
DC.B $3F, $F6, $00, $00, $B9, $46, $46, $AF, $F6, $CE, $3B, $FF
|
|
DC.B $3F, $F9, $00, $00, $94, $F4, $32, $21, $4D, $61, $FB, $EB
|
|
DC.B $3F, $FB, $00, $00, $DC, $97, $89, $03, $D9, $44, $78, $93
|
|
DC.B $3F, $FF, $00, $00, $9F, $9E, $39, $46, $57, $CA, $1D, $05
|
|
DC.B $C0, $01, $00, $00, $CD, $6B, $C5, $3A, $46, $EC, $DC, $9A
|
|
DC.B $40, $01, $00, $00, $B4, $83, $97, $E7, $BA, $E6, $FC, $E0
|
|
|
|
; Coefficients for polynomial Q in log approximation.
|
|
LOG21Q
|
|
DC.W 2 ; degree of LOG21Q
|
|
DC.B $3F, $FF, $00, $00, $80, $00, $00, $00, $00, $00, $00, $00
|
|
DC.B $C0, $00, $00, $00, $B8, $18, $35, $C3, $CE, $0A, $5E, $1D
|
|
DC.B $3F, $FF, $00, $00, $FA, $3E, $DF, $0E, $DD, $F4, $1A, $96
|
|
|
|
; Coefficients for polynomial P in exp approximation.
|
|
EXP21P
|
|
DC.W 3 ; degree of EXP21P
|
|
DC.B $BF, $EE, $00, $00, $FF, $88, $90, $C8, $1B, $20, $9B, $79
|
|
DC.B $3F, $F9, $00, $00, $DA, $5C, $84, $EF, $B8, $13, $27, $2F
|
|
DC.B $40, $03, $00, $00, $97, $D3, $BA, $EA, $F8, $0F, $FD, $45
|
|
DC.B $40, $09, $00, $00, $AB, $86, $71, $A1, $95, $BE, $FF, $0C
|
|
|
|
; Coefficients for polynomial P in exp approximation.
|
|
EXP21Q
|
|
DC.W 2 ; degree of LOG21Q
|
|
DC.B $3F, $FF, $00, $00, $80, $00, $00, $00, $00, $00, $00, $00
|
|
DC.B $40, $06, $00, $00, $D5, $48, $70, $02, $98, $4B, $5A, $B4
|
|
DC.B $40, $0A, $00, $00, $F7, $75, $61, $2E, $96, $B7, $07, $80
|
|
|
|
FPK1
|
|
DC.B $3F, $FF, $80, $00, $00, $00, $00, $00, $00, $00
|
|
FPKM1
|
|
DC.B $BF, $FF, $80, $00, $00, $00, $00, $00, $00, $00
|
|
FPK0
|
|
DC.B $00, $00, $00, $00, $00, $00, $00, $00, $00, $00
|
|
FPKM0
|
|
DC.B $80, $00, $00, $00, $00, $00, $00, $00, $00, $00
|
|
FPK2
|
|
DC.B $40, $00, $80, $00, $00, $00, $00, $00, $00, $00
|
|
FPKMAXINT
|
|
DC.B $40, $0D, $FF, $FE, $00, $00, $00, $00, $00, $00
|
|
FPKINF
|
|
DC.B $7F, $FF, $00, $00, $00, $00, $00, $00, $00, $00
|
|
FPKMINF
|
|
DC.B $FF, $FF, $00, $00, $00, $00, $00, $00, $00, $00
|
|
|
|
FPK3
|
|
DC.B $40, $00, $C0, $00, $00, $00, $00, $00, $00, $00
|
|
; one fourth
|
|
FPKFOURTH
|
|
DC.B $3F, $FD, $80, $00, $00, $00, $00, $00, $00, $00
|
|
FPKHALF
|
|
DC.B $3F, $FE, $80, $00, $00, $00, $00, $00, $00, $00
|
|
; three fourths
|
|
FPK34
|
|
DC.B $3F, $FE, $C0, $00, $00, $00, $00, $00, $00, $00
|
|
; seven eighths
|
|
FPK78
|
|
DC.B $3F, $FE, $E0, $00, $00, $00, $00, $00, $00, $00
|
|
; approximate pi/2
|
|
FPKPI2
|
|
DC.B $3F, $FF, $C9, $0F, $DA, $A2, $21, $68, $C2, $35
|
|
FPKPI4
|
|
DC.B $3F, $FE, $C9, $0F, $DA, $A2, $21, $68, $C2, $35
|
|
; ARand is 7^5
|
|
FPKARAND
|
|
DC.B $40, $0D, $83, $4E, $00, $00, $00, $00, $00, $00
|
|
; PRand is 2^31 - 1
|
|
FPKPRAND
|
|
DC.B $40, $1D, $FF, $FF, $FF, $FE, $00, $00, $00, $00
|
|
|
|
; Square root of 2
|
|
FPKSQRT2
|
|
DC.B $3F, $FF, $B5, $04, $F3, $33, $F9, $DE, $64, $84
|
|
; Square root of 1/2
|
|
FPKSQRTHALF
|
|
DC.B $3F, $FE, $B5, $04, $F3, $33, $F9, $DE, $64, $84
|
|
FPKE
|
|
DC.B $40, $00, $AD, $F8, $54, $58, $A2, $BB, $4A, $9B
|
|
FPKLOGE2
|
|
DC.B $3F, $FE, $B1, $72, $17, $F7, $D1, $CF, $79, $AC
|
|
|
|
; Constants for Atan approximation.
|
|
FPKX2
|
|
DC.B $3F, $FE, $93, $CD, $3A, $2C, $81, $98, $E2, $6A
|
|
FPKX2FX2
|
|
DC.B $3F, $FA, $DC, $2A, $86, $B1, $5F, $DB, $64, $62
|
|
FPKATNCONS
|
|
DC.B $3F, $FD, $89, $30, $A2, $F4, $F6, $6A, $B1, $8A
|
|
|
|
; Coefficients for polynomial Q in SIN approximation.
|
|
; { sn7.text. 14 May 83, 18:54 }
|
|
SINQ
|
|
DC.W 3 ; degree of SINQ
|
|
DC.B $3F, $FF, $00, $00, $80, $00, $00, $00, $00, $00, $00, $00
|
|
DC.B $40, $07, $00, $00, $88, $D8, $B8, $44, $A6, $A8, $5A, $30
|
|
DC.B $40, $0E, $00, $00, $8A, $15, $8A, $49, $09, $79, $23, $20
|
|
DC.B $40, $13, $00, $00, $FA, $A9, $FE, $26, $FE, $63, $F2, $2B
|
|
|
|
; Coefficients for polynomial P in SIN approximation.
|
|
SINP
|
|
DC.W 3 ; degree of SINP
|
|
DC.B $BF, $FE, $00, $00, $C2, $50, $86, $AE, $43, $F5, $CB, $F5
|
|
DC.B $40, $06, $00, $00, $9E, $76, $EC, $66, $BE, $E7, $6B, $A2
|
|
DC.B $C0, $0C, $00, $00, $AF, $51, $A1, $D6, $C4, $C4, $AA, $01
|
|
DC.B $40, $11, $00, $00, $A7, $1B, $FE, $C4, $A9, $97, $F6, $CE
|
|
|
|
; Coefficients for polynomial Q in COS approximation.
|
|
; { cs7.text, 14 May 83, 7:14 }
|
|
COSQ
|
|
DC.W 3 ; degree of COSQ
|
|
DC.B $3F, $FF, $00, $00, $80, $00, $00, $00, $00, $00, $00, $00
|
|
DC.B $40, $07, $00, $00, $A6, $D9, $6A, $95, $FB, $DF, $96, $85
|
|
DC.B $40, $0E, $00, $00, $C7, $A7, $EA, $65, $E8, $5D, $15, $6B
|
|
DC.B $40, $14, $00, $00, $D2, $6E, $87, $1C, $7B, $17, $52, $B2
|
|
|
|
; Coefficients for polynomial P in COS approximation.
|
|
COSP
|
|
DC.W 3 ; degree of COSP
|
|
DC.B $BF, $FB, $00, $00, $D5, $7E, $18, $D7, $A6, $F6, $D7, $58
|
|
DC.B $40, $03, $00, $00, $E3, $64, $93, $7E, $32, $B3, $D0, $72
|
|
DC.B $C0, $0A, $00, $00, $A6, $2D, $40, $56, $58, $6B, $C0, $45
|
|
DC.B $40, $10, $00, $00, $8C, $49, $AF, $68, $52, $0F, $8C, $7A
|
|
|
|
; Coefficients for polynomial Q in TAN approximation.
|
|
; { tn7.text, 23 May 83, 10:21 }
|
|
TANQ
|
|
DC.W 3 ; degree of TANQ
|
|
DC.B $BF, $FF, $00, $00, $80, $00, $00, $00, $00, $00, $00, $00
|
|
DC.B $40, $05, $00, $00, $B5, $13, $03, $24, $83, $C0, $09, $55
|
|
DC.B $C0, $09, $00, $00, $D1, $FF, $B2, $42, $57, $62, $E0, $CF
|
|
DC.B $40, $0A, $00, $00, $E1, $90, $93, $09, $93, $76, $66, $AB
|
|
|
|
; Coefficients for polynomial P in TAN approximation.
|
|
TANP
|
|
DC.W 3 ; degree of TANP
|
|
DC.B $BF, $E9, $00, $00, $B1, $FC, $33, $63, $D7, $9B, $28, $38
|
|
DC.B $3F, $FD, $00, $00, $AA, $9D, $71, $D8, $3E, $C7, $4C, $D1
|
|
DC.B $C0, $03, $00, $00, $E9, $CD, $8E, $24, $B9, $65, $7D, $BB
|
|
DC.B $40, $07, $00, $00, $F0, $9A, $36, $70, $9D, $4B, $18, $36
|
|
|
|
; Coefficients for polynomial Q in ATAN approximation.
|
|
; { atn8.text, 17 May 83, 6:17 }
|
|
ATANQ
|
|
DC.W 4 ; degree of ATANQ
|
|
DC.B $3F, $FF, $00, $00, $98, $D3, $1E, $AE, $2A, $FA, $5D, $AD
|
|
DC.B $40, $03, $00, $00, $8F, $79, $4C, $D8, $B3, $CD, $EF, $D9
|
|
DC.B $40, $05, $00, $00, $8E, $37, $ED, $85, $70, $B8, $B3, $68
|
|
DC.B $40, $05, $00, $00, $CD, $A4, $BE, $A1, $AC, $59, $F3, $B8
|
|
DC.B $40, $04, $00, $00, $C4, $05, $9C, $55, $4C, $F0, $C6, $56
|
|
|
|
; Coefficients for polynomial P in ATAN approximation.
|
|
ATANP
|
|
DC.W 4 ; degree of ATANP
|
|
DC.B $3F, $FF, $00, $00, $80, $00, $00, $00, $00, $00, $00, $00
|
|
DC.B $40, $02, $00, $00, $A2, $3B, $6C, $13, $1F, $92, $0E, $30
|
|
DC.B $40, $03, $00, $00, $C3, $C8, $59, $3D, $FA, $3A, $48, $6F
|
|
DC.B $40, $03, $00, $00, $82, $AE, $68, $38, $DD, $F5, $D9, $45
|
|
DC.B $00, $00, $00, $00, $00, $00, $00, $00, $00, $00, $00, $00
|
|
|
|
; DecDump: ending Elems constant output.
|
|
; HexWriter: end of decimal input file.
|
|
|
|
|