Skip to content

Instantly share code, notes, and snippets.

@blaisepascal
blaisepascal / subway.hs
Created May 22, 2020 20:57
Subway Trees
{-# LANGUAGE OverloadedStrings #-}
import Control.Arrow
import Data.List
import Data.Maybe
import Control.Applicative
import Data.Attoparsec.ByteString.Char8
import qualified Data.ByteString.Char8 as C