--# -path=.:compiled:prelude

concrete TramSpa of Tram = TramI with 
  (Multimodal = MultimodalSpa), 
  (Symbol = SymbolSpa) ;