xref: /aosp_15_r20/external/cblas/src/cblas_drotg.c (revision 1858f9982ea1ad57fb52080c08594e4d1cce4fa1) 
1*1858f998SYi Kong /*
2*1858f998SYi Kong  * cblas_drotg.c
3*1858f998SYi Kong  *
4*1858f998SYi Kong  * The program is a C interface to drotg.
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_drotg(double * a,double * b,double * c,double * s)11*1858f998SYi Kong void cblas_drotg(  double *a, double *b, double *c, double *s)
12*1858f998SYi Kong {
13*1858f998SYi Kong    F77_drotg(a,b,c,s);
14*1858f998SYi Kong }
15