gfortran_quadmath_test

gfortran_quadmath_test, a FORTRAN77 code which calls the gfortran quadmath arithmetic functions, which use quadruple real precision arithmetic.

Every FORTRAN compiler offers a default real datatype as well as a double precision real data type.

Development of the FORTRAN77 language ceased on the release of the FORTRAN90 standard. However, some features of the newer versions of FORTRAN have "crept into" the older language and are accepted, at least by some compilers. Thus, the GFORTRAN compiler will allow FORTRAN77 code to declare single and double precision real variables with a syntax that mimics that it allows in FORTRAN90 code:

REAL ( KIND = 4 ) W
REAL ( KIND = 8 ) X

Licensing:

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

Languages

Versions of the QUADMATH examples are available in a C version and a C++ version and a FORTRAN77 version and a FORTRAN90 version.

Related Data and Programs:

gfortran_test, FORTRAN77 programs which investigate the use of the Gnu GFORTRAN compiler for FORTRAN77.

gfortran_intrinsics_test, a FORTRAN77 program which illustrates the use of intrinsic functions provided by the Gnu GFORTRAN compiler for FORTRAN77.

Reference:

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

Source code:

• gfortran_quadmath_test.f, calls all the tests.
• gfortran_quadmath_test.sh, commands that compile and run the test;
• gfortran_quadmath_test.txt, the output file;