Skip to content

Instantly share code, notes, and snippets.

@shapr
Created June 9, 2022 20:26
Show Gist options
  • Save shapr/75e84f2b8165dc6cb817cc9a44011170 to your computer and use it in GitHub Desktop.
Save shapr/75e84f2b8165dc6cb817cc9a44011170 to your computer and use it in GitHub Desktop.
skeleton for advent of code 2015 day 1 part 1
module Main where
main :: IO ()
main = do
theFile <- readFile "input.txt"
print (theFunction theFile)
theFunction x = x
mylength :: Num p => [a] -> p
mylength [] = 0
mylength (_ : xs) = 1 + mylength xs
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment