begin
   comment LIBRARY5;
   integerprocedure NONE;
      NONE ≔ 1;
   NONE;
   SIN(1·0);
   ABS(3);
   LN(·2);
   EXP(4);
   ENTIER(NONE);
   SIGN(SQRT(8));
   OUTREAL(99, NONE)
end