package adv2020; import java.io.*; import java.util.ArrayDeque; import java.util.Arrays; import java.util.InputMismatchException; import java.util.Queue; public class Day5_2 { InputStream is; FastWriter out; String INPUT = ""; public void solve() { int n = ni(), Q = ni(), C = ni(); int[] from = new int[n - 1]; int[] to = new int[n - 1]; int[] ws = new int[n-1]; for (int i = 0; i < n - 1; i++) { from[i] = ni() - 1; to[i] = ni() - 1; ws[i] = ni(); } int[][][] g = packWU(n, from, to, ws); int[][] pars = parents(g, 0); int[] par = pars[0], ord = pars[1], dep = pars[2], pw = pars[4]; int[] x = na(Q); for(int i = 0;i < Q;i++)x[i]--; int[][] rg = packU(n, from, to); long[] dw = new long[n]; for(int i = 1;i < n;i++){ int cur = ord[i]; dw[cur] = dw[par[cur]] + pw[cur]; } LCAFast2 lf = LCAFast2.build(rg, 0); long[] dp = new long[n]; Arrays.fill(dp, Long.MAX_VALUE / 3); dp[x[0]] = 0; for(int i = 1;i < Q;i++){ long d = d(x[i-1], x[i], lf, dw); int[][] lpars = parents(g, x[i]); int[] lpar = lpars[0], lord = lpars[1], ldep = lpars[2], lpw = lpars[4]; long[] ldw = new long[n]; for(int j = 1;j < n;j++){ int cur = lord[j]; ldw[cur] = ldw[lpar[cur]] + lpw[cur]; } long[] ndp = new long[n]; Arrays.fill(ndp, Long.MAX_VALUE / 3); for(int j = 0;j < n;j++){ ndp[j] = dp[j] + (j != x[i-1] ? C : 0) + ldw[j]; } for(int j = n-1;j >= 1;j--){ int cur = lord[j]; ndp[lpar[cur]] = Math.min(ndp[lpar[cur]], ndp[cur]); } for(int j = 0;j < n;j++){ ndp[j] = Math.min(ndp[j], dp[j] + d); } dp = ndp; // tr(dp); } out.println(dp[x[Q-1]]); } long d(int a, int b, LCAFast2 lf, long[] dw) { int lca = lf.lca(a,b); return dw[a] + dw[b] - 2*dw[lca]; } public static class LCAFast2 { public int n, h; public int[][] bigst; public int[][] bigind; public long[][] smallb; public int[] vs, first, deps; public int lca(int a, int b) { return vs[rmqpos(Math.min(first[a], first[b]), Math.max(first[a], first[b]))]; } public int d(int a, int b) { return dep(a) + dep(b) - 2 * rmqval(Math.min(first[a], first[b]), Math.max(first[a], first[b])); } public int dep(int x) { return deps[first[x]]; } public int rmqpos(int l, int r) { if(l > r)return -1; int cl = l>>>6; int cr = r>>>6; if(cl == cr){ return argmax(smallb[l&63][cl], r-l+1) + l; }else{ int min = deps[l] - max(smallb[l&63][cl], 63-(l&63)+1); int pos = argmax(smallb[l&63][cl], 63-(l&63)+1) + l; { int can = deps[r>>>6<<6] - max(smallb[0][cr], (r&63)-0+1); if(can < min){ min = can; pos = argmax(smallb[0][cr], (r&63)-0+1) + (r>>>6<<6); } } if(cl+1 <= cr-1){ int len = (cr-1)-(cl+1)+1; int h = 31-Integer.numberOfLeadingZeros(len); { int can = bigst[h][cl+1]; if(can < min){ min = can; pos = bigind[h][cl+1]; } } { int can = bigst[h][cr-1-(1< r)return -1; int cl = l>>>6; int cr = r>>>6; if(cl == cr){ return deps[l] - max(smallb[l&63][cl], r-l+1); }else{ int min = deps[l] - max(smallb[l&63][cl], 63-(l&63)+1); min = Math.min(min, deps[r>>>6<<6] - max(smallb[0][cr], (r&63)-0+1)); if(cl+1 <= cr-1){ int len = (cr-1)-(cl+1)+1; int h = 31-Integer.numberOfLeadingZeros(len); min = Math.min(min, bigst[h][cl+1]); min = Math.min(min, bigst[h][cr-1-(1<>>6; int h = 31-Integer.numberOfLeadingZeros(u) + 1; int[][] bigst = new int[h][]; int[][] bigind = new int[h][]; int[] cup = new int[u]; int[] cupind = new int[u]; Arrays.fill(cup, Integer.MAX_VALUE); for(int i = 0;i < n;i++){ if(deps[i] < cup[i>>>6]){ cup[i>>>6] = deps[i]; cupind[i>>>6] = i; } } bigst[0] = cup; bigind[0] = cupind; for(int i = 1;i < h;i++){ bigst[i] = new int[u-(1< deps[i<<6|j+1]){ x |= 1L<= 0;j--){ val <<= 1; if(x<<~j<0){ val |= 1L; }else{ val &= val - 1; } smallb[j][i] = val; } // // for(int j = 0;j < 64;j++){ // smallb[j][i] = make(x>>>j); // } } ret.n = n; ret.h = h; ret.bigst = bigst; ret.bigind = bigind; ret.smallb = smallb; return ret; } public static int[][] eulerTour(int[][] g, int root) { int n = g.length; int[] vs = new int[2*n-1]; int[] deps = new int[2*n-1]; int[] first = new int[n]; Arrays.fill(first, -1); int p = 0; int[] stack = new int[n]; int[] inds = new int[n]; int sp = 0; stack[sp++] = root; outer: while(sp > 0){ int cur = stack[sp-1], ind = inds[sp-1]; vs[p] = cur; deps[p] = sp-1; if(first[cur] == -1)first[cur] = p; p++; while(ind < g[cur].length){ int nex = g[cur][ind++]; if(first[nex] == -1){ inds[sp-1] = ind; stack[sp] = nex; inds[sp] = 0; sp++; continue outer; } } inds[sp-1] = ind; if(ind == g[cur].length)sp--; } return new int[][]{vs, deps, first}; } // TinyRMQ public static long make(long x) { int h = 0; int max = 0; long ret = 0; for(int i = 0;i < 64;i++){ if(x<<~i<0){ h++; }else{ h--; } if(h > max){ max = h; ret |= 1L< 0; return Long.bitCount(x&(1L< 0; return 64-Long.numberOfLeadingZeros(x&(1L<= lenbuf){ ptrbuf = 0; try { lenbuf = is.read(inbuf); } catch (IOException e) { throw new InputMismatchException(); } if(lenbuf <= 0)return -1; } return inbuf[ptrbuf++]; } private boolean isSpaceChar(int c) { return !(c >= 33 && c <= 126); } // private boolean isSpaceChar(int c) { return !(c >= 32 && c <= 126); } private int skip() { int b; while((b = readByte()) != -1 && isSpaceChar(b)); return b; } private double nd() { return Double.parseDouble(ns()); } private char nc() { return (char)skip(); } private String ns() { int b = skip(); StringBuilder sb = new StringBuilder(); while(!(isSpaceChar(b))){ sb.appendCodePoint(b); b = readByte(); } return sb.toString(); } private char[] ns(int n) { char[] buf = new char[n]; int b = skip(), p = 0; while(p < n && !(isSpaceChar(b))){ buf[p++] = (char)b; b = readByte(); } return n == p ? buf : Arrays.copyOf(buf, p); } private char[][] nm(int n, int m) { char[][] map = new char[n][]; for(int i = 0;i < n;i++)map[i] = ns(m); return map; } private int[] na(int n) { int[] a = new int[n]; for(int i = 0;i < n;i++)a[i] = ni(); return a; } private long[] nal(int n) { long[] a = new long[n]; for(int i = 0;i < n;i++)a[i] = nl(); return a; } private int ni() { int num = 0, b; boolean minus = false; while((b = readByte()) != -1 && !((b >= '0' && b <= '9') || b == '-')); if(b == '-'){ minus = true; b = readByte(); } while(true){ if(b >= '0' && b <= '9'){ num = num * 10 + (b - '0'); }else{ return minus ? -num : num; } b = readByte(); } } private long nl() { long num = 0; int b; boolean minus = false; while((b = readByte()) != -1 && !((b >= '0' && b <= '9') || b == '-')); if(b == '-'){ minus = true; b = readByte(); } while(true){ if(b >= '0' && b <= '9'){ num = num * 10 + (b - '0'); }else{ return minus ? -num : num; } b = readByte(); } } public static class FastWriter { private static final int BUF_SIZE = 1<<13; private final byte[] buf = new byte[BUF_SIZE]; private final OutputStream out; private int ptr = 0; private FastWriter(){out = null;} public FastWriter(OutputStream os) { this.out = os; } public FastWriter(String path) { try { this.out = new FileOutputStream(path); } catch (FileNotFoundException e) { throw new RuntimeException("FastWriter"); } } public FastWriter write(byte b) { buf[ptr++] = b; if(ptr == BUF_SIZE)innerflush(); return this; } public FastWriter write(char c) { return write((byte)c); } public FastWriter write(char[] s) { for(char c : s){ buf[ptr++] = (byte)c; if(ptr == BUF_SIZE)innerflush(); } return this; } public FastWriter write(String s) { s.chars().forEach(c -> { buf[ptr++] = (byte)c; if(ptr == BUF_SIZE)innerflush(); }); return this; } private static int countDigits(int l) { if (l >= 1000000000) return 10; if (l >= 100000000) return 9; if (l >= 10000000) return 8; if (l >= 1000000) return 7; if (l >= 100000) return 6; if (l >= 10000) return 5; if (l >= 1000) return 4; if (l >= 100) return 3; if (l >= 10) return 2; return 1; } public FastWriter write(int x) { if(x == Integer.MIN_VALUE){ return write((long)x); } if(ptr + 12 >= BUF_SIZE)innerflush(); if(x < 0){ write((byte)'-'); x = -x; } int d = countDigits(x); for(int i = ptr + d - 1;i >= ptr;i--){ buf[i] = (byte)('0'+x%10); x /= 10; } ptr += d; return this; } private static int countDigits(long l) { if (l >= 1000000000000000000L) return 19; if (l >= 100000000000000000L) return 18; if (l >= 10000000000000000L) return 17; if (l >= 1000000000000000L) return 16; if (l >= 100000000000000L) return 15; if (l >= 10000000000000L) return 14; if (l >= 1000000000000L) return 13; if (l >= 100000000000L) return 12; if (l >= 10000000000L) return 11; if (l >= 1000000000L) return 10; if (l >= 100000000L) return 9; if (l >= 10000000L) return 8; if (l >= 1000000L) return 7; if (l >= 100000L) return 6; if (l >= 10000L) return 5; if (l >= 1000L) return 4; if (l >= 100L) return 3; if (l >= 10L) return 2; return 1; } public FastWriter write(long x) { if(x == Long.MIN_VALUE){ return write("" + x); } if(ptr + 21 >= BUF_SIZE)innerflush(); if(x < 0){ write((byte)'-'); x = -x; } int d = countDigits(x); for(int i = ptr + d - 1;i >= ptr;i--){ buf[i] = (byte)('0'+x%10); x /= 10; } ptr += d; return this; } public FastWriter write(double x, int precision) { if(x < 0){ write('-'); x = -x; } x += Math.pow(10, -precision)/2; // if(x < 0){ x = 0; } write((long)x).write("."); x -= (long)x; for(int i = 0;i < precision;i++){ x *= 10; write((char)('0'+(int)x)); x -= (int)x; } return this; } public FastWriter writeln(char c){ return write(c).writeln(); } public FastWriter writeln(int x){ return write(x).writeln(); } public FastWriter writeln(long x){ return write(x).writeln(); } public FastWriter writeln(double x, int precision){ return write(x, precision).writeln(); } public FastWriter write(int... xs) { boolean first = true; for(int x : xs) { if (!first) write(' '); first = false; write(x); } return this; } public FastWriter write(long... xs) { boolean first = true; for(long x : xs) { if (!first) write(' '); first = false; write(x); } return this; } public FastWriter writeln() { return write((byte)'\n'); } public FastWriter writeln(int... xs) { return write(xs).writeln(); } public FastWriter writeln(long... xs) { return write(xs).writeln(); } public FastWriter writeln(char[] line) { return write(line).writeln(); } public FastWriter writeln(char[]... map) { for(char[] line : map)write(line).writeln(); return this; } public FastWriter writeln(String s) { return write(s).writeln(); } private void innerflush() { try { out.write(buf, 0, ptr); ptr = 0; } catch (IOException e) { throw new RuntimeException("innerflush"); } } public void flush() { innerflush(); try { out.flush(); } catch (IOException e) { throw new RuntimeException("flush"); } } public FastWriter print(byte b) { return write(b); } public FastWriter print(char c) { return write(c); } public FastWriter print(char[] s) { return write(s); } public FastWriter print(String s) { return write(s); } public FastWriter print(int x) { return write(x); } public FastWriter print(long x) { return write(x); } public FastWriter print(double x, int precision) { return write(x, precision); } public FastWriter println(char c){ return writeln(c); } public FastWriter println(int x){ return writeln(x); } public FastWriter println(long x){ return writeln(x); } public FastWriter println(double x, int precision){ return writeln(x, precision); } public FastWriter print(int... xs) { return write(xs); } public FastWriter print(long... xs) { return write(xs); } public FastWriter println(int... xs) { return writeln(xs); } public FastWriter println(long... xs) { return writeln(xs); } public FastWriter println(char[] line) { return writeln(line); } public FastWriter println(char[]... map) { return writeln(map); } public FastWriter println(String s) { return writeln(s); } public FastWriter println() { return writeln(); } } public static void trnz(int... o) { for(int i = 0;i < o.length;i++)if(o[i] != 0)System.out.print(i+":"+o[i]+" "); System.out.println(); } // print ids which are 1 public static void trt(long... o) { Queue stands = new ArrayDeque<>(); for(int i = 0;i < o.length;i++){ for(long x = o[i];x != 0;x &= x-1)stands.add(i<<6|Long.numberOfTrailingZeros(x)); } System.out.println(stands); } public static void tf(boolean... r) { for(boolean x : r)System.out.print(x?'#':'.'); System.out.println(); } public static void tf(boolean[]... b) { for(boolean[] r : b) { for(boolean x : r)System.out.print(x?'#':'.'); System.out.println(); } System.out.println(); } public void tf(long[]... b) { if(INPUT.length() != 0) { for (long[] r : b) { for (long x : r) { for (int i = 0; i < 64; i++) { System.out.print(x << ~i < 0 ? '#' : '.'); } } System.out.println(); } System.out.println(); } } public void tf(long... b) { if(INPUT.length() != 0) { for (long x : b) { for (int i = 0; i < 64; i++) { System.out.print(x << ~i < 0 ? '#' : '.'); } } System.out.println(); } } private void tr(Object... o) { if(INPUT.length() != 0)System.out.println(Arrays.deepToString(o)); } }