-- this is always safe/ok because CDouble is a newtyped Double, and CInt is a newtyped Int 

dgemm_wrapped :: Ptr Double -> Ptr Double -> Ptr Double -> Int -> IO ()
dgemm_wrapped = saphWrapper dgemm
dgemm_wrapped :: Ptr Double -> Ptr Double -> Ptr Double -> Int -> IO ()
dgemm_wrapped = saphWrapper dgemm
dgemm_wrapped = saphWrapper dgemm