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