急求一个Fleury

xinzhiyong

急求一个Fleury算法，求高手来个程序

lyyy

网上有一些程序代码。

小旋风假

没有看懂………………

夕夕多

#include <stdio.h>
#include <string.h>
struct stack
4 o  W1 j  c  k3 j  Q7 d9 C{int top , node[210];} f; //顶点的堆栈
int a[201][201]; //图的邻接矩阵
4 w1 ^/ S. |( f% a0 ?int n;
& z) D- @1 T7 @* K- b3 Y3 uvoid dfs(int x)       //图的深度优先遍历
{int i;
. |6 O3 r' G- Q" l  Nf.top ++; f.node[f.top] = x;
  w6 d5 o' T& N2 \5 {) _" gfor (i = 1; i <= n; i ++)
/ b( m7 k" M( [4 g5 `if (a[i][x] > 0)
{ a[i][x] = 0; a[x][i] = 0;     //删除此边
dfs(i);
2 O- _0 v0 _7 Y' ^break; }
7 x3 U0 ]4 W( [5 F/ R" o/ T) o}
void Euler(int x)     //欧拉路算法
- i1 w1 U& I5 i* a" v* z4 d{int i , b;
f.top = 0; f.node[f.top] = x;     //入栈
" S7 B5 x8 R& D' p$ ?/ ewhile (f.top >= 0)
{b = 0;
, g, R& P, B2 ]- E( ^: Y( f for (i = 1; i <= n; i ++)
if (a[f.node[f.top]][i] > 0)
{b = 1; break;}
if (b == 0)       //如果没有点可以扩展，输出并出栈
2 V1 R4 V* Q3 l3 l3 W0 y6 g7 h5 _{ printf("%d " , f.node[f.top]);
f.top --;}
else {f.top --; dfs(f.node[f.top+1]);}        //如果有，就DFS
}
}
int main()
! d5 h- O7 M1 B" Y{
int m , s , t , num , i , j , start;
1 U8 Z2 _( B4 f9 h3 s# K, a //input
) c+ M6 F" T8 Y6 O( `. v5 t) Vscanf("%d %d" , &n , &m); //n顶点数    m边数
memset(a , 0 , sizeof(a));
* w( j- b" |9 D# e  Z  z0 T for (i = 0; i < m; i ++)
, j7 j& {) R' A+ M9 z{printf("innput s,t");
. h4 w% a* A& I" A1 Y scanf("%d %d" , &s , &t);
& h/ ~6 |; {+ m4 e( Z$ ?0 z a[s][t] = 1; a[t][s] = 1;
$ O/ V+ Z/ p4 T3 ?}
4 U# L" w/ |: ~% i //判断是否存在欧拉回路
; f7 Z4 @4 \* `+ U/ l6 hs = 0; start = 1;
for (i = 1; i <= n; i ++)
{num = 0;
for (j = 1; j <= n; j ++)
& l( T% M& h* s1 k5 b# F, n$ i num += a[i][j];
8 Y8 |* y- ]1 v/ H, D& ? if (num % 2 == 1)
{start = i; s ++;}
}
( g! S3 I6 w) c6 v" |* Iif ((s == 0) || (s == 2))
! @8 l# o4 a& F) u' ~6 g; ^1 L% ZEuler(start);
& _/ b6 j# @/ S5 {2 B, U; R( \ else printf("No Euler path\n");
$ C8 j3 }# ^8 F+ g4 i/ Xgetchar(); getchar();
, @1 c5 Q, _: T+ P) Preturn 0; }

parkshinyang

诶  有么有  matlab版的

屋顶风影

没有matlab版本的吗
  B7 ^7 F/ j5 H' L# \