Fortran Wiki
Fortran 2003 status
Compiler Support for the Fortran 2003 Standard
The table below documents features from the Fortran 2003 standard that are supported by several available compilers. A similar table is also availble for Fortran 2008 status and Fortran 2018 status.
Note that the versions described below may be out of date and that the development versions of some compilers support many support additional features. Please check with the compiler vendor for the most up-to-date information on support for specific features. See Compiler Support for Modern Fortran for a summary, caveats, and links to compiler-specific status pages and see Fortran 2003 status discussion for a discussion of the merits of maintaining this page.
The table is based on data from a series of articles in the ACM Fortran Forum by Ian D. Chivers and Jane Sleightholme. For further details of the features listed, see the following report by John Reid: ftp://ftp.nag.co.uk/sc22wg5/N1601-N1650/N1648.pdf.
Legend:
- Y = Yes
- N = No
- P = Partial
- ? = Not Known
| Fortran 2003 features | Absoft | Cray | g95 | GNU | HP | IBM | Intel | NAG | Oracle | PathScale | PGI |
|---|---|---|---|---|---|---|---|---|---|---|---|
| Compiler Version Number | 14 | 8.4.0 | 13.x | 15.1.5 | 19.0 | 6.2 | 8.8 | 6.0 | 18.10 | ||
| ISO TR 15580 IEEE Arithmetic | Y | Y | P | Y | Y | Y | Y | Y | Y | Y | Y |
| ISO TR 15581 Allocatable Enhancements | Y | Y | Y | Y | Y | Y | Y | Y | Y (33) | Y | Y |
| Data enhancements and object orientation | Absoft | Cray | g95 | GNU | HP | IBM | Intel | NAG | Oracle | PathScale | PGI |
| Parameterized derived types | N | Y | N | Y (36) | N | Y | Y | Y | Y | N | Y |
| Procedure pointers | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y |
| Finalization | N | Y | N | Y | N | Y | Y | Y | Y | N | Y |
| Procedures bound by name to a type | N | Y | N | Y | N | Y | Y | Y | Y | N | Y |
| The PASS attribute | Y | Y | N | Y | Y | Y | Y | Y | Y | N | Y |
| Procedures bound to a type as operators | N | Y | N | Y | N | Y | Y | Y | Y | N | Y |
| Type extension | N | Y | N | Y | N | Y | Y | Y | Y | Y | Y |
| Overriding a type-bound procedure | N | Y | N | Y | N | Y | Y | Y | Y | N | Y |
| Enumerations | Y | Y | Y | Y | N | Y | Y | Y | Y | N | Y |
| ASSOCIATE construct | N | Y | N | Y | N | Y | Y | Y | N | N | Y |
| Polymorphic entities | N | Y | N | Y | N | Y | Y | Y | Y | N | Y |
| SELECT TYPE construct | N | Y | N | Y | N | Y | Y | Y | Y | N | Y |
| Deferred bindings and abstract types | Y | Y | N | Y | N | Y | Y | Y | Y | N | Y |
| Allocatable scalars (12) | ? | Y | P | Y | N | Y | Y | Y | Y | N | Y |
| Allocatable character length (12) | ? | Y | N | Y | N | Y | Y | Y | Y | N | Y |
| Miscellaneous enhancements | Absoft | Cray | g95 | GNU | HP | IBM | Intel | NAG | Oracle | PathScale | PGI |
| Structure constructor changes | Y | Y | Y | Y | N | Y | Y | Y | Y | Y | Y |
| Generic procedure interfaces with the same name as a type (32) | ? | Y | ? | Y | ? | Y | Y | Y | Y | N | Y |
| The allocate statement | P | Y | P | Y | N | Y | Y | Y | Y | Y | Y |
| Assignment to an allocatable array | N | Y (3) | N | Y | Y | Y | Y (2) | Y | Y | Y | Y (3) |
| Transferring an allocation | N | Y | N | Y | N | Y | Y | Y | Y | Y | Y |
| More control of access from a module | Y | Y | N | Y | N | Y | Y | Y | Y | N | Y |
| Renaming operators on the USE statement | Y | Y | Y | Y | N | Y | Y | Y | Y | N | Y |
| Pointer assignment | Y | Y | Y | Y | N | Y | Y | Y | Y | Y | Y |
| Pointer INTENT | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y |
| The VOLATILE attribute | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y |
| The IMPORT statement | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y |
| Intrinsic modules | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y |
| Access to the computing environment | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y |
| Support for international character sets | P (19) | P (19) | Y | Y | N | P | P (19) | Y | N | N | P (19) |
| Lengths of names and statements | Y | Y | ? | Y | Y | Y | Y | Y | Y | Y | Y |
| Binary, octal and hex constants | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y |
| Array constructor syntax | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y |
| Specification and initialization expressions | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y |
| Complex constants | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y |
| Changes to intrinsic functions | Y | Y | Y | Y | Y | Y | Y | Y | Y | ? | Y |
| Controlling IEEE underflow | Y | Y | N | Y | Y | Y | Y | Y | Y | Y | Y |
| Another IEEE class value | Y | Y | N | Y | Y | Y | Y | Y | Y | Y | Y |
| I/O enhancements | Absoft | Cray | g95 | GNU | HP | IBM | Intel | NAG | Oracle | PathScale | PGI |
| Derived type I/O | N | Y | N | Y | N | Y | Y | Y | N | Y | Y |
| Asynchronous I/O | Y | Y | Y | Y | N | Y | Y | Y | Y (10) | Y | Y |
| FLUSH statement | Y | Y | Y | Y | N | Y | Y | Y | Y | Y | Y |
| IOMSG= specifier | Y | Y | Y | Y | Y | Y | Y | Y | Y | N | Y |
| Stream access input/output | N | Y | Y | Y | N | Y | Y | Y | Y | Y | Y |
| ROUND= specifier | Y | Y | P | Y | Y | Y | Y (20) | Y | Y | N | Y |
| DECIMAL= specifier | Y | Y | Y | Y | Y | Y | Y (22) | Y | Y | N | Y |
| SIGN= specifier | Y | Y | Y | Y | Y | Y | Y (21) | Y | Y | N | Y |
| Kind type parameters of integer specifiers | N | Y | ? | Y | N | Y | Y | Y | Y | N | Y |
| Recursive input/output | N | Y | Y | Y | N | Y | Y | Y | Y | Y | Y |
| Intrinsic function for newline character | N | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y |
| Input and output of IEEE exceptional values | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y |
| Comma after a P edit descriptor | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y |
| Interoperability with C | Absoft | Cray | g95 | GNU | HP | IBM | Intel | NAG | Oracle | PathScale | PGI |
| Interoperability of intrinsic types | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y |
| Interoperability with C pointers | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y |
| Interoperability of derived types | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y |
| Interoperability of variables | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y |
| Interoperability of procedures | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y | Y |
| Interoperability of global data | Y | Y | Y | Y | Y | Y | Y | Y | Y | N | Y |
Footnotes:
(2) Optional under flag;
(3) Can be disabled by an optional flag;
(9) kind= of maxloc, minloc, shape missing;
(10) implemented as synchronous I/O;
(18) move_alloc;
(19) selected_char_kind only;
(20) plus RC, RD, RN, RP, RU, RZ;
(21) plus BLANK=, DELIM=, PAD=, SIZE=;
(22) plus DC,DP;
(32) These user-defined functions are not to be confused with a type’s structure constructor, which is generated automatically. Structure constructors have also changed in Fortran 2003, e.g. by treating components with default initialization as optional arguments.
(33) Implemented as specified in the Fortran 2003 standard, not as in ISO TR 15581.
(34) Kind type parameters for derived types only.
Changes
Changes July 2019:
- Updated table based on latest results from the August 2019 Fortran Forum article (Revision 26).
Changes April 2019:
- Updated table based on latest results from the December 2018 Fortran Forum article (Revision 25).
Changes between December 2015 and August 2016:
-
Updated table based on latest results from the August 2016 Fortran Forum article (Revision 19).
-
Updated table based on latest results from the April 2016 Fortran Forum article (Revision 18).
Changes between April 2011 and December 2015:
- Updated table based on latest results from the December 2015 Fortran Forum article (Revision 17).
Changes November 2014:
- Intel added parameterized derived types
Changes between December 2010 and April 2011:
-
Cray supports ISO TR 15580 IEEE arithmetic, renaming operators on the USE statement, controlling IEEE underflow, another IEEE class value, and the ROUND= specifier.
-
GNU supports allocatable character length and partially supports assignment to an allocatable array.
-
HP supports ISO TR 15580 IEEE arithmetic and lengths of names
and statements.
-
IBM supports more control of access from a module, renaming operators on the USE statement, and lengths of names and statements.
-
Intel added finalization, pointer assignment and other items.
-
Added new columns for Absoft and PGI compilers.
No changes between August 2010 and December 2010.
Changes between April 2010 and August 2010:
- Cray added partial support for international character sets.
- GFortran added partial support for the ASSOCIATE construct.
- IBM added support for parameterized derived types.
- Intel added partial support for procedures bound to a type as operators and full support for SELECT TYPE.
Changes between December 2009 and April 2010:
- GFortran implemented recursive input/output.
Source
“Compiler Support for the Fortran 2003 and 2008 Standards” is a series of articles in the ACM Fortran Forum by Ian D. Chivers and Jane Sleightholme. Links to previous revisions are given below:
-
Fortran Forum 35(1), 9-29, April 2016 (doi:10.1145/2922512.2922513)
-
Fortran Forum 34(4), 7-27, December 2015 (doi:10.1145/2851087.2851088)
-
Fortran Forum 32(2), 14-26, August 2013 (doi:10.1145/2502932.2502934)
-
Fortran Forum 30(1), 16-24, April 2011 (doi:10.1145/1961363.1961365)
-
Fortran Forum 29(3), 26-34, December 2010
-
Fortran Forum 29(2), 28-35, August 2010 (doi:10.1145/1837137.1837139)
-
Fortran Forum 29(1), 29-34, April 2010 (doi:10.1145/1753166.1753169)
-
Fortran Forum 28(3), 32-37, December 2009
-
Fortran Forum 28(2), 15-20, August 2009 (doi:10.1145/1570522.1570525)
-
Fortran Forum 28(1), 26-28, April 2009 (doi:10.1145/1520752.1520755)
-
Fortran Forum 26(3), 20-22, December 2007 (doi:10.1145/1330585.1330587)
-
Fortran Forum 26(2), Front matter, August 2007 (frontmatter.pdf)
-
Fortran Forum 26(1), 7-9, April 2007 (doi:10.1145/1243413.1243414)
See Also
- Compiler Support for Modern Fortran
- Fortran 2003
- Fortran 2003 status discussion
- Fortran 2008 status
- Fortran 2018 status
Maintenance Notes
Colors
- Yes:
#bbddbb - No:
#ffaaaa - Partial:
#ffffdd - Unknown:
#eeeeee
After modifying the contents of cells in the table, the following Emacs lisp function can be used to synchronize the cell colors with the cell contents:
(defun fortranwiki-update-status-table ()
(interactive)
(save-excursion
(beginning-of-buffer)
(replace-regexp "#[0-9a-f]+\">Y" "#bbddbb\">Y")
(beginning-of-buffer)
(replace-regexp "#[0-9a-f]+\">N" "#ffaaaa\">N")
(beginning-of-buffer)
(replace-regexp "#[0-9a-f]+\">P" "#ffffdd\">P")
(beginning-of-buffer)
(replace-regexp "#[0-9a-f]+\">\\?" "#eeeeee\">?")))