extend stdname_max_len for constituent standard names

Author: peverwhee

src/data/write_init_files.py

@@ -388,6 +388,9 @@ def write_ic_params(outfile, host_vars, ic_names, registry_constituents):
     else:
         max_slen = 0
     # end if
+    # Extend max_slen if any constituent names are longer
+    max_slen = max(max_slen, max(len(x) for x in registry_constituents))
+
     outfile.write(f"integer, public, parameter :: std_name_len = {max_slen}", 1)
 
     outfile.blank_line()