$use StdIO;

$func Main = e;
Main, {
  'abc' : e1 e2 e3, 'a' : e1 e4 e5,
    <PrintLn e1 '|' e2 '|' e3 '|' e4 '|' e5>, $fail;;
};