GFORTRAN_INTRINSICS
Examples of GFORTRAN Intrinsic Functions

GFORTRAN_INTRINSICS is a FORTRAN77 program which demonstrates 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.

Languages:

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

Related Data and Programs:

C_INTRINSICS, a C program which illustrates the use of intrinsic functions supplied by the C language.

CPP_INTRINSICS, a C++ program which illustrates the use of intrinsic functions supplied by the C++ language.

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

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

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

G77_INTRINSICS, a FORTRAN77 program which illustrates the use of intrinsic functions included with the G77 compiler.

G95_INTRINSICS, a FORTRAN90 program which illustrates the use of "extra" intrinsic functions defined as part of the G95 compiler.

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

MATH_INTRINSICS, a JAVA program which illustrates the use of the intrinsic functions in the Java Math package.

XLF_INTRINSICS, 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.6.0/gfortran.pdf.

Examples and Tests:

• gfortran_intrinsics_prb.f, a single program that calls many tests; eact test is devoted to a particular GFORTRAN intrinsic function.
• gfortran_intrinsics_prb.sh, 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_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_ERF checks ERF against ERF_VALUES.
• TEST_ERFC checks ERFC against ERFC_VALUES.
• TEST_ETIME tests ETIME.
• TEST_GAMMA checks GAMMA against GAMMA_VALUES.
• TEST_RAND tests RAND.
• TEST_SECNDS tests SECNDS.
• 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 for testing.
• ERFC_VALUES returns some values of the ERFC or "complementary error" function for testing.
• GAMMA_VALUES returns some values of the Gamma function.
• GAMMA_LOG_VALUES returns some values of the Log Gamma function.
• TIMESTAMP prints out the current YMDHMS date as a timestamp.

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