Haskell

yonedaLemma = Iso (flip fmap) ($ id)

milessabin

scala> import shapeless._, syntax.singleton._, record._
import shapeless._
import syntax.singleton._
import record._

scala> object mkField extends Poly1 { implicit def default[K, V] = at[(K, V)]{ case (k, v) => field[K](v) } }
defined module mkField

scala> case class Person(name: String, age: Int, location: Option[String])
defined class Person

milessabin

scala> import SingletonTypes._ ; import Record._
import SingletonTypes._                                                                                                                                        
import Record._                                                                                                                                                
                                                                                                                                                               
scala> val r = "name" ->> "foo" :: "age" ->> 1 :: "lastName" ->> "bar" :: HNil
r: shapeless.::[String with Object{type keyType = String("name")},shapeless.::[Int with Object{type keyType = String("age")},shapeless.::[String with Object{type keyType = String("lastName")},shapeless.HNil]]] = foo :: 1 :: bar :: HNil                                                                                   
                                                                                                 

pchiusano

package scalaz.stream

import scalaz.concurrent.Task
import scalaz.syntax.traverse._
import scalaz.std.list._
import Process.Process1

import collection.immutable.{IndexedSeq, Vector}

object profile extends App {

milessabin

scala> import shapeless._
import shapeless._

scala> import SingletonTypes._
import SingletonTypes._

scala> :paste
// Entering paste mode (ctrl-D to finish)

trait Show[T] {

eyston

angular.module('ymusica').controller('AlbumSearch', ['$scope', 'Albums', 'Artists', '$q', function($scope, albums, artists, $q) {

    $scope.albums = [];
    $scope.artists = [];

    var terms = new Rx.Subject();

    $scope.searchMusic = terms.onNext.bind(terms);

    terms.sample(250)

ErikAndreas

Been looking for a full stack including tools for gettext-style i18n with AngularJS.

• Gettext-style support in markup (html and javascript) supporting singular, plural and interpolation/sprintf
• Tooling for extraction of strings to be translated (to .pot) from html and javascript
• Tooling for generating .json of .po files

Ended up (working proof of concept) with the following:

• "lingua", an AngularJS module wrapping Jed
• Some AngularJS bootstrapping
• pybabel for xgettext style translations extraction (to .pot)
• po2json for generating .json files (per translation) from .po files

cartazio

{-# LANGUAGE GADTs, Rank2Types, KindSignatures, ScopedTypeVariables, TypeOperators, DataKinds, PolyKinds, MultiParamTypeClasses, FlexibleInstances, TypeFamilies, DoRec, ExtendedDefaultRules #-}
import Control.Applicative
import Control.Category
import Control.Comonad
import Control.Monad.Fix
import Control.Monad (ap)
import Data.Functor.Identity
import Data.Typeable
import Data.Monoid
import Data.Unique

tonymorris

sealed trait RngOp[A] {
  def map[B](f: A => B): RngOp[B] =
    this match {
      case NextBits(b, n) => NextBits(b, f compose n)
      case SetSeed(b, n) => SetSeed(b, () => f(n()))
    }

  def lift: Rng[A] =
    Cont(map(Done(_)))
}

aaronwolen

% Title % Name % Date

My first slide

List