static S conceptLanguageToEnglish_xyz_noquote(S s) { if (s == null) null; pcall { L tok = javaTokC(s); if (empty(tok)) ret s; S pattern = conceptToNameOpt(first(tok)); if (empty(pattern)) ret s; s = formatXYZ_appendRest(pattern, map(f conceptToName, dropFirst(tok))); ret crazyEnglishFixing(s); } ret s; } static S conceptLanguageToEnglish_xyz_noquote(Lisp l) { ret conceptLanguageToEnglish_xyz_noquote(clUnparse(l)); }