forked from johannesgerer/jburkardt-f
-
Notifications
You must be signed in to change notification settings - Fork 1
/
gfortran_quadmath.html
171 lines (143 loc) · 4.73 KB
/
gfortran_quadmath.html
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
<html>
<head>
<title>
GFORTRAN_QUADMATH - GFORTRAN Quadruple Real Precision
</title>
</head>
<body bgcolor="#EEEEEE" link="#CC0000" alink="#FF3300" vlink="#000055">
<h1 align = "center">
GFORTRAN_QUADMATH <br> GFORTRAN Quadruple Real Precision
</h1>
<hr>
<p>
<b>GFORTRAN_QUADMATH</b>
is a FORTRAN90 program which
illustrates the use of quadruple real precision arithmetic
with the Gnu GFORTRAN FORTRAN compiler.
</p>
<p>
Every FORTRAN compiler offers a default real datatype as well as a double
precision real data type.
</p>
<p>
Starting with FORTRAN90, it become possible to describe these types in terms
of a KIND parameter. The actual values of the KIND parameter corresponding
to particular types was left up to the compiler writer. For GFORTRAN,
real and double precision variables can be declared with KIND values of 4
and 8 respectively:
<blockquote><b>
REAL ( KIND = 4 ) W<br>
REAL ( KIND = 8 ) X
</b></blockquote>
</p>
<p>
On some systems, the GFORTRAN compiler provides a real data type stored in
80 bytes, specified by a KIND value of 10, and on some systems, a data type
stored in 128 bytes, with a KIND of 128. Variable declarations would be
<blockquote><b>
REAL ( KIND = 10 ) Y<br>
REAL ( KIND = 16 ) Z
</b></blockquote>
</p>
<p>
The Macintosh OSX system I have access to seems to have the KIND = 10 option,
but not the KIND = 16 option.
</p>
<h3 align = "center">
Licensing:
</h3>
<p>
The computer code and data files described and made available on this web page
are distributed under
<a href = "../../txt/gnu_lgpl.txt">the GNU LGPL license.</a>
</p>
<h3 align = "center">
Languages
</h3>
<p>
Versions of the <b>QUADMATH</b> examples are available in
<a href = "../../c_src/gcc_quadmath/gcc_quadmath.html">a C version</a> and
<a href = "../../cpp_src/g++_quadmath/g++_quadmath.html">a C++ version</a> and
<a href = "../../f77_src/gfortran_quadmath/gfortran_quadmath.html">a FORTRAN77 version</a> and
<a href = "../../f_src/gfortran_quadmath/gfortran_quadmath.html">a FORTRAN90 version</a>.
</p>
<h3 align = "center">
Related Data and Programs:
</h3>
<p>
<a href = "../../f_src/g95_quadmath/g95_quadmath.html">
G95_QUADMATH</a>,
a FORTRAN90 program which
illustrates the use of quadruple precision real arithmetic
provided on some systems by the G95 compiler for FORTRAN.
</p>
<p>
<a href = "../../f_src/gfortran/gfortran.html">
GFORTRAN</a>,
FORTRAN90 programs which
investigate the use of the Gnu GFORTRAN compiler with FORTRAN90 code.
</p>
<p>
<a href = "../../f_src/gfortran_intrinsics/gfortran_intrinsics.html">
GFORTRAN_INTRINSICS</a>
is a FORTRAN90 program which
illustrates the use of intrinsic functions
provided by the Gnu GFORTRAN compiler for FORTRAN90.
</p>
<p>
<a href = "../../f_src/real_precision/real_precision.html">
REAL_PRECISION</a>,
FORTRAN90 programs which
investigate the somewhat awkward methods for requesting
a real data type with given precision. This is the preferred
method for requesting double or quadruple precision arithmetic;
</p>
<h3 align = "center">
Reference:
</h3>
<p>
<ol>
<li>
The Gnu FORTRAN page,
<a href = "http://www.gnu.org/software/fortran/fortran.html">
http://www.gnu.org/software/fortran/fortran.html </a>.
</li>
<li>
The GFORTRAN Manual,
<a href = "http://gcc.gnu.org/onlinedocs/gcc-4.6.0/gfortran.pdf">
http://gcc.gnu.org/onlinedocs/gcc-4.6.0/gfortran.pdf</a>.
</li>
</ol>
</p>
<h3 align = "center">
Examples and Tests:
</h3>
<p>
<ul>
<li>
<a href = "gfortran_quadmath.f90">gfortran_quadmath.f90</a>,
a program that makes a simple test of the quadruple precision real arithmetic
facility.
</li>
<li>
<a href = "gfortran_quadmath.sh">gfortran_quadmath.sh</a>,
commands that compile and run the test;
</li>
<li>
<a href = "gfortran_quadmath_output.txt">
gfortran_quadmath_output.txt</a>,
the output file;
</li>
</ul>
</p>
<p>
You can go up one level to <a href = "../f_src.html">
the FORTRAN90 source codes</a>.
</p>
<hr>
<i>
Last revised on 18 April 2011.
</i>
<!-- John Burkardt -->
</body>
</html>