G95_INTRINSICS
Examples of G95 Intrinsic Functions

G95_INTRINSICS contains examples demonstrating the use and features of some of the intrinsic routines peculiar to the G95 FORTRAN compiler.

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

Related Data and Programs:

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

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

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

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

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

F90_INTRINSICS is a directory 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 which includes some examples of the use of intrinsic functions included with the G77 compiler.

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

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

GFORTRAN_INTRINSICS is a FORTRAN90 program which demonstrates the use of some of the intrinsic functions included with the GFORTRAN compiler.

MIXED shows some examples of writing a program partly in FORTRAN90 and partly in some other language.

MPI shows how to set up parallel programs in FORTRAN90.

TEST_VALUES is a library of FORTRAN90 routines 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. G95 Manual, http://ftp.g95.org/G95Manual.pdf.

Examples and Tests:

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

List of Routines:

• MAIN is the main program for G95_INTRINSICS_PRB.
• 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_FDATE tests FDATE.
• TEST_GAMMA checks GAMMA against GAMMA_VALUES.
• TEST_HOSTNM tests HOSTNM.
• TEST_RAND tests RAND.
• TEST_SECNDS tests SECNDS.
• TEST_SIZEOF tests SIZEOF.
• TEST_SLEEP tests SLEEP.
• 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.