1 /* 2 * cblas_srotmg.c 3 * 4 * The program is a C interface to srotmg. 5 * 6 * Written by Keita Teranishi. 2/11/1998 7 * 8 */ 9 #include "cblas.h" 10 #include "cblas_f77.h" 11 void cblas_srotmg( float *d1, float *d2, float *b1, 12 const float b2, float *p) 13 { 14 F77_srotmg(d1,d2,b1,&b2,p); 15 } 16
