static Map<S, Triple<S>> tripelizeGAC36k() {
  new TreeMap<S, Triple<S>> map;
  for (S s : gac36k())
    pcall { mapPut(map, s, ai_tripelize(36)); }
  ret map;
}