summaryrefslogtreecommitdiff
path: root/content/graph/blossom.cpp
blob: 7bd494a87b7b769a698249518bdb4db60502bd2e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
struct GM {
	vector<vector<int>> adj;
	// pairs ist der gematchte knoten oder n
	vector<int> pairs, first, que;
	vector<pair<int, int>> label;
	int head, tail;

	GM(int n) : adj(n), pairs(n + 1, n), first(n + 1, n),
	            que(n), label(n + 1, {-1, -1}) {}

	void rematch(int u, int v) {
		int t = pairs[u]; pairs[u] = v;
		if (pairs[t] != u) return;
		if (label[u].second == -1) {
			pairs[t] = label[u].first;
			rematch(pairs[t], t);
		} else {
			auto [x, y] = label[u];
			rematch(x, y);
			rematch(y, x);
	}}

	int findFirst(int v) {
		return label[first[v]].first < 0 ? first[v]
		     : first[v] = findFirst(first[v]);
	}

	void relabel(int x, int y) {
		int r = findFirst(x);
		int s = findFirst(y);
		if (r == s) return;
		auto h = label[r] = label[s] = {~x, y};
		int join;
		while (true) {
			if (s != sz(adj)) swap(r, s);
			r = findFirst(label[pairs[r]].first);
			if (label[r] == h) {
				join = r;
				break;
			} else {
				label[r] = h;
		}}
		for (int v : {first[x], first[y]}) {
			for (; v != join; v = first[label[pairs[v]].first]) {
				label[v] = {x, y};
				first[v] = join;
				que[tail++] = v;
	}}}

	bool augment(int v) {
		label[v] = {sz(adj), -1};
		first[v] = sz(adj);
		head = tail = 0;
		for (que[tail++] = v; head < tail;) {
			int x = que[head++];
			for (int y : adj[x]) {
				if (pairs[y] == sz(adj) && y != v) {
					pairs[y] = x;
					rematch(x, y);
					return true;
				} else if (label[y].first >= 0) {
					relabel(x, y);
				} else if (label[pairs[y]].first == -1) {
					label[pairs[y]].first = x;
					first[pairs[y]] = y;
					que[tail++] = pairs[y];
		}}}
		return false;
	}

	int match() {
		int matching = head = tail = 0;
		for (int v = 0; v < sz(adj); v++) {
			if (pairs[v] < sz(adj) || !augment(v)) continue;
			matching++;
			for (int i = 0; i < tail; i++)
				label[que[i]] = label[pairs[que[i]]] = {-1, -1};
			label[sz(adj)] = {-1, -1};
		}
		return matching;
	}
};