Using GNU Fortran - GNU Compiler Collection

1 Using GNU FortranForgccversion (pre-release)(GCC)ThegfortranteamPublish ed by the Free Software Foundation51 Franklin Street, Fifth FloorBoston, MA 02110-1301, USAC opyrightc 1999-2022 Free Software Foundation, is granted to copy, distribute and/or modify this document under the terms ofthe GNU Free Documentation License, Version or any later version published by theFree Software Foundation; with the Invariant Sections being Funding Free Software , theFront-Cover Texts being (a) (see below), and with the Back-Cover Texts being (b) (seebelow). A copy of the license is included in the section entitled GNU Free DocumentationLicense.

2 (a) The FSF s Front-Cover Text is:A GNU Manual(b) The FSF s Back-Cover Text is:You have freedom to copy and modify this GNU Manual, like GNU software. Copiespublished by the Free Software Foundation raise funds for GNU GNU Fortran2 GNU Fortran Command : Influencing runtime behavior with Reference4 Compiler General Public Free Documentation Free of Contents1 About GNU GNU Fortran and Fortran 95 Fortran 2003 Fortran 2008 Fortran 2018 I: Invoking GNU GNU Fortran Command Option Options controlling Fortran Enable and customize Options to request or suppress errors and Options for debugging your program or GNU Options for directory Influencing the linking Influencing runtime Options for code generation Options for interoperability with other Environment variables Runtime.

3 Influencing runtime behavior withenvironment Directory for scratch Unit number for standard Unit number for standard Unit number for standard Do not buffer I/O on all Do not buffer I/O onpreconnected Show location for runtime Print leading + where Separator for list Set endianness for unformatted Show backtrace on run-time Set buffer size forformatted GNU Fortran Set buffer size forunformatted II: Language Compiler KIND Type Internal representation of LOGICAL Evaluation of logical MAX and MIN intrinsics with REAL NaN Thread-safety of the runtime Data consistency and Files opened without an explicit ACTION= File operations on symbolic File format of unformatted sequential Asynchronous Extensions implemented in GNU Old-style kind Old-style variable Extensions to descriptor without count Commas Missing period Default widths forF.

4 GandIformat I/O item BOZ literal Real array Unary Implicitly Hollerith constants Character Cray Argument list functions%VAL,%REFand% Read/Write after EOF Type variants for integer Extended math Form feed as TYPE as an alias for %LOC as an .XOR. Bitwise logical Extended I/O Legacy PARAMETER Default Extensions not implemented in GNU Alternate complex function ( .. NAME=).. Mixed-Language Interoperability with Intrinsic Derived Types and Interoperable Global Interoperable Subroutines and Working with C Further Interoperability of Fortran with GNU Fortran Compiler ATTRIBUTES UNROLL BUILTIN IVDEP VECTOR NOVECTOR Non- Fortran Main Save command-line Set library option Set endian Set length of Enable floating point exception Set Naming and argument-passing Naming Argument passing GNU Fortran Compiler7 Coarray Type and enum ABI Function ABI Initialiation Finalization

5 Querying the image Querying the maximalnumber of Query the status of Get an array of theindexes of the failed Get an array of theindexes of the stopped Registering Deregistering Query whether anallocatable or pointer component in a derived type coarray Sending data from a local image toa remote Getting data from a remote Sending data between Sending data from a localimage to a remote image with enhanced referencing Getting data from a remoteimage Using enhanced Sending data betweenremote images Using enhanced references on both Locking a lock Unlocking a lock Post an Wait that an event Query event All-image Barrier for selected Wait for completion ofsegment-memory Error termination with Error termination Mark the image failed andend its Atomic Atomic variable Atomic compare and Atomic Sending data to Collective maximum Collective minimum Collective summing Generic collective Intrinsic Introduction to intrinsic Abort the Absolute Checks file access Character inASCII collating Arccosine Arccosine function.

6 Inverse hyperbolic cosine Left adjust a Right adjust a Imaginary part of complex Truncate to a whole Execute a routine after a given All values inMASK alongDIMare Status of an allocatable Bitwise logical Nearest whole Any value inMASK alongDIMis Arcsine Arcsine function, Inverse hyperbolic sine Status of a pointer or pointer/target Arctangent GNU Fortran Arctangent function, Arctangent Arctangent function, Inverse hyperbolic tangent Atomic ADD Atomic bitwise AND Atomic compare and Setting a variable Atomic ADD operation with prior Atomic bitwise AND operation with Atomic bitwise OR operation with Atomic bitwise XOR operation with Atomic bitwise OR Obtaining the value of a variable Atomic bitwise OR Show a Bessel function of the first kind of order Bessel function of the first kind of order Bessel function of the first Bessel function of the second kind of order Bessel function of the second kind of order Bessel function of the second Bitwise greater than or equal

7 Bitwise greater Bit size inquiry Bitwise less than or equal Bitwise less Bit test Status of a C Convert C into Fortran Convert C into Fortran procedure Obtain the C address of a Obtain the C address of an Size in bytes of an Integer ceiling Character conversion Change working Change access permissions of Complex conversion Copy a value to all images the current set Maximal value on the current set of Minimal value on the current set of Reduction of values on the current set of Sum of values on the current set of Get number of command Options passed to the Compiler version Complex conversion Complex conjugate Cosine Cosine function, Hyperbolic cosine Cotangent Cotangent function, Count CPU elapsed time in Circular shift elements of an Convert a time into a Date and time Double conversion Double complex conversion Significant binary digits Positive Dot product Double product Double real part Combined left Combined right Execution time subroutine (or function).

8 End-off shift elements of an Epsilon Error Error Error Execution time subroutine (or function).. Query whether a coarray event has Execute a shell Exit the program with Exponential Exponent Query dynamic type for Get the current time as a Read a single character in stream mode from Read a single character in stream Search an array for a Integer floor GNU Fortran Flush I/O unit(s).. File number Write a single character in stream mode to Write a single character in stream Fractional part of the model Frees Low level file positioning Get file Current stream Gamma Get last system error Get command line Get the entire command Get command line Get current working Get an environmental Get an environmental Group ID Get login Process ID User ID Convert time to GMT Get system host Largest number of a Euclidean distance Code inASCII collating Bitwise AND of array Bitwise logical Bitwise OR of array Get the number of command line

9 Clear Bit Set Character-to-integer conversion Get current local time subroutine (day/month/year).. Bitwise logical exclusive Get the last system error Function that converts a cosubscript to animage Position of a substring within a Convert to integer Convert to 16-bit integer Convert to 64-bit integer Bitwise logical Bitwise XOR of array Integer pseudo-random Test whether an array is Test for end-of-file Test for end-of-record Whether a unit is a terminal Shift Shift bits Test for a Get current local time subroutine(hour/minutes/seconds).. Send a signal to a Kind of an Lower dimension bounds of an Lower codimension bounds of an Number of leading zero bits of an Length of a character Length of a character entity without trailing Lexical greater than or Lexical greater Create a hard Lexical less than or Lexical less Index of the last non-blank character in a Returns the address of a Natural logarithm Base 10 logarithm Logarithm of the Gamma Convert to logical Left shift Get file Convert time to local time Allocate dynamic Left justified Right justified matrix Maximum value of an argument

10 Maximum exponent of a real Location of the maximum value within an Maximum value of an Time Time function (64-bit).. Merge Merge of bits under Minimum va