|
Server : Apache System : Linux cloud.heroica.com.br 4.18.0-553.36.1.el8_10.x86_64 #1 SMP Wed Jan 22 03:07:54 EST 2025 x86_64 User : farolpborg ( 1053) PHP Version : 7.4.33 Disable Function : exec,passthru,shell_exec,system Directory : /usr/share/graphviz/gvpr/ |
Upload File : |
/* Remove peninsulas - chains hanging off the main graph */
BEGIN {
edge_t e;
node_t v, n;
}
N [degree == 1] {
n = $;
while (n.degree == 1) {
e = fstedge (n);
if (e.head == n) v = e.tail;
else v = e.head;
delete($G,n);
n = v;
}
}