← Back to branch summary

~ubuntu-branches/ubuntu/vivid/atlas/vivid

« back to all changes in this revision

Viewing changes to interfaces/blas/C/src/cblas_sasum.c

  • Committer: Package Import Robot
  • Author(s): Sébastien Villemot
  • Date: 2013-06-11 15:58:16 UTC
  • mfrom: (1.1.3 upstream)
  • mto: (2.2.21 experimental)
  • mto: This revision was merged to the branch mainline in revision 26.
  • Revision ID: package-import@ubuntu.com-20130611155816-b72z8f621tuhbzn0
Tags: upstream-3.10.1
Import upstream version 3.10.1

Show diffs side-by-side

added added

removed removed

Lines of Context:
interfaces/blas/C/src/cblas_sasum.c
1
1
/*
2
 
 *             Automatically Tuned Linear Algebra Software v3.8.4
 
2
 *             Automatically Tuned Linear Algebra Software v3.10.1
3
3
 *                    (C) Copyright 1999 R. Clint Whaley
4
4
 *
5
5
 * Redistribution and use in source and binary forms, with or without
38
38
 
39
39
float cblas_sasum(const int N, const float *X, const int incX)
40
40
{
41
 
   if (N > 0)
42
 
   {
43
 
      if (incX < 0) return(ATL_sasum(N, X, -incX));
44
 
      else return(ATL_sasum(N, X, incX));
45
 
   }
46
 
   else return(0.0f);
 
41
   if (N > 0 && incX > 0)
 
42
      return(ATL_sasum(N, X, incX));
 
43
   return(0.0f);
47
44
}