- Visual C++源码
- Visual Basic源码
- C++ Builder源码
- Java源码
- Delphi源码
- C/C++源码
- PHP源码
- Perl源码
- Python源码
- Asm源码
- Pascal源码
- Borland C++源码
- Others源码
- SQL源码
- VBScript源码
- JavaScript源码
- ASP/ASPX源码
- C#源码
- Flash/ActionScript源码
- matlab源码
- PowerBuilder源码
- LabView源码
- Flex源码
- MathCAD源码
- VBA源码
- IDL源码
- Lisp/Scheme源码
- VHDL源码
- Objective-C源码
- Fortran源码
- tcl/tk源码
- QT源码
_bellman_ford.c
资源名称:leda.tar.gz [点击查看]
上传用户:gzelex
上传日期:2007-01-07
资源大小:707k
文件大小:2k
源码类别:
数值算法/人工智能
开发平台:
MultiPlatform
- /*******************************************************************************
- +
- + LEDA-R 3.2.3
- +
- + _bellman_ford.c
- +
- + Copyright (c) 1995 by Max-Planck-Institut fuer Informatik
- + Im Stadtwald, 66123 Saarbruecken, Germany
- + All rights reserved.
- +
- *******************************************************************************/
- /*******************************************************************************
- * *
- * BELLMAN FORD *
- * *
- *******************************************************************************/
- #include <LEDA/graph_alg.h>
- #include <LEDA/b_queue.h>
- bool BELLMAN_FORD(const graph& G, node s, const edge_array<num_type>& cost,
- node_array<num_type>& dist,
- node_array<edge>& pred )
- /* single source shortest paths from s using a queue (breadth first search)
- computes for all nodes v:
- a) dist[v] = cost of shortest path from s to v
- b) pred[v] = predecessor edge of v in shortest paths tree
- */
- {
- node_array<int> count(G,0);
- int n = G.number_of_nodes();
- node_list Q;
- node u,v;
- edge e;
- forall_nodes(v,G)
- { pred[v] = 0;
- dist[v] = max_num;
- }
- dist[s] = 0;
- Q.append(s);
- while(! Q.empty() )
- { u = Q.pop();
- if (++count[u] > n) return false; // negative cycle
- num_type du = dist[u];
- forall_adj_edges(e,u)
- { v = target(e);
- num_type c = du + cost[e];
- if (c < dist[v])
- { dist[v] = c;
- pred[v] = e;
- if (!Q.member(v)) Q.append(v);
- }
- }
- }
- return true;
- }