feat: Add ElemsAroundElem to NeighborIndex #35

2025-11-05T10:40:59Z

mrtz-j commented

2025-11-05 10:40:59 +00:00

(Migrated from gitlab.com)

Add ElemsAroundElem to NeighborIndex, could probably also just used a Hashmap.

let private makeElemsSurroundingElemMap (ean: ElemsAroundNode) (elem: Elem array) : ElemsAroundElem =
    elem
    |> Array.mapi (fun elemIdx (n1, n2, n3) ->
        // For each element, find all elements that share any of its nodes
        let surroundingElems =
            [| ean[n1]; ean[n2]; ean[n3] |]
            |> Array.concat
            |> Array.distinct
            |> Array.filter (fun x -> x <> elemIdx) // Remove self
        elemIdx, surroundingElems
    )
    |> Map.ofArray

Also format with Fantomas.

Add ElemsAroundElem to NeighborIndex, could probably also just used a Hashmap. ```fsharp let private makeElemsSurroundingElemMap (ean: ElemsAroundNode) (elem: Elem array) : ElemsAroundElem = elem |> Array.mapi (fun elemIdx (n1, n2, n3) -> // For each element, find all elements that share any of its nodes let surroundingElems = [| ean[n1]; ean[n2]; ean[n3] |] |> Array.concat |> Array.distinct |> Array.filter (fun x -> x <> elemIdx) // Remove self elemIdx, surroundingElems ) |> Map.ofArray ``` Also format with Fantomas.

mrtz-j commented

2025-11-05 10:40:59 +00:00

(Migrated from gitlab.com)

requested review from @stigrj and @SimenLK

mrtz-j commented

2025-11-05 10:40:59 +00:00

(Migrated from gitlab.com)

assigned to @mrtz-j