fix arbitrary instance

src/Gargantext/API/Node/Update/Types.hs

@@ -95,6 +95,14 @@ instance FromJSON UpdateNodeConfigGraph
 instance ToJSON UpdateNodeConfigGraph
 instance ToSchema UpdateNodeConfigGraph
 instance Arbitrary UpdateNodeConfigGraph where
-  arbitrary = errorTrace "hi"
+  arbitrary = do
+    methodGraphMetric        <- arbitrary
+    methodGraphClustering    <- arbitrary
+    methodGraphBridgeness    <- arbitrary
+    methodGraphEdgesStrength <- arbitrary
+    methodGraphNodeType1     <- arbitrary
+    methodGraphNodeType2     <- arbitrary
+    return $ UpdateNodeConfigGraph methodGraphMetric methodGraphClustering methodGraphBridgeness
+        methodGraphEdgesStrength methodGraphNodeType1 methodGraphNodeType2
 
 ------------------------------------------------------------------------