rsuniev

import scalaz.{Failure => _, _}
import Scalaz._
import effects._
import iteratees._

import java.io._

object Head {
  def main(args: Array[String]) {
    val enum = enumStream[Seq[Byte], IO]((1 to 50).toStream.map(i => ("line " + i + "\n").getBytes.toSeq))

rsuniev

  implicit def MapMonoid[K, V](implicit valueSemigroup: Semigroup[V]): Monoid[Map[K, V]] = new Monoid[Map[K, V]] {
    override val zero = Map.empty[K, V]
    override def append(m1: Map[K, V], m2: => Map[K, V]) = { 
      val (from, to, semigroup) = { 
        if (m1.size > m2.size) (m2, m1, (v1: V, v2: V) => valueSemigroup.append(v1, v2))
        else (m1, m2, (v1: V, v2: V) => valueSemigroup.append(v2, v1))
      }   

      from.foldLeft(to) {
        case (to, (k, v)) => to + (k -> to.get(k).map(semigroup(_, v)).getOrElse(v))

rsuniev

package scalaz.example

import scalaz.AltDList._

object ExampleAltDList {
  def main(args: Array[String]) = run

  import scalaz._, Scalaz._
  import IterV._

rsuniev

import scalaz.{Failure => _, _}
import Scalaz._
import effects._
import iteratees._

import java.io._

object Head {
  def main(args: Array[String]) {
    val enum = enumStream[Seq[Byte], IO]((1 to 50).toStream.map(i => ("line " + i + "\n").getBytes.toSeq))

rsuniev

case class ElectricCar(b: Battery) { def batteryLevel = b.filledPercentage }

case class GasolineCar(g: GasTank) { def gasLevel = g.filledPercentage }

case class Battery(filledPercentage: Int) { def fill: Battery = Battery(100) }

case class GasTank(filledPercentage: Int) { def fill: GasTank = GasTank(100) }

trait Fills[C] {
  def fill(car: C): C

rsuniev

class A
class A2 extends A
class B

trait M[X]

//
// Upper Type Bound
//
def upperTypeBound[AA <: A](x: AA): A = x