void ShortestPath_1 ( Mgraph G,int v0,PathMatrix *p, ShortPathTable *D )
{ /*用Dijkstra 算法求有向网G 的v0 顶点到其余顶点v 的最短路径P[v]及其路径长度D[v]*/
/*若P[v][w]为TRUE，则w 是从v0 到v 当前求得最短路径上的顶点*/
/*final[v] 为TRUE 当且仅当v∈S, ，即已经求得从v0 到v 的最短路径*/
/*常量INFINITY 为边上权值可能的最大值*/
for ( v=0; v<G.vexnum; ++v )
{
fianl[v]=FALSE;
D[v]=G.edges[v0][v];
for ( w=0; w<G.vexnum; ++w ) P[v][w]=FALSE; /*设空路径*/
if ( D[v]<INFINITY ) {P[v][v0]=TRUE; P[v][w]=TRUE;}
}
D[v0]=0;
final[v0]=TRUE； /*初始化，v0 顶点属于S 集*/
/*开始主循环，每次求得v0 到某个v 顶点的最短路径，并加v 到集*/
for ( i=1; i<G.vexnum; ++i ) /*其余G.vexnum-1 个顶点*/
{
min=INFINITY; /*min 为当前所知离v0 顶点的最近距离*/
for ( w=0; w<G.vexnum; ++w )
if ( !final[w] ) /*w 顶点在V－S 中*/
if ( D[w]<min ) {v=w; min=D[w];}
final[v]=TRUE /*离v0 顶点最近的v 加入S 集合*/
for ( w=0; w>G.vexnum; ++w ) /*更新当前最短路径*/
if ( !final[w]&& ( min+G.edges[v][w]<D[w] ) ) /*修改D[w]和P[w],w∈V-S*/
{
D[w]=min+G.edges[v][w];
P[w]=P[v];
P[w][v]=TRUE; /*P[w]=P[v]+P[w]*/
}
}
}/*ShortestPath._1*/