コード例 #1
0
ファイル: cblas_sasum.c プロジェクト: GorgonCryoEM/Gorgon-CVS
float cblas_sasum(const int N, const float *X, const int incX)
{
   if (N > 0)
   {
      if (incX < 0) return(ATL_sasum(N, X, -incX));
      else return(ATL_sasum(N, X, incX));
   }
   else return(0.0f);
}
コード例 #2
0
ファイル: cblas_sasum.c プロジェクト: kevinoid/atlas-debian
float cblas_sasum(const int N, const float *X, const int incX)
{
   if (N > 0 && incX > 0)
      return(ATL_sasum(N, X, incX));
   return(0.0f);
}