Ecosyste.ms: Awesome
An open API service indexing awesome lists of open source software.
https://github.com/stla/hcdt
Constrained and unconstrained Delaunay triangulation.
https://github.com/stla/hcdt
cdt delaunay-triangulation haskell
Last synced: 5 days ago
JSON representation
Constrained and unconstrained Delaunay triangulation.
- Host: GitHub
- URL: https://github.com/stla/hcdt
- Owner: stla
- License: other
- Created: 2022-07-20T09:44:04.000Z (over 2 years ago)
- Default Branch: main
- Last Pushed: 2023-11-01T17:03:38.000Z (over 1 year ago)
- Last Synced: 2025-01-17T22:04:29.601Z (25 days ago)
- Topics: cdt, delaunay-triangulation, haskell
- Language: C++
- Homepage:
- Size: 158 KB
- Stars: 2
- Watchers: 2
- Forks: 0
- Open Issues: 1
-
Metadata Files:
- Readme: README.md
- Changelog: CHANGELOG.md
- License: LICENSE
Awesome Lists containing this project
README
# hcdt
[](https://github.com/stla/hcdt/actions/workflows/Stack-lts.yml)
[](https://github.com/stla/hcdt/actions/workflows/Stack-lts-Mac.yml)
[](https://github.com/stla/hcdt/actions/workflows/Stack-nightly.yml)
### Delaunay triangulation
```haskell
ghci> import Text.Show.Pretty
ghci> import Geometry.HCDT
ghci> vertices = [Vertex 0 0, Vertex 0 1, Vertex 1 1, Vertex 1 0]
ghci> triangulation <- delaunay vertices
ghci> pPrint triangulation
Triangulation
{ _vertices =
fromList
[ ( 0 , Vertex 0.0 0.0 )
, ( 1 , Vertex 0.0 1.0 )
, ( 2 , Vertex 1.0 1.0 )
, ( 3 , Vertex 1.0 0.0 )
]
, _triangles = [ Triangle 1 0 2 , Triangle 2 0 3 ]
, _edges = [ Edge 2 3 , Edge 0 3 , Edge 1 2 , Edge 0 2 , Edge 0 1 ]
}
ghci> pPrint $ borderEdges triangulation
fromList [ Edge 1 0 , Edge 1 2 , Edge 0 3 , Edge 2 3 ]
```
### Constrained Delaunay triangulation
```haskell
ghci> import Text.Show.Pretty
ghci> import Geometry.HCDT
ghci> vertices = [Vertex 1 1, Vertex 3 1, Vertex 2 2, Vertex 0 0, Vertex 4 0, Vertex 2 5]
ghci> edges = [Edge 0 1, Edge 0 2, Edge 1 2, Edge 3 4, Edge 3 5, Edge 4 5]
ghci> triangulation <- cdelaunay vertices edges
ntriangles: 6
ghci> pPrint triangulation
ConstrainedTriangulation
{ _triangulation =
Triangulation
{ _vertices =
fromList
[ ( 0 , Vertex 1.0 1.0 )
, ( 1 , Vertex 3.0 1.0 )
, ( 2 , Vertex 2.0 2.0 )
, ( 3 , Vertex 0.0 0.0 )
, ( 4 , Vertex 4.0 0.0 )
, ( 5 , Vertex 2.0 5.0 )
]
, _triangles =
[ Triangle 1 0 3
, Triangle 2 1 5
, Triangle 2 5 0
, Triangle 0 5 3
, Triangle 1 4 5
, Triangle 1 3 4
]
, _edges =
[ Edge 3 4
, Edge 1 4
, Edge 3 5
, Edge 0 5
, Edge 2 5
, Edge 0 2
, Edge 1 5
, Edge 1 2
, Edge 1 3
, Edge 4 5
, Edge 0 3
, Edge 0 1
]
}
, _fixedEdges =
[ Edge 0 1 , Edge 0 2 , Edge 4 5 , Edge 1 2 , Edge 3 4 , Edge 3 5 ]
}
```