--# -path=.:present

concrete AttemptoSwe of Attempto = NumeralSwe, SymbolsC ** AttemptoI with
  (Syntax = SyntaxSwe),
  (Symbolic = SymbolicSwe),
  (LexAttempto = LexAttemptoSwe) ;