Submission #154793


Source Code Expand

import Control.Applicative
main = do
  x <- read <$> getLine
  putStrLn $ (trib !! x)%10007

trib = 0 : 0 : 1 : zipWith3 (\a b c -> a+b+c) trib (tail trib) (tail $ tail trib)

Submission Info

Submission Time
Task B - トリボナッチ数列
User phi16
Language Haskell (GHC 7.4.1)
Score 0
Code Size 179 Byte
Status CE

Compile Error

Main.hs:4:25: Not in scope: `%'