Code: Select all
@adj=();
for($i = 0; $i < 5; $i++) {
@adj = (@adj, sequence(0,5)-$i);
}
$g = new graph::Graph(N_NODES=>5,ADJACENCY=>\@adj);
$m = matroid::matroid_from_graph($g);
Code: Select all
@adj=();
for($i = 0; $i < 5; $i++) {
@adj = (@adj, sequence(0,5)-$i);
}
$g = new graph::Graph(N_NODES=>5,ADJACENCY=>\@adj);
$m = matroid::matroid_from_graph($g);
Until the next release is available, if you have a source distribution, you can use the attached patch to correct the bug. Please executeThere is in deed a bug in the matroid_from_graph client. Thanks very much for pointing that out. It will be fixed for the next release at the latest.
Code: Select all
patch -p2 </path/to/matroid_from_graph.patch
make