ISO/IEC 1539:1991
(Main)Information technology — Programming languages — FORTRAN (Available in electronic form)
Information technology — Programming languages — FORTRAN (Available in electronic form)
Technologies de l'information — Langages de programmation — FORTRAN
General Information
Relations
Standards Content (Sample)
I NTER NATIONAL
ISOIIEC
STANDARD
1539
Second edition
1991 -07-01
Information technology - Programming
languages - Fortran
Technologies de ïinformation - Langages de programmation - Fortran
Reference number
ISO/IEC 1539 : 1991 (E)
---------------------- Page: 1 ----------------------
ISO/IEC 1539 : 1991 (E)
Contents
xii
Foreword. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
1. Overview . . . 1
Scope . 1
1.1
Processor . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 1
1.2
1
1.3 Inclusions and exclusions. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
1.3.1 1
1.3.2 . 1
1.4 Conformance . . . . . . . . . . . . . . . . . . . . . . . . . 2
1.4.1 3
Notation used in this International Standard . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 3
1.5
1.5.1 Syntax rules .
3
1.5.2 Assumed syntax rules. 4
1.5.3 syntax conventions an . 5
1.5.4 Text conventions. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
5
1.6 Deleted and obsolescent features. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 5
1.6.1 Nature of deleted features . 5
1.6.2 Nature of obsolescent features . 5
6
1.7 Modules . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
1.8 Normative references. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . tJ
2. Fortran terms and concepts . 7
7,
High level syntax
2.1
0
2.2 Program unit con
2.2.1 Executable program . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 10
2.2.2 Main program . . . . . . . . . . 10
2.2.3 Procedure 10
2.2.4 Module . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 10
2.3 Execution concepts. . . . . . . . . . . . . . . . . 11
2.3.1 Executable/nonexecu ta temen t s. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . II
2.3.2 Statement order . . . . . . . . . . . . . . . . . . . , . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 11
2.3.3 The END statement 12
2.3.4 Execution sequence . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 12
d
2.4 Data concepts . . . . . . . . . . . . . . . . . . . . . . . . . 13
2.4.1 Data type . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . , . . . . . . . . . . . . . , . . . , . . . , . . 13
2.4.2 Data value . 13
2.4.3 Data entity . 13
2.4.4 Scalar . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 14
2.4.5 Array . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 15
2.4.6 Pointer. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
15
2.4.7 Storage 15
2.5 Fundamental terms. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 15
2.5.1 Name and designator . 15
2.5.2 Keyword . . . . . . . .
16
0 ISO/IEC 1991
All rights reserved. No part of this publication may be reproduced or utilized in any form or by
any means, electronic or mechanical, including photocopying and microfilm, without permission
in writing from the publisher.
ISO/IEC Copyright Office 0 Case postale 56 0 CH-121 1 Genève 20 0 Switzerland
Printed in Switzerland
ii
---------------------- Page: 2 ----------------------
ISO/IEC 1539 : 1991 (E)
16
2.5.3 Declara tion . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
16
2.5.4 Definition . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
2.5.5 Reference. . . . . . 16
16
2.5.6 . . . . . . . . . . . . . . . . . , . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
16
2.5.7 Intrinsic . . . . . . . . . . . . . . . . .
2.5.8 Operator . . 16
2.5.9 17
Sequence . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
Characters, lexical tokens, and source form . 18
3.
3.1 Processor character set . .
.... 18
3.1.1 Letters . . .
18
18
3.1.2 Digits .
18
3.1.3 Underscore . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
19
3.1.4 Special characters. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
3.1.5 Other characters . . . . . . . 19
3.2 Low-level syntax . .
19
3.2.1 Keywords . . , . . . . 19
3.2.2 . , . 19
3.2.3 . . . . . . . . , . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 20
3.2.4 Operators . . . . . . . . . 20
3.2.5 Statement labels . . . . . . . . . . . 21
3.2.6 Delimiters. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 21
3.3 Source form . . .
21
3.3.1 Free source form . 22
3.3.2 Fixed source form . . .
23
3.4 Including source text .
24
Intrinsic and derived data types . 25
4.
4.1 The concept of data type . . 25
4.1.1 Set of values . . . . . , ,. , . . 25
4.1.2 Constants .
................ 25
4.1.3 Operations. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 26
4.2 Relationship of types an f. . . . . 26
26
26
4.3.2 Nonnumeric types . . . . . . . . . . . . . . . . . . . . . . . . . 30
4.4 Derived types . 32
................. 32
4.4.2 Determination of derived types . . 35
4.4.3 Derived-type values 36
37
4.4.5 Derived-type operations and assignment . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37
4.5 Construction of array values .
37
I
Data object declarations and specifications. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39
5.
I
5.1 Type declaration statements . .
39
Type specifiers. . . . . . . . . . . . . . . . . . . . . . . 41
5.1.1 .
I
5.1.2 Attributes . . . . . . . . . . . . . , . 43
5.2 Attribute specification statements . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 48 I
5.2.1 INTENT statement . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 48
iii
---------------------- Page: 3 ----------------------
ISOAEC 1539 : 1991 (E)
............ 49
5.2.2 OPTIONAL statement . . . . . . . . . . . . . . . .
5.2.3 Accessibility statements . . . . . . . . . . 49
5.2.4 SAVE statement. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 50
5.2.5 DIMENSION statement . . 50
50
5.2.6 ALLOCATABLE statem . .
51
5.2.7 POINTER statement . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
5.2.8 TARGET statement . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 51
51
5.2.9 DATA statement. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
53
5.2.10 PARAMETER statement . . . . . . . . . . . . . . . . . . . . . .
IMPLICIT statement . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 54
5.3
........... 56
56
5.5 Storage association of data
56
.................................. 58
Use of data objects . 61
6.
62
6.1 scalars . . .
...........
6.1.1 Substrings. . . . . . . . . . . . . . . . . . . . . . . . . . . . 62
6.1.2 Structure components . . . . . . . . . . . . . . . . . . . . . . 62
Arrays . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 63
6.2
6.2.1 Whole arrays . . 63
6.2.2 Array elements and array sections . . 63
..
Dynamic association . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 67
6.3
67
6.3.1 ALLOCATE statement . . . . . . . . . . . . . . . .
NULLIFY statement . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 68
6.3.2
68
6.3.3 DEALLOCATE statement
70
7. Expressions and assignment . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
70
......................................... <...............
70
7.1.2 Intrinsic operations . . . . . . 74
75
7.1.3 Defined operations . . .
7.1.4 Data t . 75
................... 77
77
........... 79
Evaluation of operations . . . . . . . . .
7.1.7
7.2 Interpretation of intrinsic operations . 83
83
.........I. 84
7.2.3 Relational intrinsic operations . 85
86
Logical intrinsic operations . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
7.2.4
........... 86
Interpretation of defined operations. . . . . . . . . . . . . . . . . . . . . . .
7.3
86
7.3.1 Unary defined operation .
87
7.4 Precedence of operators . . 87
.................................... 89
Assignment . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
7.5
89
Assignment statement . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
7.5.1
........... 92
7.5.2 Pointer assignment . . . . . . . . . . . . . .
92
7.5.3 Masked array assignment-W
iv
---------------------- Page: 4 ----------------------
ISOAEC 1539 : 1991 (E)
95
Execution control. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
8.
Executable constructs containing blocks. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 95
8.1
8.1.1 Rules governing blocks. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 95
96
8.1.2 IF construct . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
97
8.1.3 CASE construct
100
8.1.4 DO construct .
107
8.2 Branching . .
107
8.2.1 Statement labels . , .
107
8.2.2 GO TO statement .
107
8.2.3 Computed GO TO statement .
8.2.4 ASSIGN and assigned GO TO statement . . 107
8.2.5 Arithmetic IF statement . . . . . . . . . . . . . . . . . . . . . . . . 108
108
8.3 CONTINUE statement . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
1 O8
8.4 STOP statement . .
108
8.5 PAUSE statement . . , .
109
9. Input/output statements . . . . . . . . . . . . . . . . . . . .
109
9.1 Records . .
‘L
109
cord . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
9.1.1
9.1.2 Unformatted record . 109
110
9.1.3 Endfile record . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
.................... 110
110
9.2.1 External files . . .
112
..........................................................
113
9.3 File connection
........................................... 114
9.3.1 Unit existence . . . . . . . . . . . . . . . .
114
............................ 115
9.3.3 Preconnect ion. . . . . . . . . . . . . . . . . . . . . . . . . .
115
9.3.4 The OPEN statement . .
118
119
Data transfer statements .
9.4
.................... ...................... 119
123
9.4.2 Data transfer
................... 124
125
128
128
9.4.6 Termination of data transfer statements . .
128
........................................
File positioning statements. . . . . . . . . . . . . . .
9.5
129
9.5.1 BACKSPACE statement .
.............................. 129
ENDFILE statement . . . . . . . . . . . . . . . . . . . . . . . . .
9.5.2
............................ 129
9.5.3 REWIND statement . ._. .
130
9.6 File inquiry . . . .
...................... 130
9.6.1 Inquiry specifiers. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
134
9.6.2 Restrictions on inquiry specifiers .
9.6.3 Inquire by output list . . 134
9.7 Restrictions on function references and list items . 134
..................... 134
9.8 Restriction on input/output statements. . . . . . . . . . . . . . . . . . . .
V
---------------------- Page: 5 ----------------------
ISO/IEC 1539 : 1991 (E)
135
Input /output editing. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
135
10.1 Explicit format specification methods . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
135
ïO.1.1 FORMAT statement . .
Character format specification . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 135
10.1.2
................................. 136
10.2 Form of a format item list . . . .
Edit descriptors. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 136
10.2.1
Fields . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 137
10.2.2
137
Interaction between input
10.3
138
10.4 Positioning by format control . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
139
10.5 Data edit descriptors . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
Numeric editing . . . . . . . . . . . . . . . . . . 139
10.5.1
143
10.5.2 Logical editing .
144
Character editing . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
10.5.3
144
10.5.4 Generalized ed .
145
10.6 Control edit descriptors . .
145
10.6.1 Position editin
10.6.2 Slash editing . . 146
146
10.6.3 Colon editing . . . , , . . , . . . . . . . . . . . . . . . , . . . . . . . . . . __. . . . . . . . . . . . . .
S, SP, and SS editing . 146
10.6.4
147
10.6.5 P editing . .
147
BN and BZ editing .
10.6.6
147
10.7 Character string edit descri
147
10.7.1 Character const
148
10.7.2 H editing . .
List-directed formatting. . . 148
10.8
148
10.8.1 List-directed in
10.3.2 List-directed O 150
151
10.9 Namelist formatting . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
151
10.9.1 Namelist inpu
154
10.9.2 Namelist output .
156
Program units. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
11.1 Main program . . . . 156
156
11.1.1 Main program specifications . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
156
11.1.2 Main program executable part .
11.1.3 Main program internal procedures . 157
157
11.2 External subprograms. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
11.3 Modules . . . . 157
11.3.1 Module reference . 157
11.3.2 The USE statemen association . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 158
159
11.3.3 Examples of the use of modules . .
11.4 Block data program units . . 161
Procedures . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 163
12.1 Procedure classifications. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 163
163
12.1.1 Procedure classification by reference . . . . . . . . . . .
163
12.1.2 Procedure classification by means of defi
12.2 Characteristics of procedures. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . , . . . . . . . . . . . . . . . . . . . . . . . . . . 165
12.2.1 Characteristics of dummy arguments. . . . . . . . . . . . . . . . . . . . . 165
12.2.2 Characteristics of function results . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . , . . 166
vi
---------------------- Page: 6 ----------------------
ISO/IEC 1539 : 1991 (E)
12.3 Procedure interface . . 166
12.3.1 Implicit a terfaces . . 166
12.3.2 Specification of the procedure interfac .
12.4 Procedure reference . . . 171
12.4.1 Actual argument li . 171
12.4.2 Function reference .
12.4.3 Elemental intrinsic function reference . 174
12.4.4 Subroutine reference . . 174
12.4.5 Elemental intrinsic subroutine reference . 175
12.5 Procedure definition . . 175
12.5.1 Intrinsic procedure definition . . 175
12.5.2 Procedures defined by subprograms . 175
12.5.3 Definition of procedures by means other than Fortran .
12.5.4 Statement function .
13 .
. Intrinsic procedures 183
Intrinsic functions .
13.1 . 183
13.2 Elemental intrinsic procedures . . 183
U,
183
13.2.1 Elemental intrinsic function arg nts and results .
Elemental intrinsic subroutine arguments . .
13.2.2 183
13.3 Positional arguments or argument keywords . . 183
Argument presence inquiry function .
13.4 184
13.5 Numeric, mathematical. character. kind. logical. and bit procedures 184
13.5.1 Numeric functions . .
184
13.5.2 Mathematical functions . .
184
13.5.3 Character functions .
184
13.5.4 Character inquiry function . .
184
13.5.5 Kind functions .
184
13.5.6 Logical function .
184
13.5.7 Bit manipulation and inquiry procedures . 184
13.6 Transfer function . . 185
13.7 Numeric manipulation and inquiry functions . . 185
13.7.1 Models for integer and real data . .
185
13.7.2 Numeric inquiry functions .
186
........................................... 186
13.7.3 Floating point manipulation functions
Array intrinsic functions . 186
13.8
13.8.1 The shape of array arguments . .
186
13.8.2 Mask arguments .
186
Vector and matrix multiplication functions . 186
13.8.3
13.8.4 Array reduction functions . 187
13.8.5 Array inquiry functions . . 187
13.8.6 Array construction functions . 187
13.8.7 Array reshape function . . .
187
13.8.8 Array manipulation functions .
187
13.8.9 Array location functions . .
187
13.8.10 Pointer association status inquiry functions . 187
13.9 Intrinsic subroutines . . 187
13.9.1 Date and ti broutines .
188
13.9.2 Pseudorandom numbers .
............ 188
13.9.3 Bit copy subroutine . .
188
vii
---------------------- Page: 7 ----------------------
ISO/IEC 1539 : 1991 (E)
188
13.10 Generic intrinsic functions .
188
13.10.1 Argument presence inquiry function .
188
13.10.2 Numeric functions .
189
13.10.3 Mathematical functions .
Character functions . . . . 189
13.10.4
189
13.10.5 Character inquiry function .
190
13.10.6 Kind functions .
190
13.10.7 Logical function .
13.10.8 Numeric inquiry functions . 190
190
13.10.9 Bit inquiry function .
Bit manipulation functions . . 190
13.10.10
13.10.11 Transfer function . . 190
Floating-point manip tion functions . 190
13.10.12
Vector and matrix multiply functions . . 191
13.10.13
Array reduction functions . 191
13.10.14
191
13.10.15 Array inquiry functions .
191
13.10.16 Array construction functions .
191
13.10.17 Array reshape function . .
13.10.18 Array manipulation functions . 192 .
Array location functions . . 192
13.10.19
Pointer association status inquiry function . 192
13.10.20
192
13.11 Intrinsic subroutines .
192
13.12 specific names for intrinsic functions .
13.13 Specifications of the intrinsic procedures .
...
Questions, Comments and Discussion
Ask us and Technical Secretary will try to provide an answer. You can facilitate discussion about the standard in here.