Sha256: 66840db43d3a57d36cac0464a1639c1027d18ddf9e23cbf05e63ba1411d7d20f
Contents?: true
Size: 1.79 KB
Versions: 9
Compression:
Stored size: 1.79 KB
Contents
<html><!-- Created using the cpp_pretty_printer from the dlib C++ library. See http://dlib.net for updates. --><head><title>dlib C++ Library - cblas_sswap.c</title></head><body bgcolor='white'><pre>
<font color='#009900'>/*
* cblas_sswap.c
*
* The program is a C interface to sswap.
*
* Written by Keita Teranishi. 2/11/1998
*
*/</font>
<font color='#0000FF'>#include</font> "<a style='text-decoration:none' href='cblas.h.html'>cblas.h</a>"
<font color='#0000FF'>#include</font> "<a style='text-decoration:none' href='cblas_f77.h.html'>cblas_f77.h</a>"
<font color='#0000FF'><u>void</u></font> <b><a name='cblas_sswap'></a>cblas_sswap</b><font face='Lucida Console'>(</font> <font color='#0000FF'>const</font> <font color='#0000FF'><u>int</u></font> N, <font color='#0000FF'><u>float</u></font> <font color='#5555FF'>*</font>X, <font color='#0000FF'>const</font> <font color='#0000FF'><u>int</u></font> incX, <font color='#0000FF'><u>float</u></font> <font color='#5555FF'>*</font>Y,
<font color='#0000FF'>const</font> <font color='#0000FF'><u>int</u></font> incY<font face='Lucida Console'>)</font>
<b>{</b>
<font color='#0000FF'>#ifdef</font> F77_INT
F77_INT F77_N<font color='#5555FF'>=</font>N, F77_incX<font color='#5555FF'>=</font>incX, F77_incY<font color='#5555FF'>=</font>incY;
<font color='#0000FF'>#else</font>
<font color='#0000FF'>#define</font> F77_N N
<font color='#0000FF'>#define</font> F77_incX incX
<font color='#0000FF'>#define</font> F77_incY incY
<font color='#0000FF'>#endif</font>
<font color='#BB00BB'>F77_sswap</font><font face='Lucida Console'>(</font> <font color='#5555FF'>&</font>F77_N, X, <font color='#5555FF'>&</font>F77_incX, Y, <font color='#5555FF'>&</font>F77_incY<font face='Lucida Console'>)</font>;
<b>}</b>
</pre></body></html>
Version data entries
9 entries across 9 versions & 1 rubygems