FORTRAN-SOPROGRAMMING MANUAL
Manual Order Number: 9800481 A
Copyright 1978 Intel Corporation
PRINTED IN U.S.A./A151/1279/5K CP
PREFACE
Page
PREFACE GLOSSARY CHAPTER INTRODUCTION TO FORTRAN
CONTENTS
CHAPTER
FORTRAN CONCEPTS
CHAPTER PROGRAMMING GUIDELINES
ILLUSTRATIONS
APPENDIX A
FORTRAN-80STATEMENT SUMMARY
GLOSSARY
Record - A sequence of values or characters
CHAPTER INTRODUCTION TO FORTRAN
1.1 An Introductory Example
1.1.1 Comment Lines
1.1.3 Input Statements
1.1.2 Type Statement
1.1.4 Value Assignment Statement
1.1.5 Output Statements
1.1.6 Program Termination
1.2 Summary Of FORTRAN·SO Statements
1.2.1 Executable Statements
1.2.2 Nonexecutable Statements
1.2.3 Order of Statements
FEN:• • • •
2.1.2 The PROG RAM Statement
2.1.3 Statements and Lines
PROGRAM name
2.2.1 Character Set
2.2 FORTRAN Statement Elements
2.2.2 Constants and Variables
FORTRAN-80
ARITHMETICOVERFLOW ERROR MURPHYSLAW
where
PNAME AB HITS AVG
+64101 #14010
#4567Q+#AF2CH
2.2.4 Expressions and Operators
2.2.4.3 Relational Expressions
is evaluated as if it were written
10FLAG = FLAG +
IF FLAG1 .EQV. FLAG2 RETURN
2.2.5 Scope of Symbols
15/3 + 18/9 = 5 + 2 =
15/3 + 18/9 = 15/3 + 2 = 15/5 =
CALL sub arg,arg
2.3 Notational Conventions
Page
3.1Type Statements
CHAPTER DEFINING VARIABLES ARRAYS, AND MEMORY
3.1.1 REAL Type Statement
3.1.2 INTEGER Type Statement
•va,luernustueiA, Qp4
3.1.3 LOGICAL Type Statement
3.1.5 IMPLICIT Statement
3.1.4 CHARACTER Type Statement
CHARACTER * len, name ,name
v* len aryd* len
3.2 Array Definition
3.2.2 Kinds of Array Declarators
3.2.1 DIMENSION Statement
3.2.3 Properties of Arrays
3.2.4 Referencing Array Elements
ary s ,s
Dimension
3.3 Assignment Statements
Element
Declarator
TYPE OF
3.3.1 Arithmetic Assignment Statement
TYPE OF exp
RESULT
3.3.3Character Assignment Statement
3.3.2 Logical Assignment Statement
3.3.4 ASSIG N Statement
v = exp
3.3.5DATA Statement
ASSIGN stlTO name
r*c,r*c
3.4 Memory Definition
3.4.1 EQUIVALENCE Statement
DATA I,J,K/10,20,301
DATA ZEROS 110*0/1,J,K 110,20,301 &NAMES2 IOTTI
COMMON /eb! nlist ,/ eb! nlist
3.4.2COMMON Statement
3.4.3BLOCK DATA Subprograms
3.4.2.1 Common Block Memory Sequence
3.4.2.2 Named and Blank Common Blocks
3.4.4 BLOCK DATA Statement
4.1 Transferring Program Oontrol
CHAPTER 4 PROGRAM EXECUTION CONTROLS
4.1.1 Unconditional GO TO Statement
4.1.2 Computed GO TO Statement
IFexps1,s2,s3
GO TO name n, stl ,stl
4.1.3Assigned GO TO Statement
4.1.4Arithmetic IF Statement
4.1.6 IF, ELSE IF, and ELSE Blocks
4.1.5 Logical IF Statement
4.1.8ELSE IF Statement
4.1.7 Block IF Statement
4.1.10 END IF Statement
4.1.9 ELSE Statement
4.2 Loop Control Statements
4.2.1 Operation of a DO Loop
4.2.2 DO Statement
4.2.3CONTINUE Statement
4.3 Program Termination Statements
4.3.1 PAUSE Statement
4.3.2 STOP Statement
4.3.3EN 0 Statement
5.1Intrinsic and Statement Functions
CHAPTER FUNCTIONS AND SUBROUTINES
5.1.1Intrinsic Functions
A = 33 + SQRT8
5.1.3 Statement Functions
5.1.2 INTRI NSIC Statement
INTRINSIC tunc ,tunc
tunc dum ,dum ... = exp
5.1.3.1 Referencing Statement Functions
5.1.3.2 Statement Function Limitations
156.8
5.2.1 FUNCTION Statement
5.2 External Procedures
5.2.1.1 Referencing External Functions
typ FUNCTION tunc dum ,dum
5.2.1.2 FUNCTION Subprogram Limitations
5.2.2Subroutines
CA.~END
~RETURN
5.2.3 SUBROUTINE Statement
5.2.4 RETU RN Statement
5.2.6EXTERNAL Statement
5.2.5SAVE Statement
SAVE lebl ,Iebl
EXTERNAL proe ,proe
5.2.7 CALL Statement
5.3 Arguments And Common Blocks Revisited
5.3.2 Dummy And Actual Arguments
5.3.1 Common Blocks
5.3.3 Association Of Arguments
Functions And Subroutines
5.3.3.1 Agreement Of Argument Lengths
5.3.3.4 Procedures As Dummy Arguments
5.3.3.2 Variables As Dummy Arguments
5.3.3.3 Arrays As Dummy Arguments
FX, Y,
5.3.3.5Argument Association Limitations
Page
6.1Records, Files, And Units
CHAPTER INPUT/OUTPUT
6.1.1Record Properties
6.1.2 File Properties
6.1.2.2 File Name
6.1.2.1 File Existence
6.1.2.3 File Position
6.1.2.4 External And Internal Files
6.1.3 Unit Properties
6.1.2.5 File Access
6.2.1 OPEN Statement
6.2 File-HandlingStatements
6.2.1.1 Unit Specifier
6.2.1.21/0 Status Specifier
6.2.1.3 Error Specifier
6.2.1.4 File Name Specifier
6.2.1.5 File Status Specifier
6.2.1.6 Access Method Specifier
6.2.1.7 Formatting Specifier
6.2.1.8 Record Length Specifier
6.2.1.9 Blank Specifier
6.2.1.11 Opening A Connected Unit
6.2.2CLOSE Statement
6.2.2.1 Unit Specifier
CLOSE close-list
6.2.4 REWI N D Statement
6.2.3 BACKSPACE Statement
6.2.2.2 File Disposition Specifier
REWI N Darg-list
6.2.5 ENDFILE Statement
6.3 Data-Transfer 1/0 Statements
6.3.1 READ Statement
REWIND REWIND 3, IOSTAT= ERRFLG, ERR=
6.3.1.1 Control Information List
Examples
6.3.1.2 Input List
6.3.2WRITE Statement
6.3.1.3 Implied-DOList
WRITE ctl-list out-list
6.4Formatted And Unformatted Data Transfer
6.3.3 PRINT Statement
6.4.1 Unformatted Data Transfer
6.4.2 Formatted Data Transfer
6.4.2.1 Printing Formatted Records
6.4.2.2 Format Control
6.4.3FORMAT Statement
6.4.3.t Edit Descriptors
stl FORMAT flist
1 is Ff
Absolute value of exp
Edit Descriptor
Form of exp
OY1 Y2
a Z5editdesctiptor
either a sjgu ora letter indicatingthebas¢
Example
DollytSigfjl$ijitrrrg·
FS.2
6.4.4.1 List-Directed Input
6.4.4List·Directed Formatting
6.4.4.2 List-DirectedOutput
Page
CHAPTER PROGRAMMING GUIDELINES
7.1.1 Problem Definition
7.1 Program Development
7.1.2 Program Documentation
7.1.3 Refining The Problem Definition
7.1.4 Final Coding
7.2.1 Functions And Subroutines
7.2 FORTRAN Coding
7.2.2 GO TO Statement
7.2.3 Crossing Unit Lines
7.2.5 Reminders
7.3 References
X = 2217*r* *2
PI =
1972
APPENDIX A FORTRAN-80STATEMENT SUMMARY
A.1 Statement Sequence
A.2 Statement Summary
ERR = stl
FORTRAN-80Statement Summary
ERR = stl
DATA Statement Category: Nonexecutable
ELSE IF Statement Category: Executable, Block IF
EQUIVALENCE Statement
FUNCTION Statement Category: Nonexecutable
IMPLICIT Statement
OPEN Statement
fORTRAN-80Statement Summary
REWIND Statement
SUBROUTINE Statement Category: Executable
B.1 Intrinsic Function Summary
APPENDIX B INTRINSIC FUNCTIONS
FORTRAN-80
Intrinsic Functions
<ORM
CATEGORY
B.2 Notes On Intrinsic Functions
Page
C.1 Hollerith As A Data Type
APPENDIX C HOLLERITH DATA TYPE
C.2 The Hollerith Constant
C.2.1 Hollerith Constants In DATA Statements
C.3 Hollerith Format Specification
C.4 AEditing Of Hollerith Data
Hollerith Data Type
APPENDIX D EXTENSIONS TO ANSI FORTRAN
0.1 Standard Extensions To 1977 Subset
0.2Nonstandard Extensions To 1977 FORTRAN
0.4 Differences From 1966 FORTRAN
0.3 More Specific Semantics Than 1977 FORTRAN
Miscellaneous extensions Seven-dimensionalarrays
Page
APPENDIX E
ASCII CODES
Page
F.1 Processor Limitations On Language
APPENDIX F 8080/8085 PROCESSOR DEPENDENCIES
F.2 Compiler Extensions
Length
F.2.1 Lowercase Letters
F.2.3 Reentrant Procedures
F.2.2 Port Input/Output
F.2.4 Free-formLine Format
F.2.5 Interpretation of DO Statements
F.2.6 Default Data Lengths
F.2.7 Including Source Files
$0077
F.2.8 REel Specification For Sequential Files
F.2.9 Flexibility In Standard Restrictions
F.3 Unit Preconnection
INDEX
Index FREEFORM Compiler Control, F-2
Index
FORTRAN-SO
Page
NOTES
NOTES
inter
SOFTWARE PROBLEM REPORT
BUSINESS REPLY CARD
111111
Postage will be paid by Addressee
Intel Corporation Attn: Literature Department
FORTRAN·80PROGRAMMING MANUAL 9800481 A
REQUEST FOR READERSCOMMENTS
BUSINESS REPLY CARD
111111
0LIKE YOUR COMMENTS
Intel Corporation Attn: Literature Department
Page
Printed in U.S.A
inter