This documentation is automatically generated by online-judge-tools/verification-helper
#include "structure/bbst/red-black-tree.hpp"
Red-Black-Tree は平衡二分探索木の一種. RBSTとは異なり葉にデータをもたせる実装(葉木)なので, pool の大きさを $2$ 倍とる必要がある.
merge-split ベースによる実装.
RedBlackTree(n, f, M1)
: サイズ n
で初期化する. ここで f
は2つの区間の要素をマージする二項演算, M1
はモノイドの単位元である.split(t, k)
: 木 t
を $[0, k)[k, n)$ で分割する.split3(t, a, b)
: 木 t
を $[0, a)[a, b)[b, n)$ で分割する.merge(l, r)
: 木 l
と木 r
を併合する.build(v)
: 配列 v
をもとに木を構築する.dump(r)
: 木 r
の葉を通りがけ順に格納したものを返す.to_string(r)
: dump(r)
をスペース区切りで文字列として連結したものを返す.insert(t, k, v)
: 木 t
の位置 k
(0-indexed) にノード v
を挿入する.erase(t, k)
: 木 t
の位置 k
(0-indexed) のノードを削除する.query(t, l, r)
: 区間 $[l, r)$ の要素を二項演算した結果を返す.set_element(t, k, x)
: 木 t
の位置 k
(0-indexed) のノードを x
に変更する.push_front(t, v)
: 木 t
の先頭にノード v
を挿入する.push_back(t, v)
: 木 t
の末尾にノード v
を挿入する.pop_front(t)
: 木 t
の先頭要素を削除する.pop_back(t)
: 木 t
の末尾要素を削除する.build
と dump
は $O(n)$/**
* @brief Red-Black-Tree(赤黒木)
*
*/
template< typename Monoid, typename F >
struct RedBlackTree {
public:
enum COLOR {
BLACK, RED
};
struct Node {
Node *l, *r;
COLOR color;
int level, cnt;
Monoid key, sum;
Node() {}
Node(const Monoid &k) :
key(k), sum(k), l(nullptr), r(nullptr), color(BLACK), level(0), cnt(1) {}
Node(Node *l, Node *r, const Monoid &k) :
key(k), color(RED), l(l), r(r) {}
bool is_leaf() const {
return l == nullptr;
}
};
private:
inline Node *alloc(Node *l, Node *r) {
auto t = &(*pool.alloc() = Node(l, r, M1));
return update(t);
}
virtual Node *clone(Node *t) {
return t;
}
Node *rotate(Node *t, bool b) {
t = clone(t);
Node *s;
if(b) {
s = clone(t->l);
t->l = s->r;
s->r = t;
} else {
s = clone(t->r);
t->r = s->l;
s->l = t;
}
update(t);
return update(s);
}
Node *submerge(Node *l, Node *r) {
if(l->level < r->level) {
r = clone(r);
Node *c = (r->l = submerge(l, r->l));
if(r->color == BLACK && c->color == RED && c->l && c->l->color == RED) {
r->color = RED;
c->color = BLACK;
if(r->r->color == BLACK) return rotate(r, true);
r->r->color = BLACK;
}
return update(r);
}
if(l->level > r->level) {
l = clone(l);
Node *c = (l->r = submerge(l->r, r));
if(l->color == BLACK && c->color == RED && c->r && c->r->color == RED) {
l->color = RED;
c->color = BLACK;
if(l->l->color == BLACK) return rotate(l, false);
l->l->color = BLACK;
}
return update(l);
}
return alloc(l, r);
}
Node *build(int l, int r, const vector< Monoid > &v) {
if(l + 1 >= r) return alloc(v[l]);
return merge(build(l, (l + r) >> 1, v), build((l + r) >> 1, r, v));
}
Node *update(Node *t) {
t->cnt = count(t->l) + count(t->r) + (!t->l || !t->r);
t->level = t->l ? t->l->level + (t->l->color == BLACK) : 0;
t->sum = f(f(sum(t->l), t->key), sum(t->r));
return t;
}
void dump(Node *r, typename vector< Monoid >::iterator &it) {
if(r->is_leaf()) {
*it++ = r->key;
return;
}
dump(r->l, it);
dump(r->r, it);
}
Node *merge(Node *l) {
return l;
}
Monoid query(Node *t, int a, int b, int l, int r) {
if(r <= a || b <= l) return M1;
if(a <= l && r <= b) return t->sum;
return f(query(t->l, a, b, l, l + count(t->l)), query(t->r, a, b, r - count(t->r), r));
}
public:
VectorPool< Node > pool;
const F f;
const Monoid M1;
RedBlackTree(int sz, const F &f, const Monoid &M1) :
pool(sz), M1(M1), f(f) { pool.clear(); }
inline Node *alloc(const Monoid &key) {
return &(*pool.alloc() = Node(key));
}
inline int count(const Node *t) { return t ? t->cnt : 0; }
inline const Monoid &sum(const Node *t) { return t ? t->sum : M1; }
pair< Node *, Node * > split(Node *t, int k) {
if(!t) return {nullptr, nullptr};
if(k == 0) return {nullptr, t};
if(k >= count(t)) return {t, nullptr};
t = clone(t);
Node *l = t->l, *r = t->r;
pool.free(t);
if(k < count(l)) {
auto pp = split(l, k);
return {pp.first, merge(pp.second, r)};
}
if(k > count(l)) {
auto pp = split(r, k - count(l));
return {merge(l, pp.first), pp.second};
}
return {l, r};
}
tuple< Node *, Node *, Node * > split3(Node *t, int a, int b) {
auto x = split(t, a);
auto y = split(x.second, b - a);
return make_tuple(x.first, y.first, y.second);
}
template< typename ... Args >
Node *merge(Node *l, Args ...rest) {
Node *r = merge(rest...);
if(!l || !r) return l ? l : r;
Node *c = submerge(l, r);
c->color = BLACK;
return c;
}
Node *build(const vector< Monoid > &v) {
return build(0, (int) v.size(), v);
}
vector< Monoid > dump(Node *r) {
vector< Monoid > v((size_t) count(r));
auto it = begin(v);
dump(r, it);
return v;
}
string to_string(Node *r) {
auto s = dump(r);
string ret;
for(int i = 0; i < s.size(); i++) {
ret += std::to_string(s[i]);
ret += ", ";
}
return ret;
}
void insert(Node *&t, int k, const Monoid &v) {
auto x = split(t, k);
t = merge(merge(x.first, alloc(v)), x.second);
}
Monoid erase(Node *&t, int k) {
auto x = split(t, k);
auto y = split(x.second, 1);
auto v = y.first->key;
pool.free(y.first);
t = merge(x.first, y.second);
return v;
}
Monoid query(Node *t, int a, int b) {
return query(t, a, b, 0, count(t));
}
void set_element(Node *&t, int k, const Monoid &x) {
t = clone(t);
if(t->is_leaf()) {
t->key = t->sum = x;
return;
}
if(k < count(t->l)) set_element(t->l, k, x);
else set_element(t->r, k - count(t->l), x);
t = update(t);
}
void push_front(Node *&t, const Monoid &v) {
t = merge(alloc(v), t);
}
void push_back(Node *&t, const Monoid &v) {
t = merge(t, alloc(v));
}
Monoid pop_front(Node *&t) {
auto ret = split(t, 1);
t = ret.second;
return ret.first->key;
}
Monoid pop_back(Node *&t) {
auto ret = split(t, count(t) - 1);
t = ret.first;
return ret.second->key;
}
};
#line 1 "structure/bbst/red-black-tree.hpp"
/**
* @brief Red-Black-Tree(赤黒木)
*
*/
template< typename Monoid, typename F >
struct RedBlackTree {
public:
enum COLOR {
BLACK, RED
};
struct Node {
Node *l, *r;
COLOR color;
int level, cnt;
Monoid key, sum;
Node() {}
Node(const Monoid &k) :
key(k), sum(k), l(nullptr), r(nullptr), color(BLACK), level(0), cnt(1) {}
Node(Node *l, Node *r, const Monoid &k) :
key(k), color(RED), l(l), r(r) {}
bool is_leaf() const {
return l == nullptr;
}
};
private:
inline Node *alloc(Node *l, Node *r) {
auto t = &(*pool.alloc() = Node(l, r, M1));
return update(t);
}
virtual Node *clone(Node *t) {
return t;
}
Node *rotate(Node *t, bool b) {
t = clone(t);
Node *s;
if(b) {
s = clone(t->l);
t->l = s->r;
s->r = t;
} else {
s = clone(t->r);
t->r = s->l;
s->l = t;
}
update(t);
return update(s);
}
Node *submerge(Node *l, Node *r) {
if(l->level < r->level) {
r = clone(r);
Node *c = (r->l = submerge(l, r->l));
if(r->color == BLACK && c->color == RED && c->l && c->l->color == RED) {
r->color = RED;
c->color = BLACK;
if(r->r->color == BLACK) return rotate(r, true);
r->r->color = BLACK;
}
return update(r);
}
if(l->level > r->level) {
l = clone(l);
Node *c = (l->r = submerge(l->r, r));
if(l->color == BLACK && c->color == RED && c->r && c->r->color == RED) {
l->color = RED;
c->color = BLACK;
if(l->l->color == BLACK) return rotate(l, false);
l->l->color = BLACK;
}
return update(l);
}
return alloc(l, r);
}
Node *build(int l, int r, const vector< Monoid > &v) {
if(l + 1 >= r) return alloc(v[l]);
return merge(build(l, (l + r) >> 1, v), build((l + r) >> 1, r, v));
}
Node *update(Node *t) {
t->cnt = count(t->l) + count(t->r) + (!t->l || !t->r);
t->level = t->l ? t->l->level + (t->l->color == BLACK) : 0;
t->sum = f(f(sum(t->l), t->key), sum(t->r));
return t;
}
void dump(Node *r, typename vector< Monoid >::iterator &it) {
if(r->is_leaf()) {
*it++ = r->key;
return;
}
dump(r->l, it);
dump(r->r, it);
}
Node *merge(Node *l) {
return l;
}
Monoid query(Node *t, int a, int b, int l, int r) {
if(r <= a || b <= l) return M1;
if(a <= l && r <= b) return t->sum;
return f(query(t->l, a, b, l, l + count(t->l)), query(t->r, a, b, r - count(t->r), r));
}
public:
VectorPool< Node > pool;
const F f;
const Monoid M1;
RedBlackTree(int sz, const F &f, const Monoid &M1) :
pool(sz), M1(M1), f(f) { pool.clear(); }
inline Node *alloc(const Monoid &key) {
return &(*pool.alloc() = Node(key));
}
inline int count(const Node *t) { return t ? t->cnt : 0; }
inline const Monoid &sum(const Node *t) { return t ? t->sum : M1; }
pair< Node *, Node * > split(Node *t, int k) {
if(!t) return {nullptr, nullptr};
if(k == 0) return {nullptr, t};
if(k >= count(t)) return {t, nullptr};
t = clone(t);
Node *l = t->l, *r = t->r;
pool.free(t);
if(k < count(l)) {
auto pp = split(l, k);
return {pp.first, merge(pp.second, r)};
}
if(k > count(l)) {
auto pp = split(r, k - count(l));
return {merge(l, pp.first), pp.second};
}
return {l, r};
}
tuple< Node *, Node *, Node * > split3(Node *t, int a, int b) {
auto x = split(t, a);
auto y = split(x.second, b - a);
return make_tuple(x.first, y.first, y.second);
}
template< typename ... Args >
Node *merge(Node *l, Args ...rest) {
Node *r = merge(rest...);
if(!l || !r) return l ? l : r;
Node *c = submerge(l, r);
c->color = BLACK;
return c;
}
Node *build(const vector< Monoid > &v) {
return build(0, (int) v.size(), v);
}
vector< Monoid > dump(Node *r) {
vector< Monoid > v((size_t) count(r));
auto it = begin(v);
dump(r, it);
return v;
}
string to_string(Node *r) {
auto s = dump(r);
string ret;
for(int i = 0; i < s.size(); i++) {
ret += std::to_string(s[i]);
ret += ", ";
}
return ret;
}
void insert(Node *&t, int k, const Monoid &v) {
auto x = split(t, k);
t = merge(merge(x.first, alloc(v)), x.second);
}
Monoid erase(Node *&t, int k) {
auto x = split(t, k);
auto y = split(x.second, 1);
auto v = y.first->key;
pool.free(y.first);
t = merge(x.first, y.second);
return v;
}
Monoid query(Node *t, int a, int b) {
return query(t, a, b, 0, count(t));
}
void set_element(Node *&t, int k, const Monoid &x) {
t = clone(t);
if(t->is_leaf()) {
t->key = t->sum = x;
return;
}
if(k < count(t->l)) set_element(t->l, k, x);
else set_element(t->r, k - count(t->l), x);
t = update(t);
}
void push_front(Node *&t, const Monoid &v) {
t = merge(alloc(v), t);
}
void push_back(Node *&t, const Monoid &v) {
t = merge(t, alloc(v));
}
Monoid pop_front(Node *&t) {
auto ret = split(t, 1);
t = ret.second;
return ret.first->key;
}
Monoid pop_back(Node *&t) {
auto ret = split(t, count(t) - 1);
t = ret.first;
return ret.second->key;
}
};