Functor

NodeLinkGraphics ("/home/annan/cvscode/isl/src/MozartMessageSimulator/NodeLinkGraphics/NodeLinkGraphics.oz")

Import

• Utils(min:Min getDistance:GetDistance) at "../Utils.ozf"
• Graphics(nodeLinkFrame:NodeLinkFrame gNode:GNode gLink:GLink)

Export

• <C:NodeLinkGraphics>

Define

class NodeLinkGraphics
   feat canvas Nodes Links Size

• init(TopLevel Frame height:H width:W)
  
• step(_ LinkState)
  
• createNode(NodeId GraphSpec)
  
• removeNode(NodeId)
  
• createLink(LinkId FromNodeId ToNodeId NofSlots)
  
• removeLink(L)
  
• calcNofSlots(FromNodeId ToNodeId N)
  
• getColorOfNode(NodeId $)
  
• updateNodeText(NodeId TextList)
  

end

End