///
/// 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
}
}