--# -path=.:compiled:prelude

concrete TramNor of Tram = TramI with 
  (Multimodal = MultimodalNor), 
  (Symbol = SymbolNor) ;