bartavelle

module Main where

import Text.Parsec.String (Parser)
import Text.Parsec.Prim (parse)
import Text.Parser.Expression
import Text.Parser.Token
import Control.Applicative
import Control.Monad

data Expr = Add Expr Expr

bartavelle

module Bitfinex where

import Lib

type BitfinexExchange = Exchange
type LevelCount = Int

data BitfinexBookMessage = BitfinexBookMessage { getTime :: Time
                                               , getExchange :: BitfinexExchange
                                               , getBookMessage :: BookMessage

bartavelle

{-# LANGUAGE GADTs #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE MultiParamTypeClasses #-}
{-# LANGUAGE TypeApplications #-}
{-# LANGUAGE FlexibleContexts #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE RankNTypes #-}
{-# LANGUAGE ScopedTypeVariables #-}
{-# LANGUAGE OverloadedStrings #-}

bartavelle

module Data.Parsers.Xml
    ( Parser
    , ParserT
    , xmldeclaration
    , startelement
    , endelement
    , element
    , element_
    , lx
    , extractParameter

bartavelle

module Main where

import qualified Data.Set as S
import qualified Data.Map.Strict as M
import Data.Semigroup
import Control.Monad

data Piece
    = Rook
    | Bishop

bartavelle

Keybase proof

I hereby claim:

• I am bartavelle on github.
• I am bartavelle (https://keybase.io/bartavelle) on keybase.
• I have a public key whose fingerprint is 226E C60D 353D 2535 09D5 8DF7 301C 82F3 F499 C0F8

To claim this, I am signing this object: