$use StdIO;

$func Main = e;
Main =
  {
    /*A : B*/ = <PrintLn OK>;
    { A B C; } :: e1, <PrintLn e1>;
//    = ;
  };