#pragma GCC optimize("Ofast") #pragma GCC optimize("unroll-loops") #pragma GCC optimize("inline") #include using namespace std; void*wmem; char memarr[96000000]; template inline void walloc1d(T **arr, int x, void **mem = &wmem){ static int skip[16] = {0, 15, 14, 13, 12, 11, 10, 9, 8, 7, 6, 5, 4, 3, 2, 1}; (*mem) = (void*)( ((char*)(*mem)) + skip[((unsigned long long)(*mem)) & 15] ); (*arr)=(T*)(*mem); (*mem)=((*arr)+x); } template inline void walloc1d(T **arr, int x1, int x2, void **mem = &wmem){ walloc1d(arr, x2-x1, mem); (*arr) -= x1; } inline int my_getchar_unlocked(){ static char buf[1048576]; static int s = 1048576; static int e = 1048576; if(s == e && e == 1048576){ e = fread_unlocked(buf, 1, 1048576, stdin); s = 0; } if(s == e){ return EOF; } return buf[s++]; } inline void rd(int &x){ int k; int m=0; x=0; for(;;){ k = my_getchar_unlocked(); if(k=='-'){ m=1; break; } if('0'<=k&&k<='9'){ x=k-'0'; break; } } for(;;){ k = my_getchar_unlocked(); if(k<'0'||k>'9'){ break; } x=x*10+k-'0'; } if(m){ x=-x; } } inline void rd(char &c){ int i; for(;;){ i = my_getchar_unlocked(); if(i!=' '&&i!='\n'&&i!='\r'&&i!='\t'&&i!=EOF){ break; } } c = i; } inline int rd(char c[]){ int i; int sz = 0; for(;;){ i = my_getchar_unlocked(); if(i!=' '&&i!='\n'&&i!='\r'&&i!='\t'&&i!=EOF){ break; } } c[sz++] = i; for(;;){ i = my_getchar_unlocked(); if(i==' '||i=='\n'||i=='\r'||i=='\t'||i==EOF){ break; } c[sz++] = i; } c[sz]='\0'; return sz; } struct MY_WRITER{ char buf[1048576]; int s; int e; MY_WRITER(){ s = 0; e = 1048576; } ~MY_WRITER(){ if(s){ fwrite_unlocked(buf, 1, s, stdout); } } } ; MY_WRITER MY_WRITER_VAR; void my_putchar_unlocked(int a){ if(MY_WRITER_VAR.s == MY_WRITER_VAR.e){ fwrite_unlocked(MY_WRITER_VAR.buf, 1, MY_WRITER_VAR.s, stdout); MY_WRITER_VAR.s = 0; } MY_WRITER_VAR.buf[MY_WRITER_VAR.s++] = a; } inline void wt_L(char a){ my_putchar_unlocked(a); } inline void wt_L(int x){ int s=0; int m=0; char f[10]; if(x<0){ m=1; x=-x; } while(x){ f[s++]=x%10; x/=10; } if(!s){ f[s++]=0; } if(m){ my_putchar_unlocked('-'); } while(s--){ my_putchar_unlocked(f[s]+'0'); } } struct graph{ int N; int*es; int**edge; void setEdge(int N__, int M, int A[], int B[], void **mem = &wmem){ int i; N = N__; walloc1d(&es, N, mem); walloc1d(&edge, N, mem); for(i=(0);i<(N);i++){ es[i] = 0; } for(i=(0);i<(M);i++){ es[A[i]]++; es[B[i]]++; } for(i=(0);i<(N);i++){ walloc1d(&edge[i], es[i], mem); } for(i=(0);i<(N);i++){ es[i] = 0; } for(i=(0);i<(M);i++){ edge[A[i]][es[A[i]]++] = B[i]; edge[B[i]][es[B[i]]++] = A[i]; } } int shortestPath(const int s, const int t, int res[], void *mem=wmem){ int i; int j; int k; int*q; int qs = 0; int qe = 0; int*b; walloc1d(&b, N, &mem); walloc1d(&q, N, &mem); for(i=(0);i<(N);i++){ b[i] = -1; } b[s] = -2; q[qe++] = s; while(qe > qs){ i = q[qs++]; for(j=(0);j<(es[i]);j++){ k = edge[i][j]; if(b[k]!=-1){ continue; } b[k] = i; q[qe++] = k; } if(b[t]!=-1){ break; } } if(b[t]==-1){ return -1; } k = 0; res[k] = i = t; while(i != s){ res[++k] = (i = b[i]); } std::reverse(res, res+k+1); return k; } } ; template struct wgraph{ int N; int*es; int**edge; T**cost; graph g; void setEdge(int N__, int M, int A[], int B[], T C[], void **mem = &wmem){ int i; N = N__; walloc1d(&es, N, mem); for(i=(0);i<(N);i++){ es[i] = 0; } for(i=(0);i<(M);i++){ es[A[i]]++; es[B[i]]++; } walloc1d(&edge, N, mem); for(i=(0);i<(N);i++){ walloc1d(&edge[i], es[i], mem); } walloc1d(&cost, N, mem); for(i=(0);i<(N);i++){ walloc1d(&cost[i], es[i], mem); } for(i=(0);i<(N);i++){ es[i] = 0; } for(i=(0);i<(M);i++){ edge[A[i]][es[A[i]]] = B[i]; edge[B[i]][es[B[i]]] = A[i]; cost[A[i]][es[A[i]]++] = C[i]; cost[B[i]][es[B[i]]++] = C[i]; } g.N = N; g.es = es; g.edge = edge; } } ; template inline int isPalindrome(const int N, const T A[]){ int i = 0; int j = N-1; while(i < j){ if(A[i] != A[j]){ return 0; } ; i++; j--; } return 1; } int N; int M; int A[200000+2]; int B[200000+2]; int ind[200000+2]; char C[200000+2]; wgraph g; int ps; int p[200000+2]; int ress; int res[200000+2]; char str[200000+2]; int main(){ wmem = memarr; int i; int j; int k; int m; rd(N); rd(M); { int Lj4PdHRW; for(Lj4PdHRW=(0);Lj4PdHRW<(M);Lj4PdHRW++){ rd(A[Lj4PdHRW]);A[Lj4PdHRW] += (-1); rd(B[Lj4PdHRW]);B[Lj4PdHRW] += (-1); rd(C[Lj4PdHRW]); } } for(i=(0);i<(M);i++){ ind[i] = i; } for(i=(1);i<(M);i++){ if(C[i] != C[0]){ break; } } if(i==M){ wt_L(-1); wt_L('\n'); return 0; } g.setEdge(N,M,A,B,ind); k = C[g.cost[N-1][0]]; for(m=(0);m<(M);m++){ if(C[m] != k){ break; } } ps = g.g.shortestPath(0, A[m], p); for(i=(1);i<(ps+1);i++){ k = p[i-1]; for(j=(0);j<(g.es[k]);j++){ if(g.edge[k][j]==p[i]){ res[ress++] = ind[g.cost[k][j]]; break; } } } res[ress++] = m; ps = g.g.shortestPath(B[m], N-1, p); for(i=(1);i<(ps+1);i++){ k = p[i-1]; for(j=(0);j<(g.es[k]);j++){ if(g.edge[k][j]==p[i]){ res[ress++] = ind[g.cost[k][j]]; break; } } } for(i=(0);i<(ress);i++){ str[i] = C[res[i]]; } while(isPalindrome(ress,str)){ res[ress++] = g.cost[N-1][0]; res[ress++] = g.cost[N-1][0]; for(i=(0);i<(ress);i++){ str[i] = C[res[i]]; } } wt_L(ress); wt_L('\n'); { int XJIcIBrW; for(XJIcIBrW=(0);XJIcIBrW<(ress);XJIcIBrW++){ wt_L(res[XJIcIBrW]+1); wt_L('\n'); } } return 0; } // cLay version 20210717-1 [beta] // --- original code --- // int N, M, A[2d5+2], B[], ind[]; // char C[]; // wgraph g; // int ps, p[]; // // int ress, res[]; char str[]; // // { // int i, j, k, m; // // rd(N,M,(A--,B--,C)(M)); // rep(i,M) ind[i] = i; // rep(i,1,M) if(C[i] != C[0]) break; // if(i==M) wt(-1), return 0; // g.setEdge(N,M,A,B,ind); // // k = C[g.cost[N-1][0]]; // rep(m,M) if(C[m] != k) break; // // ps = g.g.shortestPath(0, A[m], p); // rep(i,1,ps+1){ // k = p[i-1]; // rep(j,g.es[k]) if(g.edge[k][j]==p[i]) res[ress++] = ind[g.cost[k][j]], break; // } // res[ress++] = m; // ps = g.g.shortestPath(B[m], N-1, p); // rep(i,1,ps+1){ // k = p[i-1]; // rep(j,g.es[k]) if(g.edge[k][j]==p[i]) res[ress++] = ind[g.cost[k][j]], break; // } // // rep(i,ress) str[i] = C[res[i]]; // while(isPalindrome(ress,str)){ // res[ress++] = g.cost[N-1][0]; // res[ress++] = g.cost[N-1][0]; // rep(i,ress) str[i] = C[res[i]]; // } // wt(ress); // wtLn(res(ress)+1); // }