Directory of image this file is from
This file as a plain text file
73-10-29 USING FORTRAN PROGRAMS MOST OF THE APPLICATIONS PROGRAMS ARE WRITTEN IN FORTRAN IV. THE FOLLOWING IS AN ITRODUCTION TO RUNNING THESE PROGRAMS FORTRAN PROGRAMS CAN APPEAR IN MANY DIFFERENT FORMS: 1)THE AUTHOR WRITES A SOURCE PROGRAM<KALL-KOD>.THIS IS THE ONLY MATERIAL THAT IS READABLE TO A HUMAN BEING BUT IT IS NEVER USED WHEN RUNNING THE PROGRAMS 2)A PROGRAM CALLED A COMPILER TRANSLATES THE SOURCE CODE TO A BINARY YOU WILL NEVER MEET THE COMPILER BUT YOU MIGHT MEET THE BINARY 3)A PROGRAM CALLED LOAD PICKS UPP THE BINARIES AND BUILDS THE FINAL PROGRAM WHICH THEN IS CALLED A LOADER IMAGE FILE 4)WHEN THE LODER IMAGE FILE IS OPERATING IN THE MACHINE A PROGRAM CALLED FRTS <FORTRAN RUN TIME SYSTEM>SUPERVICES THE OPERATION YOU ALSO NEED TO KNOW A BIT ABOUT THE SYNTAX USED WITH TWO RUTINES IN THE SYSTEM: A) THE MONITOR<OPERATIV SYSTEM> THE MONITOR SUPERVICES WHAT GOES ON IN THE MACHINE.YOU ASK IT TO BRING YOUR PROGRAM INTO CORE BY ,AFTER THE MONITOR . TYPING R NAME OR RUN DEVICE NAME THAT IS ALL YOU NEED TO KNOW ABOUT THE MONITOR B) THE COMMAND DECODER THE COMMAND DECODER ACCEPTS NAMES OF PROGRAMS AND FILES TOGETHER WITH SOME EXTRA INFORMATION TO BE PASSED TO THE PROGRAMS E.G. TELLING A FORTRAN PROGRAM THAT FILE UNIT NUMBER 6 IN THE PROGRAM IS THE FILE ABC.DA ON DTA1 WE TYPE DTA1:ABC.DA/6 FOR THE SYNTAX OF THE COMMAND DECODER SEE APPENDIX A ERROR CORRECTIONS: IN ALL THE SYSTEM PROGRAMS YOU WILL MEET THE FOLLOWING THREE CHARACTERS TYPED FROM THE KEYBOARD HAVE THE SAME MEANING: 1)RUBOUT TAKES AWAY THE LAST CHARACTER TYPED CAN BE REPEATED FOR MULTIPLE CHARACTERS 2)CONTROL U TAKES AWAY THE PRESENT LINE 3)CONTROL C ABORTS THE PRESENT PROGRAM AND CALLS THE MONITOR ALL LINES MUST BE TERMINATED BY CARRIGE RETURN<CR> THE ONE EXEPTION IS THE ALTMODE TERMINATION TO THE COMAND DECODER STARTING A FORTRAN PROGRAM: 1)IF THE PROGRAM IS IN THE FORM OF BINARIES: .R LOAD *TEMP<DEL1,DEL2,DEL3,DTA1:TWOCOM *TEST.DA/6 *$ A)CALL LOAD B)SPECIFY THE BINARIES TO BE USED<THE EXAMPLE IS THE LESQ PROGRAM SPECIFY ALSO AN OUTPUT FILE TO BE USED FOR A RESTART SAVES A LOT OF TIME C)AFTER THE BINARIES HAVE BEEN SPECIFIED SPECIFY ANY PROGRAM FILE REQUIRED NOTE THAN AN INPUT FILE SPECIFIED AS ABOVE BUT AN OUTPUT FILE AS *ABC.XX</7 DATA FILES IN THE FORTRAN SYSTEM SHOULD HAVE EXTENSION .DA D)TERMINATE INPUT WITH ALTMODE EXECUTION STARTS 2)IF THE PROGRAM IS AS A LOADER IMAGE . R FRTS *TEMP THE IMAGE ABOVE *TEST.DA/6 *ABC.DA</7 *$ START
INPUT INPUT TO A FORTRAN PROGRAM: 1)IN ALL INPUT YOU CAN USE RUBOUT AND CONTROL-U 2)NUMERIC INPUT FOLLOWS THE FOLLOWING RULES: A)INPUT IS NOT FORMATED NUMERIC FIELDS CAN BE SEPERATED BY , BUT A NUMERIC FIELD MUST NOT EXCEED THAT IN THE FORMAT STATEMENT SEE PROGRAM DESCRIPTION SPACES ARE ALWAYS INTERPRETED AS 0 IE IN A FIELD WITH TWO GROUPS OFF 3 CHAR. EACH THE FOLLOWING WOULD APPLY INPUT SEEN AS AAABBB 1 1 0 1 1 10 1 1,1 1 1 10,10 10 10 1000,100 100 0 NOTE B) INPUT CAN BE IN THE FORMS: WITHOUT DECIMAL POINT WITH DECIMAL POINT IN E FORMAT EG 1E10 IS 100 -1E-2 IS-0.001 C)ERRORS NOTE IMPORTANT IF AN UN-PERMITTED CHARACTER IS DETECTED IN NUMERIC INPUT I.E. ANYTHING BUT THE FOLLOWING: 0-9 , . - + E IN PROPER POSITION THE PROGRAM ABORTS AND ALL DATA ALREADY INPUT IS LOST FOR THIS REASON OUTLAY PROVIDES FOR READING THE DATA FROM AN EDITOR CREATED FILE