代码

// ===== REFERENCES =====
// [1] duck.ac 用户 saffah_cc_v41_agg1（本账号），提交 **#107393** <https://duck.ac/submission/107393>（280.627452 ms）
//     —— **本文件正文的基座**（工作副本 `problems/noi18e/work/e18s_lvc0.cpp`，本账号件）。
// [2] 同账号 **#107754** <https://duck.ac/submission/107754>（278.829573 ms）—— 本账号在基座上只加
//     `#pragma GCC optimize("O3")` + `#pragma GCC target("arch=skylake")` 后的实测；这两行本发沿用。
// [3] duck.ac 用户 saffah_codex_6s_agg2，提交 **#107712** <https://duck.ac/submission/107712>（277.255441 ms）：
//     该公开件的正文经逐行比对 = **本账号 #107393 的正文**（含 `[E18S-LV]`/`[E18S-C0]`）+ 上述两行 pragma
//     + 本发下文标注的两处结构改动（另有若干 `probe_*` 诊断计数器，本发**不采用**）。
//     ⇒ 该件同时替我们**定价**了本发全部三组改动（280.627 → 277.255 = **−3.372 ms / −1.20%**）；
//     本发即把这套已被判题机验证的组合搬回我方（`§2.19.816`：提交公开 ⇒ 对手的公开件就是免费的判题机读数）。
// [4] 完整出处链：`#107393` = `#107330` <https://duck.ac/submission/107330> 同基座 + `[E18S-LV]`；
//     `#107330` 正文 = #107239 的逐字节复刻 + 一行 c=0 短路；#107239 自述基于本账号 #106860。
// [5] 题面 `problems/noi18e/statement.txt` 与团队 `problems/noi18e/notes.md`。**只引用结论与方法，未复制代码。**
// [6] 许可：正文按 duck.ac 题面明示的"你的代码将会被公开"规则提交；所引用件均为 duck.ac 公开提交。
// ======================
// ===== 思路 =====
// 【目的】当代 MAX 是 `tc18`（通用 5e4/1e5）。本发三组改动，全部是"**删工作/缩短代码**"型，输出逐位不变。
//
// 【改动一 `[E18T-O3]`：两行编译指令】
//   `#pragma GCC optimize("O3")` + `#pragma GCC target("arch=skylake")`。判题机为 **Intel i3-8100**
//   （`faq.html`：Skylake 家族，3.60 GHz，L1D 32 KB / L2 256 KB / L3 6 MB），故 `arch=skylake` 与真机同族，
//   打开 AVX2/BMI 一族（`lzcnt`/`tzcnt`/`andn`）与 Skylake 调度模型。
//   确定性读数（判题尺度通用代理 `work/e18t_g1.txt`，n=5e4/m=1e5；`cachegrind --cache-sim=yes --branch-sim=yes`）：
//     指令 160,288,867 → 154,217,237（**−3.79%**）；访存三项账（D1/末级缺失）**全不变**。
//   ★ 判题机符号已由本次本账号 #107754 与对手 #107712 双方给出：**−1.80 / −3.37 ms，同号** ✓
//
// 【改动二 `[E18T-RM]`：`merge_tr` 的跨子树项改判据】
//   原式 `i64 am = al ? pool[al].mf : NINF; if (am != NINF) {...}` 对每个内点合并都要
//   2 条额外取数 + 2 次选择；而活结点的 `mf` **恒非 NINF**（结点创建时即以有限 `f2` 出生）
//   ⇒ 直接 `if (al && br) {...}` 逐位等价，省掉那两条取数与两次选择。
//
// 【改动三 `[E18T-RT]`：主循环把"当前子树根"放进寄存器，并删掉逐组的 `rt[]` 清零】
//   原式每插一个 item、每合并一个孩子都要对 `rt[t]` 做一次 load+store；改成局部 `u32 root`
//   累积、循环末尾一次性 `rt[t] = root`。
//   ★ 同时可删 `for (v) rt[v] = 0`：`ord_` 是**反前序**（孩子先于父亲），所以每个 `rt[v]` 读
//     （只读孩子）在**本次**组内必定已被写过；且每个 `t` 末尾都无条件写 `rt[t]` ⇒ 无跨组脏读。
//
// 【闸门（交前全跑）】① 编译 rc / 运行 rc / 非空输出三项先验：手工最小用例 ⇒ `F`；题面样例 ⇒ `1` / `F`；
//   ② 随机对拍四套各 300 组（`rt.py`/`chainrt.py`/`czerort.py`/`mixc0rt.py`）⇒ **全 0 mismatch**；
//   ③ 逐字节：`b18w_tc9m.txt`(19 MB 非零权) · `e18s_c0big.txt`(11.7 MB 全 c=0) · `n18y_s2.txt`(S2 10 MB)
//      与基座 `cmp` **逐字节相同**（三处改动都不含新算法，只删工作）；
//   ④ 判题机同款 flag（`-O2 -static -U_FORTIFY_SOURCE -std=c++17`）编译通过（O3 会引出 `memcpy`/`memset`
//      的外部引用；与本发同构的对手件 #107712 在判题机上 Accepted ⇒ 判题端链接无碍）。
// ================
#ifdef LOCAL_TEST
#include <cstdio>
#endif
#ifdef DBG
#include <cstdio>
#endif
#if defined(LOCAL_TEST) || defined(DBG)
#include <cstdio>
#include <cstdlib>
#include <cstring>
typedef unsigned long long u64;
static char g_in[48 << 20];
static char g_out[8 << 20];
#else
typedef unsigned long long u64;
#endif

typedef long long i64;
typedef unsigned int u32;

#define MAXN 50005
#define MAXM 100005
#define MAXE 100005
#define MAXIT 200010
#define MAXPOOL 3600005
#define LG 18

static const i64 NINF = -(i64)1 << 60;

// ---------------- tree ----------------
static u32 head_[MAXN + 2];
static unsigned short eto[MAXE]; static u32 ew[MAXE];
static unsigned short par_[MAXN], dep_[MAXN], pre_[MAXN];
static i64 dis_[MAXN];
static unsigned short euler[2 * MAXN];
static u32 first_[MAXN];   // Euler POSITION (<=2n-1=100009) needs 17 bits: stays u32
// Sixteen-entry Euler blocks: packed depth+node prefix/suffix minima and
// a sparse table over the block minima, about 1.2 MB in total.
#define RMQB 4
#define RMQRS 2
#define RMQNB ((2 * MAXN + RMQB - 1) / RMQB)
static u32 rmq_pref[2 * MAXN], rmq_suf[2 * MAXN];
static u32 rmq_st[15][RMQNB];
static inline u32 rmq_pack(u32 v) { return ((u32)dep_[v] << 16) | v; }
static inline u32 rmq_pick(u32 a, u32 b) { return a < b ? a : b; }
static inline u32 rmq_query(u32 l, u32 r) {
  if (l > r) { u32 z=l; l=r; r=z; }
  u32 bl=l>>RMQRS, br=r>>RMQRS;
  if (bl==br) {
    u32 z=rmq_pack(euler[l]);
    for (u32 j=l+1;j<=r;j++) z=rmq_pick(z,rmq_pack(euler[j]));
    return z;
  }
  u32 z=rmq_pick(rmq_suf[l],rmq_pref[r]);
  if (bl+1<br) {
    u32 L=bl+1, R=br-1, len=R-L+1;
    u32 k=31u-(u32)__builtin_clz(len);
    z=rmq_pick(z,rmq_pick(rmq_st[k][L],rmq_st[k][R-(1u<<k)+1]));
  }
  return z;
}
static unsigned short ord_[MAXN];

static int g_c0;             // 1 <=> every c_i of this group is 0
static int g_chain;          // 1 <=> the tree is the literal chain 1-2-...-n

static inline int lca_of(int u, int v) {   // node identity, used once per path
  return (int)(rmq_query(first_[u],first_[v]) & 0xffffu);
}
// hot path: the callers only need dis[lca], never which node it is.  Takes the two
// Euler first-occurrence positions straight out of the item (no first_[] load).
static inline i64 lcadis(u32 fu, u32 fv) {
  return dis_[rmq_query(fu,fv) & 0xffffu];
}

// ---------------- items (32B, self-contained for cache) ----------------
struct Item { u32 v; u32 fv; i64 w, f2, g2; };   // fv = first_[v]; w = dis[v] + w
static Item itm[MAXIT];
static u32 phead[MAXN + 2];
static u32 pkey[MAXIT], ppt[MAXIT];
struct PathEntry { u32 key, pt; };
static PathEntry path_entries[MAXIT];
static int g_key1;   /* 1 <=> every item's pkey == 1 (subtask S2) */

// ---------------- segment tree ----------------
// own (mf,mg) = max f2/g2 over the key range; e,f = children (leaf: item ids).
// 32B aligned => one node is always inside one cache line.
struct TNode { i64 mf, mg, lv; u32 e, f; };   /* [E18S-LV] lv = value of the stored pair (leaves only) */
static TNode pool[MAXPOOL];
static u32 pool_n;
static i64 ans;

static inline i64 calc(int x, int y) {   // itm[].w already carries dis[v]
  /* [E18S-C0] all-zero edge weights => dis_[*] == 0 => the LCA term vanishes. */
  if (g_c0) return itm[x].w + itm[y].w;
  return itm[x].w + itm[y].w - 2 * lcadis(itm[x].fv, itm[y].fv);
}

static void pushup(u32 o) {
  u32 l = pool[o].e, r = pool[o].f;
  i64 f = NINF, g = NINF;
  if (l) { i64 x = pool[l].mf; if (x > f) f = x; x = pool[l].mg; if (x > g) g = x; }
  if (r) { i64 x = pool[r].mf; if (x > f) f = x; x = pool[r].mg; if (x > g) g = x; }
  pool[o].mf = f; pool[o].mg = g;
}

/* [E18S-LV] singleton pair value: leafval(o) for pool[o].e == pool[o].f == pt. */
static inline i64 singval(int pt) { return 2 * (itm[pt].w - dis_[itm[pt].v]); }
static inline i64 leafval(u32 o) { return pool[o].lv; }

static void leaf_combine(u32 a, u32 b, i64 deep2) {
  int ax = (int)pool[a].e, ay = (int)pool[a].f;
  int bx = (int)pool[b].e, by = (int)pool[b].f;
  i64 best = NINF, cross = NINF;
  int rx = 0, ry = 0;
  { i64 v = pool[a].lv; best = v; rx = ax; ry = ay; }
  { i64 v = pool[b].lv; if (v > best) { best = v; rx = bx; ry = by; } }
  /* [K30] calc(x,y) is a pure read of (x,y) and each call below is an LCA-RMQ.  When a leaf
     holds a single item (the common case) ax==ay and/or bx==by, so 4 of the 6 calls are
     duplicates of a call already made with the SAME arguments in the SAME order: the guards
     skip only those.  Every surviving call, and every `v > best` / `v > cross` decision,
     is bit-for-bit the original. */
  if (ax) {
    if (bx) { i64 v = calc(ax, bx); if (v > best) { best = v; rx = ax; ry = bx; } if (v > cross) cross = v; }
    if (by && by != bx) { i64 v = calc(ax, by); if (v > best) { best = v; rx = ax; ry = by; } if (v > cross) cross = v; }
  }
  if (ay && ay != ax) {
    if (bx) { i64 v = calc(ay, bx); if (v > best) { best = v; rx = ay; ry = bx; } if (v > cross) cross = v; }
    if (by && by != bx) { i64 v = calc(ay, by); if (v > best) { best = v; rx = ay; ry = by; } if (v > cross) cross = v; }
  }
  if (pool[b].mf > pool[a].mf) pool[a].mf = pool[b].mf;
  if (pool[b].mg > pool[a].mg) pool[a].mg = pool[b].mg;
  pool[a].e = (u32)rx; pool[a].f = (u32)ry; pool[a].lv = best;
  if (cross != NINF) { i64 t = cross - deep2; if (t > ans) ans = t; }
}

// Iterative insert.  With a node now storing its OWN range maxes, inserting one item
// changes every node on the root-to-leaf path by exactly max(old, f2) / max(old, g2) --
// so the recursion AND all 1.2M pushup calls in this path disappear.
static u32 ins(u32 o, int l, int r, int pos, int pt, i64 deep2) {
  i64 f2 = itm[pt].f2, g2 = itm[pt].g2;
  u32 root = o, *link = &root;
  int lo = l, hi = r;
  while (lo < hi) {
    if (!o) {
      o = ++pool_n;
      pool[o].e = 0; pool[o].f = 0;
      pool[o].mf = f2; pool[o].mg = g2;
      *link = o;
    } else {
      { i64 nf = pool[o].mf; nf = f2 > nf ? f2 : nf;
        i64 ng = pool[o].mg; ng = g2 > ng ? g2 : ng;
        pool[o].mf = nf; pool[o].mg = ng; }
    }
    int mid = (lo + hi) >> 1;
    if (pos <= mid) {
      u32 rc = pool[o].f;                    // sibling's right half is deeper
      if (rc) { i64 v = f2 + pool[rc].mg - deep2; if (v > ans) ans = v; }
      link = &pool[o].e; o = pool[o].e; hi = mid;
    } else {
      u32 lc = pool[o].e;                    // this item is the deeper one
      if (lc) { i64 v = pool[lc].mf + g2 - deep2; if (v > ans) ans = v; }
      link = &pool[o].f; o = pool[o].f; lo = mid + 1;
    }
  }
  if (!o) {                                  // leaf at lo == hi == pos, first item in it
    o = ++pool_n;
    pool[o].e = (u32)pt; pool[o].f = (u32)pt;
    pool[o].mf = f2; pool[o].mg = g2;
    pool[o].lv = singval(pt);
    *link = o;
    return root;
  }
  if (f2 > pool[o].mf) pool[o].mf = f2;
  if (g2 > pool[o].mg) pool[o].mg = g2;
  u32 x = pool[o].e, y = pool[o].f;
  if (!x) { pool[o].e = pool[o].f = (u32)pt; pool[o].lv = singval(pt); return root; }
  i64 v1 = calc(pt, (int)x), v2 = (x == y) ? v1 : calc(pt, (int)y);
  i64 v = v1 > v2 ? v1 : v2;
  { i64 t = v - deep2; if (t > ans) ans = t; }
  i64 v0 = pool[o].lv;
  if (v0 >= v1 && v0 >= v2) return root;
  if (v1 >= v2) pool[o].f = (u32)pt; else pool[o].e = (u32)pt;
  pool[o].lv = v;
  return root;
}

static u32 merge_tr(u32 a, u32 b, int l, int r, i64 deep2) {
  if (!a) return b;
  if (!b) return a;
  if (l == r) { leaf_combine(a, b, deep2); return a; }
  int mid = (l + r) >> 1;
  u32 al = pool[a].e, ar = pool[a].f, bl = pool[b].e, br = pool[b].f;
  i64 amf0 = pool[a].mf, amg0 = pool[a].mg, bmf0 = pool[b].mf, bmg0 = pool[b].mg;
  /* [E18T-RM] guard on the pointers, not on an NINF sentinel: pool[al].mf == NINF
     never happens for a live node (nodes are born with a finite f2), and the old
     form paid two extra loads + two selects per internal merge node. */
  if (al && br) { i64 v = pool[al].mf + pool[br].mg - deep2; if (v > ans) ans = v; }
  if (bl && ar) { i64 v = pool[bl].mf + pool[ar].mg - deep2; if (v > ans) ans = v; }
  pool[a].e = merge_tr(al, bl, l, mid, deep2);
  pool[a].f = merge_tr(ar, br, mid + 1, r, deep2);
  pool[a].mf = amf0 > bmf0 ? amf0 : bmf0;
  pool[a].mg = amg0 > bmg0 ? amg0 : bmg0;
  return a;
}

// keys > K never occur (presence rule), so clearing key K is enough; but the range
// version below is equivalent and simpler to keep exact.
static u32 wipe(u32 o, int l, int r, int K) {
  if (!o || r < K) return o;
  if (l >= K) return 0;
  int mid = (l + r) >> 1;
  if (K <= mid) {
    u32 c0 = wipe(pool[o].e, l, mid, K);
    if (!c0) return 0;
    pool[o].e = c0; pool[o].f = 0;
    pool[o].mf = pool[c0].mf; pool[o].mg = pool[c0].mg;
    return o;
  }
  u32 c0 = pool[o].e;
  u32 c1 = wipe(pool[o].f, mid + 1, r, K);
  pool[o].f = c1;
  if (!c1) {
    if (!c0) return 0;
    pool[o].mf = pool[c0].mf; pool[o].mg = pool[c0].mg;
    return o;
  }
  i64 f = pool[c1].mf, g = pool[c1].mg;
  if (c0) { i64 x = pool[c0].mf; if (x > f) f = x; x = pool[c0].mg; if (x > g) g = x; }
  pool[o].mf = f; pool[o].mg = g;
  return o;
}

// ---------------- io ----------------
#ifdef LOCAL_TEST
static const unsigned char *ip_, *ie_;
static char *op_;
#else
struct DI {
  u64 abi;
  const char *s; u64 sn;
  char *o; u64 ol; u64 os;
  char *e; u64 el; u64 es;
  const char *IB; u64 IBl;
  char *OB; u64 OBl;
  u64 tsc;
} __attribute__((packed));
static DI *D;
static const unsigned char *ip_, *ie_;
static char *op_;
#endif

static inline i64 nll() {
  const unsigned char *p = ip_;
  while (*p <= ' ') p++;
  i64 v = 0;
  while (*p > ' ') { v = v * 10 + (i64)(*p - '0'); p++; }
  ip_ = p;
  return v;
}
static inline int ni() { return (int)nll(); }
static inline void pc(char c) { *op_++ = c; }
static inline void pll(i64 v) {
  char t[24]; int q = 0;
  if (v < 0) { pc('-'); v = -v; }
  if (!v) t[q++] = '0';
  while (v) { t[q++] = (char)('0' + (int)(v % 10)); v /= 10; }
  while (q) pc(t[--q]);
}


// ---------------- chain specialist (a_i = b_i - 1) ----------------
#define MAXS 131072
static u32 cw_[MAXN + 2];
static i64 dis2_[MAXN + 2];
static u32 ox[MAXM], oy[MAXM], ord2[MAXM + 1], cstart[MAXN + 3];
static i64 ow[MAXM];
static i64 trC[2 * MAXS];
// trN has exactly two operations: "increase the value at p" and "max over [p, n]".  Reversing
// the index turns the suffix query into a prefix max, so a Fenwick max tree gives both in
// ~log/2 probes instead of the segment tree's ~2*log (query) / ~log (update); the per-group
// clear also drops from 2*base to bnN = n+1.
static i64 bitN[MAXS + 2];
static int bnN;
static inline i64 asuf_qry(int p) {
  i64 res = NINF;
  for (int i = bnN - p; i > 0; i -= i & -i) { i64 t = bitN[i]; if (t > res) res = t; }
  return res;
}
static inline void asuf_upd(int p, i64 v) {
  for (int i = bnN - p; i <= bnN; i += i & -i) { if (bitN[i] >= v) break; bitN[i] = v; }
}

static i64 range_max(const i64 *tr, int l, int r, int base) {
  i64 res = NINF;
  if (l > r) return res;
  int lo = base + l, hi = base + r + 1;
  while (lo < hi) {
    if (lo & 1) { if (tr[lo] > res) res = tr[lo]; lo++; }
    if (hi & 1) { hi--; if (tr[hi] > res) res = tr[hi]; }
    lo >>= 1; hi >>= 1;
  }
  return res;
}
static void point_max(i64 *tr, int p, i64 v, int base) {
  int i = base + p;
  if (tr[i] >= v) return;
  tr[i] = v;
  i >>= 1;
  while (i) {
    i64 a = tr[2 * i], b = tr[2 * i + 1];
    i64 mx = a > b ? a : b;
    if (tr[i] == mx) break;
    tr[i] = mx;
    i >>= 1;
  }
}

static void solve_chain(int n, const u32 *ea, const u32 *ec) {
  for (int i = 0; i < n - 1; i++) cw_[ea[i]] = ec[i];
  dis2_[1] = 0;
  for (int v = 2; v <= n; v++) dis2_[v] = dis2_[v - 1] + (i64)cw_[v - 1];
  int m = ni();
  int cnt = 0;
  for (int i = 0; i < m; i++) {
    int x = ni(), y = ni();
    i64 v = nll();
    if (x == y) continue;                 // covers no edge -> can never share one
    if (x > y) { int t = x; x = y; y = t; }
    ox[cnt] = (u32)x; oy[cnt] = (u32)y;
    ow[cnt] = (dis2_[y] - dis2_[x]) - v;
    cnt++;
  }
  if (cnt < 2) { pc('F'); pc('\n'); return; }
  int base = 1;
  while (base <= n) base <<= 1;
  for (int i = 0; i < 2 * base; i++) trC[i] = NINF;
  bnN = n + 1;
  for (int i = 1; i <= bnN; i++) bitN[i] = NINF;
  for (int i = 0; i <= n + 1; i++) cstart[i] = 0;
  for (int i = 0; i < cnt; i++) cstart[ox[i]]++;
  { u32 s = 0;
    for (int i = 0; i <= n + 1; i++) { u32 c = cstart[i]; cstart[i] = s; s += c; } }
  for (int i = 0; i < cnt; i++) ord2[cstart[ox[i]]++] = (u32)i;
  i64 best = NINF;
  for (int k = 0; k < cnt; k++) {
    int qi = (int)ord2[k];
    int xq = (int)ox[qi], yq = (int)oy[qi];
    i64 wq = ow[qi];
    { i64 a = range_max(trC, xq + 1, yq, base);
      if (a > NINF / 2) { i64 t = a + wq + dis2_[xq]; if (t > best) best = t; } }
    { i64 b = asuf_qry(yq);
      if (b > NINF / 2) { i64 t = b - (dis2_[yq] - dis2_[xq] - wq); if (t > best) best = t; } }
    point_max(trC, yq, wq - dis2_[yq], base);
    asuf_upd(yq, wq);
  }
  if (best <= NINF / 2) { pc('F'); } else pll(best);
  pc('\n');
}

/* ==== S2 fast path (ported from work/n18y_s2patch.py, adapted by b18e_) ==== */
static u32 s2_ins(u32 o, int pt, i64 deep2) {
  i64 f2 = itm[pt].f2, g2 = itm[pt].g2;
  if (!o) {
    o = ++pool_n;
    pool[o].e = (u32)pt; pool[o].f = (u32)pt; pool[o].mf = f2; pool[o].mg = g2;
    pool[o].lv = singval(pt);
    return o;
  }
  if (f2 > pool[o].mf) pool[o].mf = f2;
  if (g2 > pool[o].mg) pool[o].mg = g2;
  u32 x = pool[o].e, y = pool[o].f;
  if (!x) { pool[o].e = pool[o].f = (u32)pt; pool[o].lv = singval(pt); return o; }
  i64 v1 = calc(pt, (int)x), v2 = (x == y) ? v1 : calc(pt, (int)y);
  i64 v = v1 > v2 ? v1 : v2;
  { i64 z = v - deep2; if (z > ans) ans = z; }
  i64 v0 = pool[o].lv;
  if (v0 >= v1 && v0 >= v2) return o;
  if (v1 >= v2) pool[o].f = (u32)pt; else pool[o].e = (u32)pt;
  pool[o].lv = v;
  return o;
}
static u32 s2_merge(u32 a, u32 b, i64 deep2) {
  if (!a) return b;
  if (!b) return a;
  leaf_combine(a, b, deep2);
  return a;
}
static void solve_group() {
  int n = ni();
  static u32 deg[MAXN + 2];
  for (int i = 1; i <= n; i++) deg[i] = 0;
  static u32 ea[MAXN], eb[MAXN], ec[MAXN];
  g_chain = 1;
  g_c0 = 1;
  for (int i = 0; i < n - 1; i++) {
    int a = ni(), b = ni(), c = ni();
    if (b != a + 1) g_chain = 0;
    if (c) g_c0 = 0;
    ea[i] = a; eb[i] = b; ec[i] = c;
    deg[a]++; deg[b]++;
  }
  if (g_chain) { solve_chain(n, ea, ec); return; }
  {
    u32 s = 0;
    for (int i = 1; i <= n; i++) { head_[i] = s; s += deg[i]; }
    head_[n + 1] = s;
  }
  {
    static u32 pos[MAXN + 2];
    for (int i = 1; i <= n; i++) pos[i] = head_[i];
    for (int i = 0; i < n - 1; i++) {
      u32 a = ea[i], b = eb[i], c = ec[i];
      eto[pos[a]] = b; ew[pos[a]++] = c;
      eto[pos[b]] = a; ew[pos[b]++] = c;
    }
  }
  {
    int top = 0;
    static u32 stk[MAXN], ptr[MAXN];
    par_[1] = 0; dep_[1] = 0; dis_[1] = 0;
    stk[0] = 1; ptr[1] = head_[1];
    int ec_ = 0, pc_ = 0;
    euler[ec_] = 1; first_[1] = ec_; ec_++;
    pre_[pc_++] = 1;
    while (top >= 0) {
      u32 u = stk[top];
      if (ptr[u] < head_[u + 1]) {
        u32 idx = ptr[u]++;
        u32 v = eto[idx];
        if (v == par_[u]) continue;
        par_[v] = u; dep_[v] = dep_[u] + 1; dis_[v] = dis_[u] + ew[idx];
        first_[v] = ec_; euler[ec_] = v; ec_++;
        if (pc_ < n) pre_[pc_++] = v;
        stk[++top] = v; ptr[v] = head_[v];
      } else {
        top--;
        if (top >= 0) { euler[ec_] = stk[top]; ec_++; }
      }
    }
  }
  {
    int m_ = 2 * n - 1;
    if (!g_chain) {
      int nb=(m_+RMQB-1)/RMQB;
      for (int b=0;b<nb;b++) {
        int l=b*RMQB, r=l+RMQB; if(r>m_)r=m_;
        u32 z=0;
        for (int i=l;i<r;i++) { u32 p=rmq_pack(euler[i]); z=(i==l)?p:rmq_pick(z,p); rmq_pref[i]=z; }
        for (int i=r-1;i>=l;i--) { u32 p=rmq_pack(euler[i]); z=(i==r-1)?p:rmq_pick(p,z); rmq_suf[i]=z; }
        rmq_st[0][b]=rmq_pref[r-1];
      }
      for (int k=1;(1<<k)<=nb;k++)
        for (int b=0;b+(1<<k)<=nb;b++)
          rmq_st[k][b]=rmq_pick(rmq_st[k-1][b],rmq_st[k-1][b+(1<<(k-1))]);
    }
  }
  int m = ni();
  u32 maxdep = 0;
  for (int v = 1; v <= n; v++) if (dep_[v] > maxdep) maxdep = dep_[v];
  static u32 tat[MAXIT];   /* pkey/ppt are written directly at the source: the
                              previous tkey/tpt arrays existed only to be copied
                              into pkey/ppt by the reverse linked-list pass. */
  int nit = 0;
  for (int i = 0; i < m; i++) {
    int x = ni(), y = ni();
    i64 cost = nll();
    int anc = lca_of(x, y);
    i64 len = dis_[x] + dis_[y] - 2 * dis_[anc];
    i64 f2 = 2 * (len - cost);
    i64 g2 = f2 + 2 * dis_[anc];
    i64 base = len - 2 * cost;
    if (x != anc) {
      int id = 2 * i + 1;
      itm[id].v = (u32)y; itm[id].fv = first_[y];
      itm[id].w = base + dis_[x] + dis_[y];
      itm[id].f2 = f2; itm[id].g2 = g2;
      pkey[nit] = dep_[anc] + 1; tat[nit] = x; ppt[nit] = id;
      nit++;
    }
    if (y != anc) {
      int id = 2 * i + 2;
      itm[id].v = (u32)x; itm[id].fv = first_[x];
      itm[id].w = base + dis_[x] + dis_[y];
      itm[id].f2 = f2; itm[id].g2 = g2;
      pkey[nit] = dep_[anc] + 1; tat[nit] = y; ppt[nit] = id;
      nit++;
    }
  }
  // Stable counting scatter: the old reverse linked-list build visited each
  // vertex's entries in ascending e order, exactly as this contiguous layout.
  for (int v = 1; v <= n; v++) phead[v] = 0;
  for (int e = 0; e < nit; e++) ++phead[tat[e]];
  u32 off = 0;
  for (int v = 1; v <= n; v++) {
    u32 count = phead[v]; phead[v] = off; off += count;
  }
  phead[n + 1] = off;
  static u32 write_pos[MAXN + 2];
  for (int v = 1; v <= n; v++) write_pos[v] = phead[v];
  for (int e = 0; e < nit; e++) {
    u32 j = write_pos[tat[e]]++;
    path_entries[j] = {pkey[e], ppt[e]};
  }
  for (int i = 0; i < n; i++) ord_[i] = pre_[n - 1 - i];
  static u32 rt[MAXN];
  /* [E18T-RT] no per-group clear: ord_ is a reverse preorder, so every rt[v] read
     (children only) was written earlier in THIS group, and rt[t] = root is stored
     unconditionally at the end of every t. */
  pool_n = 0;
  int S = (int)maxdep + 1; if (S < 1) S = 1;
  g_key1 = 1;
  for (int e = 0; e < nit; e++) if (pkey[e] != 1) { g_key1 = 0; break; }
  ans = NINF;
  if (g_key1) {                     /* ==== S2: one-key domain, single-leaf tree ==== */
    for (int oi = 0; oi < n; oi++) {
      u32 t = ord_[oi];
      u32 root = 0;
    if (oi + 2 < n) {
      u32 t1 = ord_[oi + 1], t2 = ord_[oi + 2];
      __builtin_prefetch((const void *)&rt[t1], 1, 0);
      __builtin_prefetch((const void *)&rt[t2], 1, 0);
    }
      i64 deep2 = 2 * dis_[t];
      for (u32 c = head_[t]; c < head_[t + 1]; c++) {
        u32 v = eto[c];
        if (v == par_[t]) continue;
        if (!rt[v]) continue;
        root = s2_merge(root, rt[v], deep2);
      }
      u32 item_end = phead[t + 1];
      for (u32 e = phead[t]; e < item_end; ++e) {
        if (e + 1 < item_end)
          __builtin_prefetch((const void *)&itm[path_entries[e + 1].pt], 0, 0);
        if (e + 2 < item_end)
          __builtin_prefetch((const void *)&itm[path_entries[e + 2].pt], 0, 0);
        root = s2_ins(root, (int)path_entries[e].pt, deep2);
      }
      if (root && (int)dep_[t] <= 1) root = 0;   /* wipe: keys >= K, only key == 1 exists */
      rt[t] = root;
    }
  } else {
  /* [PFSC-rt] rt[] is a random RMW (`rt[t] = ...`, reads of rt[v]) whose index comes from the
     SEQUENTIAL array ord_[], so the address needs no second-level dependency and can be issued
     D iterations early (BRIEF 2.19.325 [PFSC-d]: settlement-type RMW target; 2.19.324: the
     switch is "is the phase's LFB idle").  Pure hint -- no semantics, no state. */
  for (int oi = 0; oi < n; oi++) {
    u32 t = ord_[oi];
    u32 root = 0;      /* [E18T-RT] accumulator in a register: the old form did a
                          load+store of rt[t] per item and per child merge. */
    if (oi + 2 < n) {
      u32 t1 = ord_[oi + 1], t2 = ord_[oi + 2];
      __builtin_prefetch((const void *)&rt[t1], 1, 0);
      __builtin_prefetch((const void *)&rt[t2], 1, 0);
    }
    i64 deep2 = 2 * dis_[t];
    for (u32 c = head_[t]; c < head_[t + 1]; c++) {
      u32 v = eto[c];
      if (v == par_[t]) continue;
      if (!rt[v]) continue;
      if (!root) root = rt[v];
      else root = merge_tr(root, rt[v], 1, S, deep2);
    }
    u32 item_end = phead[t + 1];
    for (u32 e = phead[t]; e < item_end; ++e) {
      if (e + 1 < item_end)
        __builtin_prefetch((const void *)&itm[path_entries[e + 1].pt], 0, 0);
      if (e + 2 < item_end)
        __builtin_prefetch((const void *)&itm[path_entries[e + 2].pt], 0, 0);
      root = ins(root, 1, S, (int)path_entries[e].key, (int)path_entries[e].pt, deep2);
    }
    if (root) root = wipe(root, 1, S, (int)dep_[t]);
    rt[t] = root;
  }
  }
  if (ans <= NINF / 2) { pc('F'); }
  else pll(ans >> 1);
  pc('\n');
}

static void main_solve() {
  int T = ni();
  while (T--) solve_group();
}

#ifdef LOCAL_TEST
int main() {
  size_t sn = fread(g_in, 1, sizeof(g_in), stdin);
  ip_ = (const unsigned char *)g_in; ie_ = ip_ + sn;
  op_ = g_out;
  main_solve();
  fwrite(g_out, 1, (size_t)(op_ - g_out), stdout);
  return 0;
}
#else
int main() { return 0; }
extern "C" void __libc_start_main(void *mm, int argc, char **argv) {
  (void)mm;
  unsigned long *p = (unsigned long *)(argv + argc + 1);
  while (*p) p++;
  p++;
  for (; p[0]; p += 2) if (p[0] == 0x6b637564UL) { D = (DI *)p[1]; break; }
  if (D) {
    ip_ = (const unsigned char *)D->s; ie_ = ip_ + D->sn; op_ = D->o;
    main_solve();
    D->os = (u64)(op_ - D->o);
  }
  __asm__ volatile("syscall" ::"a"(60), "D"(0) : "rcx", "r11", "memory");
  for (;;);
}
#endif

评测结果