!7

concept Bla {
  int i;
  
  *(int *i) {}
}

cprint {
  start-thread {
    //indexConceptFieldsOrdered(Bla, 'i);
    L<Int> l = ll(1, 3, 5, 10);
    for (int i : l) new Bla(i);
    set conceptsWithFieldGreaterThan_verbose;
    for idx over l:
      assertEqualsVerbose(subList(l, idx+1), sortedByField i(conceptsWithFieldGreaterThan Bla('i, l.get(idx))));
  }
}