static <A> L<A> filter(Iterable<A> c, O pred) {
  if (pred instanceof F1) ret filter(c, (F1<A, Bool>) pred);

  ifdef filter_debug
    print("Slow filter called");
  endifdef
  new L x;
  if (c != null) for (O o : c)
    if (isTrue(callF(pred, o)))
      x.add(o);
  ret x;
}

static L filter(O pred, Iterable c) {
  ret filter(c, pred);
}

static <A, B extends A> L<B> filter(Iterable<B> c, F1<A, Bool> pred) {
  new L x;
  if (c != null) for (B o : c)
    if (pred.get(o))
      x.add(o);
  ret x;
}

static <A, B extends A> L<B> filter(F1<A, Bool> pred, Iterable<B> c) {
  ret filter(c, pred);
}

//ifclass IF1
static <A, B extends A> L<B> filter(Iterable<B> c, IF1<A, Bool> pred) {
  new L x;
  if (c != null) for (B o : c)
    if (pred.get(o))
      x.add(o);
  ret x;
}

static <A, B extends A> L<B> filter(B[] c, IF1<A, Bool> pred) {
  new L x;
  if (c != null) for (B o : c)
    if (pred.get(o))
      x.add(o);
  ret x;
}

static <A, B extends A> L<B> lambdaMapLike filter(IF1<A, Bool> pred, Iterable<B> c) {
  ret filter(c, pred);
}
//endif