Skip to content

Instantly share code, notes, and snippets.

@gorlum0
gorlum0 / cf25-c.hs
Created August 12, 2011 19:31 — forked from u1ik/cf25-c.hs
codeforces - 25 - C (hs)
{-# LANGUAGE NewQualifiedOperators #-}
import Prelude
import qualified Data.ByteString.Char8 as B
import qualified Data.Vector.Unboxed as U
import qualified Data.Vector as V
import Data.List
import Control.Monad
import Control.Applicative
import Data.Maybe(fromJust)