lib: string:
with lib;
let
  chars =
    let
      lc = strings.splitString "" string;
    in
    (lists.sublist 1 (lists.length lc - 2) lc);
in
(strings.concatStringsSep "" (
  (lists.singleton (strings.toUpper (lists.elemAt chars 0)))
  ++ (lists.sublist 1 (lists.length chars) chars)
))