static LS tok_replaceWords_transferCase(SS map, LS tok) {
  tok = cloneList(tok);
  for (int i = 1; i < l(tok); i += 2) {
    S t = tok.get(i);
    S x = map.get(t);
    if (x != null)
      tok.set(i, transferCase(t, x));
  }
  ret tok;
}