GFORTRAN_INTRINSICS
Examples of GFORTRAN Intrinsic Functions

GFORTRAN_INTRINSICS is a FORTRAN90 program which illustrates some of the intrinsic routines peculiar to the GFORTRAN FORTRAN compiler.

These functions are not listed in the FORTRAN standard; they are in some cases commonly available in C or C++ compilers.

Licensing:

The computer code and data files described and made available on this web page are distributed under the GNU LGPL license.

Related Data and Programs:

ARGS is a FORTRAN90 program which demonstrates the use of the IARGC and GETARG functions to count and access command line arguments. Versions of these functions are included with GFORTRAN.

C is a directory of C programs which includes some examples on features of the C language.

CPP is a directory of C++ programs which includes some examples on features of the C++ language.

F77 is a directory of FORTRAN77 programs which includes some examples on features of the FORTRAN77 language.

F77_INTRINSICS is a directory of FORTRAN77 programs which includes some examples of the use of intrinsic functions included with the FORTRAN77 standard language.

F90 is a directory of FORTRAN90 programs which includes some examples on features of the FORTRAN90 language.

F90_INTRINSICS is a directory of FORTRAN90 programs which includes some examples of the use of intrinsic functions defined as part of the FORTRAN90 standard.

G++_INTRINSICS is a C++ program which demonstrates some of the intrinsic functions provided by the G++ compiler.

G77_INTRINSICS is a directory of FORTRAN77 programs which includes some examples of the use of intrinsic functions included with the G77 compiler.

G95_INTRINSICS is a FORTRAN90 program which calls some of the intrinsic functions included with the G95 compiler.

GCC_INTRINSICS is a C program which tests or demonstrates intrinsic routines provided by the GCC compiler.

GFORTRAN is a directory of FORTRAN90 programs which includes examples of the use of the GFORTRAN compiler with FORTRAN90 code.

GFORTRAN_INTRINSICS is available in a FORTRAN77 version and a FORTRAN90 version.

MIXED is a directory of FORTRAN90 programs which shows some examples of writing a program partly in FORTRAN90 and partly in some other language.

MPI is an directory of FORTRAN90 programs which shows how to set up parallel programs using MPI.

TEST_VALUES is a FORTRAN90 library which stores some sample values of various special functions.

TIMER shows how to compute elapsed CPU time in FORTRAN90.

TIMESTAMP is a library of FORTRAN90 routines which can produce a YMDHMS date for use as a timestamp.

XLF_INTRINSICS is a directory which includes some examples of the use of intrinsic functions peculiar to the IBM XLF FORTRAN compiler.

Reference:

1. The Gnu FORTRAN page, http://www.gnu.org/software/fortran/fortran.html .
2. The GFORTRAN Manual, http://gcc.gnu.org/onlinedocs/gcc-4.2.1/gfortran.pdf.

Examples and Tests:

• gfortran_intrinsics_prb.f90, a single program that calls many tests; each test is devoted to a particular GFORTRAN intrinsic function.
• gfortran_intrinsics_prb.csh, commands that compile and run the test;
• gfortran_intrinsics_prb_output.txt, the output file;

List of Routines:

• MAIN is the main program for GFORTRAN_INTRINSICS_PRB.
• TEST_ABORT demonstrates the ABORT routine.
• TEST_ACCESS demonstrates the ACCESS routine.
• TEST_ALGAMA checks ALGAMA against GAMMA_LOG_VALUES.
• TEST_BESJ0 checks BESJ0 against BESSEL_J0_VALUES.
• TEST_BESJ1 checks BESJ1 against BESSEL_J1_VALUES.
• TEST_BESJN checks BESJN against BESSEL_JN_VALUES.
• TEST_BESY0 checks BESY0 against BESSEL_Y0_VALUES.
• TEST_BESY1 checks BESY1 against BESSEL_Y1_VALUES.
• TEST_BESYN checks BESYN against BESSEL_YN_VALUES.
• TEST_DBESJ0 checks DBESJ0 against BESSEL_J0_VALUES.
• TEST_DBESJ1 checks DBESJ1 against BESSEL_J1_VALUES.
• TEST_DBESJN checks DBESJN against BESSEL_JN_VALUES.
• TEST_DBESY0 checks DBESY0 against BESSEL_Y0_VALUES.
• TEST_DBESY1 checks DBESY1 against BESSEL_Y1_VALUES.
• TEST_DBESYN checks DBESYN against BESSEL_YN_VALUES.
• TEST_DERF checks DERF against ERF_VALUES.
• TEST_DERFC checks DERFC against ERFC_VALUES.
• TEST_DGAMMA checks DGAMMA against GAMMA_VALUES.
• TEST_DLGAMA checks DLGAMA against GAMMA_LOG_VALUES.
• TEST_DTIME tests DTIME.
• TEST_ERF checks ERF against ERF_VALUES.
• TEST_ERFC checks ERFC against ERFC_VALUES.
• TEST_ETIME tests ETIME.
• TEST_FDATE tests FDATE.
• TEST_GAMMA checks GAMMA against GAMMA_VALUES.
• TEST_HOSTNM tests HOSTNM.
• TEST_GET_COMMAND tests GET_COMMAND.
• TEST_GETCWD tests GETCWD.
• TEST_GET_ENVIRONMENT_VARIABLE tests GET_ENVIRONMENT_VARIABLE.
• TEST_RAND tests RAND.
• TEST_SECNDS tests SECNDS.
• TEST_SLEEP tests SLEEP.
• TEST_SIZEOF tests SIZEOF.
• TEST_SRAND tests SRAND.
• TEST_SYSTEM tests SYSTEM.
• TEST_TIME tests TIME.
• BESSEL_J0_VALUES returns some values of the J0 Bessel function.
• BESSEL_J1_VALUES returns some values of the J1 Bessel function.
• BESSEL_JN_VALUES returns some values of the Jn Bessel function.
• BESSEL_Y0_VALUES returns some values of the Y0 Bessel function.
• BESSEL_Y1_VALUES returns some values of the Y1 Bessel function.
• BESSEL_YN_VALUES returns some values of the Yn Bessel function.
• ERF_VALUES returns some values of the ERF or "error" function.
• ERFC_VALUES returns some values of the ERFC or "complementary error" function.
• GAMMA_VALUES returns some values of the Gamma function.
• GAMMA_LOG_VALUES returns some values of the Log Gamma function.
• TIMESTAMP prints the current YMDHMS date as a time stamp.

You can go up one level to the FORTRAN90 source codes.