static IPred<S> $cic(S suffix) {
  ret s -> cic(s, suffix);
}