typo in delaunay.c and delaunay.h

C/delaunay.c

@@ -17,7 +17,7 @@ unsigned facetOK_(facetT* facet, unsigned degenerate){
 
 
 
-TesselationT* tesselation(
+TessellationT* tessellation(
 	double*   sites,
 	unsigned  dim,
 	unsigned  n,
@@ -42,7 +42,7 @@ TesselationT* tesselation(
   //fclose(tmpstdout);
   //printf("exitcode: %u\n", *exitcode);
 
-  TesselationT* out = malloc(sizeof(TesselationT)); /* output */
+  TessellationT* out = malloc(sizeof(TessellationT)); /* output */
 
 	if (!(*exitcode)) { /* 0 if no error from qhull */
 
@@ -545,7 +545,7 @@ void testdel2(){
   double sites[27] = {0,0,0, 0,0,1, 0,1,0, 0,1,1, 1,0,0, 1,0,1, 1,1,0, 1,1,1, 0.5,0.5,0.5};
   unsigned exitcode;
   unsigned dim = 3;
-  TesselationT* x = tesselation(sites, dim, 9, 0, 0, 0, &exitcode);
+  TessellationT* x = tessellation(sites, dim, 9, 0, 0, 0, &exitcode);
   printf("TESTDEL2 - nfacets:%u\n", x->ntiles);
   for(unsigned f=0; f < x->ntiles; f++){
     printf("facet %u - sites:\n", f);

C/delaunay.h

@@ -38,13 +38,13 @@ typedef struct Tile {
   int       orientation;
 } TileT;
 
-typedef struct Tesselation {
+typedef struct Tessellation {
   SiteT*    sites;
   TileT*    tiles;
   unsigned  ntiles;
   SubTileT* subtiles;
   unsigned  nsubtiles;
-} TesselationT;
+} TessellationT;
 
-TesselationT* tesselation(double*, unsigned, unsigned, unsigned, unsigned, double, unsigned*);
+TessellationT* tessellation(double*, unsigned, unsigned, unsigned, unsigned, double, unsigned*);
 void testdel2();

src/Geometry/Delaunay.hs

@@ -1,3 +1,12 @@
+{-|
+Module      : Geometry.Delaunay
+Description : Delaunay tessellation in arbitrary dimension.
+Copyright   : (c) Stéphane Laurent, 2023
+License     : GPL-3
+Maintainer  : laurent_step@outlook.fr
+
+See README for an example.
+-}
 module Geometry.Delaunay
   (module X)
   where