;:ts=8
	global	_MathBase,4
	public	_main
_main:
	link	a5,#.2
	movem.l	.3,-(sp)
	bss	.4,4
	bss	.5,4
	dseg
	ds	0
.6
	dc.b	$a0,$0,$0,$43
	cseg
	clr.l	-(sp)
	pea	.1+0
	jsr	_OpenLibrary
	add.w	#8,sp
	move.l	d0,_MathBase
	move.l	#$c8385249,.4
	move.l	#$c8385249,.6
	move.l	#20000,d4
.9
	move.l	.6,d1
	move.l	.4,d0
	jsr	.Fdiv#
	move.l	d0,.5
	move.l	.6,d1
	move.l	.4,d0
	jsr	.Fmul#
	move.l	d0,.5
	move.l	.6,d1
	move.l	.4,d0
	jsr	.Fsub#
	move.l	d0,.5
	move.l	.6,d1
	move.l	.4,d0
	jsr	.Fadd#
	move.l	d0,.5
	sub.l	#1,d4
.7
	tst.l	d4
	bne	.9
.8
	clr.l	-(sp)
	move.l	.5,-(sp)
	pea	.1+16
	jsr	_printf
	lea	12(sp),sp
.10
	movem.l	(sp)+,.3
	unlk	a5
	rts
.2	equ	0
.3	reg	d4
.1
	dc.b	109,97,116,104,102,102,112,46,108,105,98,114,97,114,121
	dc.b	0,37,102,10,0
	ds	0
	public	_printf
	public	_OpenLibrary
	public	.begin
	dseg
	end