1 | ///
|
---|
2 | /// This file is part of ILNumerics Community Edition.
|
---|
3 | ///
|
---|
4 | /// ILNumerics Community Edition - high performance computing for applications.
|
---|
5 | /// Copyright (C) 2006 - 2012 Haymo Kutschbach, http://ilnumerics.net
|
---|
6 | ///
|
---|
7 | /// ILNumerics Community Edition is free software: you can redistribute it and/or modify
|
---|
8 | /// it under the terms of the GNU General Public License version 3 as published by
|
---|
9 | /// the Free Software Foundation.
|
---|
10 | ///
|
---|
11 | /// ILNumerics Community Edition is distributed in the hope that it will be useful,
|
---|
12 | /// but WITHOUT ANY WARRANTY; without even the implied warranty of
|
---|
13 | /// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
---|
14 | /// GNU General Public License for more details.
|
---|
15 | ///
|
---|
16 | /// You should have received a copy of the GNU General Public License
|
---|
17 | /// along with ILNumerics Community Edition. See the file License.txt in the root
|
---|
18 | /// of your distribution package. If not, see <http://www.gnu.org/licenses/>.
|
---|
19 | ///
|
---|
20 | /// In addition this software uses the following components and/or licenses:
|
---|
21 | ///
|
---|
22 | /// =================================================================================
|
---|
23 | /// The Open Toolkit Library License
|
---|
24 | ///
|
---|
25 | /// Copyright (c) 2006 - 2009 the Open Toolkit library.
|
---|
26 | ///
|
---|
27 | /// Permission is hereby granted, free of charge, to any person obtaining a copy
|
---|
28 | /// of this software and associated documentation files (the "Software"), to deal
|
---|
29 | /// in the Software without restriction, including without limitation the rights to
|
---|
30 | /// use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of
|
---|
31 | /// the Software, and to permit persons to whom the Software is furnished to do
|
---|
32 | /// so, subject to the following conditions:
|
---|
33 | ///
|
---|
34 | /// The above copyright notice and this permission notice shall be included in all
|
---|
35 | /// copies or substantial portions of the Software.
|
---|
36 | ///
|
---|
37 | /// =================================================================================
|
---|
38 | ///
|
---|
39 |
|
---|
40 | using System;
|
---|
41 | using System.Collections.Generic;
|
---|
42 | using System.Text;
|
---|
43 | using System.Runtime.InteropServices;
|
---|
44 | using ILNumerics.Storage;
|
---|
45 | using ILNumerics.Misc;
|
---|
46 | using ILNumerics.Native;
|
---|
47 | using ILNumerics.Exceptions;
|
---|
48 |
|
---|
49 |
|
---|
50 | namespace ILNumerics {
|
---|
51 |
|
---|
52 | public partial class ILMath {
|
---|
53 |
|
---|
54 | |
---|
55 | /// <summary>
|
---|
56 | /// Cross products of columns of two arrays
|
---|
57 | /// </summary>
|
---|
58 | /// <param name="A">First array with vectors in columns</param>
|
---|
59 | /// <param name="B">Second array with vectors in columns</param>
|
---|
60 | /// <returns>Array with cross products of vectors from A and B</returns>
|
---|
61 | /// <exception cref="ILNumerics.Exceptions.ILArgumentException">If the size of both arguments is not the same.</exception>
|
---|
62 | public static ILRetArray<double> cross(ILInArray<double> A,
|
---|
63 | ILInArray<double> B,
|
---|
64 | bool normalize = false) {
|
---|
65 | using (ILScope.Enter(A, B)) {
|
---|
66 | if (!A.Size.IsSameSize(B.Size))
|
---|
67 | throw new ILArgumentException("input arrays must have the same size!");
|
---|
68 | ILArray<double> ret = array<double>(A.Size);
|
---|
69 | using (ILScope.Enter()) {
|
---|
70 | ILArray<double> Ax = A[0, full];
|
---|
71 | ILArray<double> Ay = A[1, full];
|
---|
72 | ILArray<double> Az = A[2, full];
|
---|
73 | ILArray<double> Bx = B[0, full];
|
---|
74 | ILArray<double> By = B[1, full];
|
---|
75 | ILArray<double> Bz = B[2, full];
|
---|
76 | ret[0, full] = Ay * Bz - Az * By;
|
---|
77 | ret[1, full] = Az * Bx - Ax * Bz;
|
---|
78 | ret[2, full] = Ax * By - Ay * Bx;
|
---|
79 | }
|
---|
80 | if (!normalize)
|
---|
81 | return ret;
|
---|
82 | else
|
---|
83 | return ret / sqrt(sum(ret * ret,0));
|
---|
84 | }
|
---|
85 | }
|
---|
86 | |
---|
87 | #region HYCALPER AUTO GENERATED CODE
|
---|
88 | |
---|
89 | /// <summary>
|
---|
90 | /// Cross products of columns of two arrays
|
---|
91 | /// </summary>
|
---|
92 | /// <param name="A">First array with vectors in columns</param>
|
---|
93 | /// <param name="B">Second array with vectors in columns</param>
|
---|
94 | /// <returns>Array with cross products of vectors from A and B</returns>
|
---|
95 | /// <exception cref="ILNumerics.Exceptions.ILArgumentException">If the size of both arguments is not the same.</exception>
|
---|
96 | public static ILRetArray<float> cross(ILInArray<float> A,
|
---|
97 | ILInArray<float> B,
|
---|
98 | bool normalize = false) {
|
---|
99 | using (ILScope.Enter(A, B)) {
|
---|
100 | if (!A.Size.IsSameSize(B.Size))
|
---|
101 | throw new ILArgumentException("input arrays must have the same size!");
|
---|
102 | ILArray<float> ret = array<float>(A.Size);
|
---|
103 | using (ILScope.Enter()) {
|
---|
104 | ILArray<float> Ax = A[0, full];
|
---|
105 | ILArray<float> Ay = A[1, full];
|
---|
106 | ILArray<float> Az = A[2, full];
|
---|
107 | ILArray<float> Bx = B[0, full];
|
---|
108 | ILArray<float> By = B[1, full];
|
---|
109 | ILArray<float> Bz = B[2, full];
|
---|
110 | ret[0, full] = Ay * Bz - Az * By;
|
---|
111 | ret[1, full] = Az * Bx - Ax * Bz;
|
---|
112 | ret[2, full] = Ax * By - Ay * Bx;
|
---|
113 | }
|
---|
114 | if (!normalize)
|
---|
115 | return ret;
|
---|
116 | else
|
---|
117 | return ret / sqrt(sum(ret * ret,0));
|
---|
118 | }
|
---|
119 | }
|
---|
120 |
|
---|
121 | #endregion HYCALPER AUTO GENERATED CODE
|
---|
122 |
|
---|
123 | }
|
---|
124 | }
|
---|