Commit 96160a7b authored by Przemyslaw Kaminski's avatar Przemyslaw Kaminski

[sidebar] fixes to min/max node size computation

parent 38bcf911
Pipeline #1988 failed with stage
......@@ -185,8 +185,8 @@ selectedNodesCpt = here.component "selectedNodes" cpt
selectedNodeIds' <- T.useLive T.unequal selectedNodeIds
let badges' = neighbourBadges graph selectedNodeIds'
minSize = F.foldl Math.min 0.0 (Seq.map _.size badges')
maxSize = F.foldl Math.max 0.0 (Seq.map _.size badges')
minSize = F.foldl Math.min 0.0 (Seq.map _.size (SigmaxT.graphNodes graph))
maxSize = F.foldl Math.max 0.0 (Seq.map _.size (SigmaxT.graphNodes graph))
pure $ R2.row
[ R2.col 12
......@@ -230,8 +230,8 @@ neighborhoodCpt = here.component "neighborhood" cpt
selectedNodeIds' <- T.useLive T.unequal selectedNodeIds
let badges' = neighbourBadges graph selectedNodeIds'
minSize = F.foldl Math.min 0.0 (Seq.map _.size badges')
maxSize = F.foldl Math.max 0.0 (Seq.map _.size badges')
minSize = F.foldl Math.min 0.0 (Seq.map _.size (SigmaxT.graphNodes graph))
maxSize = F.foldl Math.max 0.0 (Seq.map _.size (SigmaxT.graphNodes graph))
pure $ RH.div { className: "tab-content", id: "myTabContent" }
[ RH.div { -- className: "flex-space-around d-flex justify-content-center"
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment