Demo entry 5335722

ss

   

Submitted by Tester on Jun 16, 2016 at 17:06
Language: Haskell. Code size: 195 Bytes.

data Test = Extra Test | EndTest

l :: Test -> Int
l EndTest = 1
l Extra t = 1 + (l t)

-- l2 :: Bool -> ()
-- l2 _ = () 
-- -- xd

derp :: Int -> Test -> Int
derp i test = (l test )*i

This snippet took 0.00 seconds to highlight.

Back to the Entry List or Home.

Delete this entry (admin only).