Initial version.

Features:

- Upload PDF files let them analyze

- Manage meta data and items

- See processing in webapp

modules/webapp/src/main/elm/Data/Language.elm

@@ -0,0 +1,27 @@
+module Data.Language exposing (..)
+
+type Language
+    = German
+    | English
+
+fromString: String -> Maybe Language
+fromString str =
+    if str == "deu" || str == "de" || str == "german" then Just German
+    else if str == "eng" || str == "en" || str == "english" then Just English
+         else Nothing
+
+toIso3: Language -> String
+toIso3 lang =
+    case lang of
+        German -> "deu"
+        English -> "eng"
+
+toName: Language -> String
+toName lang =
+    case lang of
+        German -> "German"
+        English -> "English"
+
+all: List Language
+all =
+    [ German, English ]