geo/rotating_swaps.hpp

• View this file on GitHub
• Last update: 2024-10-20 23:29:28+09:00
• Include: #include "geo/rotating_swaps.hpp"
• Link: https://atcoder.jp/contests/tupc2023/tasks/tupc2023_m

Depends on

• geo/angle_sort.hpp
• geo/base.hpp

Code

#include "geo/angle_sort.hpp"

/*
return : {init, events}
init: 方向ベクトル (-1,-eps) 方向についてソートしたときの順序
events: i,j の順位が入れ替わる (i<j から j<i)というイベントの列
360度分ある, 最後には init に戻ってくる
https://atcoder.jp/contests/tupc2023/tasks/tupc2023_m
*/
template <typename T>
pair<vc<int>, vc<pair<int, int>>> rotating_swaps(vc<Point<T>> point) {
  using P = Point<T>;
  /*
  角度 t におけるタイブレイクについて
  角度 t-eps のときのソート順を p1,...,pk とする
  これらが一斉にタイになったあと reverse されるということになる
  (i,j) をペア辞書順に swap すればよい

  同一座標の点について
  同じ座標であるものは常にもとのインデックス順であるとする
  (..i1,...,i2) (...,j1,...,j2)
  j は小さいもの, i は大きいものを優先する
  */
  for (auto &p: point) p = -p;
  auto I = argsort(point);
  for (auto &p: point) p = -p;
  point = rearrange(point, I);
  int N = len(point);
  vc<pair<int, int>> pairs;
  pairs.reserve(N * (N - 1));

  FOR(i, N) FOR(j, N) {
    if (point[i] != point[j]) pairs.eb(i, j);
  }

  sort(all(pairs), [&](auto &L, auto &R) -> bool {
    if (L == R) return 0;
    auto [i1, j1] = L;
    auto [i2, j2] = R;
    P p1 = (point[j1] - point[i1]).rot90(true);
    P p2 = (point[j2] - point[i2]).rot90(true);
    int c = angle_comp_3(p1, p2);
    if (c != 0) return c == -1;
    // p1,p2 は平行
    if (point[i1].dot(p1) != point[i2].dot(p1)) { return point[i1].dot(p1) < point[i2].dot(p1); }
    // p1 - eps のときの dot の pair の辞書順で比べる
    P d = p1.rot90(false);
    pair<T, T> s1 = {point[j1].dot(d), point[i1].dot(d)};
    pair<T, T> s2 = {point[j2].dot(d), point[i2].dot(d)};
    if (s1 != s2) return s1 < s2;
    // ここに来た時点で座標の組が完全一致している
    assert(point[i1] == point[i2] && point[j1] == point[j2]);
    if (i1 != i2) return i1 > i2;
    return j1 < j2;
  });
  for (auto &[i, j]: pairs) { i = I[i], j = I[j]; }
  return {I, pairs};
}

#line 2 "geo/angle_sort.hpp"

#line 2 "geo/base.hpp"
template <typename T>
struct Point {
  T x, y;

  Point() : x(0), y(0) {}

  template <typename A, typename B>
  Point(A x, B y) : x(x), y(y) {}

  template <typename A, typename B>
  Point(pair<A, B> p) : x(p.fi), y(p.se) {}

  Point operator+=(const Point p) {
    x += p.x, y += p.y;
    return *this;
  }
  Point operator-=(const Point p) {
    x -= p.x, y -= p.y;
    return *this;
  }
  Point operator+(Point p) const { return {x + p.x, y + p.y}; }
  Point operator-(Point p) const { return {x - p.x, y - p.y}; }
  bool operator==(Point p) const { return x == p.x && y == p.y; }
  bool operator!=(Point p) const { return x != p.x || y != p.y; }
  Point operator-() const { return {-x, -y}; }
  Point operator*(T t) const { return {x * t, y * t}; }
  Point operator/(T t) const { return {x / t, y / t}; }

  bool operator<(Point p) const {
    if (x != p.x) return x < p.x;
    return y < p.y;
  }
  T dot(const Point& other) const { return x * other.x + y * other.y; }
  T det(const Point& other) const { return x * other.y - y * other.x; }

  double norm() { return sqrtl(x * x + y * y); }
  double angle() { return atan2(y, x); }

  Point rotate(double theta) {
    static_assert(!is_integral<T>::value);
    double c = cos(theta), s = sin(theta);
    return Point{c * x - s * y, s * x + c * y};
  }
  Point rot90(bool ccw) { return (ccw ? Point{-y, x} : Point{y, -x}); }
};

#ifdef FASTIO
template <typename T>
void rd(Point<T>& p) {
  fastio::rd(p.x), fastio::rd(p.y);
}
template <typename T>
void wt(Point<T>& p) {
  fastio::wt(p.x);
  fastio::wt(' ');
  fastio::wt(p.y);
}
#endif

// A -> B -> C と進むときに、左に曲がるならば +1、右に曲がるならば -1
template <typename T>
int ccw(Point<T> A, Point<T> B, Point<T> C) {
  T x = (B - A).det(C - A);
  if (x > 0) return 1;
  if (x < 0) return -1;
  return 0;
}

template <typename REAL, typename T, typename U>
REAL dist(Point<T> A, Point<U> B) {
  REAL dx = REAL(A.x) - REAL(B.x);
  REAL dy = REAL(A.y) - REAL(B.y);
  return sqrt(dx * dx + dy * dy);
}

// ax+by+c
template <typename T>
struct Line {
  T a, b, c;

  Line(T a, T b, T c) : a(a), b(b), c(c) {}
  Line(Point<T> A, Point<T> B) { a = A.y - B.y, b = B.x - A.x, c = A.x * B.y - A.y * B.x; }
  Line(T x1, T y1, T x2, T y2) : Line(Point<T>(x1, y1), Point<T>(x2, y2)) {}

  template <typename U>
  U eval(Point<U> P) {
    return a * P.x + b * P.y + c;
  }

  template <typename U>
  T eval(U x, U y) {
    return a * x + b * y + c;
  }

  // 同じ直線が同じ a,b,c で表現されるようにする
  void normalize() {
    static_assert(is_same_v<T, int> || is_same_v<T, long long>);
    T g = gcd(gcd(abs(a), abs(b)), abs(c));
    a /= g, b /= g, c /= g;
    if (b < 0) { a = -a, b = -b, c = -c; }
    if (b == 0 && a < 0) { a = -a, b = -b, c = -c; }
  }

  bool is_parallel(Line other) { return a * other.b - b * other.a == 0; }
  bool is_orthogonal(Line other) { return a * other.a + b * other.b == 0; }
};

template <typename T>
struct Segment {
  Point<T> A, B;

  Segment(Point<T> A, Point<T> B) : A(A), B(B) {}
  Segment(T x1, T y1, T x2, T y2) : Segment(Point<T>(x1, y1), Point<T>(x2, y2)) {}

  bool contain(Point<T> C) {
    T det = (C - A).det(B - A);
    if (det != 0) return 0;
    return (C - A).dot(B - A) >= 0 && (C - B).dot(A - B) >= 0;
  }

  Line<T> to_Line() { return Line(A, B); }
};

template <typename REAL>
struct Circle {
  Point<REAL> O;
  REAL r;
  Circle(Point<REAL> O, REAL r) : O(O), r(r) {}
  Circle(REAL x, REAL y, REAL r) : O(x, y), r(r) {}
  template <typename T>
  bool contain(Point<T> p) {
    REAL dx = p.x - O.x, dy = p.y - O.y;
    return dx * dx + dy * dy <= r * r;
  }
};
#line 4 "geo/angle_sort.hpp"

// lower: -1, origin: 0, upper: 1

template <typename T>
int lower_or_upper(const Point<T>& p) {
  if (p.y != 0) return (p.y > 0 ? 1 : -1);
  if (p.x > 0) return -1;
  if (p.x < 0) return 1;
  return 0;
}

// L<R:-1, L==R:0, L>R:1

template <typename T>
int angle_comp_3(const Point<T>& L, const Point<T>& R) {
  int a = lower_or_upper(L), b = lower_or_upper(R);
  if (a != b) return (a < b ? -1 : +1);
  T det = L.det(R);
  if (det > 0) return -1;
  if (det < 0) return 1;
  return 0;
}
// 偏角ソートに対する argsort

template <typename T>
vector<int> angle_sort(vector<Point<T>>& P) {
  vc<int> I(len(P));
  FOR(i, len(P)) I[i] = i;
  sort(all(I), [&](auto& L, auto& R) -> bool { return angle_comp_3(P[L], P[R]) == -1; });
  return I;
}

// 偏角ソートに対する argsort

template <typename T>
vector<int> angle_sort(vector<pair<T, T>>& P) {
  vc<Point<T>> tmp(len(P));
  FOR(i, len(P)) tmp[i] = Point<T>(P[i]);
  return angle_sort<T>(tmp);
}
#line 2 "geo/rotating_swaps.hpp"

/*
return : {init, events}
init: 方向ベクトル (-1,-eps) 方向についてソートしたときの順序
events: i,j の順位が入れ替わる (i<j から j<i)というイベントの列
360度分ある, 最後には init に戻ってくる
https://atcoder.jp/contests/tupc2023/tasks/tupc2023_m
*/
template <typename T>
pair<vc<int>, vc<pair<int, int>>> rotating_swaps(vc<Point<T>> point) {
  using P = Point<T>;
  /*
  角度 t におけるタイブレイクについて
  角度 t-eps のときのソート順を p1,...,pk とする
  これらが一斉にタイになったあと reverse されるということになる
  (i,j) をペア辞書順に swap すればよい

  同一座標の点について
  同じ座標であるものは常にもとのインデックス順であるとする
  (..i1,...,i2) (...,j1,...,j2)
  j は小さいもの, i は大きいものを優先する
  */
  for (auto &p: point) p = -p;
  auto I = argsort(point);
  for (auto &p: point) p = -p;
  point = rearrange(point, I);
  int N = len(point);
  vc<pair<int, int>> pairs;
  pairs.reserve(N * (N - 1));

  FOR(i, N) FOR(j, N) {
    if (point[i] != point[j]) pairs.eb(i, j);
  }

  sort(all(pairs), [&](auto &L, auto &R) -> bool {
    if (L == R) return 0;
    auto [i1, j1] = L;
    auto [i2, j2] = R;
    P p1 = (point[j1] - point[i1]).rot90(true);
    P p2 = (point[j2] - point[i2]).rot90(true);
    int c = angle_comp_3(p1, p2);
    if (c != 0) return c == -1;
    // p1,p2 は平行
    if (point[i1].dot(p1) != point[i2].dot(p1)) { return point[i1].dot(p1) < point[i2].dot(p1); }
    // p1 - eps のときの dot の pair の辞書順で比べる
    P d = p1.rot90(false);
    pair<T, T> s1 = {point[j1].dot(d), point[i1].dot(d)};
    pair<T, T> s2 = {point[j2].dot(d), point[i2].dot(d)};
    if (s1 != s2) return s1 < s2;
    // ここに来た時点で座標の組が完全一致している
    assert(point[i1] == point[i2] && point[j1] == point[j2]);
    if (i1 != i2) return i1 > i2;
    return j1 < j2;
  });
  for (auto &[i, j]: pairs) { i = I[i], j = I[j]; }
  return {I, pairs};
}

Back to top page