@=~
~p typesetter = texinfo
~p maximum_input_line_length = infinity

~O~<streets.TopologyView.specs~>~{
$/Visual/VisPattern.gnrc+instance=TopologyView:inst
~}
~O~<streets.TopologyView.sl~>~{
~<lido~>
~}

~$~<lido~>+=~{

SYMBOL TopologyDefinition INHERITS VP_TextTerminal
COMPUTE
  THIS.VP_OptText=
"An dieser Stelle wuerde die Topologie dieses Tasks definiert.\n\
Die verwendete Darstellung ist jedoch sehr untypisch fuer\n\
visuelle Sprachen und wurde daher nicht implementiert";
END;

~}