/// /// This file is part of ILNumerics Community Edition. /// /// ILNumerics Community Edition - high performance computing for applications. /// Copyright (C) 2006 - 2012 Haymo Kutschbach, http://ilnumerics.net /// /// ILNumerics Community Edition is free software: you can redistribute it and/or modify /// it under the terms of the GNU General Public License version 3 as published by /// the Free Software Foundation. /// /// ILNumerics Community Edition is distributed in the hope that it will be useful, /// but WITHOUT ANY WARRANTY; without even the implied warranty of /// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the /// GNU General Public License for more details. /// /// You should have received a copy of the GNU General Public License /// along with ILNumerics Community Edition. See the file License.txt in the root /// of your distribution package. If not, see . /// /// In addition this software uses the following components and/or licenses: /// /// ================================================================================= /// The Open Toolkit Library License /// /// Copyright (c) 2006 - 2009 the Open Toolkit library. /// /// Permission is hereby granted, free of charge, to any person obtaining a copy /// of this software and associated documentation files (the "Software"), to deal /// in the Software without restriction, including without limitation the rights to /// use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of /// the Software, and to permit persons to whom the Software is furnished to do /// so, subject to the following conditions: /// /// The above copyright notice and this permission notice shall be included in all /// copies or substantial portions of the Software. /// /// ================================================================================= /// using System; using System.Collections.Generic; using System.Text; using ILNumerics.Storage; using ILNumerics.Misc; using ILNumerics.Exceptions; namespace ILNumerics { public partial class ILMath { /// /// Sum all elements of array A /// /// Input array /// Scalar sum of all elements of A. /// If A is empty, an empty array will be returned. /// If A was null. /// public static ILRetArray sumall( ILInArray A ) { if (object.Equals(A, null)) throw new ILArgumentException("sumall: argument must not be null!"); using (ILScope.Enter(A)) { if (A.IsEmpty) { return empty(ILSize.Empty00); } double retArr = 0; unsafe { fixed ( double* inArrStart = A.GetArrayForRead()) { double* inArrWalk = inArrStart; double* inArrEnd = inArrStart + A.Size.NumberOfElements; while (inArrWalk < inArrEnd) { retArr += *inArrWalk++; } } } return array(retArr, 1, 1); } } #region HYCALPER AUTO GENERATED CODE /// /// Sum all elements of array A /// /// Input array /// Scalar sum of all elements of A. /// If A is empty, an empty array will be returned. /// If A was null. /// public static ILRetArray sumall( ILInArray A ) { if (object.Equals(A, null)) throw new ILArgumentException("sumall: argument must not be null!"); using (ILScope.Enter(A)) { if (A.IsEmpty) { return empty(ILSize.Empty00); } Int64 retArr = 0; unsafe { fixed ( Int64* inArrStart = A.GetArrayForRead()) { Int64* inArrWalk = inArrStart; Int64* inArrEnd = inArrStart + A.Size.NumberOfElements; while (inArrWalk < inArrEnd) { retArr += *inArrWalk++; } } } return array(retArr, 1, 1); } } /// /// Sum all elements of array A /// /// Input array /// Scalar sum of all elements of A. /// If A is empty, an empty array will be returned. /// If A was null. /// public static ILRetArray sumall( ILInArray A ) { if (object.Equals(A, null)) throw new ILArgumentException("sumall: argument must not be null!"); using (ILScope.Enter(A)) { if (A.IsEmpty) { return empty(ILSize.Empty00); } Int32 retArr = 0; unsafe { fixed ( Int32* inArrStart = A.GetArrayForRead()) { Int32* inArrWalk = inArrStart; Int32* inArrEnd = inArrStart + A.Size.NumberOfElements; while (inArrWalk < inArrEnd) { retArr += *inArrWalk++; } } } return array(retArr, 1, 1); } } /// /// Sum all elements of array A /// /// Input array /// Scalar sum of all elements of A. /// If A is empty, an empty array will be returned. /// If A was null. /// public static ILRetArray sumall( ILInArray A ) { if (object.Equals(A, null)) throw new ILArgumentException("sumall: argument must not be null!"); using (ILScope.Enter(A)) { if (A.IsEmpty) { return empty(ILSize.Empty00); } byte retArr = 0; unsafe { fixed ( byte* inArrStart = A.GetArrayForRead()) { byte* inArrWalk = inArrStart; byte* inArrEnd = inArrStart + A.Size.NumberOfElements; while (inArrWalk < inArrEnd) { retArr += *inArrWalk++; } } } return array(retArr, 1, 1); } } /// /// Sum all elements of array A /// /// Input array /// Scalar sum of all elements of A. /// If A is empty, an empty array will be returned. /// If A was null. /// public static ILRetArray sumall( ILInArray A ) { if (object.Equals(A, null)) throw new ILArgumentException("sumall: argument must not be null!"); using (ILScope.Enter(A)) { if (A.IsEmpty) { return empty(ILSize.Empty00); } fcomplex retArr = new fcomplex(0.0f,0.0f); unsafe { fixed ( fcomplex* inArrStart = A.GetArrayForRead()) { fcomplex* inArrWalk = inArrStart; fcomplex* inArrEnd = inArrStart + A.Size.NumberOfElements; while (inArrWalk < inArrEnd) { retArr += *inArrWalk++; } } } return array(retArr, 1, 1); } } /// /// Sum all elements of array A /// /// Input array /// Scalar sum of all elements of A. /// If A is empty, an empty array will be returned. /// If A was null. /// public static ILRetArray sumall( ILInArray A ) { if (object.Equals(A, null)) throw new ILArgumentException("sumall: argument must not be null!"); using (ILScope.Enter(A)) { if (A.IsEmpty) { return empty(ILSize.Empty00); } float retArr = 0.0f; unsafe { fixed ( float* inArrStart = A.GetArrayForRead()) { float* inArrWalk = inArrStart; float* inArrEnd = inArrStart + A.Size.NumberOfElements; while (inArrWalk < inArrEnd) { retArr += *inArrWalk++; } } } return array(retArr, 1, 1); } } /// /// Sum all elements of array A /// /// Input array /// Scalar sum of all elements of A. /// If A is empty, an empty array will be returned. /// If A was null. /// public static ILRetArray sumall( ILInArray A ) { if (object.Equals(A, null)) throw new ILArgumentException("sumall: argument must not be null!"); using (ILScope.Enter(A)) { if (A.IsEmpty) { return empty(ILSize.Empty00); } complex retArr = new complex(0.0,0.0); unsafe { fixed ( complex* inArrStart = A.GetArrayForRead()) { complex* inArrWalk = inArrStart; complex* inArrEnd = inArrStart + A.Size.NumberOfElements; while (inArrWalk < inArrEnd) { retArr += *inArrWalk++; } } } return array(retArr, 1, 1); } } #endregion HYCALPER AUTO GENERATED CODE } }