begin
   comment LIBRARY 99;
   integer
     I,
     J;
   I ≔ 0;
   J ≔ - 2;
   OUTREAL(99, I⭡J)
end