Page 28 - Compact Numerical Methods For Computers
P. 28

18                Compact numerical methods for computers

                           The use of an include file which is not a complete procedure or function is not
                           permitted by Turbo Pascal 5.0.
                               2. The same program code (startup.pas) allows an output file to be specified so
                               that all output which appears on the console screen is copied to a file. The name
                               for this file is stored in the global variable confname, and the file is referred to in
                               programs by the global text variable confile. Output is saved by the crude but
                               effective means of duplicating every write(. . .) and writeln(. . .) statement with
                               equivalent write(confile,  . . .) and writeln(confile, . . .) statements.
                               3. To make the algorithms less cluttered, these write and writeln statements to
                               confile do not appear in the listings. They are present in the files on diskette.
                               4. To discourage unauthorised copying of the diskette files, all commentary and
                               documentation of the algorithm codes has been deleted.
                               5. To allow for execution of the programs from operating system commands (at
                               least in MS-DOS), compiler directives have been included at the start of all
                               driver programs. Thus, if a compiled form of code dr0102.pas exists as
                               dr0102.com, and a file dr0102x contains text equivalent to the keyboard input
                               needed to correctly run this program, the command


                                                         dr0102 < dr0102x
                               will execute the program for the given data.
   23   24   25   26   27   28   29   30   31   32   33