We check that the "wedge" (BAC) has area 1/3 area of the circle (1/3 Pi R^2 or

1.0472 R^2) - and it does!

Input := 


cut[tsol]

Output =


        2

1.0472 R