[graphql] README updated, some refactoring

README.md

@@ -196,3 +196,36 @@ To build documentation, run:
 stack --docker build --haddock --no-haddock-deps --fast
 ```
 
+## GraphQL
+
+Some introspection information.
+
+Playground is located at http://localhost:8008/gql
+
+### List all GraphQL types in the Playground
+
+```
+{
+  __schema {
+    types {
+      name
+    }
+  }
+}
+```
+
+### List details about a type in GraphQL
+
+```
+{
+  __type(name:"User") {
+  	fields {
+    	name
+      description
+      type {
+        name
+      }
+  	}
+	}
+}
+```

src/Gargantext/Database/Admin/Types/Hyperdata/Contact.hs

@@ -98,11 +98,11 @@ defaultContactWho :: ContactWho
 defaultContactWho = contactWho "Pierre" "Dupont"
 
 contactWho :: FirstName -> LastName -> ContactWho
-contactWho fn ln = ContactWho Nothing
-                             (Just fn)
-                             (Just ln)
-                             []
-                             []
+contactWho fn ln = ContactWho { _cw_id = Nothing
+                              , _cw_firstName = Just fn
+                              , _cw_lastName = Just ln
+                              , _cw_keywords = []
+                              , _cw_freetags = [] }
 
 data ContactWhere =
      ContactWhere { _cw_organization :: [Text]