Add part1

part1/src/Data/Article/Feed.elm

@@ -0,0 +1,22 @@
+module Data.Article.Feed exposing (Feed, decoder)
+
+import Data.Article as Article exposing (Article)
+import Json.Decode as Decode exposing (Decoder)
+import Json.Decode.Pipeline exposing (decode, required)
+
+
+type alias Feed =
+    { articles : List (Article ())
+    , articlesCount : Int
+    }
+
+
+
+-- SERIALIZATION --
+
+
+decoder : Decoder Feed
+decoder =
+    decode Feed
+        |> required "articles" (Decode.list Article.decoder)
+        |> required "articlesCount" Decode.int