@@ -0,0 +1,2581 @@
+/*%0A * Zorbage: an algebraic data hierarchy for use in numeric processing.%0A *%0A * Copyright (C) 2016-2020 Barry DeZonia%0A * %0A * Redistribution and use in source and binary forms, with or without%0A * modification, are permitted provided that the following conditions are met:%0A * %0A * 1. Redistributions of source code must retain the above copyright notice,%0A *    this list of conditions and the following disclaimer.%0A * 2. Redistributions in binary form must reproduce the above copyright notice,%0A *    this list of conditions and the following disclaimer in the documentation%0A *    and/or other materials provided with the distribution.%0A * %0A * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS %22AS IS%22%0A * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE%0A * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE%0A * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS OR CONTRIBUTORS BE%0A * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR%0A * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF%0A * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS%0A * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN%0A * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)%0A * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE%0A * POSSIBILITY OF SUCH DAMAGE.%0A */%0Apackage nom.bdezonia.zorbage.algorithm;%0A%0Aimport nom.bdezonia.zorbage.type.algebra.Addition;%0Aimport nom.bdezonia.zorbage.type.algebra.Algebra;%0Aimport nom.bdezonia.zorbage.type.algebra.Conjugate;%0Aimport nom.bdezonia.zorbage.type.algebra.Multiplication;%0Aimport nom.bdezonia.zorbage.type.algebra.RModuleMember;%0A%0A/**%0A * %0A * @author Barry DeZonia%0A *%0A */%0Apublic class RModuleHermitianProduct %7B%0A%0A%09/**%0A%09 * %0A%09 * @param %3CT%3E%0A%09 * @param %3CU%3E%0A%09 * @param %3CW%3E%0A%09 * @param algU%0A%09 * @param a%0A%09 * @param b%0A%09 * @param c%0A%09 */%0A%09public static %3CT extends Algebra%3CT,U%3E & Conjugate%3CU%3E & Multiplication%3CU%3E & Addition%3CU%3E,%0A%09%09%09%09%09U,%0A%09%09%09%09%09W extends RModuleMember%3CU%3E%3E%0A%09%09void compute(T algU, W a, W b, U c)%0A%09%7B%0A%09%09long len = a.length();%0A%09%09if (b.length() != len)%0A%09%09%09throw new IllegalArgumentException(%22misshapen arguments to RModuleHermitianProduct%22);%0A%09%09U sum = algU.construct();%0A%09%09U tmp = algU.construct();%0A%09%09U aVal = algU.construct();%0A%09%09U bVal = algU.construct();%0A%09%09for (long i = 0; i %3C len; i++) %7B%0A%09%09%09a.v(i, aVal);%0A%09%09%09b.v(i, bVal);%0A%09%09%09algU.conjugate().call(aVal, aVal);%0A%09%09%09algU.multiply().call(aVal, bVal, tmp);%0A%09%09%09algU.add().call(sum, tmp, sum);%0A%09%09%7D%0A%09%09algU.assign().call(sum, c);%0A%09%7D%0A%7D%0A

Define a vector hermitian product algorithm