;redcode
;name Coreclear v2.0
;author Matthew K. Gray

cclp	dat	#0,	#-1000
ccl	spl	0
	mov	1,	<cclp
end	ccl