[API FIX] search docs ok
[gargantext.git] / src / Gargantext / Viz / Graph.hs
index ea57ca2beb65115ff13ba27f6a80c54211588e6a..11501e57f159630c37171e52b47c635f7b5a0e23 100644 (file)
@@ -16,7 +16,6 @@ Portability : POSIX
 module Gargantext.Viz.Graph
   where
 
-
 import Control.Lens (makeLenses)
 import Data.ByteString.Lazy as DBL (readFile, writeFile)
 import Data.Text (Text, pack)
@@ -190,7 +189,11 @@ graphV3ToGraph (GraphV3 links nodes) = Graph (map nodeV32node nodes) (zipWith li
                 = Node no_s' Terms (cs $ show no_id') no_lb' 0 0 (Attributes cl')
 
     linkV32edge :: Int -> EdgeV3 -> Edge
-    linkV32edge n (EdgeV3 eo_s' eo_t' eo_w') = Edge (cs $ show eo_s') (cs $ show eo_t') ((T.read $ T.unpack eo_w') :: Double) 0.5 (cs $ show n)
+    linkV32edge n (EdgeV3 eo_s' eo_t' eo_w') = Edge (cs $ show eo_s')
+                                                    (cs $ show eo_t')
+                                                    ((T.read $ T.unpack eo_w') :: Double)
+                                                    0.5
+                                                    (cs $ show n)
 
 
 graphV3ToGraphWithFiles :: FilePath -> FilePath -> IO ()