forked from johannesgerer/jburkardt-f
-
Notifications
You must be signed in to change notification settings - Fork 1
/
gfortran_intrinsics.html
345 lines (311 loc) · 9.43 KB
/
gfortran_intrinsics.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
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
<html>
<head>
<title>
GFORTRAN_INTRINSICS - Examples of GFORTRAN Intrinsic Functions
</title>
</head>
<body bgcolor="#EEEEEE" link="#CC0000" alink="#FF3300" vlink="#000055">
<h1 align = "center">
GFORTRAN_INTRINSICS <br> Examples of GFORTRAN Intrinsic Functions
</h1>
<hr>
<p>
<b>GFORTRAN_INTRINSICS</b>
is a FORTRAN90 program which
illustrates some of the intrinsic routines peculiar to
the GFORTRAN FORTRAN compiler.
</p>
<p>
These functions are not listed in the FORTRAN standard; they
are in some cases commonly available in C or C++ compilers.
</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>
<b>GFORTRAN_INTRINSICS</b> is available in
<a href = "../../f77_src/gfortran_intrinsics/gfortran_intrinsics.html">a FORTRAN77 version</a> and
<a href = "../../f_src/gfortran_intrinsics/gfortran_intrinsics.html">a FORTRAN90 version</a>.
</p>
<h3 align = "center">
Related Data and Programs:
</h3>
<p>
<a href = "../../c_src/c_intrinsics/c_intrinsics.html">
C_INTRINSICS</a>,
a C program which
illustrates the use of intrinsic functions supplied by the C language.
</p>
<p>
<a href = "../../cpp_src/cpp_intrinsics/cpp_intrinsics.html">
CPP_INTRINSICS</a>,
a C++ program which
illustrates the use of intrinsic functions supplied by the C++ language.
</p>
<p>
<a href = "../../f77_src/f77_intrinsics/f77_intrinsics.html">
F77_INTRINSICS</a>,
FORTRAN77 programs which
include some examples of the use of intrinsic functions
included with the FORTRAN77 standard language.
</p>
<p>
<a href = "../../f_src/f90_intrinsics/f90_intrinsics.html">
F90_INTRINSICS</a>,
FORTRAN90 programs which
include some examples of the use of intrinsic functions
defined as part of the FORTRAN90 standard.
</p>
<p>
<a href = "../../cpp_src/g++_intrinsics/g++_intrinsics.html">
G++_INTRINSICS</a>,
a C++ program which
demonstrates some of the intrinsic functions provided by the G++ compiler.
</p>
<p>
<a href = "../../f77_src/g77_intrinsics/g77_intrinsics.html">
G77_INTRINSICS</a>,
FORTRAN77 programs which
include some examples of the use of intrinsic functions
included with the G77 compiler.
</p>
<p>
<a href = "../../f_src/g95_intrinsics/g95_intrinsics.html">
G95_INTRINSICS</a>,
a FORTRAN90 program which
calls some of the intrinsic functions included with the G95 compiler.
</p>
<p>
<a href = "../../c_src/gcc_intrinsics/gcc_intrinsics.html">
GCC_INTRINSICS</a>,
a C program which
tests or demonstrates intrinsic routines provided by the GCC compiler.
</p>
<p>
<a href = "../../f_src/gfortran_quadmath/gfortran_quadmath.html">
GFORTRAN_QUADMATH</a>,
a FORTRAN90 program which
illustrates the use of quadruple precision real arithmetic
provided on some systems by the Gnu GFORTRAN compiler.
</p>
<p>
<a href = "../../java_src/math_intrinsics/math_intrinsics.html">
MATH_INTRINSICS</a>,
a JAVA program which
illustrates the use of the intrinsic functions in the Java Math package.
</p>
<p>
<a href = "../../f_src/xlf_intrinsics/xlf_intrinsics.html">
XLF_INTRINSICS</a>,
FORTRAN90 programs which
use intrinsic functions peculiar
to the IBM XLF FORTRAN compiler.
</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_intrinsics.f90">gfortran_intrinsics.f90</a>,
a single program that calls many tests; each test is devoted to
a particular GFORTRAN intrinsic function.
</li>
<li>
<a href = "gfortran_intrinsics.sh">gfortran_intrinsics.sh</a>,
commands that compile and run the test;
</li>
<li>
<a href = "gfortran_intrinsics_output.txt">
gfortran_intrinsics_output.txt</a>,
the output file;
</li>
</ul>
</p>
<h3 align = "center">
List of Routines:
</h3>
<p>
<ul>
<li>
<b>MAIN</b> is the main program for GFORTRAN_INTRINSICS_PRB.
</li>
<li>
<b>TEST_ABORT</b> demonstrates the ABORT routine.
</li>
<li>
<b>TEST_ACCESS</b> demonstrates the ACCESS routine.
</li>
<li>
<b>TEST_ALGAMA</b> checks ALGAMA against GAMMA_LOG_VALUES.
</li>
<li>
<b>TEST_BESJ0</b> checks BESJ0 against BESSEL_J0_VALUES.
</li>
<li>
<b>TEST_BESJ1</b> checks BESJ1 against BESSEL_J1_VALUES.
</li>
<li>
<b>TEST_BESJN</b> checks BESJN against BESSEL_JN_VALUES.
</li>
<li>
<b>TEST_BESY0</b> checks BESY0 against BESSEL_Y0_VALUES.
</li>
<li>
<b>TEST_BESY1</b> checks BESY1 against BESSEL_Y1_VALUES.
</li>
<li>
<b>TEST_BESYN</b> checks BESYN against BESSEL_YN_VALUES.
</li>
<li>
<b>TEST_DBESJ0</b> checks DBESJ0 against BESSEL_J0_VALUES.
</li>
<li>
<b>TEST_DBESJ1</b> checks DBESJ1 against BESSEL_J1_VALUES.
</li>
<li>
<b>TEST_DBESJN</b> checks DBESJN against BESSEL_JN_VALUES.
</li>
<li>
<b>TEST_DBESY0</b> checks DBESY0 against BESSEL_Y0_VALUES.
</li>
<li>
<b>TEST_DBESY1</b> checks DBESY1 against BESSEL_Y1_VALUES.
</li>
<li>
<b>TEST_DBESYN</b> checks DBESYN against BESSEL_YN_VALUES.
</li>
<li>
<b>TEST_DERF</b> checks DERF against ERF_VALUES.
</li>
<li>
<b>TEST_DERFC</b> checks DERFC against ERFC_VALUES.
</li>
<li>
<b>TEST_DGAMMA</b> checks DGAMMA against GAMMA_VALUES.
</li>
<li>
<b>TEST_DLGAMA</b> checks DLGAMA against GAMMA_LOG_VALUES.
</li>
<li>
<b>TEST_DTIME</b> tests DTIME.
</li>
<li>
<b>TEST_ERF</b> checks ERF against ERF_VALUES.
</li>
<li>
<b>TEST_ERFC</b> checks ERFC against ERFC_VALUES.
</li>
<li>
<b>TEST_ETIME</b> tests ETIME.
</li>
<li>
<b>TEST_FDATE</b> tests FDATE.
</li>
<li>
<b>TEST_GAMMA</b> checks GAMMA against GAMMA_VALUES.
</li>
<li>
<b>TEST_HOSTNM</b> tests HOSTNM.
</li>
<li>
<b>TEST_GET_COMMAND</b> tests GET_COMMAND.
</li>
<li>
<b>TEST_GETCWD</b> tests GETCWD.
</li>
<li>
<b>TEST_GET_ENVIRONMENT_VARIABLE</b> tests GET_ENVIRONMENT_VARIABLE.
</li>
<li>
<b>TEST_RAND</b> tests RAND.
</li>
<li>
<b>TEST_SECNDS</b> tests SECNDS.
</li>
<li>
<b>TEST_SLEEP</b> tests SLEEP.
</li>
<li>
<b>TEST_SIZEOF</b> tests SIZEOF.
</li>
<li>
<b>TEST_SRAND</b> tests SRAND.
</li>
<li>
<b>TEST_SYSTEM</b> tests SYSTEM.
</li>
<li>
<b>TEST_TIME</b> tests TIME.
</li>
<li>
<b>BESSEL_J0_VALUES</b> returns some values of the J0 Bessel function.
</li>
<li>
<b>BESSEL_J1_VALUES</b> returns some values of the J1 Bessel function.
</li>
<li>
<b>BESSEL_JN_VALUES</b> returns some values of the Jn Bessel function.
</li>
<li>
<b>BESSEL_Y0_VALUES</b> returns some values of the Y0 Bessel function.
</li>
<li>
<b>BESSEL_Y1_VALUES</b> returns some values of the Y1 Bessel function.
</li>
<li>
<b>BESSEL_YN_VALUES</b> returns some values of the Yn Bessel function.
</li>
<li>
<b>ERF_VALUES</b> returns some values of the ERF or "error" function.
</li>
<li>
<b>ERFC_VALUES</b> returns some values of the ERFC or "complementary error" function.
</li>
<li>
<b>GAMMA_VALUES</b> returns some values of the Gamma function.
</li>
<li>
<b>GAMMA_LOG_VALUES</b> returns some values of the Log Gamma function.
</li>
<li>
<b>TIMESTAMP</b> prints the current YMDHMS date as a time stamp.
</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 17 February 2008.
</i>
<!-- John Burkardt -->
</body>
</html>