if e.State <> CellState.Removed then
tree.Search (searchRegion e)
// We only keep the ellipses touching 'e'.
- |> List.choose (
+ |> Seq.choose (
fun otherE ->
if e <> otherE then
match EEOver.EEOverlapArea e otherE with
else
None
)
+ |> List.ofSeq
else
[]