-- Hoogle documentation, generated by Haddock -- See Hoogle, http://www.haskell.org/hoogle/ -- | Example usage of the tao package. -- -- Example usage of type-level assertions using tao. @package tao-example @version 1.0.0 module Tao.Example.List module Tao.Example -- | Implementation: -- --
--   unitTests :: Proxy '()
--   unitTests = Proxy :: Proxy (AssertAll
--     '[ "Take" @<> OneTwo @=? Take 2 OneToFour
--      , "Take (none)" @<> Empty @=? Take 0 OneToFour
--      , "Take (more than length)" @<> OneToFour @=? Take 8 OneToFour
--   
--      , "Drop" @<> ThreeFour @=? Drop 2 OneToFour
--      , "Drop (none)" @<> OneToFour @=? Drop 0 OneToFour
--      , "Drop (more than length)" @<> Empty @=? Drop 8 OneToFour
--   
--      , "Chunk" @<> '[OneTwo, ThreeFour] @=? Chunk 2 OneToFour
--      , "Chunk (none)" @<> Empty @=? Chunk 0 OneToFour
--      , "Chunk (more than length)" @<> '[OneToFour] @=? Chunk 8 OneToFour
--      , "Chunk (uneven groups)" @<> '[ '[1, 2, 3], '[4] ] @=? Chunk 3 OneToFour
--      ])
--   
unitTests :: Proxy '() type OneToFour = '[1, 2, 3, 4] type OneTwo = '[1, 2] type ThreeFour = '[3, 4] type Empty = '[]