Skip to content

Instantly share code, notes, and snippets.

View alang9's full-sized avatar

Alex Lang alang9

  • Tsuru Capital LLC
  • Tokyo
View GitHub Profile
@alang9
alang9 / code.hs
Last active August 29, 2015 14:15 — forked from YoEight/code.hs
{-# LANGUAGE RankNTypes, GADTs #-}
module Bidi where
import Control.Monad.Trans
import Data.Machine
data Pipe a' a b' b c where
Request :: a' -> Pipe a' a b' b a