Add lamassu-admin-elm to this repo (#185)

lamassu-admin-elm/src/AccountDecoder.elm

@@ -0,0 +1,22 @@
+module AccountDecoder exposing (..)
+
+import Json.Decode exposing (..)
+import FieldSet.Rest exposing (..)
+import AccountTypes exposing (..)
+
+
+accountDecoder : Decoder Account
+accountDecoder =
+    map3 Account
+        (field "code" string)
+        (field "display" string)
+        (field "fields" (list fieldDecoder))
+
+
+type alias AccountResult =
+    Result String Account
+
+
+decodeAccount : String -> AccountResult
+decodeAccount string =
+    decodeString accountDecoder string