Root/poly2d/test/make

1#!/bin/sh
2. ./Common
3
4###############################################################################
5
6tst "make an open polygon" <<EOF
7struct p2d *p = p2d_new();
8
9p2d_append(p, v2d_new(0, 0));
10p2d_append(p, v2d_new(1, 2));
11p2d_write_gnuplot(stdout, p);
12EOF
13
14expect <<EOF
150 0
161 2
17
18EOF
19
20#------------------------------------------------------------------------------
21
22tst "make a closed polygon" <<EOF
23struct p2d *p = p2d_new();
24
25p2d_append(p, v2d_new(-1, 1));
26p2d_append(p, v2d_new(3, 7));
27p2d_close(p);
28p2d_write_gnuplot(stdout, p);
29EOF
30
31expect <<EOF
32-1 1
333 7
34-1 1
35
36EOF
37
38#------------------------------------------------------------------------------
39
40tst "make two open polygons" <<EOF
41struct p2d *p = p2d_new();
42struct p2d *q = p2d_new();
43
44p2d_append(p, v2d_new(1, 4));
45p2d_append(p, v2d_new(2, 8));
46p->next = q;
47p2d_append(q, v2d_new(3, 15));
48p2d_append(q, v2d_new(4, 16));
49p2d_write_gnuplot_all(stdout, p);
50EOF
51
52expect <<EOF
531 4
542 8
55
563 15
574 16
58
59EOF
60
61###############################################################################
62

Archive Download this file

Branches:
master



interactive