38 double len, area, total_len, total_area;
43 mystats(
x[n - 1], y[n - 1],
x[0], y[0], &total_len, &total_area);
44 for (i = 1; i < n; i++) {
45 mystats(
x[i - 1], y[i - 1],
x[i], y[i], &len, &area);
57 if (total_len < 1.0 && total_len > -1.0)
60 return total_area >= 0.0 ? 1 : -1;