[FEAT] Bulding phylo with graphviz

nix/pkgs.nix

@@ -28,6 +28,7 @@ rec {
     #    gfortran7.cc.lib
     expat
     icu
+    graphviz
   ];
   libPaths = pkgs.lib.makeLibraryPath nonhsBuildInputs;
   shellHook = ''

package.yaml

@@ -203,6 +203,7 @@ library:
   - postgresql-simple
   - pretty-simple
   - probability
+  - process
   - product-profunctors
   - profunctors
   - protolude

src/Gargantext/Core/Viz/Phylo/PhyloExport.hs

@@ -368,7 +368,7 @@ sortByBirthDate order export =
 processSort :: Sort -> SeaElevation -> PhyloExport -> PhyloExport
 processSort sort' elev export = case sort' of
     ByBirthDate o -> sortByBirthDate o export
-    ByHierarchy   -> export & export_branches .~ (branchToIso' (_cons_start elev) (_cons_step elev)
+    ByHierarchy _ -> export & export_branches .~ (branchToIso' (_cons_start elev) (_cons_step elev)
                        $ sortByHierarchy 0 (export ^. export_branches))
 
 

src/Gargantext/Core/Viz/Phylo/TemporalMatching.hs

@@ -109,7 +109,7 @@ toProximity nbDocs diago proximity egoNgrams targetNgrams targetNgrams' =
                           then targetNgrams
                           else union targetNgrams targetNgrams'
        in weightedLogSim' sens nbDocs diago egoNgrams pairNgrams
-    Hamming -> undefined
+    Hamming _ -> undefined
 
 ------------------------
 -- | Local Matching | --