题意：现在有N个人和N个位置，每个人只能站在某个位置一次，并且每个位置只能站一个人（就是说一个位置上不能有两个人），最后求有多少种站法，并把每种站法输出。
输出的格式为：第几个位置站哪个人。
思路：如果求有多少种站法可以用二分法。。算出具体有ans种方法。
s->u
边权为mid
u->v
第u个人站在第v个位置(1<=u<=n n<v<=2n)
v->t
边权为mid
我是用Dinic计算的。然后把答案ans Dinic后残留网络中的还有流量的边给删掉。
然后再跑ans次，每次建图还是同上。
s->u
边权为1
u->v
第u个人站在第v个位置(1<=u<=n n<v<=2n)
v->t
边权为1
每次跑完Dinic后可以算出有哪些位置可以站。
然后把对应的边给去掉。
代码：
#include <iostream>
#include <cstdio>
#include <cstring>
#include <cmath>
#include <set>
#include <vector>
#include <map>
#include <queue>
#include <set>
#include <algorithm>
#include <limits>
using namespace std;
typedef long long LL;
const int MAXN=1e+3;
const int MAXM=1e+5;
const int INF = numeric_limits<int>::max();
const LL LL_INF= numeric_limits<LL>::max();
struct Edge
{
int from,to;
LL ci;int next;
Edge(){}
Edge(int _from,int _to,LL _ci,int _next):from(_from),to(_to),ci(_ci),next(_next){}
}e[MAXM],e1[MAXM];
int head[MAXN],tot;
int dis[MAXN];
int top,sta[MAXN],cur[MAXN],tmp[MAXN];
int vis1[100],vis2[MAXM];
int n;
inline void init(){
memset(head,-1,sizeof(head));
tot=0;
}
inline void AddEdge(int u,int v,LL ci0,LL ci1=0){
e[tot]=Edge(u,v,ci0,head[u]);
head[u]=tot++;
e[tot]=Edge(v,u,ci1,head[v]);
head[v]=tot++;
}
inline bool bfs(int st,int et){
memset(dis,0,sizeof(dis));
dis[st]=1;
queue <int> q;
q.push(st);
while(!q.empty()){
int now=q.front();
q.pop();
for(int i=head[now];i!=-1;i=e[i].next){
int next=e[i].to;
if(vis2[i])continue;
if(e[i].ci&&!dis[next]){
dis[next]=dis[now]+1;
if(next==et)return true;
q.push(next);
}
}
}
return false;
}
LL Dinic(int st,int et){
LL ans=0;
while(bfs(st,et)){
//printf("here\n");
top=0;
memcpy(cur,head,sizeof(head));
int u=st,i;
while(1){
if(u==et){
int pos;
LL minn=LL_INF;
//printf("top:%d\n",top);
for(i=0;i<top;i++)
{
if(minn>e[sta[i]].ci){
minn=e[sta[i]].ci;
pos=i;
}
//printf("%d --> %d\n",e[sta[i]].from,e[sta[i]].to);
}
for(i=0;i<top;i++){
e[sta[i]].ci-=minn;
e[sta[i]^1].ci+=minn;
}
top=pos;
u=e[sta[top]].from;
ans+=minn;
//printf("minn:%d\n\n",minn);
}
for(i=cur[u];i!=-1;cur[u]=i=e[i].next)
if(vis2[i]);
else if(e[i].ci&&dis[u]+1==dis[e[i].to])break;
if(cur[u]!=-1){
sta[top++]=cur[u];
u=e[cur[u]].to;
}
else {
if(top==0)break;
dis[u]=0;
u=e[sta[--top]].from;
}
}
}
return ans;
}
/*
void del(int ii){
int u=e[ii].from;
int pre=head[u];
for(int i=head[u];~i;i=e[i].next){
if(i==ii){
if(head[u]==i){
head[u]=e[i].next;
break;
}
else {
e[pre].next=e[i].next;
}
}
pre=i;
}
}
*/
int main()
{
char ch;
while(~scanf("%d",&n)&&n){
init();
memset(vis2,0,sizeof(vis2));
for(int i=1;i<=n;i++){
for(int j=1;j<=n;j++){
scanf(" %c",&ch);
if(ch=='Y'){
AddEdge(i,j+n,1);
}
}
}
memcpy(e1,e,sizeof(e));
memcpy(tmp,head,sizeof(head));
int st=500,et=501;
int ttot=tot;
int l=0,r=100,ans=0,mid;
while(l<=r){
mid=(l+r)>>1;
for(int i=1;i<=n;i++){
AddEdge(st,i,mid);
AddEdge(i+n,et,mid);
}
if(Dinic(st,et)==(LL)n*mid){
ans=mid;
//if(ans<mid)ans=mid;
l=mid+1;
}
else r=mid-1;
memcpy(e,e1,sizeof(e));
memcpy(head,tmp,sizeof(head));
tot=ttot;
}
printf("%d\n",ans);
for(int i=1;i<=n;i++){
AddEdge(st,i,ans);
AddEdge(i+n,et,ans);
}
Dinic(st,et);
for(int i=1;i<=n;i++){
for(int j=head[i];~j;j=e[j].next){
if(e[j].ci&&e[j].to!=st){
vis2[j^1]=vis2[j]=1;
}
}
}
memcpy(e,e1,sizeof(e));
memcpy(head,tmp,sizeof(head));
tot=ttot;
for(int j=1;j<=n;j++){
AddEdge(st,j,1);
AddEdge(j+n,et,1);
}
for(int i=0;i<ans;i++){
memset(vis1,0,sizeof(vis1));
tot=ttot;
Dinic(st,et);
for(int j=1;j<=n;j++){
for(int k=head[j];~k;k=e[k].next){
if(vis2[k])continue;
if(e[k].ci==0&&e[k].to!=st){
vis1[e[k].to-n]=j;
vis2[k^1]=vis2[k]=1;
break;
}
}
}
for(int j=1;j<n;j++){
printf("%d ",vis1[j]);
if(!vis1[j])while(1);
}
printf("%d\n",vis1[n]);
if(!vis1[n])while(1);
for(int j=head[st];~j;j=e[j].next){
e[j].ci=1;e[j^1].ci=0;
}
for(int j=head[et];~j;j=e[j].next){
e[j^1].ci=1;e[j].ci=0;
}
}
}
return 0;
}