1
2
3
4
5
6
7
8
9
10
11
12
13
14
| /*
| * cblas_srotg.c
| *
| * The program is a C interface to srotg.
| *
| * Written by Keita Teranishi. 2/11/1998
| *
| */
| #include "cblas.h"
| #include "cblas_f77.h"
| void cblas_srotg( float *a, float *b, float *c, float *s)
| {
| F77_srotg(a,b,c,s);
| }
|
|