@stdlib/esm/blas/ext/base/sdsnansumpw.js

ES module distribution for Stdlib, a standard library for JavaScript and Node.js.

// This file is a part of stdlib. License is Apache-2.0: http://www.apache.org/licenses/LICENSE-2.0
import r from"./../../../utils/define-nonenumerable-read-only-property.js";import t from"./../../../number/float64/base/to-float32.js";import e from"./../../../math/base/assert/is-nanf.js";import f from"./../../../math/base/special/floor.js";var o=t,n=e,a=f,i=128;function u(r,t,e,f){var m,s,l,p,b,v,d,j,c,y,h,x,g;if(r<=0)return 0;if(1===r||0===e)return n(t[f])?0:t[f];if(m=f,r<8){for(h=0,g=0;g<r;g++)!1===n(t[m])&&(h+=t[m]),m+=e;return o(h)}if(r<=i){for(s=n(t[m])?0:t[m],l=n(t[m+=e])?0:t[m],p=n(t[m+=e])?0:t[m],b=n(t[m+=e])?0:t[m],v=n(t[m+=e])?0:t[m],d=n(t[m+=e])?0:t[m],j=n(t[m+=e])?0:t[m],c=n(t[m+=e])?0:t[m],m+=e,y=r%8,g=8;g<r-y;g+=8)s+=n(t[m])?0:t[m],l+=n(t[m+=e])?0:t[m],p+=n(t[m+=e])?0:t[m],b+=n(t[m+=e])?0:t[m],v+=n(t[m+=e])?0:t[m],d+=n(t[m+=e])?0:t[m],j+=n(t[m+=e])?0:t[m],c+=n(t[m+=e])?0:t[m],m+=e;for(h=s+l+(p+b)+(v+d+(j+c));g<r;g++)!1===n(t[m])&&(h+=t[m]),m+=e;return o(h)}return x=a(r/2),o(u(x-=x%8,t,e,m)+u(r-x,t,e,m+x*e))}var m=t,s=e,l=u;function p(r,t,e){var f,o,n;if(r<=0)return 0;if(1===r||0===e)return s(t[0])?0:t[0];if(f=e<0?(1-r)*e:0,r<8){for(o=0,n=0;n<r;n++)!1===s(t[f])&&(o+=t[f]),f+=e;return m(o)}return l(r,t,e,f)}var b=r,v=p,d=u;b(v,"ndarray",d);export default v;
//# sourceMappingURL=sdsnansumpw.js.map