;--------------------------------------------------------
; File Created by SDCC : FreeWare ANSI-C Compiler
; Version 2.4.0 Tue Oct 12 01:21:39 2004

;--------------------------------------------------------
	.module tanhf
	
	.area CSEG
	.area GSINIT
	.area GSFINAL
	.area XINIT
	.area DSEG
	.area OSEG    (OVR)
	.area BSEG
	.area XSEG
	.area XISEG
;--------------------------------------------------------
; Public variables in this module
;--------------------------------------------------------
	.globl _tanhf
;--------------------------------------------------------
;  ram data
;--------------------------------------------------------
	.area DSEG
;--------------------------------------------------------
; overlayable items in  ram 
;--------------------------------------------------------
	.area OSEG    (OVR)
;--------------------------------------------------------
; external initialized ram data
;--------------------------------------------------------
	.area XISEG
;--------------------------------------------------------
; extended address mode data
;--------------------------------------------------------
	.area XSEG
;--------------------------------------------------------
; global & static initialisations
;--------------------------------------------------------
	.area GSINIT
	.area GSFINAL
	.area GSINIT
;--------------------------------------------------------
; Home
;--------------------------------------------------------
	.area HOME
	.area CSEG
;--------------------------------------------------------
; code
;--------------------------------------------------------
	.area CSEG
;------------------------------------------------------------
;Allocation info for local variables in function 'tanhf'
;------------------------------------------------------------
;x                         Allocated to stack - offset 2
;f                         Allocated to stack - offset -4
;g                         Allocated to stack - offset -8
;r                         Allocated to stack - offset -12
;sloc0                     Allocated to stack - offset -16
;------------------------------------------------------------
;tanhf.c:40: float tanhf(const float x) reentrant
;	-----------------------------------------
;	 function tanhf
;	-----------------------------------------
_tanhf:
	ais	#-16
;tanhf.c:44: f=fabsf(x);
;     genAssign
;     loadRegFromAop (a, SOF(x), 0)
	lda	22,s
;     storeRegToAop (a, EXT(_fabsf_PARM_1), 0), stacked=0, isaddr=1
	sta	(_fabsf_PARM_1 + 3)
;     loadRegFromAop (a, SOF(x), 1)
	lda	21,s
;     storeRegToAop (a, EXT(_fabsf_PARM_1), 1), stacked=0, isaddr=1
	sta	(_fabsf_PARM_1 + 2)
;     loadRegFromAop (a, SOF(x), 2)
	lda	20,s
;     storeRegToAop (a, EXT(_fabsf_PARM_1), 2), stacked=0, isaddr=1
	sta	(_fabsf_PARM_1 + 1)
;     loadRegFromAop (a, SOF(x), 3)
	lda	19,s
;     storeRegToAop (a, EXT(_fabsf_PARM_1), 3), stacked=0, isaddr=1
	sta	_fabsf_PARM_1
;     genCall
	jsr	_fabsf
;     loadRegFromAop (a, REG(-,-,-,a), 0)
; transferRegReg(a,a)
;     storeRegToAop (a, SOF(iTemp1), 0), stacked=0, isaddr=0
	sta	16,s
;     loadRegFromAop (x, REG(-,-,-,x), 0)
; transferRegReg(x,x)
;     storeRegToAop (x, SOF(iTemp1), 1), stacked=0, isaddr=0
	stx	15,s
;     loadRegFromAop (a, DIR(__ret2), 0)
	lda	*__ret2
;     storeRegToAop (a, SOF(iTemp1), 2), stacked=0, isaddr=0
	sta	14,s
;     loadRegFromAop (a, DIR(__ret3), 0)
	lda	*__ret3
;     storeRegToAop (a, SOF(iTemp1), 3), stacked=0, isaddr=0
	sta	13,s
;     genAssign
;tanhf.c:45: if(f>SBIG) r=1.0;
;     genAssign
;     loadRegFromAop (a, SOF(iTemp0), 0)
	lda	16,s
;     storeRegToAop (a, EXT(___fsgt_PARM_1), 0), stacked=0, isaddr=1
	sta	(___fsgt_PARM_1 + 3)
;     loadRegFromAop (a, SOF(iTemp0), 1)
	lda	15,s
;     storeRegToAop (a, EXT(___fsgt_PARM_1), 1), stacked=0, isaddr=1
	sta	(___fsgt_PARM_1 + 2)
;     loadRegFromAop (a, SOF(iTemp0), 2)
	lda	14,s
;     storeRegToAop (a, EXT(___fsgt_PARM_1), 2), stacked=0, isaddr=1
	sta	(___fsgt_PARM_1 + 1)
;     loadRegFromAop (a, SOF(iTemp0), 3)
	lda	13,s
;     storeRegToAop (a, EXT(___fsgt_PARM_1), 3), stacked=0, isaddr=1
	sta	___fsgt_PARM_1
;     genAssign
;     loadRegFromAop (a, LIT(#0xB0), 0)
	lda	#0xB0
;     storeRegToAop (a, EXT(___fsgt_PARM_2), 0), stacked=0, isaddr=1
	sta	(___fsgt_PARM_2 + 3)
;     loadRegFromAop (a, LIT(#0xB0), 1)
	lda	#0x2C
;     storeRegToAop (a, EXT(___fsgt_PARM_2), 1), stacked=0, isaddr=1
	sta	(___fsgt_PARM_2 + 2)
;     loadRegFromAop (a, LIT(#0xB0), 2)
	lda	#0x10
;     storeRegToAop (a, EXT(___fsgt_PARM_2), 2), stacked=0, isaddr=1
	sta	(___fsgt_PARM_2 + 1)
;     loadRegFromAop (a, LIT(#0xB0), 3)
	lda	#0x41
;     storeRegToAop (a, EXT(___fsgt_PARM_2), 3), stacked=0, isaddr=1
	sta	___fsgt_PARM_2
;     genCall
	jsr	___fsgt
;     loadRegFromAop (a, REG(-,-,-,a), 0)
; transferRegReg(a,a)
;     storeRegToAop (a, REG(-,-,x,a), 0), stacked=0, isaddr=0
; transferRegReg(a,a)
;     genIfx
	tsta
;     genIfxJump
; Peephole 2d	- eliminated jmp
	beq	00108$
00118$:
; forgot to free a
;     genAssign
;     loadRegFromAop (a, LIT(#0x00), 0)
	lda	#0x00
;     storeRegToAop (a, SOF(iTemp3), 0), stacked=0, isaddr=0
	sta	8,s
;     loadRegFromAop (a, LIT(#0x00), 1)
	lda	#0x00
;     storeRegToAop (a, SOF(iTemp3), 1), stacked=0, isaddr=0
	sta	7,s
;     loadRegFromAop (a, LIT(#0x00), 2)
	lda	#0x80
;     storeRegToAop (a, SOF(iTemp3), 2), stacked=0, isaddr=0
	sta	6,s
;     loadRegFromAop (a, LIT(#0x00), 3)
	lda	#0x3F
;     storeRegToAop (a, SOF(iTemp3), 3), stacked=0, isaddr=0
	sta	5,s
	jmp	00109$
00108$:
;tanhf.c:46: else if(f>K1)
;     genAssign
;     loadRegFromAop (a, SOF(iTemp0), 0)
	lda	16,s
;     storeRegToAop (a, EXT(___fsgt_PARM_1), 0), stacked=0, isaddr=1
	sta	(___fsgt_PARM_1 + 3)
;     loadRegFromAop (a, SOF(iTemp0), 1)
	lda	15,s
;     storeRegToAop (a, EXT(___fsgt_PARM_1), 1), stacked=0, isaddr=1
	sta	(___fsgt_PARM_1 + 2)
;     loadRegFromAop (a, SOF(iTemp0), 2)
	lda	14,s
;     storeRegToAop (a, EXT(___fsgt_PARM_1), 2), stacked=0, isaddr=1
	sta	(___fsgt_PARM_1 + 1)
;     loadRegFromAop (a, SOF(iTemp0), 3)
	lda	13,s
;     storeRegToAop (a, EXT(___fsgt_PARM_1), 3), stacked=0, isaddr=1
	sta	___fsgt_PARM_1
;     genAssign
;     loadRegFromAop (a, LIT(#0x54), 0)
	lda	#0x54
;     storeRegToAop (a, EXT(___fsgt_PARM_2), 0), stacked=0, isaddr=1
	sta	(___fsgt_PARM_2 + 3)
;     loadRegFromAop (a, LIT(#0x54), 1)
	lda	#0x9F
;     storeRegToAop (a, EXT(___fsgt_PARM_2), 1), stacked=0, isaddr=1
	sta	(___fsgt_PARM_2 + 2)
;     loadRegFromAop (a, LIT(#0x54), 2)
	lda	#0x0C
;     storeRegToAop (a, EXT(___fsgt_PARM_2), 2), stacked=0, isaddr=1
	sta	(___fsgt_PARM_2 + 1)
;     loadRegFromAop (a, LIT(#0x54), 3)
	lda	#0x3F
;     storeRegToAop (a, EXT(___fsgt_PARM_2), 3), stacked=0, isaddr=1
	sta	___fsgt_PARM_2
;     genCall
	jsr	___fsgt
;     loadRegFromAop (a, REG(-,-,-,a), 0)
; transferRegReg(a,a)
;     storeRegToAop (a, REG(-,-,x,a), 0), stacked=0, isaddr=0
; transferRegReg(a,a)
;     genIfx
	tsta
;     genIfxJump
	bne	00119$
	jmp	00105$
00119$:
; forgot to free a
;tanhf.c:48: r=0.5-1.0/(expf(f+f)+1.0);
;     genAssign
;     loadRegFromAop (a, SOF(iTemp0), 0)
	lda	16,s
;     storeRegToAop (a, EXT(___fsadd_PARM_1), 0), stacked=0, isaddr=1
	sta	(___fsadd_PARM_1 + 3)
;     loadRegFromAop (a, SOF(iTemp0), 1)
	lda	15,s
;     storeRegToAop (a, EXT(___fsadd_PARM_1), 1), stacked=0, isaddr=1
	sta	(___fsadd_PARM_1 + 2)
;     loadRegFromAop (a, SOF(iTemp0), 2)
	lda	14,s
;     storeRegToAop (a, EXT(___fsadd_PARM_1), 2), stacked=0, isaddr=1
	sta	(___fsadd_PARM_1 + 1)
;     loadRegFromAop (a, SOF(iTemp0), 3)
	lda	13,s
;     storeRegToAop (a, EXT(___fsadd_PARM_1), 3), stacked=0, isaddr=1
	sta	___fsadd_PARM_1
;     genAssign
;     loadRegFromAop (a, SOF(iTemp0), 0)
	lda	16,s
;     storeRegToAop (a, EXT(___fsadd_PARM_2), 0), stacked=0, isaddr=1
	sta	(___fsadd_PARM_2 + 3)
;     loadRegFromAop (a, SOF(iTemp0), 1)
	lda	15,s
;     storeRegToAop (a, EXT(___fsadd_PARM_2), 1), stacked=0, isaddr=1
	sta	(___fsadd_PARM_2 + 2)
;     loadRegFromAop (a, SOF(iTemp0), 2)
	lda	14,s
;     storeRegToAop (a, EXT(___fsadd_PARM_2), 2), stacked=0, isaddr=1
	sta	(___fsadd_PARM_2 + 1)
;     loadRegFromAop (a, SOF(iTemp0), 3)
	lda	13,s
;     storeRegToAop (a, EXT(___fsadd_PARM_2), 3), stacked=0, isaddr=1
	sta	___fsadd_PARM_2
;     genCall
	jsr	___fsadd
;     loadRegFromAop (a, REG(-,-,-,a), 0)
; transferRegReg(a,a)
;     storeRegToAop (a, EXT(_expf_PARM_1), 0), stacked=0, isaddr=1
	sta	(_expf_PARM_1 + 3)
;     loadRegFromAop (x, REG(-,-,-,x), 0)
; transferRegReg(x,x)
;     storeRegToAop (x, EXT(_expf_PARM_1), 1), stacked=0, isaddr=1
	stx	(_expf_PARM_1 + 2)
;     loadRegFromAop (a, DIR(__ret2), 0)
	lda	*__ret2
;     storeRegToAop (a, EXT(_expf_PARM_1), 2), stacked=0, isaddr=1
	sta	(_expf_PARM_1 + 1)
;     loadRegFromAop (a, DIR(__ret3), 0)
	lda	*__ret3
;     storeRegToAop (a, EXT(_expf_PARM_1), 3), stacked=0, isaddr=1
	sta	_expf_PARM_1
;     genCall
	jsr	_expf
;     loadRegFromAop (a, REG(-,-,-,a), 0)
; transferRegReg(a,a)
;     storeRegToAop (a, EXT(___fsadd_PARM_1), 0), stacked=0, isaddr=1
	sta	(___fsadd_PARM_1 + 3)
;     loadRegFromAop (x, REG(-,-,-,x), 0)
; transferRegReg(x,x)
;     storeRegToAop (x, EXT(___fsadd_PARM_1), 1), stacked=0, isaddr=1
	stx	(___fsadd_PARM_1 + 2)
;     loadRegFromAop (a, DIR(__ret2), 0)
	lda	*__ret2
;     storeRegToAop (a, EXT(___fsadd_PARM_1), 2), stacked=0, isaddr=1
	sta	(___fsadd_PARM_1 + 1)
;     loadRegFromAop (a, DIR(__ret3), 0)
	lda	*__ret3
;     storeRegToAop (a, EXT(___fsadd_PARM_1), 3), stacked=0, isaddr=1
	sta	___fsadd_PARM_1
;     genAssign
;     loadRegFromAop (a, LIT(#0x00), 0)
	lda	#0x00
;     storeRegToAop (a, EXT(___fsadd_PARM_2), 0), stacked=0, isaddr=1
	sta	(___fsadd_PARM_2 + 3)
;     loadRegFromAop (a, LIT(#0x00), 1)
	lda	#0x00
;     storeRegToAop (a, EXT(___fsadd_PARM_2), 1), stacked=0, isaddr=1
	sta	(___fsadd_PARM_2 + 2)
;     loadRegFromAop (a, LIT(#0x00), 2)
	lda	#0x80
;     storeRegToAop (a, EXT(___fsadd_PARM_2), 2), stacked=0, isaddr=1
	sta	(___fsadd_PARM_2 + 1)
;     loadRegFromAop (a, LIT(#0x00), 3)
	lda	#0x3F
;     storeRegToAop (a, EXT(___fsadd_PARM_2), 3), stacked=0, isaddr=1
	sta	___fsadd_PARM_2
;     genCall
	jsr	___fsadd
;     loadRegFromAop (a, REG(-,-,-,a), 0)
; transferRegReg(a,a)
;     storeRegToAop (a, EXT(___fsdiv_PARM_2), 0), stacked=0, isaddr=1
	sta	(___fsdiv_PARM_2 + 3)
;     loadRegFromAop (x, REG(-,-,-,x), 0)
; transferRegReg(x,x)
;     storeRegToAop (x, EXT(___fsdiv_PARM_2), 1), stacked=0, isaddr=1
	stx	(___fsdiv_PARM_2 + 2)
;     loadRegFromAop (a, DIR(__ret2), 0)
	lda	*__ret2
;     storeRegToAop (a, EXT(___fsdiv_PARM_2), 2), stacked=0, isaddr=1
	sta	(___fsdiv_PARM_2 + 1)
;     loadRegFromAop (a, DIR(__ret3), 0)
	lda	*__ret3
;     storeRegToAop (a, EXT(___fsdiv_PARM_2), 3), stacked=0, isaddr=1
	sta	___fsdiv_PARM_2
;     genAssign
;     loadRegFromAop (a, LIT(#0x00), 0)
	lda	#0x00
;     storeRegToAop (a, EXT(___fsdiv_PARM_1), 0), stacked=0, isaddr=1
	sta	(___fsdiv_PARM_1 + 3)
;     loadRegFromAop (a, LIT(#0x00), 1)
	lda	#0x00
;     storeRegToAop (a, EXT(___fsdiv_PARM_1), 1), stacked=0, isaddr=1
	sta	(___fsdiv_PARM_1 + 2)
;     loadRegFromAop (a, LIT(#0x00), 2)
	lda	#0x80
;     storeRegToAop (a, EXT(___fsdiv_PARM_1), 2), stacked=0, isaddr=1
	sta	(___fsdiv_PARM_1 + 1)
;     loadRegFromAop (a, LIT(#0x00), 3)
	lda	#0x3F
;     storeRegToAop (a, EXT(___fsdiv_PARM_1), 3), stacked=0, isaddr=1
	sta	___fsdiv_PARM_1
;     genCall
	jsr	___fsdiv
;     loadRegFromAop (a, REG(-,-,-,a), 0)
; transferRegReg(a,a)
;     storeRegToAop (a, EXT(___fssub_PARM_2), 0), stacked=0, isaddr=1
	sta	(___fssub_PARM_2 + 3)
;     loadRegFromAop (x, REG(-,-,-,x), 0)
; transferRegReg(x,x)
;     storeRegToAop (x, EXT(___fssub_PARM_2), 1), stacked=0, isaddr=1
	stx	(___fssub_PARM_2 + 2)
;     loadRegFromAop (a, DIR(__ret2), 0)
	lda	*__ret2
;     storeRegToAop (a, EXT(___fssub_PARM_2), 2), stacked=0, isaddr=1
	sta	(___fssub_PARM_2 + 1)
;     loadRegFromAop (a, DIR(__ret3), 0)
	lda	*__ret3
;     storeRegToAop (a, EXT(___fssub_PARM_2), 3), stacked=0, isaddr=1
	sta	___fssub_PARM_2
;     genAssign
;     loadRegFromAop (a, LIT(#0x00), 0)
	lda	#0x00
;     storeRegToAop (a, EXT(___fssub_PARM_1), 0), stacked=0, isaddr=1
	sta	(___fssub_PARM_1 + 3)
;     loadRegFromAop (a, LIT(#0x00), 1)
	lda	#0x00
;     storeRegToAop (a, EXT(___fssub_PARM_1), 1), stacked=0, isaddr=1
	sta	(___fssub_PARM_1 + 2)
;     loadRegFromAop (a, LIT(#0x00), 2)
	lda	#0x00
;     storeRegToAop (a, EXT(___fssub_PARM_1), 2), stacked=0, isaddr=1
	sta	(___fssub_PARM_1 + 1)
;     loadRegFromAop (a, LIT(#0x00), 3)
	lda	#0x3F
;     storeRegToAop (a, EXT(___fssub_PARM_1), 3), stacked=0, isaddr=1
	sta	___fssub_PARM_1
;     genCall
	jsr	___fssub
;     loadRegFromAop (a, REG(-,-,-,a), 0)
; transferRegReg(a,a)
;     storeRegToAop (a, SOF(iTemp9), 0), stacked=0, isaddr=0
	sta	8,s
;     loadRegFromAop (x, REG(-,-,-,x), 0)
; transferRegReg(x,x)
;     storeRegToAop (x, SOF(iTemp9), 1), stacked=0, isaddr=0
	stx	7,s
;     loadRegFromAop (a, DIR(__ret2), 0)
	lda	*__ret2
;     storeRegToAop (a, SOF(iTemp9), 2), stacked=0, isaddr=0
	sta	6,s
;     loadRegFromAop (a, DIR(__ret3), 0)
	lda	*__ret3
;     storeRegToAop (a, SOF(iTemp9), 3), stacked=0, isaddr=0
	sta	5,s
;     genAssign
;tanhf.c:49: r+=r;
;     genAssign
;     loadRegFromAop (a, SOF(iTemp3), 0)
	lda	8,s
;     storeRegToAop (a, EXT(___fsadd_PARM_1), 0), stacked=0, isaddr=1
	sta	(___fsadd_PARM_1 + 3)
;     loadRegFromAop (a, SOF(iTemp3), 1)
	lda	7,s
;     storeRegToAop (a, EXT(___fsadd_PARM_1), 1), stacked=0, isaddr=1
	sta	(___fsadd_PARM_1 + 2)
;     loadRegFromAop (a, SOF(iTemp3), 2)
	lda	6,s
;     storeRegToAop (a, EXT(___fsadd_PARM_1), 2), stacked=0, isaddr=1
	sta	(___fsadd_PARM_1 + 1)
;     loadRegFromAop (a, SOF(iTemp3), 3)
	lda	5,s
;     storeRegToAop (a, EXT(___fsadd_PARM_1), 3), stacked=0, isaddr=1
	sta	___fsadd_PARM_1
;     genAssign
;     loadRegFromAop (a, SOF(iTemp3), 0)
	lda	8,s
;     storeRegToAop (a, EXT(___fsadd_PARM_2), 0), stacked=0, isaddr=1
	sta	(___fsadd_PARM_2 + 3)
;     loadRegFromAop (a, SOF(iTemp3), 1)
	lda	7,s
;     storeRegToAop (a, EXT(___fsadd_PARM_2), 1), stacked=0, isaddr=1
	sta	(___fsadd_PARM_2 + 2)
;     loadRegFromAop (a, SOF(iTemp3), 2)
	lda	6,s
;     storeRegToAop (a, EXT(___fsadd_PARM_2), 2), stacked=0, isaddr=1
	sta	(___fsadd_PARM_2 + 1)
;     loadRegFromAop (a, SOF(iTemp3), 3)
	lda	5,s
;     storeRegToAop (a, EXT(___fsadd_PARM_2), 3), stacked=0, isaddr=1
	sta	___fsadd_PARM_2
;     genCall
	jsr	___fsadd
;     loadRegFromAop (a, REG(-,-,-,a), 0)
; transferRegReg(a,a)
;     storeRegToAop (a, SOF(iTemp10), 0), stacked=0, isaddr=0
	sta	4,s
;     loadRegFromAop (x, REG(-,-,-,x), 0)
; transferRegReg(x,x)
;     storeRegToAop (x, SOF(iTemp10), 1), stacked=0, isaddr=0
	stx	3,s
;     loadRegFromAop (a, DIR(__ret2), 0)
	lda	*__ret2
;     storeRegToAop (a, SOF(iTemp10), 2), stacked=0, isaddr=0
	sta	2,s
;     loadRegFromAop (a, DIR(__ret3), 0)
	lda	*__ret3
;     storeRegToAop (a, SOF(iTemp10), 3), stacked=0, isaddr=0
	sta	1,s
;     genAssign
;     loadRegFromAop (a, SOF(iTemp10), 0)
	lda	4,s
;     storeRegToAop (a, SOF(iTemp3), 0), stacked=0, isaddr=0
	sta	8,s
;     loadRegFromAop (a, SOF(iTemp10), 1)
	lda	3,s
;     storeRegToAop (a, SOF(iTemp3), 1), stacked=0, isaddr=0
	sta	7,s
;     loadRegFromAop (a, SOF(iTemp10), 2)
	lda	2,s
;     storeRegToAop (a, SOF(iTemp3), 2), stacked=0, isaddr=0
	sta	6,s
;     loadRegFromAop (a, SOF(iTemp10), 3)
	lda	1,s
;     storeRegToAop (a, SOF(iTemp3), 3), stacked=0, isaddr=0
	sta	5,s
	jmp	00109$
00105$:
;tanhf.c:51: else if(f<EPS) r=f;
;     genAssign
;     loadRegFromAop (a, SOF(iTemp0), 0)
	lda	16,s
;     storeRegToAop (a, EXT(___fslt_PARM_1), 0), stacked=0, isaddr=1
	sta	(___fslt_PARM_1 + 3)
;     loadRegFromAop (a, SOF(iTemp0), 1)
	lda	15,s
;     storeRegToAop (a, EXT(___fslt_PARM_1), 1), stacked=0, isaddr=1
	sta	(___fslt_PARM_1 + 2)
;     loadRegFromAop (a, SOF(iTemp0), 2)
	lda	14,s
;     storeRegToAop (a, EXT(___fslt_PARM_1), 2), stacked=0, isaddr=1
	sta	(___fslt_PARM_1 + 1)
;     loadRegFromAop (a, SOF(iTemp0), 3)
	lda	13,s
;     storeRegToAop (a, EXT(___fslt_PARM_1), 3), stacked=0, isaddr=1
	sta	___fslt_PARM_1
;     genAssign
;     loadRegFromAop (a, LIT(#0x00), 0)
	lda	#0x00
;     storeRegToAop (a, EXT(___fslt_PARM_2), 0), stacked=0, isaddr=1
	sta	(___fslt_PARM_2 + 3)
;     loadRegFromAop (a, LIT(#0x00), 1)
	lda	#0x00
;     storeRegToAop (a, EXT(___fslt_PARM_2), 1), stacked=0, isaddr=1
	sta	(___fslt_PARM_2 + 2)
;     loadRegFromAop (a, LIT(#0x00), 2)
	lda	#0x80
;     storeRegToAop (a, EXT(___fslt_PARM_2), 2), stacked=0, isaddr=1
	sta	(___fslt_PARM_2 + 1)
;     loadRegFromAop (a, LIT(#0x00), 3)
	lda	#0x39
;     storeRegToAop (a, EXT(___fslt_PARM_2), 3), stacked=0, isaddr=1
	sta	___fslt_PARM_2
;     genCall
	jsr	___fslt
;     loadRegFromAop (a, REG(-,-,-,a), 0)
; transferRegReg(a,a)
;     storeRegToAop (a, REG(-,-,x,a), 0), stacked=0, isaddr=0
; transferRegReg(a,a)
;     genIfx
	tsta
;     genIfxJump
; Peephole 2d	- eliminated jmp
	beq	00102$
00120$:
; forgot to free a
;     genAssign
;     loadRegFromAop (a, SOF(iTemp0), 0)
	lda	16,s
;     storeRegToAop (a, SOF(iTemp3), 0), stacked=0, isaddr=0
	sta	8,s
;     loadRegFromAop (a, SOF(iTemp0), 1)
	lda	15,s
;     storeRegToAop (a, SOF(iTemp3), 1), stacked=0, isaddr=0
	sta	7,s
;     loadRegFromAop (a, SOF(iTemp0), 2)
	lda	14,s
;     storeRegToAop (a, SOF(iTemp3), 2), stacked=0, isaddr=0
	sta	6,s
;     loadRegFromAop (a, SOF(iTemp0), 3)
	lda	13,s
;     storeRegToAop (a, SOF(iTemp3), 3), stacked=0, isaddr=0
	sta	5,s
	jmp	00109$
00102$:
;tanhf.c:54: g=f*f;
;     genAssign
;     loadRegFromAop (a, SOF(iTemp0), 0)
	lda	16,s
;     storeRegToAop (a, EXT(___fsmul_PARM_1), 0), stacked=0, isaddr=1
	sta	(___fsmul_PARM_1 + 3)
;     loadRegFromAop (a, SOF(iTemp0), 1)
	lda	15,s
;     storeRegToAop (a, EXT(___fsmul_PARM_1), 1), stacked=0, isaddr=1
	sta	(___fsmul_PARM_1 + 2)
;     loadRegFromAop (a, SOF(iTemp0), 2)
	lda	14,s
;     storeRegToAop (a, EXT(___fsmul_PARM_1), 2), stacked=0, isaddr=1
	sta	(___fsmul_PARM_1 + 1)
;     loadRegFromAop (a, SOF(iTemp0), 3)
	lda	13,s
;     storeRegToAop (a, EXT(___fsmul_PARM_1), 3), stacked=0, isaddr=1
	sta	___fsmul_PARM_1
;     genAssign
;     loadRegFromAop (a, SOF(iTemp0), 0)
	lda	16,s
;     storeRegToAop (a, EXT(___fsmul_PARM_2), 0), stacked=0, isaddr=1
	sta	(___fsmul_PARM_2 + 3)
;     loadRegFromAop (a, SOF(iTemp0), 1)
	lda	15,s
;     storeRegToAop (a, EXT(___fsmul_PARM_2), 1), stacked=0, isaddr=1
	sta	(___fsmul_PARM_2 + 2)
;     loadRegFromAop (a, SOF(iTemp0), 2)
	lda	14,s
;     storeRegToAop (a, EXT(___fsmul_PARM_2), 2), stacked=0, isaddr=1
	sta	(___fsmul_PARM_2 + 1)
;     loadRegFromAop (a, SOF(iTemp0), 3)
	lda	13,s
;     storeRegToAop (a, EXT(___fsmul_PARM_2), 3), stacked=0, isaddr=1
	sta	___fsmul_PARM_2
;     genCall
	jsr	___fsmul
;     loadRegFromAop (a, REG(-,-,-,a), 0)
; transferRegReg(a,a)
;     storeRegToAop (a, SOF(iTemp13), 0), stacked=0, isaddr=0
	sta	12,s
;     loadRegFromAop (x, REG(-,-,-,x), 0)
; transferRegReg(x,x)
;     storeRegToAop (x, SOF(iTemp13), 1), stacked=0, isaddr=0
	stx	11,s
;     loadRegFromAop (a, DIR(__ret2), 0)
	lda	*__ret2
;     storeRegToAop (a, SOF(iTemp13), 2), stacked=0, isaddr=0
	sta	10,s
;     loadRegFromAop (a, DIR(__ret3), 0)
	lda	*__ret3
;     storeRegToAop (a, SOF(iTemp13), 3), stacked=0, isaddr=0
	sta	9,s
;     genAssign
;tanhf.c:55: r=f+f*(P(g)/Q(g));
;     genAssign
;     loadRegFromAop (a, SOF(iTemp12), 0)
	lda	12,s
;     storeRegToAop (a, EXT(___fsmul_PARM_1), 0), stacked=0, isaddr=1
	sta	(___fsmul_PARM_1 + 3)
;     loadRegFromAop (a, SOF(iTemp12), 1)
	lda	11,s
;     storeRegToAop (a, EXT(___fsmul_PARM_1), 1), stacked=0, isaddr=1
	sta	(___fsmul_PARM_1 + 2)
;     loadRegFromAop (a, SOF(iTemp12), 2)
	lda	10,s
;     storeRegToAop (a, EXT(___fsmul_PARM_1), 2), stacked=0, isaddr=1
	sta	(___fsmul_PARM_1 + 1)
;     loadRegFromAop (a, SOF(iTemp12), 3)
	lda	9,s
;     storeRegToAop (a, EXT(___fsmul_PARM_1), 3), stacked=0, isaddr=1
	sta	___fsmul_PARM_1
;     genAssign
;     loadRegFromAop (a, LIT(#0xB2), 0)
	lda	#0xB2
;     storeRegToAop (a, EXT(___fsmul_PARM_2), 0), stacked=0, isaddr=1
	sta	(___fsmul_PARM_2 + 3)
;     loadRegFromAop (a, LIT(#0xB2), 1)
	lda	#0x11
;     storeRegToAop (a, EXT(___fsmul_PARM_2), 1), stacked=0, isaddr=1
	sta	(___fsmul_PARM_2 + 2)
;     loadRegFromAop (a, LIT(#0xB2), 2)
	lda	#0x7B
;     storeRegToAop (a, EXT(___fsmul_PARM_2), 2), stacked=0, isaddr=1
	sta	(___fsmul_PARM_2 + 1)
;     loadRegFromAop (a, LIT(#0xB2), 3)
	lda	#0xBB
;     storeRegToAop (a, EXT(___fsmul_PARM_2), 3), stacked=0, isaddr=1
	sta	___fsmul_PARM_2
;     genCall
	jsr	___fsmul
;     loadRegFromAop (a, REG(-,-,-,a), 0)
; transferRegReg(a,a)
;     storeRegToAop (a, EXT(___fsadd_PARM_1), 0), stacked=0, isaddr=1
	sta	(___fsadd_PARM_1 + 3)
;     loadRegFromAop (x, REG(-,-,-,x), 0)
; transferRegReg(x,x)
;     storeRegToAop (x, EXT(___fsadd_PARM_1), 1), stacked=0, isaddr=1
	stx	(___fsadd_PARM_1 + 2)
;     loadRegFromAop (a, DIR(__ret2), 0)
	lda	*__ret2
;     storeRegToAop (a, EXT(___fsadd_PARM_1), 2), stacked=0, isaddr=1
	sta	(___fsadd_PARM_1 + 1)
;     loadRegFromAop (a, DIR(__ret3), 0)
	lda	*__ret3
;     storeRegToAop (a, EXT(___fsadd_PARM_1), 3), stacked=0, isaddr=1
	sta	___fsadd_PARM_1
;     genAssign
;     loadRegFromAop (a, LIT(#0xC6), 0)
	lda	#0xC6
;     storeRegToAop (a, EXT(___fsadd_PARM_2), 0), stacked=0, isaddr=1
	sta	(___fsadd_PARM_2 + 3)
;     loadRegFromAop (a, LIT(#0xC6), 1)
	lda	#0xE2
;     storeRegToAop (a, EXT(___fsadd_PARM_2), 1), stacked=0, isaddr=1
	sta	(___fsadd_PARM_2 + 2)
;     loadRegFromAop (a, LIT(#0xC6), 2)
	lda	#0x52
;     storeRegToAop (a, EXT(___fsadd_PARM_2), 2), stacked=0, isaddr=1
	sta	(___fsadd_PARM_2 + 1)
;     loadRegFromAop (a, LIT(#0xC6), 3)
	lda	#0xBF
;     storeRegToAop (a, EXT(___fsadd_PARM_2), 3), stacked=0, isaddr=1
	sta	___fsadd_PARM_2
;     genCall
	jsr	___fsadd
;     loadRegFromAop (a, REG(-,-,-,a), 0)
; transferRegReg(a,a)
;     storeRegToAop (a, EXT(___fsmul_PARM_1), 0), stacked=0, isaddr=1
	sta	(___fsmul_PARM_1 + 3)
;     loadRegFromAop (x, REG(-,-,-,x), 0)
; transferRegReg(x,x)
;     storeRegToAop (x, EXT(___fsmul_PARM_1), 1), stacked=0, isaddr=1
	stx	(___fsmul_PARM_1 + 2)
;     loadRegFromAop (a, DIR(__ret2), 0)
	lda	*__ret2
;     storeRegToAop (a, EXT(___fsmul_PARM_1), 2), stacked=0, isaddr=1
	sta	(___fsmul_PARM_1 + 1)
;     loadRegFromAop (a, DIR(__ret3), 0)
	lda	*__ret3
;     storeRegToAop (a, EXT(___fsmul_PARM_1), 3), stacked=0, isaddr=1
	sta	___fsmul_PARM_1
;     genAssign
;     loadRegFromAop (a, SOF(iTemp12), 0)
	lda	12,s
;     storeRegToAop (a, EXT(___fsmul_PARM_2), 0), stacked=0, isaddr=1
	sta	(___fsmul_PARM_2 + 3)
;     loadRegFromAop (a, SOF(iTemp12), 1)
	lda	11,s
;     storeRegToAop (a, EXT(___fsmul_PARM_2), 1), stacked=0, isaddr=1
	sta	(___fsmul_PARM_2 + 2)
;     loadRegFromAop (a, SOF(iTemp12), 2)
	lda	10,s
;     storeRegToAop (a, EXT(___fsmul_PARM_2), 2), stacked=0, isaddr=1
	sta	(___fsmul_PARM_2 + 1)
;     loadRegFromAop (a, SOF(iTemp12), 3)
	lda	9,s
;     storeRegToAop (a, EXT(___fsmul_PARM_2), 3), stacked=0, isaddr=1
	sta	___fsmul_PARM_2
;     genCall
	jsr	___fsmul
;     loadRegFromAop (a, REG(-,-,-,a), 0)
; transferRegReg(a,a)
;     storeRegToAop (a, EXT(___fsdiv_PARM_1), 0), stacked=0, isaddr=1
	sta	(___fsdiv_PARM_1 + 3)
;     loadRegFromAop (x, REG(-,-,-,x), 0)
; transferRegReg(x,x)
;     storeRegToAop (x, EXT(___fsdiv_PARM_1), 1), stacked=0, isaddr=1
	stx	(___fsdiv_PARM_1 + 2)
;     loadRegFromAop (a, DIR(__ret2), 0)
	lda	*__ret2
;     storeRegToAop (a, EXT(___fsdiv_PARM_1), 2), stacked=0, isaddr=1
	sta	(___fsdiv_PARM_1 + 1)
;     loadRegFromAop (a, DIR(__ret3), 0)
	lda	*__ret3
;     storeRegToAop (a, EXT(___fsdiv_PARM_1), 3), stacked=0, isaddr=1
	sta	___fsdiv_PARM_1
;     genAssign
;     loadRegFromAop (a, SOF(iTemp12), 0)
	lda	12,s
;     storeRegToAop (a, EXT(___fsadd_PARM_1), 0), stacked=0, isaddr=1
	sta	(___fsadd_PARM_1 + 3)
;     loadRegFromAop (a, SOF(iTemp12), 1)
	lda	11,s
;     storeRegToAop (a, EXT(___fsadd_PARM_1), 1), stacked=0, isaddr=1
	sta	(___fsadd_PARM_1 + 2)
;     loadRegFromAop (a, SOF(iTemp12), 2)
	lda	10,s
;     storeRegToAop (a, EXT(___fsadd_PARM_1), 2), stacked=0, isaddr=1
	sta	(___fsadd_PARM_1 + 1)
;     loadRegFromAop (a, SOF(iTemp12), 3)
	lda	9,s
;     storeRegToAop (a, EXT(___fsadd_PARM_1), 3), stacked=0, isaddr=1
	sta	___fsadd_PARM_1
;     genAssign
;     loadRegFromAop (a, LIT(#0x1A), 0)
	lda	#0x1A
;     storeRegToAop (a, EXT(___fsadd_PARM_2), 0), stacked=0, isaddr=1
	sta	(___fsadd_PARM_2 + 3)
;     loadRegFromAop (a, LIT(#0x1A), 1)
	lda	#0x2A
;     storeRegToAop (a, EXT(___fsadd_PARM_2), 1), stacked=0, isaddr=1
	sta	(___fsadd_PARM_2 + 2)
;     loadRegFromAop (a, LIT(#0x1A), 2)
	lda	#0x1E
;     storeRegToAop (a, EXT(___fsadd_PARM_2), 2), stacked=0, isaddr=1
	sta	(___fsadd_PARM_2 + 1)
;     loadRegFromAop (a, LIT(#0x1A), 3)
	lda	#0x40
;     storeRegToAop (a, EXT(___fsadd_PARM_2), 3), stacked=0, isaddr=1
	sta	___fsadd_PARM_2
;     genCall
	jsr	___fsadd
;     loadRegFromAop (a, REG(-,-,-,a), 0)
; transferRegReg(a,a)
;     storeRegToAop (a, EXT(___fsdiv_PARM_2), 0), stacked=0, isaddr=1
	sta	(___fsdiv_PARM_2 + 3)
;     loadRegFromAop (x, REG(-,-,-,x), 0)
; transferRegReg(x,x)
;     storeRegToAop (x, EXT(___fsdiv_PARM_2), 1), stacked=0, isaddr=1
	stx	(___fsdiv_PARM_2 + 2)
;     loadRegFromAop (a, DIR(__ret2), 0)
	lda	*__ret2
;     storeRegToAop (a, EXT(___fsdiv_PARM_2), 2), stacked=0, isaddr=1
	sta	(___fsdiv_PARM_2 + 1)
;     loadRegFromAop (a, DIR(__ret3), 0)
	lda	*__ret3
;     storeRegToAop (a, EXT(___fsdiv_PARM_2), 3), stacked=0, isaddr=1
	sta	___fsdiv_PARM_2
;     genCall
	jsr	___fsdiv
;     loadRegFromAop (a, REG(-,-,-,a), 0)
; transferRegReg(a,a)
;     storeRegToAop (a, EXT(___fsmul_PARM_2), 0), stacked=0, isaddr=1
	sta	(___fsmul_PARM_2 + 3)
;     loadRegFromAop (x, REG(-,-,-,x), 0)
; transferRegReg(x,x)
;     storeRegToAop (x, EXT(___fsmul_PARM_2), 1), stacked=0, isaddr=1
	stx	(___fsmul_PARM_2 + 2)
;     loadRegFromAop (a, DIR(__ret2), 0)
	lda	*__ret2
;     storeRegToAop (a, EXT(___fsmul_PARM_2), 2), stacked=0, isaddr=1
	sta	(___fsmul_PARM_2 + 1)
;     loadRegFromAop (a, DIR(__ret3), 0)
	lda	*__ret3
;     storeRegToAop (a, EXT(___fsmul_PARM_2), 3), stacked=0, isaddr=1
	sta	___fsmul_PARM_2
;     genAssign
;     loadRegFromAop (a, SOF(iTemp0), 0)
	lda	16,s
;     storeRegToAop (a, EXT(___fsmul_PARM_1), 0), stacked=0, isaddr=1
	sta	(___fsmul_PARM_1 + 3)
;     loadRegFromAop (a, SOF(iTemp0), 1)
	lda	15,s
;     storeRegToAop (a, EXT(___fsmul_PARM_1), 1), stacked=0, isaddr=1
	sta	(___fsmul_PARM_1 + 2)
;     loadRegFromAop (a, SOF(iTemp0), 2)
	lda	14,s
;     storeRegToAop (a, EXT(___fsmul_PARM_1), 2), stacked=0, isaddr=1
	sta	(___fsmul_PARM_1 + 1)
;     loadRegFromAop (a, SOF(iTemp0), 3)
	lda	13,s
;     storeRegToAop (a, EXT(___fsmul_PARM_1), 3), stacked=0, isaddr=1
	sta	___fsmul_PARM_1
;     genCall
	jsr	___fsmul
;     loadRegFromAop (a, REG(-,-,-,a), 0)
; transferRegReg(a,a)
;     storeRegToAop (a, EXT(___fsadd_PARM_2), 0), stacked=0, isaddr=1
	sta	(___fsadd_PARM_2 + 3)
;     loadRegFromAop (x, REG(-,-,-,x), 0)
; transferRegReg(x,x)
;     storeRegToAop (x, EXT(___fsadd_PARM_2), 1), stacked=0, isaddr=1
	stx	(___fsadd_PARM_2 + 2)
;     loadRegFromAop (a, DIR(__ret2), 0)
	lda	*__ret2
;     storeRegToAop (a, EXT(___fsadd_PARM_2), 2), stacked=0, isaddr=1
	sta	(___fsadd_PARM_2 + 1)
;     loadRegFromAop (a, DIR(__ret3), 0)
	lda	*__ret3
;     storeRegToAop (a, EXT(___fsadd_PARM_2), 3), stacked=0, isaddr=1
	sta	___fsadd_PARM_2
;     genAssign
;     loadRegFromAop (a, SOF(iTemp0), 0)
	lda	16,s
;     storeRegToAop (a, EXT(___fsadd_PARM_1), 0), stacked=0, isaddr=1
	sta	(___fsadd_PARM_1 + 3)
;     loadRegFromAop (a, SOF(iTemp0), 1)
	lda	15,s
;     storeRegToAop (a, EXT(___fsadd_PARM_1), 1), stacked=0, isaddr=1
	sta	(___fsadd_PARM_1 + 2)
;     loadRegFromAop (a, SOF(iTemp0), 2)
	lda	14,s
;     storeRegToAop (a, EXT(___fsadd_PARM_1), 2), stacked=0, isaddr=1
	sta	(___fsadd_PARM_1 + 1)
;     loadRegFromAop (a, SOF(iTemp0), 3)
	lda	13,s
;     storeRegToAop (a, EXT(___fsadd_PARM_1), 3), stacked=0, isaddr=1
	sta	___fsadd_PARM_1
;     genCall
	jsr	___fsadd
;     loadRegFromAop (a, REG(-,-,-,a), 0)
; transferRegReg(a,a)
;     storeRegToAop (a, SOF(iTemp21), 0), stacked=0, isaddr=0
	sta	8,s
;     loadRegFromAop (x, REG(-,-,-,x), 0)
; transferRegReg(x,x)
;     storeRegToAop (x, SOF(iTemp21), 1), stacked=0, isaddr=0
	stx	7,s
;     loadRegFromAop (a, DIR(__ret2), 0)
	lda	*__ret2
;     storeRegToAop (a, SOF(iTemp21), 2), stacked=0, isaddr=0
	sta	6,s
;     loadRegFromAop (a, DIR(__ret3), 0)
	lda	*__ret3
;     storeRegToAop (a, SOF(iTemp21), 3), stacked=0, isaddr=0
	sta	5,s
;     genAssign
00109$:
;tanhf.c:57: if(x<0.0) r=-r;
;     genAssign
;     loadRegFromAop (a, SOF(x), 0)
	lda	22,s
;     storeRegToAop (a, EXT(___fslt_PARM_1), 0), stacked=0, isaddr=1
	sta	(___fslt_PARM_1 + 3)
;     loadRegFromAop (a, SOF(x), 1)
	lda	21,s
;     storeRegToAop (a, EXT(___fslt_PARM_1), 1), stacked=0, isaddr=1
	sta	(___fslt_PARM_1 + 2)
;     loadRegFromAop (a, SOF(x), 2)
	lda	20,s
;     storeRegToAop (a, EXT(___fslt_PARM_1), 2), stacked=0, isaddr=1
	sta	(___fslt_PARM_1 + 1)
;     loadRegFromAop (a, SOF(x), 3)
	lda	19,s
;     storeRegToAop (a, EXT(___fslt_PARM_1), 3), stacked=0, isaddr=1
	sta	___fslt_PARM_1
;     genAssign
;     loadRegFromAop (a, LIT(#0x00), 0)
	lda	#0x00
;     storeRegToAop (a, EXT(___fslt_PARM_2), 0), stacked=0, isaddr=1
	sta	(___fslt_PARM_2 + 3)
;     loadRegFromAop (a, LIT(#0x00), 1)
	lda	#0x00
;     storeRegToAop (a, EXT(___fslt_PARM_2), 1), stacked=0, isaddr=1
	sta	(___fslt_PARM_2 + 2)
;     loadRegFromAop (a, LIT(#0x00), 2)
	lda	#0x00
;     storeRegToAop (a, EXT(___fslt_PARM_2), 2), stacked=0, isaddr=1
	sta	(___fslt_PARM_2 + 1)
;     loadRegFromAop (a, LIT(#0x00), 3)
	lda	#0x00
;     storeRegToAop (a, EXT(___fslt_PARM_2), 3), stacked=0, isaddr=1
	sta	___fslt_PARM_2
;     genCall
	jsr	___fslt
;     loadRegFromAop (a, REG(-,-,-,a), 0)
; transferRegReg(a,a)
;     storeRegToAop (a, REG(-,-,x,a), 0), stacked=0, isaddr=0
; transferRegReg(a,a)
;     genIfx
	tsta
;     genIfxJump
; Peephole 2d	- eliminated jmp
	beq	00111$
00121$:
; forgot to free a
;     genUminus
;     genUminusFloat
;     loadRegFromAop (a, SOF(iTemp3), 0)
	lda	8,s
;     storeRegToAop (a, SOF(iTemp3), 0), stacked=0, isaddr=0
	sta	8,s
;     loadRegFromAop (a, SOF(iTemp3), 1)
	lda	7,s
;     storeRegToAop (a, SOF(iTemp3), 1), stacked=0, isaddr=0
	sta	7,s
;     loadRegFromAop (a, SOF(iTemp3), 2)
	lda	6,s
	eor	#0x80
;     storeRegToAop (a, SOF(iTemp3), 2), stacked=0, isaddr=0
	sta	6,s
00111$:
;tanhf.c:58: return r;
;     genRet
;     loadRegFromAop (a, SOF(iTemp3), 3)
	lda	5,s
;     storeRegToAop (a, DIR(__ret3), 0), stacked=0, isaddr=0
	sta	*__ret3
;     loadRegFromAop (a, SOF(iTemp3), 2)
	lda	6,s
;     storeRegToAop (a, DIR(__ret2), 0), stacked=0, isaddr=0
	sta	*__ret2
;     loadRegFromAop (x, SOF(iTemp3), 1)
	ldx	7,s
;     storeRegToAop (x, REG(-,-,-,x), 0), stacked=0, isaddr=0
; transferRegReg(x,x)
;     loadRegFromAop (a, SOF(iTemp3), 0)
	lda	8,s
;     storeRegToAop (a, REG(-,-,-,a), 0), stacked=0, isaddr=0
; transferRegReg(a,a)
00112$:
	ais	#16
	rts
	.area CSEG
	.area XINIT
