$use Access StdIO;

$func Main = e;

Main =
  {
    <PrintLn <L 0 'ab'>>, <PrintLn <L 1 'ab'>>, <PrintLn <L 2 'ab'>>;
    <PrintLn 'Branch 1 failed.'>, <PrintLn <L 1 ''>>;
    <PrintLn 'Branch 2 failed.'>, <PrintLn <L 0>>;
    <PrintLn 'Branch 3 failed.'>;
  };