/* See linvor.h */
/* Last edited on 2012-07-22 11:38:40 by stolfilocal */

#include <linvor.h>

#include <drawfigs.h>

#include <pswr.h>
#include <affirm.h>

#include <math.h>
#include <stdlib.h>
#include <stdio.h>

/* LINE VORONOI */

void linvor_draw(PSStream *ps);

#define LINVOR_NSITES 5

void linvor_draw(PSStream *ps)
  {
    Point sites[LINVOR_NSITES];
    Point verts[LINVOR_NSITES - 1];
    int i;

    pswr_segment(ps, -0.9, 0.0, +0.9, 0.0);

    sites[0] = (Point){{-0.70, 0.0}};
    sites[1] = (Point){{-0.55, 0.0}};
    sites[2] = (Point){{-0.10, 0.0}};
    sites[3] = (Point){{+0.25, 0.0}};
    sites[4] = (Point){{+0.80, 0.0}};
    
    affirm(LINVOR_NSITES == 5, "linvor_draw: bad num of sites");
    
    plot_points(ps, 0.5, LINVOR_NSITES, sites);
    
    for (i=0; i < LINVOR_NSITES - 1; i++)
      { verts[i].c[0] = (sites[i].c[0] + sites[i+1].c[0])/2.0;
        verts[i].c[1] = 0.0;
        pswr_segment(ps, verts[i].c[0], -0.01, verts[i].c[0], +0.01);
      }
  }

/* MAIN PROGRAM */

void linvor_draw_all(void)
  {
    int eps_format;
    for (eps_format=0; eps_format < 2; eps_format++)
      { gen_figure("del-linvor",   -1.0, +1.0, -0.2, +0.2, linvor_draw,   eps_format); 
      }
  }