sig
  val ( $| ) : x -> x -> x
  val ( $& ) : x -> x -> x
  val ( !* ) : x -> x
  val ( !+ ) : x -> x
  val ( !? ) : x -> x
  val ( !: ) : char -> x
  val ( !^ ) : (char -> bool) -> x
  val ( !~ ) : char Cf_seq.t -> x
  val ( !$ ) : string -> x
  val ( $= ) : Cf_lex.x -> '-> 'Cf_lex.r
  val ( $> ) : Cf_lex.x -> (string -> 'a) -> 'Cf_lex.r
  val ( $@ ) : Cf_lex.x -> (int -> 'Cf_lex.t) -> 'Cf_lex.r
  val ( !@ ) : 'Cf_lex.r list -> 'Cf_lex.r
  val ( ?~ ) : Cf_lex.x -> string Cf_lex.t
  val ( ?$ ) : string -> string Cf_lex.t
end