!7

static Map<S, Triple<S>> map;
static new HashMap<Pair<S>, Float> isMap;

p {
  ai_tripelize_preload();
  time2 { map = tripelizeGAC36k(); }
  Map<S, Web> webs = mapValues(f webFromTriple, map);
  Map<Web, S> rwebs = reversedMap(webs);
  L<Web> isWebs = filter(rcurry(f web_containsRelation, "is?"), values(webs));
  //printWebs(isWebs);
  print(l(isWebs));
  
  for (Web web : isWebs) {
    S a = web_text(web_firstNode(web));
    S b = web_text(web_secondNode(web));
    float value = toFloat(gac36k().get(rwebs.get(web)));
    //print(toIntPercent(value) + ": " + a + " <is> " + b);
    isMap.put(pair(a, b), value);
  }
  
  for (Pair<S> p : keysSortedByValueDesc(isMap))
    print(toIntPercent(isMap.get(p)) + ": " + p.a + " <is> " + p.b);
}