easyread|
begin
integer b;

   open(10);
   open(20);

   b := inbasicsymbol(20);
   outbasicsymbol(10, b);
   write(10, format([sndddc_]), b);

   b := inbasicsymbol(20);
   outbasicsymbol(10, b);
   write(10, format([sndddc_]), b);

   b := inbasicsymbol(20);
   outbasicsymbol(10, b);
   write(10, format([sndddc_]), b);

   b := inbasicsymbol(20);
   outbasicsymbol(10, b);
   write(10, format([sndddc_]), b);

   b := inbasicsymbol(20);
   outbasicsymbol(10, b);
   write(10, format([sndddc_]), b);

   b := inbasicsymbol(20);
   outbasicsymbol(10, b);
   write(10, format([sndddc_]), b);

   b := inbasicsymbol(20);
   outbasicsymbol(10, b);
   write(10, format([sndddc_]), b);

   b := inbasicsymbol(20);
   outbasicsymbol(10, b);
   write(10, format([sndddc_]), b);

   b := inbasicsymbol(20);
   outbasicsymbol(10, b);
   write(10, format([sndddc_]), b);

   b := inbasicsymbol(20);
   outbasicsymbol(10, b);
   write(10, format([sndddc_]), b);

   b := inbasicsymbol(20);
   outbasicsymbol(10, b);
   write(10, format([sndddc_]), b);

   b := inbasicsymbol(20);
   outbasicsymbol(10, b);
   write(10, format([sndddc_]), b);

   b := inbasicsymbol(20);
   outbasicsymbol(10, b);
   write(10, format([sndddc_]), b);

   b := inbasicsymbol(20);
   outbasicsymbol(10, b);
   write(10, format([sndddc_]), b);

   b := inbasicsymbol(20);
   outbasicsymbol(10, b);
   write(10, format([sndddc_]), b);

   b := inbasicsymbol(20);
   outbasicsymbol(10, b);
   write(10, format([sndddc_]), b);

   b := inbasicsymbol(20);
   outbasicsymbol(10, b);
   write(10, format([sndddc_]), b);

   b := inbasicsymbol(20);
   outbasicsymbol(10, b);
   write(10, format([sndddc_]), b);

   close(20);
   close(10);
end
|+1903,
-1904;+1905:
|