;--------------------------------------------------------
; File Created by SDCC : FreeWare ANSI-C Compiler
; Version 2.5.1 #1058 (Jul 15 2005)
; This file generated Fri Jul 15 02:56:11 2005
;--------------------------------------------------------
	.module asincosf
	.optsdcc -mhc08
	
	.area CSEG (CODE)
	.area GSINIT0 (CODE)
	.area GSINIT (CODE)
	.area GSFINAL (CODE)
	.area XINIT
	.area CONST   (CODE)
	.area DSEG
	.area OSEG    (OVR)
	.area BSEG
	.area XSEG
	.area XISEG
;--------------------------------------------------------
; Public variables in this module
;--------------------------------------------------------
	.globl _asincosf
	.globl _asincosf_PARM_2
	.globl _asincosf_PARM_1
;--------------------------------------------------------
;  ram data
;--------------------------------------------------------
	.area DSEG
_asincosf_sloc0_1_0::
	.ds 4
;--------------------------------------------------------
; overlayable items in  ram 
;--------------------------------------------------------
	.area OSEG    (OVR)
;--------------------------------------------------------
; external initialized ram data
;--------------------------------------------------------
	.area XISEG
;--------------------------------------------------------
; extended address mode data
;--------------------------------------------------------
	.area XSEG
_asincosf_PARM_1::
	.ds 4
_asincosf_PARM_2::
	.ds 2
_asincosf_y_1_1::
	.ds 4
_asincosf_g_1_1::
	.ds 4
_asincosf_r_1_1::
	.ds 4
_asincosf_i_1_1::
	.ds 2
_asincosf_a_1_1:
	.ds 8
_asincosf_b_1_1:
	.ds 8
;--------------------------------------------------------
; global & static initialisations
;--------------------------------------------------------
	.area CSEG (CODE)
	.area GSINIT (CODE)
	.area GSFINAL (CODE)
	.area GSINIT (CODE)
;------------------------------------------------------------
;Allocation info for local variables in function 'asincosf'
;------------------------------------------------------------
;sloc0                     Allocated with name '_asincosf_sloc0_1_0'
;x                         Allocated with name '_asincosf_PARM_1'
;isacos                    Allocated with name '_asincosf_PARM_2'
;y                         Allocated with name '_asincosf_y_1_1'
;g                         Allocated with name '_asincosf_g_1_1'
;r                         Allocated with name '_asincosf_r_1_1'
;i                         Allocated with name '_asincosf_i_1_1'
;a                         Allocated with name '_asincosf_a_1_1'
;b                         Allocated with name '_asincosf_b_1_1'
;------------------------------------------------------------
;asincosf.c:47: static myconst float a[2]={ 0.0, QUART_PI };
; Peephole 5a   - eliminated redundant clra
	clra
	sta	_asincosf_a_1_1
	sta	(_asincosf_a_1_1 + 1)
	sta	(_asincosf_a_1_1 + 2)
	sta	(_asincosf_a_1_1 + 3)
	lda	#0x3F
	sta	(_asincosf_a_1_1 + 0x0004)
	lda	#0x49
	sta	((_asincosf_a_1_1 + 0x0004) + 1)
	lda	#0x0F
	sta	((_asincosf_a_1_1 + 0x0004) + 2)
	lda	#0xDB
	sta	((_asincosf_a_1_1 + 0x0004) + 3)
;asincosf.c:48: static myconst float b[2]={ HALF_PI, QUART_PI };
	lda	#0x3F
	sta	_asincosf_b_1_1
	lda	#0xC9
	sta	(_asincosf_b_1_1 + 1)
	lda	#0x0F
	sta	(_asincosf_b_1_1 + 2)
	lda	#0xDB
	sta	(_asincosf_b_1_1 + 3)
	lda	#0x3F
	sta	(_asincosf_b_1_1 + 0x0004)
	lda	#0x49
	sta	((_asincosf_b_1_1 + 0x0004) + 1)
	lda	#0x0F
	sta	((_asincosf_b_1_1 + 0x0004) + 2)
	lda	#0xDB
	sta	((_asincosf_b_1_1 + 0x0004) + 3)
;--------------------------------------------------------
; Home
;--------------------------------------------------------
	.area HOME (CODE)
	.area CSEG (CODE)
;--------------------------------------------------------
; code
;--------------------------------------------------------
	.area CSEG (CODE)
;------------------------------------------------------------
;Allocation info for local variables in function 'asincosf'
;------------------------------------------------------------
;sloc0                     Allocated with name '_asincosf_sloc0_1_0'
;x                         Allocated with name '_asincosf_PARM_1'
;isacos                    Allocated with name '_asincosf_PARM_2'
;y                         Allocated with name '_asincosf_y_1_1'
;g                         Allocated with name '_asincosf_g_1_1'
;r                         Allocated with name '_asincosf_r_1_1'
;i                         Allocated with name '_asincosf_i_1_1'
;a                         Allocated with name '_asincosf_a_1_1'
;b                         Allocated with name '_asincosf_b_1_1'
;------------------------------------------------------------
;asincosf.c:42: float asincosf(const float x, const int isacos)
;	-----------------------------------------
;	 function asincosf
;	-----------------------------------------
_asincosf:
;asincosf.c:50: y=fabsf(x);
	lda	(_asincosf_PARM_1 + 3)
	psha
	lda	(_asincosf_PARM_1 + 2)
	psha
	lda	(_asincosf_PARM_1 + 1)
	psha
	lda	_asincosf_PARM_1
	psha
	jsr	_fabsf
	sta	(_asincosf_y_1_1 + 3)
	stx	(_asincosf_y_1_1 + 2)
	lda	*__ret2
	sta	(_asincosf_y_1_1 + 1)
	lda	*__ret3
	sta	_asincosf_y_1_1
	ais	#4
;asincosf.c:51: i=isacos;
	lda	_asincosf_PARM_2
	sta	_asincosf_i_1_1
	lda	(_asincosf_PARM_2 + 1)
	sta	(_asincosf_i_1_1 + 1)
;asincosf.c:52: if (y < EPS) r=y;
	lda	_asincosf_y_1_1
	sta	___fslt_PARM_1
	lda	(_asincosf_y_1_1 + 1)
	sta	(___fslt_PARM_1 + 1)
	lda	(_asincosf_y_1_1 + 2)
	sta	(___fslt_PARM_1 + 2)
	lda	(_asincosf_y_1_1 + 3)
	sta	(___fslt_PARM_1 + 3)
	lda	#0x39
	sta	___fslt_PARM_2
	lda	#0x80
	sta	(___fslt_PARM_2 + 1)
; Peephole 5c   - eliminated redundant clra
	clra
	sta	(___fslt_PARM_2 + 2)
	sta	(___fslt_PARM_2 + 3)
	jsr	___fslt
	tsta
; Peephole 2d	- eliminated jmp
	beq	00107$
00125$:
	lda	_asincosf_y_1_1
	sta	_asincosf_r_1_1
	lda	(_asincosf_y_1_1 + 1)
	sta	(_asincosf_r_1_1 + 1)
	lda	(_asincosf_y_1_1 + 2)
	sta	(_asincosf_r_1_1 + 2)
	lda	(_asincosf_y_1_1 + 3)
	sta	(_asincosf_r_1_1 + 3)
	jmp	00108$
00107$:
;asincosf.c:55: if (y > 0.5)
	lda	_asincosf_y_1_1
	sta	___fsgt_PARM_1
	lda	(_asincosf_y_1_1 + 1)
	sta	(___fsgt_PARM_1 + 1)
	lda	(_asincosf_y_1_1 + 2)
	sta	(___fsgt_PARM_1 + 2)
	lda	(_asincosf_y_1_1 + 3)
	sta	(___fsgt_PARM_1 + 3)
	lda	#0x3F
	sta	___fsgt_PARM_2
; Peephole 5b   - eliminated redundant clra
	clra
	sta	(___fsgt_PARM_2 + 1)
	sta	(___fsgt_PARM_2 + 2)
	sta	(___fsgt_PARM_2 + 3)
	jsr	___fsgt
	tsta
	bne	00126$
	jmp	00104$
00126$:
;asincosf.c:57: i=1-i;
	lda	#0x01
	sub	(_asincosf_i_1_1 + 1)
	sta	(_asincosf_i_1_1 + 1)
	clra
	sbc	_asincosf_i_1_1
	sta	_asincosf_i_1_1
;asincosf.c:58: if (y > 1.0)
	lda	_asincosf_y_1_1
	sta	___fsgt_PARM_1
	lda	(_asincosf_y_1_1 + 1)
	sta	(___fsgt_PARM_1 + 1)
	lda	(_asincosf_y_1_1 + 2)
	sta	(___fsgt_PARM_1 + 2)
	lda	(_asincosf_y_1_1 + 3)
	sta	(___fsgt_PARM_1 + 3)
	lda	#0x3F
	sta	___fsgt_PARM_2
	lda	#0x80
	sta	(___fsgt_PARM_2 + 1)
; Peephole 5c   - eliminated redundant clra
	clra
	sta	(___fsgt_PARM_2 + 2)
	sta	(___fsgt_PARM_2 + 3)
	jsr	___fsgt
	tsta
; Peephole 2d	- eliminated jmp
	beq	00102$
00127$:
;asincosf.c:60: errno=EDOM;
	clra
	sta	_errno
	lda	#0x21
	sta	(_errno + 1)
;asincosf.c:61: return 0.0;
	clr	*__ret3
	clr	*__ret2
	clrx
	clra
; Peephole 6a  - replaced jmp to rts with rts
	rts
00102$:
;asincosf.c:63: g=(0.5-y)+0.5;
	lda	#0x3F
	sta	___fssub_PARM_1
	lda	#0x80
	sta	(___fssub_PARM_1 + 1)
; Peephole 5c   - eliminated redundant clra
	clra
	sta	(___fssub_PARM_1 + 2)
	sta	(___fssub_PARM_1 + 3)
	lda	_asincosf_y_1_1
	sta	___fssub_PARM_2
	lda	(_asincosf_y_1_1 + 1)
	sta	(___fssub_PARM_2 + 1)
	lda	(_asincosf_y_1_1 + 2)
	sta	(___fssub_PARM_2 + 2)
	lda	(_asincosf_y_1_1 + 3)
	sta	(___fssub_PARM_2 + 3)
	jsr	___fssub
	sta	(_asincosf_g_1_1 + 3)
	stx	(_asincosf_g_1_1 + 2)
	lda	*__ret2
	sta	(_asincosf_g_1_1 + 1)
	lda	*__ret3
	sta	_asincosf_g_1_1
;asincosf.c:64: g=ldexpf(g,-1);
	lda	_asincosf_g_1_1
	sta	_ldexpf_PARM_1
	lda	(_asincosf_g_1_1 + 1)
	sta	(_ldexpf_PARM_1 + 1)
	lda	(_asincosf_g_1_1 + 2)
	sta	(_ldexpf_PARM_1 + 2)
	lda	(_asincosf_g_1_1 + 3)
	sta	(_ldexpf_PARM_1 + 3)
; Peephole 5f   - eliminated redundant lda
	lda	#0xFF
	sta	_ldexpf_PARM_2
	sta	(_ldexpf_PARM_2 + 1)
	jsr	_ldexpf
	sta	(_asincosf_g_1_1 + 3)
	stx	(_asincosf_g_1_1 + 2)
	lda	*__ret2
	sta	(_asincosf_g_1_1 + 1)
	lda	*__ret3
	sta	_asincosf_g_1_1
;asincosf.c:65: y=sqrtf(g);
	lda	(_asincosf_g_1_1 + 3)
	psha
	lda	(_asincosf_g_1_1 + 2)
	psha
	lda	(_asincosf_g_1_1 + 1)
	psha
	lda	_asincosf_g_1_1
	psha
	jsr	_sqrtf
	sta	(_asincosf_y_1_1 + 3)
	stx	(_asincosf_y_1_1 + 2)
	lda	*__ret2
	sta	(_asincosf_y_1_1 + 1)
	lda	*__ret3
	sta	_asincosf_y_1_1
	ais	#4
;asincosf.c:66: y=-(y+y);
	lda	_asincosf_y_1_1
	sta	___fsadd_PARM_1
	lda	(_asincosf_y_1_1 + 1)
	sta	(___fsadd_PARM_1 + 1)
	lda	(_asincosf_y_1_1 + 2)
	sta	(___fsadd_PARM_1 + 2)
	lda	(_asincosf_y_1_1 + 3)
	sta	(___fsadd_PARM_1 + 3)
	lda	_asincosf_y_1_1
	sta	___fsadd_PARM_2
	lda	(_asincosf_y_1_1 + 1)
	sta	(___fsadd_PARM_2 + 1)
	lda	(_asincosf_y_1_1 + 2)
	sta	(___fsadd_PARM_2 + 2)
	lda	(_asincosf_y_1_1 + 3)
	sta	(___fsadd_PARM_2 + 3)
	jsr	___fsadd
	sta	*(_asincosf_sloc0_1_0 + 3)
	stx	*(_asincosf_sloc0_1_0 + 2)
	mov	*__ret2,*(_asincosf_sloc0_1_0 + 1)
	mov	*__ret3,*_asincosf_sloc0_1_0
	lda	*(_asincosf_sloc0_1_0 + 3)
	sta	(_asincosf_y_1_1 + 3)
	lda	*(_asincosf_sloc0_1_0 + 2)
	sta	(_asincosf_y_1_1 + 2)
	lda	*(_asincosf_sloc0_1_0 + 1)
	sta	(_asincosf_y_1_1 + 1)
	lda	*_asincosf_sloc0_1_0
	eor	#0x80
	sta	_asincosf_y_1_1
; Peephole 3	- shortened jmp to bra
	bra	00105$
00104$:
;asincosf.c:70: g=y*y;
	lda	_asincosf_y_1_1
	sta	___fsmul_PARM_1
	lda	(_asincosf_y_1_1 + 1)
	sta	(___fsmul_PARM_1 + 1)
	lda	(_asincosf_y_1_1 + 2)
	sta	(___fsmul_PARM_1 + 2)
	lda	(_asincosf_y_1_1 + 3)
	sta	(___fsmul_PARM_1 + 3)
	lda	_asincosf_y_1_1
	sta	___fsmul_PARM_2
	lda	(_asincosf_y_1_1 + 1)
	sta	(___fsmul_PARM_2 + 1)
	lda	(_asincosf_y_1_1 + 2)
	sta	(___fsmul_PARM_2 + 2)
	lda	(_asincosf_y_1_1 + 3)
	sta	(___fsmul_PARM_2 + 3)
	jsr	___fsmul
	sta	(_asincosf_g_1_1 + 3)
	stx	(_asincosf_g_1_1 + 2)
	lda	*__ret2
	sta	(_asincosf_g_1_1 + 1)
	lda	*__ret3
	sta	_asincosf_g_1_1
00105$:
;asincosf.c:72: r=y+y*((P(g)*g)/Q(g));
	lda	_asincosf_g_1_1
	sta	___fsmul_PARM_1
	lda	(_asincosf_g_1_1 + 1)
	sta	(___fsmul_PARM_1 + 1)
	lda	(_asincosf_g_1_1 + 2)
	sta	(___fsmul_PARM_1 + 2)
	lda	(_asincosf_g_1_1 + 3)
	sta	(___fsmul_PARM_1 + 3)
	lda	#0xBF
	sta	___fsmul_PARM_2
	lda	#0x01
	sta	(___fsmul_PARM_2 + 1)
	lda	#0x20
	sta	(___fsmul_PARM_2 + 2)
	lda	#0x65
	sta	(___fsmul_PARM_2 + 3)
	jsr	___fsmul
	sta	(___fsadd_PARM_1 + 3)
	stx	(___fsadd_PARM_1 + 2)
	lda	*__ret2
	sta	(___fsadd_PARM_1 + 1)
	lda	*__ret3
	sta	___fsadd_PARM_1
	lda	#0x3F
	sta	___fsadd_PARM_2
	lda	#0x6F
	sta	(___fsadd_PARM_2 + 1)
	lda	#0x16
	sta	(___fsadd_PARM_2 + 2)
	lda	#0x6B
	sta	(___fsadd_PARM_2 + 3)
	jsr	___fsadd
	sta	(___fsmul_PARM_1 + 3)
	stx	(___fsmul_PARM_1 + 2)
	lda	*__ret2
	sta	(___fsmul_PARM_1 + 1)
	lda	*__ret3
	sta	___fsmul_PARM_1
	lda	_asincosf_g_1_1
	sta	___fsmul_PARM_2
	lda	(_asincosf_g_1_1 + 1)
	sta	(___fsmul_PARM_2 + 1)
	lda	(_asincosf_g_1_1 + 2)
	sta	(___fsmul_PARM_2 + 2)
	lda	(_asincosf_g_1_1 + 3)
	sta	(___fsmul_PARM_2 + 3)
	jsr	___fsmul
	sta	(___fsdiv_PARM_1 + 3)
	stx	(___fsdiv_PARM_1 + 2)
	lda	*__ret2
	sta	(___fsdiv_PARM_1 + 1)
	lda	*__ret3
	sta	___fsdiv_PARM_1
	lda	_asincosf_g_1_1
	sta	___fsadd_PARM_1
	lda	(_asincosf_g_1_1 + 1)
	sta	(___fsadd_PARM_1 + 1)
	lda	(_asincosf_g_1_1 + 2)
	sta	(___fsadd_PARM_1 + 2)
	lda	(_asincosf_g_1_1 + 3)
	sta	(___fsadd_PARM_1 + 3)
	lda	#0xC0
	sta	___fsadd_PARM_2
	lda	#0xB1
	sta	(___fsadd_PARM_2 + 1)
	lda	#0x8D
	sta	(___fsadd_PARM_2 + 2)
	lda	#0x0B
	sta	(___fsadd_PARM_2 + 3)
	jsr	___fsadd
	sta	(___fsmul_PARM_1 + 3)
	stx	(___fsmul_PARM_1 + 2)
	lda	*__ret2
	sta	(___fsmul_PARM_1 + 1)
	lda	*__ret3
	sta	___fsmul_PARM_1
	lda	_asincosf_g_1_1
	sta	___fsmul_PARM_2
	lda	(_asincosf_g_1_1 + 1)
	sta	(___fsmul_PARM_2 + 1)
	lda	(_asincosf_g_1_1 + 2)
	sta	(___fsmul_PARM_2 + 2)
	lda	(_asincosf_g_1_1 + 3)
	sta	(___fsmul_PARM_2 + 3)
	jsr	___fsmul
	sta	(___fsadd_PARM_1 + 3)
	stx	(___fsadd_PARM_1 + 2)
	lda	*__ret2
	sta	(___fsadd_PARM_1 + 1)
	lda	*__ret3
	sta	___fsadd_PARM_1
	lda	#0x40
	sta	___fsadd_PARM_2
	lda	#0xB3
	sta	(___fsadd_PARM_2 + 1)
	lda	#0x50
	sta	(___fsadd_PARM_2 + 2)
	lda	#0xF0
	sta	(___fsadd_PARM_2 + 3)
	jsr	___fsadd
	sta	(___fsdiv_PARM_2 + 3)
	stx	(___fsdiv_PARM_2 + 2)
	lda	*__ret2
	sta	(___fsdiv_PARM_2 + 1)
	lda	*__ret3
	sta	___fsdiv_PARM_2
	jsr	___fsdiv
	sta	(___fsmul_PARM_2 + 3)
	stx	(___fsmul_PARM_2 + 2)
	lda	*__ret2
	sta	(___fsmul_PARM_2 + 1)
	lda	*__ret3
	sta	___fsmul_PARM_2
	lda	_asincosf_y_1_1
	sta	___fsmul_PARM_1
	lda	(_asincosf_y_1_1 + 1)
	sta	(___fsmul_PARM_1 + 1)
	lda	(_asincosf_y_1_1 + 2)
	sta	(___fsmul_PARM_1 + 2)
	lda	(_asincosf_y_1_1 + 3)
	sta	(___fsmul_PARM_1 + 3)
	jsr	___fsmul
	sta	(___fsadd_PARM_2 + 3)
	stx	(___fsadd_PARM_2 + 2)
	lda	*__ret2
	sta	(___fsadd_PARM_2 + 1)
	lda	*__ret3
	sta	___fsadd_PARM_2
	lda	_asincosf_y_1_1
	sta	___fsadd_PARM_1
	lda	(_asincosf_y_1_1 + 1)
	sta	(___fsadd_PARM_1 + 1)
	lda	(_asincosf_y_1_1 + 2)
	sta	(___fsadd_PARM_1 + 2)
	lda	(_asincosf_y_1_1 + 3)
	sta	(___fsadd_PARM_1 + 3)
	jsr	___fsadd
	sta	(_asincosf_r_1_1 + 3)
	stx	(_asincosf_r_1_1 + 2)
	lda	*__ret2
	sta	(_asincosf_r_1_1 + 1)
	lda	*__ret3
	sta	_asincosf_r_1_1
00108$:
;asincosf.c:74: if (isacos)
	lda	(_asincosf_PARM_2 + 1)
	ora	_asincosf_PARM_2
	bne	00128$
	jmp	00115$
00128$:
;asincosf.c:76: if (x < 0.0)
	lda	_asincosf_PARM_1
	sta	___fslt_PARM_1
	lda	(_asincosf_PARM_1 + 1)
	sta	(___fslt_PARM_1 + 1)
	lda	(_asincosf_PARM_1 + 2)
	sta	(___fslt_PARM_1 + 2)
	lda	(_asincosf_PARM_1 + 3)
	sta	(___fslt_PARM_1 + 3)
; Peephole 5a   - eliminated redundant clra
	clra
	sta	___fslt_PARM_2
	sta	(___fslt_PARM_2 + 1)
	sta	(___fslt_PARM_2 + 2)
	sta	(___fslt_PARM_2 + 3)
	jsr	___fslt
	tsta
	bne	00129$
	jmp	00110$
00129$:
;asincosf.c:77: r=(b[i]+r)+b[i];
	lda	(_asincosf_i_1_1 + 1)
	ldx	_asincosf_i_1_1
	lsla
	rolx
	lsla
	rolx
	sta	*(_asincosf_sloc0_1_0 + 1)
	stx	*_asincosf_sloc0_1_0
	ldhx	*_asincosf_sloc0_1_0
	lda	_asincosf_b_1_1,x
	sta	___fsadd_PARM_1
	lda	(_asincosf_b_1_1 + 1),x
	sta	(___fsadd_PARM_1 + 1)
	lda	(_asincosf_b_1_1 + 2),x
	sta	(___fsadd_PARM_1 + 2)
	lda	(_asincosf_b_1_1 + 3),x
	sta	(___fsadd_PARM_1 + 3)
	lda	_asincosf_r_1_1
	sta	___fsadd_PARM_2
	lda	(_asincosf_r_1_1 + 1)
	sta	(___fsadd_PARM_2 + 1)
	lda	(_asincosf_r_1_1 + 2)
	sta	(___fsadd_PARM_2 + 2)
	lda	(_asincosf_r_1_1 + 3)
	sta	(___fsadd_PARM_2 + 3)
	jsr	___fsadd
	sta	(___fsadd_PARM_1 + 3)
	stx	(___fsadd_PARM_1 + 2)
	lda	*__ret2
	sta	(___fsadd_PARM_1 + 1)
	lda	*__ret3
	sta	___fsadd_PARM_1
	lda	(_asincosf_i_1_1 + 1)
	ldx	_asincosf_i_1_1
	lsla
	rolx
	lsla
	rolx
	sta	*(_asincosf_sloc0_1_0 + 1)
	stx	*_asincosf_sloc0_1_0
	ldhx	*_asincosf_sloc0_1_0
	lda	_asincosf_b_1_1,x
	sta	___fsadd_PARM_2
	lda	(_asincosf_b_1_1 + 1),x
	sta	(___fsadd_PARM_2 + 1)
	lda	(_asincosf_b_1_1 + 2),x
	sta	(___fsadd_PARM_2 + 2)
	lda	(_asincosf_b_1_1 + 3),x
	sta	(___fsadd_PARM_2 + 3)
	jsr	___fsadd
	sta	(_asincosf_r_1_1 + 3)
	stx	(_asincosf_r_1_1 + 2)
	lda	*__ret2
	sta	(_asincosf_r_1_1 + 1)
	lda	*__ret3
	sta	_asincosf_r_1_1
	jmp	00116$
00110$:
;asincosf.c:79: r=(a[i]-r)+a[i];
	lda	(_asincosf_i_1_1 + 1)
	ldx	_asincosf_i_1_1
	lsla
	rolx
	lsla
	rolx
	sta	*(_asincosf_sloc0_1_0 + 1)
	stx	*_asincosf_sloc0_1_0
	ldhx	*_asincosf_sloc0_1_0
	lda	_asincosf_a_1_1,x
	sta	___fssub_PARM_1
	lda	(_asincosf_a_1_1 + 1),x
	sta	(___fssub_PARM_1 + 1)
	lda	(_asincosf_a_1_1 + 2),x
	sta	(___fssub_PARM_1 + 2)
	lda	(_asincosf_a_1_1 + 3),x
	sta	(___fssub_PARM_1 + 3)
	lda	_asincosf_r_1_1
	sta	___fssub_PARM_2
	lda	(_asincosf_r_1_1 + 1)
	sta	(___fssub_PARM_2 + 1)
	lda	(_asincosf_r_1_1 + 2)
	sta	(___fssub_PARM_2 + 2)
	lda	(_asincosf_r_1_1 + 3)
	sta	(___fssub_PARM_2 + 3)
	jsr	___fssub
	sta	(___fsadd_PARM_1 + 3)
	stx	(___fsadd_PARM_1 + 2)
	lda	*__ret2
	sta	(___fsadd_PARM_1 + 1)
	lda	*__ret3
	sta	___fsadd_PARM_1
	lda	(_asincosf_i_1_1 + 1)
	ldx	_asincosf_i_1_1
	lsla
	rolx
	lsla
	rolx
	sta	*(_asincosf_sloc0_1_0 + 1)
	stx	*_asincosf_sloc0_1_0
	ldhx	*_asincosf_sloc0_1_0
	lda	_asincosf_a_1_1,x
	sta	___fsadd_PARM_2
	lda	(_asincosf_a_1_1 + 1),x
	sta	(___fsadd_PARM_2 + 1)
	lda	(_asincosf_a_1_1 + 2),x
	sta	(___fsadd_PARM_2 + 2)
	lda	(_asincosf_a_1_1 + 3),x
	sta	(___fsadd_PARM_2 + 3)
	jsr	___fsadd
	sta	(_asincosf_r_1_1 + 3)
	stx	(_asincosf_r_1_1 + 2)
	lda	*__ret2
	sta	(_asincosf_r_1_1 + 1)
	lda	*__ret3
	sta	_asincosf_r_1_1
	jmp	00116$
00115$:
;asincosf.c:83: r=(a[i]+r)+a[i];
	lda	(_asincosf_i_1_1 + 1)
	ldx	_asincosf_i_1_1
	lsla
	rolx
	lsla
	rolx
	sta	*(_asincosf_sloc0_1_0 + 1)
	stx	*_asincosf_sloc0_1_0
	ldhx	*_asincosf_sloc0_1_0
	lda	_asincosf_a_1_1,x
	sta	___fsadd_PARM_1
	lda	(_asincosf_a_1_1 + 1),x
	sta	(___fsadd_PARM_1 + 1)
	lda	(_asincosf_a_1_1 + 2),x
	sta	(___fsadd_PARM_1 + 2)
	lda	(_asincosf_a_1_1 + 3),x
	sta	(___fsadd_PARM_1 + 3)
	lda	_asincosf_r_1_1
	sta	___fsadd_PARM_2
	lda	(_asincosf_r_1_1 + 1)
	sta	(___fsadd_PARM_2 + 1)
	lda	(_asincosf_r_1_1 + 2)
	sta	(___fsadd_PARM_2 + 2)
	lda	(_asincosf_r_1_1 + 3)
	sta	(___fsadd_PARM_2 + 3)
	jsr	___fsadd
	sta	(___fsadd_PARM_1 + 3)
	stx	(___fsadd_PARM_1 + 2)
	lda	*__ret2
	sta	(___fsadd_PARM_1 + 1)
	lda	*__ret3
	sta	___fsadd_PARM_1
	lda	(_asincosf_i_1_1 + 1)
	ldx	_asincosf_i_1_1
	lsla
	rolx
	lsla
	rolx
	sta	*(_asincosf_sloc0_1_0 + 1)
	stx	*_asincosf_sloc0_1_0
	ldhx	*_asincosf_sloc0_1_0
	lda	_asincosf_a_1_1,x
	sta	___fsadd_PARM_2
	lda	(_asincosf_a_1_1 + 1),x
	sta	(___fsadd_PARM_2 + 1)
	lda	(_asincosf_a_1_1 + 2),x
	sta	(___fsadd_PARM_2 + 2)
	lda	(_asincosf_a_1_1 + 3),x
	sta	(___fsadd_PARM_2 + 3)
	jsr	___fsadd
	sta	(_asincosf_r_1_1 + 3)
	stx	(_asincosf_r_1_1 + 2)
	lda	*__ret2
	sta	(_asincosf_r_1_1 + 1)
	lda	*__ret3
	sta	_asincosf_r_1_1
;asincosf.c:84: if (x<0.0) r=-r;
	lda	_asincosf_PARM_1
	sta	___fslt_PARM_1
	lda	(_asincosf_PARM_1 + 1)
	sta	(___fslt_PARM_1 + 1)
	lda	(_asincosf_PARM_1 + 2)
	sta	(___fslt_PARM_1 + 2)
	lda	(_asincosf_PARM_1 + 3)
	sta	(___fslt_PARM_1 + 3)
; Peephole 5a   - eliminated redundant clra
	clra
	sta	___fslt_PARM_2
	sta	(___fslt_PARM_2 + 1)
	sta	(___fslt_PARM_2 + 2)
	sta	(___fslt_PARM_2 + 3)
	jsr	___fslt
	tsta
; Peephole 2d	- eliminated jmp
	beq	00116$
00130$:
	lda	_asincosf_r_1_1
	eor	#0x80
	sta	_asincosf_r_1_1
00116$:
;asincosf.c:86: return r;
	lda	_asincosf_r_1_1
	sta	*__ret3
	lda	(_asincosf_r_1_1 + 1)
	sta	*__ret2
	ldx	(_asincosf_r_1_1 + 2)
	lda	(_asincosf_r_1_1 + 3)
00117$:
	rts
	.area CSEG (CODE)
	.area CONST   (CODE)
	.area XINIT
