FreeVBCode code snippet: Calculate The Area of Intersected Circles