我们将图7-9-2的AOE网转化为邻接表结构如图7-9-4所示,注意与拓扑排序时邻接表结构不同的地方在于,这里弧链表增加了weight域,用来存储弧的权值。

求事件的最早发生时间etv的过程,就是我们从头至尾找拓扑序列的过程,因此,在求关键路径之前,需要先调用一次拓扑序列算法的代码来计算etv和拓扑序列列表。为此,我们首先在程序开始处声明几个全局变量。
int *etv, *ltv; /* 事件最早发生时间和最迟发生时间数组 */int *stack2; /* 用于存储拓扑序列的栈 */int top2; /* 用于stack2的指针 */
其中stack2用来存储拓扑序列,以便后面求关键路径时使用。
下面是改进过的求拓扑序列算法。
/* 拓扑排序,用于关键路径计算 */Status TopologicalSort(GraphAdjList GL){EdgeNode *e;int i, k, gettop;/* 用于栈指针下标 */int top = 0;/* 用于统计输出顶点的个数 */int count = 0;/* 建栈将入度为0的顶点入栈 */int *stack;stack = (int *)malloc(GL->numVertexes * sizeof(int));for (i = 0; i < GL->numVertexes; i++)if (0 == GL->adjList[i].in)stack[++top] = i;/* 初始化为0 */top2 = 0;/* 事件最早发生时间 */etv = (int *)malloc(GL->numVertexes * sizeof(int));for (i = 0; i < GL->numVertexes; i++)/* 初始化为0 */etv[i] = 0;/* 初始化 */stack2 = (int *)malloc(GL->numVertexes * sizeof(int));while (top != 0){gettop = stack[top--];count++;/* 将弹出的顶点序号压入拓扑序列的栈 */stack2[++top2] = gettop;for (e = GL->adjList[gettop].firstedge; e; e = e->next){k = e->adjvex;if (!(--GL->adjList[k].in))stack[++top] = k;/* 求各顶点事件最早发生时间值 */if ((etv[gettop] + e->weight) > etv[k])etv[k] = etv[gettop] + e->weight;}}if (count < GL->numVertexes)return ERROR;elsereturn OK;}
代码中,除加粗部分外,与前面讲的拓扑排序算法没有什么不同。
第11~15行为初始化全局变量etv数组、top2和stack2的过程。第21行就
是将本是要输出的拓扑序列压入全局栈stack2中。第27~28行很关键,
它是求etv数组的每一个元素的值。比如说,假如我们已经求得顶点v 0
对应的etv[0]=0,顶点v 1 对应的etv[1]=3,顶点v 2 对应的etv[2]=4,现在
我们需要求顶点v 3 对应的etv[3],其实就是求etv[1]+len
etv[2]+len
所示。在代码中e->weight就是当前弧的长度。
由此我们也可以得出计算顶点v k 即求etv[k]的最早发生时间的公式是:其中P[K]表示所有到达顶点v k 的弧的集合。比如图7-9-5的P[3]就是
下面我们来看求关键路径的算法代码。
/* 求关键路径,GL为有向网,输出GL的各项关键活动 */void CriticalPath(GraphAdjList GL){EdgeNode *e;int i, gettop, k, j;/* 声明活动最早发生时间和最迟发生时间变量 */int ete, lte;/* 求拓扑序列,计算数组etv和stack2的值 */TopologicalSort(GL);/* 事件最晚发生时间 */ltv = (int *)malloc(GL->numVertexes * sizeof(int));for (i = 0; i < GL->numVertexes; i++)/* 初始化ltv */ltv[i] = etv[GL->numVertexes - 1];/* 计算ltv */while (top2 != 0){/* 将拓扑序列出栈,后进先出 */gettop = stack2[top2--];for (e = GL->adjList[gettop].firstedge; e; e = e->next){/* 求各顶点事件的最迟发生时间ltv值 */k = e->adjvex;/* 求各顶点事件最晚发生时间ltv */if (ltv[k] - e->weight < ltv[gettop])ltv[gettop] = ltv[k] - e->weight;}}/* 求ete,lte和关键活动 */for (j = 0; j < GL->numVertexes; j++){for (e = GL->adjList[j].firstedge; e; e = e->next){k = e->adjvex;/* 活动最早发生时间 */ete = etv[j];/* 活动最迟发生时间 */lte = ltv[k] - e->weight;/* 两者相等即在关键路径上 */if (ete == lte)printf("<v%d,v%d> length: %d , ",GL->adjList[j].data, GL->adjList[k].data, e->weight);}}}
- 程序开始执行。第5行,声明了ete和lte两个活动最早最晚发生时间变量。
- 第6行,调用求拓扑序列的函数。执行完毕后,全局变量数组etv和栈stack的值如图7-9-6所示,top2=10。也就是说,对于每个事件的最早发生时间,我们已经计算出来了。

- 第7~9行为初始化全局变量ltv数组,因为etv[9]=27,所以数组ltv当前的值为:{27,27,27,27,27,27,27,27,27,27}
- 第10~19行为计算ltv的循环。第12行,先将stack2的栈头出栈,由后进先出得到gettop=9。根据邻接表中,v 9 没有弧表,所以第13~18行循环体未执行。
- 再次来到第12行,gettop=8,在第13~18行的循环中,v8 的弧表只有一条
,第15行得到k=9,因为ltv[9]-3<ltv[8],所以ltv[8]=ltv[9]-3=24,如图7-9-7所示。

- 再次循环,当gettop=7、5、6时,同理可算出ltv相对应的值为19、13、25,此时ltv值为:{27,27,27,27,27,13,25,19,24,27}
- 当gettop=4时,由邻接表可得到v 4 有两条弧
、 ,通过第13~18行的循环,可以得到ltv[4]=min(ltv[7]-4,ltv[6]-9)=min(19-4,25-9)=15,如图7-9-8所示。

此时你应该发现,我们在计算ltv时,其实是把拓扑序列倒过来进行的。
因此我们可以得出计算顶点vk即求ltv[k]的最晚发生时间的公式是:
其中S[K]表示所有从顶点v k 出发的弧的集合。比如图7-9-8的S[4]就是
就这样,当程序执行到第20行时,相关变量的值如图7-9-9所示,比如etv[1]=3而ltv[1]=7,表示的意思就是如果时间单位是天的话,哪怕v 1 这个事件在第7天才开始,也可以保证整个工程的按期完成,你可以提前v1 事件开始时间,但你最早也只能在第3天开始。跟我们前面举的例子,是先完成作业再玩还是先玩最后完成作业一个道理。
- 第20~31行是来求另两个变量活动最早开始时间ete和活动最晚开始时间lte,并对相同下标的它们做比较。两重循环嵌套是对邻接表的顶点和每个顶点的弧表遍历。
- 当j=0时,从v 0 点开始,有
和 两条弧。当k=2时, ete=etv[j]=etv[0]=0。lte=ltv[k]-e->weight=ltv[2]-len =4-4=0,此时ete=lte,表示弧 是关键活动,因此打印。当k=1时,ete=etv[j]=etv[0]=0。lte=ltv[k]-e->weight=ltv[1]-len =7-3=4,此时ete≠lte,因此 并不是关键活动,如图7-9-10所示。

这里需要解释一下,ete本来是表示活动
而lte表示的是活动
所以最终,其实就是判断ete与lte是否相等,相等意味着活动没有任何空闲,是关键活动,否则就不是。10.j=1一直到j=9为止,做法是完全相同的,关键路径打印结果为“
分析整个求关键路径的算法,第6行是拓扑排序,时间复杂度为O(n+e),第8~9行时间复杂度为O(n),第10~19行时间复杂度为 O(n+e),第20~31行时间复杂也为O(n+e),根据我们对时间复杂度的定义,所有的常数系数可以忽略,所以最终求关键路径算法的时间复杂度依然是O(n+e)。
实践证明,通过这样的算法对于工程的前期工期估算和中期的计划调整都有很大的帮助。不过注意,本例是唯一一条关键路径,这并不等于不存在多条关键路径的有向无环图。如果是多条关键路径,则单是提高一条关键路径上的关键活动的速度并不能导致整个工程缩短工期,而必须提高同时在几条关键路径上的活动的速度。这就像仅仅是有事业的成功,而没有健康的身体以及快乐的生活,是根本谈不上幸福的人生一 样,三者缺一不可。
