static L<AIConcept> withoutArrowConcepts(Collection<AIConcept> l) {
  ret [AIConcept c : l | !startsWith(c.name, "-> ")];
}