- Added special weights in dot output for M_0 originating terms.

This commit is contained in:
ccremers 2006-07-02 13:38:20 +00:00
parent 4ec62ddad9
commit fc8b0de971

View File

@ -998,7 +998,8 @@ drawBinding (const System sys, Binding b)
{ {
return; return;
} }
if (isApplicationM0 (sys, b->run_from)) if (isApplicationM0 (sys, b->run_from) ||
sys->runs[b->run_from].role == I_M)
{ {
m0_from = true; m0_from = true;
} }
@ -1027,7 +1028,7 @@ drawBinding (const System sys, Binding b)
} }
} }
// normal from intruder (not M0) // normal from intruder, not seen before (might be M_0)
if (intr_to) if (intr_to)
{ {
// intr->intr // intr->intr
@ -1035,7 +1036,12 @@ drawBinding (const System sys, Binding b)
myarrow (b); myarrow (b);
eprintf (" [label=\""); eprintf (" [label=\"");
termPrintRemap (b->term); termPrintRemap (b->term);
eprintf ("\"]"); eprintf ("\"");
if (m0_from)
{
eprintf (",weight=\"10.0\"");
}
eprintf ("]");
eprintf (";\n"); eprintf (";\n");
} }
else else
@ -1043,6 +1049,10 @@ drawBinding (const System sys, Binding b)
// intr->regular // intr->regular
eprintf ("\t"); eprintf ("\t");
myarrow (b); myarrow (b);
if (m0_from)
{
eprintf ("[weight=\"0.5\"]");
}
eprintf (";\n"); eprintf (";\n");
} }
} }