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