Text preview for : Double.mesa_Oct77.pdf part of xerox Double.mesa Oct77 xerox mesa 3.0_1977 listing Double.mesa_Oct77.pdf
Back to : Double.mesa_Oct77.pdf | Home
Double.mesa 25-0CT-77 15:01:02 Page 1
-- Double.Mesa Edited by Sandman on August 11. 1977 2:59 PM
DIRECTORY
DoubleDefs: FROM "doubledefs".
InlineDefs: FROM "inlinedefs".
StringDefs: FROM "StringDefs";
DEFINITIONS FROM InlineDefs. DoubleDefs;
Double: PROGRAM IMPORTS StrlngDefs EXPORTS DoubleDefs =
PUBLIC BEGIN
DDivide: PROCEDURE [num. den: LongCARDINAL)
RETURNS [quotient. remainder: LongCARDINAL)