| Server IP : 184.154.167.98 / Your IP : 18.191.205.149 Web Server : Apache System : Linux pink.dnsnetservice.com 4.18.0-553.22.1.lve.1.el8.x86_64 #1 SMP Tue Oct 8 15:52:54 UTC 2024 x86_64 User : puertode ( 1767) PHP Version : 8.2.26 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : ON | Sudo : ON | Pkexec : ON Directory : /usr/share/graphviz/gvpr/ |
Upload File : |
/* create a copy of the input graph with no multiedges */
BEG_G {
graph_t g = graph ("merge", "S");
}
E {
int wt;
node_t h = node(g,$.head.name);
node_t t = node(g,$.tail.name);
edge_t e = isEdge(t,h,"");
wt = $.weight;
if (wt <= 0) wt = 1;
if (e) {
e.weight = e.weight + wt;
}
else if (h != t) {
e = edge(t,h,"");
e.weight = wt;
}
}
END_G {
fwriteG(g,1);
}