[POJ2337]Catenyms

题目大意：
　　定义一个catenym是一对单词，满足第一个单词的末尾字符与第二个单词的开头字符相等。
　　定义复合catenym是一些单词，满足第i个单词的末尾字符与第i+1个单词的开头字符相等。
　　给你n个字符串，判断它们是否能构成复合catenym。
　　如果能，求出字典序最小的那个catenym。

思路：
　　以字母为点，单词为边建图。用类似Fleury算法，跑一边欧拉路径，如果能跑出欧拉路经则说明可以构成。
　　为了保证catenym的字典序最小，我们就要保证在Fleury的时候，按照字典序遍历。
　　因此我们要先对所有的单词按字典序排序，然后加边。

*/
#include<stack>
#include<string>
#include<vector>
#include<iostream>
#include<algorithm>
#include<functional>
const int N=1000,V=26;
std::string s[N];
struct Edge {
    int to,id;
    bool vis;
};
std::vector<Edge> e[V];
inline void add_edge(const int &u,const int &v,const int &i) {
    e[u].push_back((Edge){v,i,false});
}
inline int idx(const int &ch) {
    return ch-'a';
}
bool vis[V];
int in[V],out[V];
std::stack<int> ans;
void dfs(const int &x) {
    for(std::vector<Edge>::reverse_iterator i=e[x].rbegin();i!=e[x].rend();i++) {
        if(i->vis) continue;
        i->vis=true;
        dfs(i->to);
        ans.push(i->id);
    }
}
inline void init() {
    for(register int i=0;i<V;i++) e[i].clear();
    std::fill(&in[0],&in[V],0);
    std::fill(&out[0],&out[V],0);
    std::fill(&vis[0],&vis[V],false);
    while(!ans.empty()) ans.pop();
}
int main() {
    std::ios_base::sync_with_stdio(false);
    std::cin.tie(NULL);
    register int T;
    for(std::cin>>T;T;T--) {
        init();
        int n;
        std::cin>>n;
        for(register int i=0;i<n;i++) {
            std::cin>>s[i];
        }
        std::sort(&s[0],&s[n],std::greater<std::string>());
        int start=V;
        for(register int i=0;i<n;i++) {
            const int &u=idx(*s[i].begin()),&v=idx(*--s[i].end());
            out[u]++;
            in[v]++;
            add_edge(u,v,i);
            start=std::min(start,std::min(u,v));
        }
        int cnts=0,cntt=0;
        bool flag=false;
        for(register int i=0;i<V;i++) {
            if(out[i]-in[i]==1) {
                cnts++;
                start=i;
            } else if(in[i]-out[i]==1) {
                cntt++;
            } else if(in[i]!=out[i]){
                flag=true;
            }
        }
        if(flag||!((cnts==0&&cntt==0)||(cnts==1&&cntt==1))) {
            std::cout<<"***"<<std::endl;
            continue;
        }
        dfs(start);
        if((signed)ans.size()!=n) {
            std::cout<<"***"<<std::endl;
            continue;
        }
        std::cout<<s[ans.top()];
        ans.pop();
        while(!ans.empty()) {
            std::cout<<'.'<<s[ans.top()];
            ans.pop();
        }
        std::cout<<std::endl;
    }
    return 0;
}