#1101717 (C++17) No.3193 Submit Your Solution

提出ソース
結果

問題	No.3193 Submit Your Solution
ユーザー	ecottea
提出日時	2025-06-27 23:32:44
言語	C++17 (gcc 13.3.0 + boost 1.87.0)
結果	WA
実行時間	-
コード長	24,121 bytes
コンパイル時間	5,345 ms
コンパイル使用メモリ	272,780 KB
実行使用メモリ	152,408 KB
最終ジャッジ日時	2025-06-27 23:33:16
合計ジャッジ時間	28,127 ms
ジャッジサーバーID （参考情報）	judge5 / judge1
このコードへのチャレンジ
（要ログイン）
ファイルパターン	結果
sample	WA * 2
other	WA * 17
権限があれば一括ダウンロードができます
ソースコード

raw source code
#ifndef HIDDEN_IN_VS // 折りたたみ用

// 警告の抑制
#define _CRT_SECURE_NO_WARNINGS

// ライブラリの読み込み
#include <bits/stdc++.h>
using namespace std;

// 型名の短縮
using ll = long long; using ull = unsigned long long; // -2^63 ～ 2^63 = 9e18（int は -2^31 ～ 2^31 = 2e9）
using pii = pair<int, int>;	using pll = pair<ll, ll>;	using pil = pair<int, ll>;	using pli = pair<ll, int>;
using vi = vector<int>;		using vvi = vector<vi>;		using vvvi = vector<vvi>;	using vvvvi = vector<vvvi>;
using vl = vector<ll>;		using vvl = vector<vl>;		using vvvl = vector<vvl>;	using vvvvl = vector<vvvl>;
using vb = vector<bool>;	using vvb = vector<vb>;		using vvvb = vector<vvb>;
using vc = vector<char>;	using vvc = vector<vc>;		using vvvc = vector<vvc>;
using vd = vector<double>;	using vvd = vector<vd>;		using vvvd = vector<vvd>;
template <class T> using priority_queue_rev = priority_queue<T, vector<T>, greater<T>>;
using Graph = vvi;

// 定数の定義
const double PI = acos(-1);
int DX[4] = { 1, 0, -1, 0 }; // 4 近傍（下，右，上，左）
int DY[4] = { 0, 1, 0, -1 };
int INF = 1001001001; ll INFL = 4004004003094073385LL; // (int)INFL = INF, (int)(-INFL) = -INF;

// 入出力高速化
struct fast_io { fast_io() { cin.tie(nullptr); ios::sync_with_stdio(false); cout << fixed << setprecision(18); } } fastIOtmp;

// 汎用マクロの定義
#define all(a) (a).begin(), (a).end()
#define sz(x) ((int)(x).size())
#define lbpos(a, x) (int)distance((a).begin(), std::lower_bound(all(a), (x)))
#define ubpos(a, x) (int)distance((a).begin(), std::upper_bound(all(a), (x)))
#define Yes(b) {cout << ((b) ? "Yes\n" : "No\n");}
#define rep(i, n) for(int i = 0, i##_len = int(n); i < i##_len; ++i) // 0 から n-1 まで昇順
#define repi(i, s, t) for(int i = int(s), i##_end = int(t); i <= i##_end; ++i) // s から t まで昇順
#define repir(i, s, t) for(int i = int(s), i##_end = int(t); i >= i##_end; --i) // s から t まで降順
#define repe(v, a) for(const auto& v : (a)) // a の全要素（変更不可能）
#define repea(v, a) for(auto& v : (a)) // a の全要素（変更可能）
#define repb(set, d) for(int set = 0, set##_ub = 1 << int(d); set < set##_ub; ++set) // d ビット全探索（昇順）
#define repis(i, set) for(int i = lsb(set), bset##i = set; i < 32; bset##i -= 1 << i, i = lsb(bset##i)) // set の全要素（昇順）
#define repp(a) sort(all(a)); for(bool a##_perm = true; a##_perm; a##_perm = next_permutation(all(a))) // a の順列全て（昇順）
#define uniq(a) {sort(all(a)); (a).erase(unique(all(a)), (a).end());} // 重複除去
#define EXIT(a) {cout << (a) << endl; exit(0);} // 強制終了
#define inQ(x, y, u, l, d, r) ((u) <= (x) && (l) <= (y) && (x) < (d) && (y) < (r)) // 半開矩形内判定

// 汎用関数の定義
template <class T> inline ll powi(T n, int k) { ll v = 1; rep(i, k) v *= n; return v; }
template <class T> inline bool chmax(T& M, const T& x) { if (M < x) { M = x; return true; } return false; } // 最大値を更新（更新されたら true を返す）
template <class T> inline bool chmin(T& m, const T& x) { if (m > x) { m = x; return true; } return false; } // 最小値を更新（更新されたら true を返す）
template <class T> inline T getb(T set, int i) { return (set >> i) & T(1); }
template <class T> inline T smod(T n, T m) { n %= m; if (n < 0) n += m; return n; } // 非負mod

// 演算子オーバーロード
template <class T, class U> inline istream& operator>>(istream& is, pair<T, U>& p) { is >> p.first >> p.second; return is; }
template <class T> inline istream& operator>>(istream& is, vector<T>& v) { repea(x, v) is >> x; return is; }
template <class T> inline vector<T>& operator--(vector<T>& v) { repea(x, v) --x; return v; }
template <class T> inline vector<T>& operator++(vector<T>& v) { repea(x, v) ++x; return v; }

#endif // 折りたたみ用


#if __has_include(<atcoder/all>)
#include <atcoder/all>
using namespace atcoder;

#ifdef _MSC_VER
#include "localACL.hpp"
#endif

using mint = modint998244353;
//using mint = static_modint<(int)1e9 + 7>;
//using mint = modint; // mint::set_mod(m);

using vm = vector<mint>; using vvm = vector<vm>; using vvvm = vector<vvm>; using vvvvm = vector<vvvm>; using pim = pair<int, mint>;
#endif


#ifdef _MSC_VER // 手元環境（Visual Studio）
#include "local.hpp"
#else // 提出用（gcc）
int mute_dump = 0;
int frac_print = 0;
#if __has_include(<atcoder/all>)
namespace atcoder {
	inline istream& operator>>(istream& is, mint& x) { ll x_; is >> x_; x = x_; return is; }
	inline ostream& operator<<(ostream& os, const mint& x) { os << x.val(); return os; }
}
#endif
inline int popcount(int n) { return __builtin_popcount(n); }
inline int popcount(ll n) { return __builtin_popcountll(n); }
inline int lsb(int n) { return n != 0 ? __builtin_ctz(n) : 32; }
inline int lsb(ll n) { return n != 0 ? __builtin_ctzll(n) : 64; }
inline int msb(int n) { return n != 0 ? (31 - __builtin_clz(n)) : -1; }
inline int msb(ll n) { return n != 0 ? (63 - __builtin_clzll(n)) : -1; }
#define dump(...)
#define dumpel(v)
#define dump_math(v)
#define input_from_file(f)
#define output_to_file(f)
#define Assert(b) { if (!(b)) { vc MLE(1<<30); EXIT(MLE.back()); } } // RE の代わりに MLE を出す
#endif


//【グラフの入力】O(n + m)
/*
* (始点, 終点) の組からなる入力を受け取り，n 頂点 m 辺のグラフを構築して返す．
*
* n : グラフの頂点の数
* m : グラフの辺の数（省略すれば n-1）
* directed : 有向グラフか（省略すれば false）
* zero_indexed : 入力が 0-indexed か（省略すれば false）
*/
Graph read_Graph(int n, int m = -1, bool directed = false, bool zero_indexed = false) {
	// verify : https://atcoder.jp/contests/tessoku-book/tasks/tessoku_book_bi

	Graph g(n);
	if (m == -1) m = n - 1;

	rep(j, m) {
		int a, b;
		cin >> a >> b;
		if (!zero_indexed) { --a; --b; }

		g[a].push_back(b);
		if (!directed && a != b) g[b].push_back(a);
	}

	return g;
}


//【貰う木 DP】O(n)
/*
* 与えられた r を根とする根付き木 g に対し，各頂点 s∈[0..n) について，
* 部分木 s に関する問題の答えを格納したリストを返す．
*
* T leaf(int s) :
*   葉 s のみからなる部分木についての答えを返す．
*
* T add_edge(T x, int p, int s) :
*   部分木 s についての暫定の答えが x のとき，
*   辺 p'→s を追加した部分木 p' についての答えを返す（記号 ' は仮の頂点を表す）
*
* void merge(T& x, T y, int s) :
*   仮の根 s' を共有する部分木 2 つに対する答えがそれぞれ x, y のとき，
*   x 側に y 側をマージして部分木 s' についての答えを x に上書きする．
*
* void add_vertex(T& x, int s) :
*	仮の根 s' をもつ部分木 s' に対する答えが x のとき，
*	根 s を追加した部分木 s についての答えを x に上書きする．
*/
template <class T, T(*leaf)(int), T(*add_edge)(const T&, int, int), void(*merge)(T&, const T&, int), void(*add_vertex)(T&, int)>
vector<T> tree_getDP(const Graph& g, int r) {
	// verify : https://atcoder.jp/contests/tdpc/tasks/tdpc_eel

	int n = sz(g);
	vector<T> dp(n);

	// 部分木 s についての答えを計算する．（p : s の親）
	function<void(int, int)> dfs = [&](int s, int p) {
		// is_leaf : s が葉か
		bool is_leaf = true;

		repe(t, g[s]) {
			if (t == p) continue;

			// 部分木 t についての答えを計算する．
			dfs(t, s);

			// 部分木 t に対して辺 s'→t を追加した場合の部分木 s' についての答えを得る．
			T sub = add_edge(dp[t], s, t);

			// それを部分木 s' の暫定の答えとマージして答えを更新していく．
			if (is_leaf) dp[s] = move(sub);
			else merge(dp[s], sub, s);

			is_leaf = false;
		}

		// s が葉の場合は専用の答えを代入しておく．
		if (is_leaf) dp[s] = leaf(s);
		// そうでない場合は根 s を追加する．
		else add_vertex(dp[s], s);
	};
	dfs(r, -1);

	return dp;

	/* 雛形
	struct T {
		int v;
	#ifdef _MSC_VER
		friend ostream& operator<<(ostream& os, const T& x) {
			os << '(' << x.v << ')';
			return os;
		}
	#endif
	};
	T leaf(int s) {
		return T{ 1 };
	}
	T add_edge(const T& x, int p, int s) {
		return x;
	}
	void merge(T& x, const T& y, int s) {
		x.v += y.v;
	}
	void add_vertex(T& x, int s) {
		x.v += 1;
	}
	vector<T> solve_by_tree_getDP(const Graph& g, int r) {
		return tree_getDP<T, leaf, add_edge, merge, add_vertex>(g, r);
	}
	*/
};


struct T {
	ull c0, s0, c1, s1, s01;
#ifdef _MSC_VER
	friend ostream& operator<<(ostream& os, const T& x) {
		os << '(' << x.c0 << "," << x.s0 << "," << x.c1 << "," << x.s1 << "," << x.s01 << ')';
		return os;
	}
#endif
};
vector<ull> col;
T leaf(int s) {
	if (col[s] == 0) {
		return T{ 1, 0, 0, 0, 0 };
	}
	else {
		return T{ 0, 0, 1, 0, 0 };
	}
}
T add_edge(const T& x, int p, int s) {
	auto [c0, s0, c1, s1, s01] = x;

	return T{ c0, s0 + c0, c1, s1 + c1, s01 };
}
void merge(T& x, const T& y, int s) {
	auto [x_c0, x_s0, x_c1, x_s1, x_s01] = x;
	auto [y_c0, y_s0, y_c1, y_s1, y_s01] = y;

	T z;
	z.c0 = x_c0 + y_c0;
	z.s0 = x_s0 + y_s0;
	z.c1 = x_c1 + y_c1;
	z.s1 = x_s1 + y_s1;
	z.s01 = x_s01 + y_s01 + x_c0 * y_s1 + x_s0 * y_c1 + x_c1 * y_s0 + x_s1 * y_c0;

	x = move(z);
}
void add_vertex(T& x, int s) {
	if (col[s] == 0) {
		x.c0++;
		x.s01 += x.s1;
	}
	else {
		x.c1++;
		x.s01 += x.s0;
	}
}
vector<T> solve_by_tree_getDP(const Graph& g, int r) {
	return tree_getDP<T, leaf, add_edge, merge, add_vertex>(g, r);
}


//【[部分木,パス]頂点加算／[部分木,パス]頂点総和（Z-加群）】（の改変）
/*
* Vertex_add_sum_query<S, op, o, inv, mul>(Graph g, int rt) : O(n)
*	rt を根とする根付き木 g と頂点値 v[0..n) = o() で初期化する．
*	要素は Z-加群 (S, op, o, inv, mul) の元とする．
*
* Vertex_add_sum_query<S, op, o, inv, mul>(Graph g, int rt, vS a) : O(n)
*	rt を根とする根付き木 g と頂点値 v[0..n) = a[0..n) で初期化する．
*
* set(int s, S x) : O(log n)
*	v[s] = x とする．
*
* S get(int s) : O(log n)
*	v[s] を返す．
*
* S sum_subtree(int s) : O(log n)
*	部分木 s の頂点の値の総和を返す．
*
* S sum_path(int s, int t) : O((log n)^2)
*	パス s→t 上の頂点（両端含む）の値の総和を返す．
*
* add(int s, S x) : O(log n)
*	v[s] += x とする．
*
* add_subtree(int v, S x) : O(log n)
*	部分木 s の頂点の値に x を加算する．
*
* add_path(int s, int t, S x) : O((log n)^2)
*	パス s→t 上の頂点（両端含む）の値に x を加算する．
*
* 利用：【区間加算フェニック木（Z-加群）】
*/
class Vertex_add_sum_query {
	// 参考：https://qiita.com/Pro_ktmr/items/4e1e051ea0561772afa3

	int n;

	// in[s]  : 根からの DFS で頂点 s に最初に入った時刻
	// out[s] : 根からの DFS で頂点 s から最後に出た時刻
	// top[s] : 頂点 s を含む heavy path の最も浅い頂点
	// wgt[s] : 頂点 s の重さ（部分木 s のもつ辺の数）
	// p[s] : 頂点 s の親
	vi in, out, top, wgt, p;

	// v[i] :  時刻 t に居た頂点の値
	
	// 各頂点の重さと親を求めるための DFS を行う．
	void dfs1(const Graph& g, int rt) {
		function<void(int)> rf = [&](int s) {
			repe(t, g[s]) {
				if (t == p[s]) continue;
				p[t] = s;
				rf(t);
				wgt[s] += wgt[t] + 1;
			}
		};
		p[rt] = -1;
		rf(rt);
	};

	// 最も重い子を優先して DFS を行う．
	void dfs2(const Graph& g, int rt) {
		int time = 0;

		function<void(int, int)> rf = [&](int s, int tp) {
			in[s] = time;
			top[s] = tp;
			time++;

			// 重さ最大の頂点を得る．
			int w_max = -INF, t_max = -1;
			repe(t, g[s]) {
				if (t == p[s]) continue;
				if (chmax(w_max, wgt[t])) t_max = t;
			}

			// 重さ最大の頂点を優先的になぞる．
			if (t_max != -1) rf(t_max, tp);

			// 残りの頂点をなぞる．
			repe(t, g[s]) {
				if (t == p[s] || t == t_max) continue;
				rf(t, t);
			}

			// s から最後に離れる
			out[s] = time;
		};
		rf(rt, rt);
	}

public:
	// rt を根とする根付き木 g と頂点値 v[0..n) = o で初期化する．
	Vertex_add_sum_query(const Graph& g, int rt) : n(sz(g)), in(n), out(n), top(n), wgt(n), p(n) {
		// verify : https://www.codechef.com/problems/HEALTHYTREE
		dfs1(g, rt);
		dfs2(g, rt);
	}

	Vertex_add_sum_query() : n(0) {}

	// パス s→t 上の頂点（両端含む）の値の総和を返す．
	vector<pii> sum_path(int s, int t) const {
		// verify : https://judge.yosupo.jp/problem/vertex_add_path_sum

		vector<pii> res;

		// s と t が異なる連結成分に属している限りループを回す．
		while (top[s] != top[t]) {
			// s の方が浅い連結成分に属しているとする．
			if (in[top[s]] > in[top[t]]) swap(s, t);

			// t を含む連結成分は v で並んで配置されているので，
			// 最も浅い頂点 top[t] から t までの範囲の和を求める．
			//res = op(res, v.sum(in[top[t]], in[t] + 1));
			res.push_back({ in[top[t]], in[t] + 1 });

			// 一つ浅い連結成分に移動する．
			t = p[top[t]];
		}

		// ここまできたら s と t は同じ連結成分に属するので，
		// その間の頂点のみの和を res に加算する．
		if (in[s] > in[t]) swap(s, t);
		//res = op(res, v.sum(in[s], in[t] + 1));
		res.push_back({ in[s], in[t] + 1 });

		return res;
	}
};


//【木の親】O(n)
/*
* 各 s∈[0..n) について，r を根とする木 g の頂点 s の親を格納したリストを返す（なければ -1）
*/
vi parent_of_tree(const Graph& g, int r) {
	// verify : https://yukicoder.me/problems/no/2861

	int n = sz(g);

	vi p(n);
	function<void(int)> dfs = [&](int s) {
		repe(t, g[s]) {
			if (t == p[s]) continue;
			p[t] = s;
			dfs(t);
		}
	};
	p[r] = -1;
	dfs(r);

	return p;
}


void TLE() {
	int n;
	cin >> n;

	auto g = read_Graph(n);
	auto g2 = read_Graph(n);

	auto par = parent_of_tree(g2, 0);

	Vertex_add_sum_query G(g, 0);

	vvi on(n), off(n);

	repi(i, 0, n - 1) {
		auto lrs = G.sum_path(0, i);
		dump(i, ":", lrs);

		for (auto [l, r] : lrs) {
			on[l].push_back(i);
			off[r - 1].push_back(i);
		}
	}
	dumpel(on); dumpel(off);

	col = vector<ull>(n, 0);

	ull res = 0;

	rep(t, n) {
		dump("------------- t:", t, "--------------");

		repe(i, on[t]) col[i] = 1;
		dump("col:", col);

		// ここを static top tree に変えればいいはず？
		// でも自作の Static_top_tree<class S, class F, S(*get_val)(int), F(*get_fnc)(int), S(*add_edge)(const S&, int), S(*merge)(const S&, const S&), F(*add_vtx)(const S&, int), F(*comp)(const F&, const F&), S(*act)(const F&, const S&)>
		// がゴミすぎるんだよなあ・・・
		auto dp = solve_by_tree_getDP(g2, 0);
		dump(dp);

		res += dp[0].s01;

		repe(i, off[t]) col[i] = 0;
		//dump("col:", col);
	}

	res *= 2;

	EXIT(res);
}


//【static top tree】
/*
* Static_top_tree<S, F, get_val, get_fnc, add_edge, merge, add_vtx, comp, act>(Graph g, int r) : O(n (log n)^2)
*	r を根とする根付き木 g で初期化する．
*
* set(int s) : O((log n)^2)
*	頂点 s の情報の更新を反映する．
*
* S get() : O(1)
*	根付き木全体の値を返す．
*
* なおテンプレート引数が表す関数は以下の通りとする：
*
* S get_val(int s) :
*   葉 s のみからなる部分木についての値を返す．
*
* F get_fnc(int s) :
*   節点 s のみからなる欠損部分木（子が 1 つ欠けた部分木）について，
*	関数 : (欠けた部分木の値 → 部分木 s の値) を返す．
*
* S add_edge(S x, int s) :
*   部分木 s の値が x でその親が p のとき，
*   辺 p'→s を追加した開部分木 p' についての答えを返す（記号 ' は開頂点を表す）
*
* S merge(S x, S y) :
*   開根を共有する開部分木 2 つの値がそれぞれ x, y のとき，それらをマージした開部分木の値を返す．
*
* F add_vtx(S x, int s) :
*	開根 s' をもつ開部分木 s' の値が x のとき，
*	根 s を追加した欠損部分木 s についての関数 : (欠けた部分木の値 → 部分木 s の値) を返す．
*
* F comp(F f, F g) :
*	合成関数 f o g を返す．
*
* S act(F f, S x) :
*	f(x) を返す．
*/
template <class S, class F, S(*get_val)(int), F(*get_fnc)(int), S(*add_edge)(const S&, int), S(*merge)(const S&, const S&), F(*add_vtx)(const S&, int), F(*comp)(const F&, const F&), S(*act)(const F&, const S&)>
class Static_top_tree {
	// 参考 : https://atcoder.jp/contests/abc351/editorial/9868

	struct Node {
		// tp : ノードのタイプ
		//	A:act, C:comp, V:add_vtx, M:merge, E:add_edge, f:get_fnc, x:get_val
		char tp = '?';

		// id : heavy path ならその根，light child ならその親
		//	ただし二分木の構築後は不要になるので，使い回して参照すべき頂点番号を表す．
		int id = -1;

		// [l..r) : heavy path, light child 共にどの範囲を見ているか
		int l = -1, r = -1;

		// pp : 親ノードへのポインタ，lp[rp] : 左[右]の子ノードへのポインタ
		//	ただし子が 1 つの場合は lp のみを使用する．
		Node* pp = nullptr, * lp = nullptr, * rp = nullptr;

		// f : 関数
		F f;

		// x : 値
		S x;
	};

	// root : 根（根付き木全体に対応する）
	Node* root;

	// st[s] : 頂点 s の変更があったとき，どのノードから更新を始めればいいか
	vector<Node*> st;

public:
	// rt を根とする根付き木 g で初期化する．
	Static_top_tree(const Graph& g, int rt) {
		// verify : https://atcoder.jp/contests/abc351/tasks/abc351_g

		int n = sz(g);

		// j_max[s] : s の重さ最大の部分木が何番目か
		vi j_max(n, -1);

		// 部分木の重さを調べる．
		function<int(int, int)> dfs_wgt = [&](int s, int p) {
			int ws = 0; int wt_max = -INF;

			rep(j, sz(g[s])) {
				auto t = g[s][j];
				if (t == p) continue;

				int wt = dfs_wgt(t, s);
				ws += wt + 1;
				if (chmax(wt_max, wt)) j_max[s] = j;
			}
			return ws;
		};
		dfs_wgt(rt, -1);

		// hp[s] : 根を s とする heavy path を成す頂点の列（深さ降順）
		vvi hp(n);

		// lc[s] : 頂点 s の light child のリスト
		vvi lc(n);

		// HL 分解を行う．
		function<void(int, int, int)> dfs_hld = [&](int s, int p, int r) {
			hp[r].push_back(s);

			if (j_max[s] != -1) {
				int t = g[s][j_max[s]];
				dfs_hld(t, s, r);
			}

			rep(j, sz(g[s])) {
				int t = g[s][j];
				if (t == p || j == j_max[s]) continue;

				lc[s].push_back(t);

				dfs_hld(t, s, t);
			}
		};
		dfs_hld(rt, -1, rt);

		root = new Node{ 'A', rt, 0, sz(hp[rt]) };
		st.resize(n);

		// トップダウンに二分木を構築する．
		function<void(Node*)> dfs_btree = [&](Node* p) {
			if (p->tp == 'A' || p->tp == 'C') {
				if (p->r - p->l > 1) {
					int m = (p->l + p->r) / 2;

					p->lp = new Node{ 'C', p->id, p->l, m, p };
					dfs_btree(p->lp);

					p->rp = new Node{ p->tp, p->id, m, p->r, p };
					dfs_btree(p->rp);

					if (p->tp == 'A') p->x = act(p->lp->f, p->rp->x);
					else p->f = comp(p->lp->f, p->rp->f);
				}
				else {
					p->id = hp[p->id][p->l]; // 使い回して頂点番号を入れておく
					st[p->id] = p;
					int r = sz(lc[p->id]);
					if (r > 0) {
						p->tp = 'V';
						p->lp = new Node{ 'M', p->id, 0, r, p };
						dfs_btree(p->lp);

						p->f = add_vtx(p->lp->x, p->id);
					}
					else {
						if (p->tp == 'A') {
							p->tp = 'x';
							p->x = get_val(p->id);
						}
						else {
							p->tp = 'f';
							p->f = get_fnc(p->id);
						}
					}
				}
			}
			else if (p->tp == 'M') {
				if (p->r - p->l > 1) {
					int m = (p->l + p->r) / 2;

					p->lp = new Node{ 'M', p->id, p->l, m, p };
					dfs_btree(p->lp);

					p->rp = new Node{ 'M', p->id, m, p->r, p };
					dfs_btree(p->rp);

					p->x = merge(p->lp->x, p->rp->x);
				}
				else {
					p->id = lc[p->id][p->l]; // 使い回して頂点番号を入れておく
					int r = sz(hp[p->id]);

					p->tp = 'E';
					p->lp = new Node{ 'A', p->id, 0, r, p };
					dfs_btree(p->lp);

					p->x = add_edge(p->lp->x, p->id);
				}
			}
		};
		dfs_btree(root);
	}

	// 頂点 s の情報の更新を反映する．
	void set(int v) {
		// verify : https://atcoder.jp/contests/abc351/tasks/abc351_g

		Node* p = st[v];

		// ボトムアップに必要な箇所のみ更新する．
		while (p) {
			if (p->tp == 'A') {
				p->x = act(p->lp->f, p->rp->x);
			}
			else if (p->tp == 'C') {
				p->f = comp(p->lp->f, p->rp->f);
			}
			else if (p->tp == 'V') {
				p->f = add_vtx(p->lp->x, p->id);
			}
			else if (p->tp == 'M') {
				p->x = merge(p->lp->x, p->rp->x);
			}
			else if (p->tp == 'E') {
				p->x = add_edge(p->lp->x, p->id);
			}
			else if (p->tp == 'x') {
				p->x = get_val(v);
			}
			else if (p->tp == 'f') {
				p->f = get_fnc(v);
			}

			p = p->pp;
		}
	}

	// 根付き木全体の値を返す．
	S get() {
		// verify : https://atcoder.jp/contests/abc351/tasks/abc351_g

		return root->x;
	}

	/* 雛形
	using S = mint;
	struct F {
		mint a, b;
	};
	S get_val(int s) {
		return a[s];
	}
	F get_fnc(int s) {
		return { 1, a[s] };
	}
	S add_edge(const S& x, int s) {
		return x;
	}
	S merge(const S& x, const S& y) {
		return x * y;
	}
	F add_vtx(const S& x, int s) {
		return { x, a[s] };
	}
	F comp(const F& f, const F& g) {
		return { f.a * g.a, f.a * g.b + f.b };
	}
	S act(const F& f, const S& x) {
		return f.a * x + f.b;
	}
	Static_top_tree<S, F, get_val, get_fnc, add_edge, merge, add_vtx, comp, act> G(g, 0);
	*/
}; 


struct S {
	ull c0, s0, c1, s1, s01;
#ifdef _MSC_VER
	friend ostream& operator<<(ostream& os, const S& x) {
		os << '(' << x.c0 << "," << x.s0 << "," << x.c1 << "," << x.s1 << "," << x.s01 << ')';
		return os;
	}
#endif
};
struct F {
	ull c0, s0, c1, s1, s01;
};
S get_val(int s) {
	if (col[s] == 0) {
		return S{ 1, 0, 0, 0, 0 };
	}
	else {
		return S{ 0, 0, 1, 0, 0 };
	}
}
F get_fnc(int s) {
	if (col[s] == 0) {
		// c0 += 1;
		// s0 += c0;
		// s01 += s1;
		return F{ 1, 0, 0, 0, 0 };
	}
	else {
		// c1 += 1;
		// s1 += c1;
		// s01 += s0;
		return F{ 0, 0, 1, 0, 0 };
	}
}
S add_edge(const S& x, int s) {
	auto [c0, s0, c1, s1, s01] = x;

	return S{ c0, s0 + c0, c1, s1 + c1, s01 };
}
S merge(const S& x, const S& y) {
	auto [x_c0, x_s0, x_c1, x_s1, x_s01] = x;
	auto [y_c0, y_s0, y_c1, y_s1, y_s01] = y;

	S z;
	z.c0 = x_c0 + y_c0;
	z.s0 = x_s0 + y_s0;
	z.c1 = x_c1 + y_c1;
	z.s1 = x_s1 + y_s1;
	z.s01 = x_s01 + y_s01 + x_c0 * y_s1 + x_s0 * y_c1 + x_c1 * y_s0 + x_s1 * y_c0;

	return z;
}
F add_vtx(const S& x, int s) {
	return F{ 0, 0, 1, 0, 0 };
}
F comp(const F& f, const F& g) {
	return F{ 0, 0, 1, 0, 0 };
}
S act(const F& f, const S& x) {
	return S{ 0, 0, 1, 0, 0 };
}


int main() {
//	input_from_file("input.txt");
//	output_to_file("output.txt");

	int n;
	cin >> n;

	auto g = read_Graph(n);
	auto g2 = read_Graph(n);

	auto par = parent_of_tree(g2, 0);

	Vertex_add_sum_query G(g, 0);

	vvi on(n), off(n);

	repi(i, 0, n - 1) {
		auto lrs = G.sum_path(0, i);
		dump(i, ":", lrs);

		for (auto [l, r] : lrs) {
			on[l].push_back(i);
			off[r - 1].push_back(i);
		}
	}
	dumpel(on); dumpel(off);

	col = vector<ull>(n, 0);
	
	ull res = 0;

	Static_top_tree<S, F, get_val, get_fnc, add_edge, merge, add_vtx, comp, act> STT(g, 0);

	rep(t, n) {
		dump("------------- t:", t, "--------------");

		repe(i, on[t]) {
			col[i] = 1;
			STT.set(i); // このクソみたいなライブラリを使った実装の先に希望があるのか知るため時間だけ測る
		}
		dump("col:", col);

		// ここを static top tree に変えればいいはず？
		// でも自作の Static_top_tree<class S, class F, S(*get_val)(int), F(*get_fnc)(int), S(*add_edge)(const S&, int), S(*merge)(const S&, const S&), F(*add_vtx)(const S&, int), F(*comp)(const F&, const F&), S(*act)(const F&, const S&)>
		// がゴミすぎるんだよなあ・・・
		//auto dp = solve_by_tree_getDP(g2, 0);
		//dump(dp);

		res += STT.get().s01;

		repe(i, off[t]) {
			col[i] = 0;
			STT.set(i);
		}
		//dump("col:", col);
	}

	res *= 2;

	EXIT(res);
}