Fix fallout from changes C-side

Author: robertodr

api/pcmsolver.f90

@@ -483,9 +483,9 @@ function pcmsolver_fill_pcminput(cavity_type, patch_level, coarsity, area, &
 
     ! radii_set
     if (present(radii_set)) then
-       host_input%radii_set = fstring_to_carray_w_len(radii_set, l=8)
+       host_input%radii_set = fstring_to_carray_w_len(radii_set, l=9)
     else
-       host_input%radii_set = fstring_to_carray_w_len('bondi', l=8)
+       host_input%radii_set = fstring_to_carray_w_len('bondi', l=9)
     end if
 
     ! min_distance