testing fuse split in swap during fuse

amnh · Nov 27, 2024 · 46dfde3 · 46dfde3
1 parent 40378f2
commit 46dfde3
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/src/Search/SwapV2.hs b/src/Search/SwapV2.hs
@@ -447,6 +447,10 @@ rejoinFromOptSplitList swapParams inGS inData doIA inGraphNetPenaltyFactor curBe
                                         -- for fuse--first is fuse connection w/o swap
                                         pure $ take 3 $ fromJust fuseEdgesToJoin
 
+                                     -- to test if fuse splits are OK in general--saves replication of effort in split graph optimization
+                                     else if  (isJust fuseEdgesToJoin) then
+                                        pure $ fromJust fuseEdgesToJoin
+
                                      -- network
                                      else if graphType inGS /= Tree then 
                                         pure edgesInBaseGraph
@@ -469,6 +473,7 @@ rejoinFromOptSplitList swapParams inGS inData doIA inGraphNetPenaltyFactor curBe
                 let maxMoveEdgeDistance = min (maxMoveEdgeDist swapParams) (maxBound ∷ Int)
 
                 -- reorder/shuffle edge list if desired
+                -- breaks sorted by split cost in swapNaive
                 rejoinEdges <-  if isJust fuseEdgesToJoin then 
                                     pure edgesInBaseGraph'