@stdlib/esm/blas/ext/base/snansumkbn2.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 a from"./../../../math/base/assert/is-nanf.js";import e from"./../../../math/base/special/abs.js";var n=t,o=a,f=e;function i(r,t,a){var e,i,s,m,u,p,l,b,v;if(r<=0)return 0;if(1===r||0===a)return o(t[0])?0:t[0];for(s=a<0?(1-r)*a:0,e=0,i=0,m=0,v=0;v<r;v++)p=t[s],!1===o(p)&&(l=n(e+p),b=f(e)>=f(p)?n(n(e-l)+p):n(n(p-l)+e),e=l,l=n(m+b),u=f(m)>=f(b)?n(n(m-l)+b):n(n(b-l)+m),m=l,i=n(i+u)),s+=a;return n(e+n(m+i))}var s=t,m=a,u=e;function p(r,t,a,e){var n,o,f,i,p,l,b,v,d;if(r<=0)return 0;if(1===r||0===a)return m(t[e])?0:t[e];for(f=e,n=0,o=0,i=0,d=0;d<r;d++)l=t[f],!1===m(l)&&(b=s(n+l),v=u(n)>=u(l)?s(s(n-b)+l):s(s(l-b)+n),n=b,b=s(i+v),p=u(i)>=u(v)?s(s(i-b)+v):s(s(v-b)+i),i=b,o=s(o+p)),f+=a;return s(n+s(i+o))}var l=r,b=i,v=p;l(b,"ndarray",v);export default b;
//# sourceMappingURL=snansumkbn2.js.map