We now determine the parameters (radius and theta) of our formed shape of wire.

Input := 


radiusOfCut = r/.solr[[1]]/.solMaxtheta[[1]]//N

Output =


18.1578

Input := 


thetaOfCut = theta/.solMaxtheta[[1]]

Output =


2.7759