Function to detect a point in a circle?

Or to turn Mr. Swifts example into (optimized) sourceocde:

Function cCollide:Int( pointX:Float , pointY:Float , circleX:Float , circleY:Float , radius:Float )
	radius:* radius
	Return radius < (pointX - circleX) * (pointX - circleX) + (pointY - circleY) * (pointY - circleY)
EndFunction