begin
   comment 'LIBRARY' 1;
   real
     X;
   X ≔ ⏨-1000;
   OUTREAL(99, X);
end