package scalaz sealed trait CharW extends PimpedType[Char] { import Scalaz._ def ∏ : CharMultiplication = multiplication(value) def digit : Option[Digit] = digits find (_.toChar == value) def alpha : Option[Alpha] = alphas find(_.toChar == value) } trait Chars { implicit def CharTo(c: Char): CharW = new CharW { val value = c } }