k820309 919.0Ze  module_string_tools.f90MODULE_STRING_TOOLS$@ #STRHr5Op @1LEN4fn#fnCAPITALIZEaLaCAPITALIZE%STR<CAPITALIZE%LEN