--# -path=.:present:prelude

concrete DialogueSwe of Dialogue = DialogueI with 
  (Lang = LangSwe) ;