begin
   comment LIBRARY 1;
   integer
     I;
   real
     X;
   X ≔ 0·0;
   I ≔ - 2;
   OUTREAL(99, X⭡I)
end