拓扑排序解的个数求解

思路：删边回溯法

• 步骤1：从图中选择一个入度为0的点且输出之
• 步骤2：从图中删除该节点及其所有出边（即与之相邻的所有点入度-1）

反复执行这两个步骤，直至所有节点都输出，即整个拓扑排序完成；或者直至剩下的图中再没有入度为0的节点，这就说明此图中有回路，不可能进行拓扑排序。

package recovery;

import java.util.*;

public class Main {
	static Scanner in = new Scanner(System.in);
	static int[][] mp = new int[500 + 5][500 + 5];
	static int n = 0, cnt = 0, ans = 0, t = 0, c = 0;
	static int[] deleteEdgs = new int[500 + 5];
	static int[] topo = new int[500 + 5];
	static int[] indegree = new int[500 + 5];
	static int[] a = new int[500 + 5];
	/**
	 * mp图的邻接矩阵
	 * deleteEdgs删除的边=》控制变量cnt
	 * indegree统计顶点的入度
	 * a存储入度为零点的数组=>变量c
	 * */
	static void toposort(int i) {
		if (i>=n) {// 不存在入度数为零的边了
			ans++;
//			for (int j = 0; j <n; j++)
//				System.out.print(topo[j]+" ");
//			System.out.println();
		} else {
			int te = 0, pre = 0,prec=0;
			for (int p = 0; p < c; p++) {
				te = a[p];
				topo[i]=te;//将顶点插入topo序列
				if (a[p] != -1){
					a[p] = -1;// 移除顶点
					pre = cnt;prec = c;//保存被删除的边和顶点的位置信息
					for (int j = 0; j < n; j++) {
						if (mp[te][j] == 1) {
							deleteEdgs[cnt++] = j;// 保存删除的边
							mp[te][j] = 0;// 去掉边
							indegree[j]--;
							if (indegree[j] == 0)//调整
								a[c++]=j;						
						}
					}
					toposort(i + 1);
					//回溯，即上面的反操作。
					a[p] = te;// 点恢复
					for (int j = pre; j < cnt; j++) {
						mp[te][deleteEdgs[j]] = 1;
						indegree[deleteEdgs[j]]++;
					}
					cnt-=(cnt-pre);//边位置信息
					c-=(c-prec);//点位置信息
				}
			}
		}
		return;
	}

	public static void main(String[] args) {
		int t = in.nextInt();
		while (t-- > 0) {
			n = 0;ans = 0;
			cnt = 0;c = 0;
			Arrays.fill(indegree, 0);
			in.nextLine();
			Set<Integer> vetex = new HashSet<>();
			String[] edgs = in.nextLine().split(",");
			int x, y, i, j;
			for (i = 0; i < edgs.length; i++) {
				String[] v = edgs[i].split(" ");				
				x = v[0].charAt(0) - 97;
				y = v[1].charAt(0) - 97;
				vetex.add(x);vetex.add(y);
				mp[x][y] = 1;//建图
				indegree[y]++;//
			}
			n = vetex.size();
			for (i = 0; i < n; i++) {
				if (indegree[i] == 0)
					a[c++] = i;
			}
			toposort(0);
			System.out.println(ans);
		}
	}
}