| 1 | #include "test_tools.h" | 
|---|
| 2 | #include <hugo/smart_graph.h> | 
|---|
| 3 | #include <hugo/dijkstra.h> | 
|---|
| 4 | #include<hugo/skeletons/graph.h> | 
|---|
| 5 | #include<hugo/skeletons/maps.h> | 
|---|
| 6 | using namespace hugo; | 
|---|
| 7 |  | 
|---|
| 8 | const int PET_SIZE =5; | 
|---|
| 9 |  | 
|---|
| 10 |  | 
|---|
| 11 | void check_Dijkstra_BinHeap_Compile()  | 
|---|
| 12 | { | 
|---|
| 13 |   typedef int VType; | 
|---|
| 14 |   typedef skeleton::StaticGraph Graph; | 
|---|
| 15 |  | 
|---|
| 16 |   typedef Graph::Edge Edge; | 
|---|
| 17 |   typedef Graph::Node Node; | 
|---|
| 18 |   typedef Graph::EdgeIt EdgeIt; | 
|---|
| 19 |   typedef Graph::NodeIt NodeIt; | 
|---|
| 20 |   typedef skeleton::ReadMap<Edge,VType> LengthMap; | 
|---|
| 21 |   | 
|---|
| 22 |   typedef Dijkstra<Graph, LengthMap> DType; | 
|---|
| 23 |    | 
|---|
| 24 |   Graph G; | 
|---|
| 25 |   Node n; | 
|---|
| 26 |   Edge e; | 
|---|
| 27 |   VType l; | 
|---|
| 28 |   bool b; | 
|---|
| 29 |   DType::DistMap d(G); | 
|---|
| 30 |   DType::PredMap p(G); | 
|---|
| 31 |   DType::PredNodeMap pn(G); | 
|---|
| 32 |   LengthMap cap; | 
|---|
| 33 |  | 
|---|
| 34 |   DType dijkstra_test(G,cap); | 
|---|
| 35 |  | 
|---|
| 36 |   dijkstra_test.run(n); | 
|---|
| 37 |  | 
|---|
| 38 |   l  = dijkstra_test.dist(n); | 
|---|
| 39 |   e  = dijkstra_test.pred(n); | 
|---|
| 40 |   n  = dijkstra_test.predNode(n); | 
|---|
| 41 |   d  = dijkstra_test.distMap(); | 
|---|
| 42 |   p  = dijkstra_test.predMap(); | 
|---|
| 43 |   pn = dijkstra_test.predNodeMap(); | 
|---|
| 44 |   b  = dijkstra_test.reached(n); | 
|---|
| 45 |  | 
|---|
| 46 | } | 
|---|
| 47 |  | 
|---|
| 48 | int main() | 
|---|
| 49 | { | 
|---|
| 50 |      | 
|---|
| 51 |   typedef SmartGraph Graph; | 
|---|
| 52 |  | 
|---|
| 53 |   typedef Graph::Edge Edge; | 
|---|
| 54 |   typedef Graph::Node Node; | 
|---|
| 55 |   typedef Graph::EdgeIt EdgeIt; | 
|---|
| 56 |   typedef Graph::NodeIt NodeIt; | 
|---|
| 57 |   typedef Graph::EdgeMap<int> LengthMap; | 
|---|
| 58 |  | 
|---|
| 59 |   Graph G; | 
|---|
| 60 |   Node s, t; | 
|---|
| 61 |   LengthMap cap(G); | 
|---|
| 62 |   PetStruct<Graph> ps = addPetersen(G,PET_SIZE); | 
|---|
| 63 |     | 
|---|
| 64 |   for(int i=0;i<PET_SIZE;i++) { | 
|---|
| 65 |     cap[ps.outcir[i]]=4; | 
|---|
| 66 |     cap[ps.incir[i]]=1; | 
|---|
| 67 |     cap[ps.chords[i]]=10; | 
|---|
| 68 |   } | 
|---|
| 69 |   s=ps.outer[0]; | 
|---|
| 70 |   t=ps.inner[1]; | 
|---|
| 71 |    | 
|---|
| 72 |   Dijkstra<Graph, LengthMap>  | 
|---|
| 73 |         dijkstra_test(G, cap); | 
|---|
| 74 |   dijkstra_test.run(s); | 
|---|
| 75 |    | 
|---|
| 76 |   check(dijkstra_test.dist(t)==13,"Dijkstra found a wrong path."); | 
|---|
| 77 |  | 
|---|
| 78 |  | 
|---|
| 79 |   for(EdgeIt e(G); e!=INVALID; ++e) { | 
|---|
| 80 |     Node u=G.tail(e); | 
|---|
| 81 |     Node v=G.head(e); | 
|---|
| 82 |     check( !dijkstra_test.reached(u) || | 
|---|
| 83 |            (dijkstra_test.dist(v) - dijkstra_test.dist(u) <= cap[e]), | 
|---|
| 84 |            "dist(head)-dist(tail)- edge_length= "  | 
|---|
| 85 |            << dijkstra_test.dist(v) - dijkstra_test.dist(u)  | 
|---|
| 86 |            - cap[e]); | 
|---|
| 87 |   } | 
|---|
| 88 |  | 
|---|
| 89 |   ///\bug This works only for integer lengths | 
|---|
| 90 |   for(NodeIt v(G); v!=INVALID; ++v){ | 
|---|
| 91 |     check(dijkstra_test.reached(v),"Each node should be reached."); | 
|---|
| 92 |     if ( dijkstra_test.pred(v)!=INVALID ) { | 
|---|
| 93 |       Edge e=dijkstra_test.pred(v); | 
|---|
| 94 |       Node u=G.tail(e); | 
|---|
| 95 |       check(u==dijkstra_test.predNode(v),"Wrong tree."); | 
|---|
| 96 |       check(dijkstra_test.dist(v) - dijkstra_test.dist(u) == cap[e], | 
|---|
| 97 |             "Wrong distance! Difference: "  | 
|---|
| 98 |             << std::abs(dijkstra_test.dist(v) - dijkstra_test.dist(u)  | 
|---|
| 99 |                             - cap[e])); | 
|---|
| 100 |     } | 
|---|
| 101 |   } | 
|---|
| 102 | } | 
|---|
| 103 |  | 
|---|