tolower := proc()
   local dir, i, command;
   dir := readlib(`utils/replace`)(args[1], `/`=`\\`):
   for i in readlib(`utils/dir`)(dir) do
      command := cat(`rename `, dir, `\\`, i, ` `, readlib(`utils/toLower`)(i));
      lprint(readlib(`utils/replace`)(command, `\\`=`/`));
      system(command)
   od
end: