We eliminate the variable r using the length constraint, at least write r in terms of L and theta only.

Input := 


solr = Solve[length,r]

Output =


              L

{{r -> ----------------}}

       2 + 2 Pi - theta