static S conceptLanguageToEnglish_xyz(S s) {
  L<S> tok = javaTokC(s);
  if (empty(tok)) ret s;
  S pattern = conceptToNameOpt(first(tok));
  if (empty(pattern)) ret s;
  s = formatXYZ(pattern, map(func(S s) { conceptQuote(conceptToName(s)) }, dropFirst(tok)));
  
  // Crazy English Fixing
  s = jreplace(s, "A", "a");
  s = jreplace(s, "a a", "a");
  ret firstToUpper(s);
}