forked from johannesgerer/jburkardt-f
-
Notifications
You must be signed in to change notification settings - Fork 1
/
mxv.html
261 lines (219 loc) · 6.33 KB
/
mxv.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
<html>
<head>
<title>
MXVP - Matrix Vector Multiplication Timings
</title>
</head>
<body bgcolor="#EEEEEE" link="#CC0000" alink="#FF3300" vlink="#000055">
<h1 align = "center">
MXV <br> Matrix Vector Multiplication Timings
</h1>
<hr>
<p>
<b>MXV</b>
is a FORTRAN90 program which
sets up several matrix vector multiplication problems y=A*x,
and carries them out using
<ul>
<li>
Nested DO I, DO J loops;
</li>
<li>
Nested DO J, DO I loops;
</li>
<li>
the MATMUL FORTRAN90 intrinsic function;
</li>
</ul>
</p>
<p>
The user is allowed to specify M and N, the number of matrix rows and columns.
</p>
<h3 align = "center">
Usage:
</h3>
<p>
<blockquote>
<b>mxv</b> <i>m</i> <i>n</i>
</blockquote>
where
<ul>
<li>
<b>m</b> is the number of matrix rows;
</li>
<li>
<b>n</b> is the number of matrix columns;
</li>
</ul>
</p>
<h3 align = "center">
Sample Results:
</h3>
<p>
<pre>
M N FLOP doIdoJ doJdoI MATMUL
10 10 100 8 11 3
10 100 1,000 27 29 32
100 10 1,000 23 31 32
10 1,000 10,000 35 33 172
100 100 10,000 31 36 200
1,000 10 10,000 42 54 277
10 10,000 100,000 18 33 159
10,000 10 100,000 25 34 176
10 100,000 1,000,000 16 32 142
100 10,000 1,000,000 6 37 174
1,000 1,000 1,000,000 17 40 234
10,000 100 1,000,000 28 37 171
100,000 10 1,000,000 24 33 88
</pre>
</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>MXV</b> is available in
<a href = "../../c_src/mxv/mxv.html">a C version</a> and
<a href = "../../cpp_src/mxv/mxv.html">a C++ version</a> and
<a href = "../../f77_src/mxv/mxv.html">a FORTRAN77 version</a> and
<a href = "../../f_src/mxv/mxv.html">a FORTRAN90 version</a> and
<a href = "../../m_src/mxv/mxv.html">a MATLAB version</a>.
</p>
<h3 align = "center">
Related Data and Programs:
</h3>
<p>
<a href = "../../f_src/f90_intrinsics/f90_intrinsics.html">
F90_INTRINSICS</a>,
FORTRAN90 programs which
illustrate the use of FORTRAN90 intrinsic functions.
</p>
<p>
<a href = "../../f_src/linpack_bench/linpack_bench.html">
LINPACK_BENCH</a>,
a FORTRAN90 program which
measures the time needed to factor and solve a "large" (N=1000)
dense linear system of equations, and is used as a benchmark.
</p>
<p>
<a href = "../../f_src/matmul/matmul.html">
MATMUL</a>,
a FORTRAN90 program which
is an interactive matrix multiplication benchmark program.
</p>
<p>
<a href = "../../f77_src/mdbnch/mdbnch.html">
MDBNCH</a>,
a FORTRAN77 program which
is a benchmark molecular simulation calculation.
</p>
<p>
<a href = "../../f_src/mxm/mxm.html">
MXM</a>,
a FORTRAN90 program which
sets up a matrix multiplication problem A=B*C of arbitrary size,
and compares the time required for IJK, IKJ, JIK, JKI, KIJ and KJI orderings
of the loops.
</p>
<p>
<a href = "../../f_src/mxv_openmp/mxv_openmp.html">
MXV_OPENMP</a>,
a FORTRAN90 program which
compares the performance of plain vanilla Fortran and the FORTRAN90
intrinsic routine MATMUL, for the matrix multiplication problem
y=A*x, with and without parallelization by OpenMP.
<p>
<p>
<a href = "../../f_src/nas/nas.html">
NAS</a>,
a FORTRAN90 program which
runs the NASA kernel benchmark.
</p>
<p>
<a href = "../../f_src/sum_million/sum_million.html">
SUM_MILLION</a>,
a FORTRAN90 program which
sums the integers from 1 to 1,000,000, as a demonstration of how
to rate a computer's speed;
</p>
<p>
<a href = "../../f_src/timer/timer.html">
TIMER</a>,
FORTRAN90 programs which
demonstrate how to compute CPU time or elapsed time.
</p>
<h3 align = "center">
Reference:
</h3>
<p>
<ol>
<li>
John Burkardt, Paul Puglielli,<br>
Pittsburgh Supercomputing Center,<br>
<a href = "../../presentations/matmul.pdf">
MATMUL: An Interactive Matrix Multiplication Benchmark
</a>
</li>
</ol>
</p>
<h3 align = "center">
Source Code:
</h3>
<p>
<ul>
<li>
<a href = "mxv.f90">mxv.f90</a>, the source code.
</li>
<li>
<a href = "mxv.sh">mxv.sh</a>,
commands to compile and link the source code.
</li>
</ul>
</p>
<h3 align = "center">
List of Routines:
</h3>
<p>
<ul>
<li>
<b>MAIN</b> is the main program for MXV.
</li>
<li>
<b>MATGEN</b> generates a random matrix A and vector X.
</li>
<li>
<b>MXV_MATMUL</b> computes y = A * x, using the FORTRAN90 MATMUL function.
</li>
<li>
<b>MXV_DOIDOJ</b> computes y = A * x, using DO I, DO J loops.
</li>
<li>
<b>MXV_DOJDOI</b> computes y = A * x, using DO J, DO I loops.
</li>
<li>
<b>S_TO_I4</b> reads an I4 from a string.
</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 23 May 2008.
</i>
<!-- John Burkardt -->
</body>
<!-- Initial HTML skeleton created by HTMLINDEX. -->
</html>