Consider the following routine (written in 1992, from TSPACK ): C This function forces its argument X to be stored in a C memory location, thus providing a means of determining C floating point number characteristics (such as the machine C precision) when it is necessary to avoid computation in C …

Renka put this also in TRIPACK. In my understanding, saving the variable to a common is a trick to ensure that the arithmetic expression does not get simplified out by the compiler: it could decide to just check for RTOL>0, that is not what the author is trying to do here. In modern Fortran, you sh…

Common block mystery

Help

jacobwilliams September 1, 2024, 7:14pm 7

Note: Fortran also has SPACING. Don’t think I’ve ever actually used it.

1 Like

Topic		Replies	Views
Looking at some old code	27	1158	October 24, 2022
Suggestion: FINDLOC tolerance Language enhancement	15	852	February 7, 2023
Question about the use of common blocks Help	62	5492	November 8, 2021
What do we mean by common?	25	760	October 19, 2021
Use case of single-precision real number Help	20	1223	March 17, 2024

Common block mystery

Related topics