shajra

// Implementing functor manually

import scalaz._, Scalaz._, Free.liftF

sealed trait TestF[+A]
case class Foo[A](o: A) extends TestF[A]
case class Bar[A](h: (Int => A)) extends TestF[A]
case class Baz[A](h: (Int => A)) extends TestF[A]

implicit def testFFunctor[B]: Functor[TestF] = new Functor[TestF] {

tpolecat

import scalaz.{ Free, Coyoneda, Monad, ~>, State, NonEmptyList }
import scalaz.std.function._
import scalaz.syntax.monad._
import scalaz.effect.IO

import scala.util.Random

object freecoyo extends App {

  // An algebra of primitive operations in the context of a random number generator

d-plaindoux

// 
// From https://www.parleys.com/tutorial/type-level-programming-scala-101
//

import scala.language.higherKinds

// Int type programming level

sealed trait IntType {
  type plus[that <: IntType] <: IntType

kaizawa

/**
 * Sample code which listens to Enter key event on TextField
 */
package myscala

import scala.swing.BorderPanel
import scala.swing.Label
import scala.swing.MainFrame
import scala.swing.SimpleSwingApplication
import scala.swing.TextField

derekwyatt

trait ReceiveComposiingActor extends Actor {
  trait Key
  lazy val receivePartials = scala.collection.mutable.Map.empty[Key, Receive]

  // Fronts 'context.become' to alter map before recomposition
  def becomeNew(key: Key, behaviour: Receive) {
    receivePartials += (key -> behaviour)
    context.become(composeReceive)
  }

sassunt

scala> import dispatch._
import dispatch._

scala> val req = :/("gist.github.com") / "1614046"
req: dispatch.Request = dispatch.Request@4e04622f

scala> req.host
res0: org.apache.http.HttpHost = http://gist.github.com

scala> req.path

kenbot

// Category
//
trait Category[Arrow[_,_]] {
  def compose[A,B,C](c1: Arrow[B,C], c2: Arrow[A,B]): Arrow[A,C]
  def id[A]: Arrow[A,A]
}

object Category {
  implicit object FunctionCat extends Category[Function1] {
    def compose[A,B,C](f: B => C, g: A => B): A => C = f compose g 

halcat0x15a

val one = Function.const(1)_
one(2) assert_=== 1
one("hoge") assert_=== 1

travisbrown

scalaVersion := "2.10.2"

libraryDependencies ++= Seq(
  "net.databinder.dispatch" %% "dispatch-core" % "0.11.0",
  "net.databinder.dispatch" %% "dispatch-json4s-jackson" % "0.11.0",
  "net.sf.opencsv" % "opencsv" % "2.0"
)

xuwei-k

/** 
 * https://github.com/json4s/json4s/issues/39
 *
 * Validation Monad instance removed from Scalaz7.
 * https://github.com/scalaz/scalaz/blob/v6.0.4/core/src/main/scala/scalaz/Validation.scala#L133-L147
 *
 * need explicitly convert to `scalaz.\/` (aka disjunction) if you want use the `Kleisli` composition
 */
object Main extends App {