Commits

Anonymous committed 6d9a28b

more funcs

Comments (0)

Files changed (4)

pkg/cblas_lvl1.go

 		 c_X, C.int(incX),
 		 c_Y, C.int(incY)))
 }
+
+// functions having standard 4 prefixes (S D C Z)
+
+func Isamax(N int, X []float, incX int) int {
+	c_X := (*C.float)(unsafe.Pointer(&X[0]))
+	return int(C.cblas_isamax(C.int(N), c_X, C.int(incX)))
+}

pkg/cblas_lvl2.go

 //#include <stdlib.h>
 //#include <string.h>
 import "C"
-import "unsafe"
+//import "unsafe"
 
 func Sgemv() {
 	

pkg/cblas_lvl3.go

 //#include <stdlib.h>
 //#include <string.h>
 import "C"
-import "unsafe"
+//import "unsafe"
 
 func Sgemm() {
 	
        return 0;  
      }
 
+ // expected output:
+ // [ 367.76, 368.12
+ //   674.06, 674.72 ]
+
 */