vmarquez · November 3, 2014 01:28
diff --git a/gistfile1.scala b/gistfile1.scala
 def OtoS[A](o: Option[A => A]): State[A,A] = 
  o match {
    case Some(f) => State[A,A](a => { 
      val na = f(a) 
      (na,na)
      }) 
    case None => State[A,A](a => (a,a))
  }
	def OtoS[A](o: Option[A => A]): State[A,A] =
	o match {
	case Some(f) => State[A,A](a => {
	val na = f(a)
	(na,na)
	})
	case None => State[A,A](a => (a,a))
	}