gentran.red 401 B

123456789101112131415161718
  1. module gentran; % Header module for gentran package.
  2. % Author: Barbara L. Gates.
  3. % Modifications by: Michael C. Dewar.
  4. create!-package('(gentran utils intrfc templt pre gparser redlsp segmnt
  5. lspfor lsprat lspc lsppasc goutput),
  6. '(contrib gentran));
  7. symbolic smacro procedure smallfloatp u;
  8. % Returns true if <structure> is a small rounded.
  9. atom u;
  10. endmodule;
  11. end;