.file	"981107-1.c"
	.text
	.align	2
	.globl	seed
	.type	seed, @function
seed:
	link.w %a6,#-4
	jbsr call
	lea (-4,%a6),%a0
	lea (%a0,%a0.l*2),%a1
	move.l %a1,%d0
	move.l %a1,%d1
	lsl.l #4,%d1
	add.l %d1,%d0
	lsl.l #7,%d0
	sub.l %a0,%d0
	lsl.l #2,%d0
	sub.l %a0,%d0
	unlk %a6
	rts
	.size	seed, .-seed
	.ident	"GCC: (GNU) 3.3.2"