图的遍历程序——C写的

doctor_sea

图的遍历程序——C写的
1 q$ B( J7 U7 }$ [用于配网潮流计算的

cqtzj

学习了.谢谢
& j" r3 l2 h: @, F+ M) m+ k/*全局变量：访问标志数组*/
4 }, _: p) _$ X5 I! _4 k4 vint visited[M];
1 C5 j& ~" D6 M' V( i3 M; K- j/*访问顶点*/
void visitvex(Graph *g,int vex)
{
! Y% Z2 w: w# `  S' wprintf("%d ",g->V[vex]);
}
! u& L5 F, c0 d3 y% v8 N
2 U+ k. l" ^. H. N/*获取第一个未被访问的邻接节点*/
& X: `4 `# c4 ^! S; {int firstadjvex(Graph *g,int vex)
{
int w,i;
3 L  Q+ r% }7 [6 s& m  r. Q& Nfor(i=1;i<=g->vexnum;i++)
  {
   if(g->R[vex][i]==1&&visited[i]==0)
    {
( {- P( v4 ]( z7 u9 e      w=i;
  c4 j( u) c! ~3 `& Y2 M      break;
6 i& O( R- q; x- u5 V    }
   else
    {
      w=0;
% W9 _) f  o( F% i8 @* r# y: \% V    }
* Y+ r6 M4 B  F; h6 Z2 q3 R  }
  return w;
/ Y: O" i2 m! E% A3 P. X) M}
/*获取下一个未被访问的邻接节点(深度遍历)*/
int nextadjvex(Graph *g,int vex,int w)
) ?; k- ^1 [% w{
9 F5 z$ B" D' z: o1 y7 O  int t;
. z9 k5 M3 v) O/ \0 L  p  t=firstadjvex(g,w);
  return t;
}
/*深度递归遍历*/
  N- `1 q" r/ ~) W& @  void dfs(Graph *g,int vex)
   {
3 i) q* r( u5 H8 b    int w;
) ^# y( w2 R) b# |: z( H: {    visited[vex]=1;
    visitvex(g,vex);
    for(w=firstadjvex(g,vex);w>0;w=nextadjvex(g,vex,w))
1 O+ k8 j# s' Z! }9 g$ _1 j      if(!visited[w])
       {
, l! z# }+ r% ]" mdfs(g,w);
       }
   }

   void dfstraverse(Graph *g)
   {
     int i;
5 e3 I7 Y; h  w) h8 h     for(i=1;i<=g->vexnum;i++)
8 q5 j( t$ e1 _# S( p+ B       visited[i]=0;
: L8 ]- O& _. V7 o# `7 `     for(i=1;i<=g->vexnum;i++)
       if(!visited[i])
  {dfs(g,i);}
6 [/ _% [, A6 T8 C- z   }

jimmy0415

谢谢楼主, 我想问下您对怎么学习电力系统编程有什么意见吗? 这方面的资料好像很少