sS switcheroo_iToName(S name, S s) {
  SS map = combinedMechMapForCurrentLanguages("Switcheroo I -> $name");
  map = mapValues(map, x -> replaceIC(x, "$name", name));
  ret translateUsingWordTree(s, mapToWordTree(map));
}