//----------------------------------------------------------------------- // ----------------------------------------------------------------------- // file="MatrixParallel.Publish.cs" // Project: StgSharp // AuthorGroup: Nitload Space // Copyright (c) Nitload Space. All rights reserved. // // 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. // // THE SOFTWARE IS PROVIDED “AS IS”, // WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, // INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, // FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. // IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, // DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, // ARISING FROM, OUT OF OR IN CONNECTION WITH // THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. // // ----------------------------------------------------------------------- // ----------------------------------------------------------------------- using StgSharp.HighPerformance; using System; using System.Collections.Generic; using System.Linq; using System.Numerics; using System.Text; using System.Threading.Tasks; namespace StgSharp.Mathematics { public static partial class MatrixParallel { public static unsafe void PublicTask( MatrixSegmentEnumeration source, MatrixSegmentEnumeration ans, delegate**, MatrixKernel*, MatrixKernel*, void> Operation) where T: unmanaged, INumber { MatrixParallelTaskPackage* package = MatrixParallelFactory.CreateBaseTask(); package->Right = source.Source; package->Result = ans.Source; package->RightPrimOffset = source.PrimOffset; package->ResultPrimOffset = ans.PrimOffset; package->RightPrimStride = source.PrimStride; package->ResultPrimStride = ans.PrimStride; package->RightSecOffset = source.SecondaryOffset; package->ResultSecOffset = ans.SecondaryOffset; package->RightSecStride = source.SecondaryStride; package->ResultSecStride = ans.SecondaryStride; package->PrimCount = source.PrimSize; package->SecCount = source.SecondarySize; package->ComputeHandle = (nint)Operation; package->ElementSize = sizeof(T); package->ComputeMode = 1; // Unary PublicTaskPrivate(package); } public static unsafe void PublicTask( MatrixSegmentEnumeration left, MatrixSegmentEnumeration right, MatrixSegmentEnumeration ans, delegate**, MatrixKernel*, MatrixKernel*, void> Operation) where T: unmanaged, INumber { MatrixParallelTaskPackage* package = MatrixParallelFactory.CreateBaseTask(); package->Left = left.Source; package->Right = right.Source; package->Result = ans.Source; package->LeftPrimOffset = left.PrimOffset; package->RightPrimOffset = right.PrimOffset; package->ResultPrimOffset = ans.PrimOffset; package->LeftPrimStride = left.PrimStride; package->RightPrimStride = right.PrimStride; package->ResultPrimStride = ans.PrimStride; package->LeftSecOffset = left.SecondaryOffset; package->RightSecOffset = right.SecondaryOffset; package->ResultSecOffset = ans.SecondaryOffset; package->LeftSecStride = left.SecondaryStride; package->RightSecStride = right.SecondaryStride; package->ResultSecStride = ans.SecondaryStride; package->PrimCount = left.PrimSize; package->SecCount = left.SecondarySize; package->ComputeHandle = (nint)Operation; package->ElementSize = sizeof(T); package->ComputeMode = 3; // Binary PublicTaskPrivate(package); } // Unary with 1..8 scalars (each scalar is independent generic type) public static unsafe void PublicTask( MatrixSegmentEnumeration source, MatrixSegmentEnumeration ans, delegate**, MatrixKernel*, MatrixKernel*, void> Operation, TScalar0 s0) where T: unmanaged, INumber where TScalar0: unmanaged, INumber { MatrixParallelTaskPackage* package = MatrixParallelFactory.CreateBaseTask(); package->Right = source.Source; package->Result = ans.Source; package->RightPrimOffset = source.PrimOffset; package->ResultPrimOffset = ans.PrimOffset; package->RightPrimStride = source.PrimStride; package->ResultPrimStride = ans.PrimStride; package->RightSecOffset = source.SecondaryOffset; package->ResultSecOffset = ans.SecondaryOffset; package->RightSecStride = source.SecondaryStride; package->ResultSecStride = ans.SecondaryStride; package->PrimCount = source.PrimSize; package->SecCount = source.SecondarySize; package->ComputeHandle = (nint)Operation; package->ElementSize = sizeof(T); package->ComputeMode = 2; // UnaryScalar ScalarPacket* sp = MatrixParallelFactory.CreateScalarPacket(); sp->Data(0) = s0; package->Scalar = sp; PublicTaskPrivate(package); } public static unsafe void PublicTask( MatrixSegmentEnumeration source, MatrixSegmentEnumeration ans, delegate**, MatrixKernel*, MatrixKernel*, void> Operation, TScalar0 s0, TScalar1 s1) where T: unmanaged, INumber where TScalar0: unmanaged, INumber where TScalar1: unmanaged, INumber { MatrixParallelTaskPackage* package = MatrixParallelFactory.CreateBaseTask(); package->Right = source.Source; package->Result = ans.Source; package->RightPrimOffset = source.PrimOffset; package->ResultPrimOffset = ans.PrimOffset; package->RightPrimStride = source.PrimStride; package->ResultPrimStride = ans.PrimStride; package->RightSecOffset = source.SecondaryOffset; package->ResultSecOffset = ans.SecondaryOffset; package->RightSecStride = source.SecondaryStride; package->ResultSecStride = ans.SecondaryStride; package->PrimCount = source.PrimSize; package->SecCount = source.SecondarySize; package->ComputeHandle = (nint)Operation; package->ElementSize = sizeof(T); package->ComputeMode = 2; ScalarPacket* sp = MatrixParallelFactory.CreateScalarPacket(); sp->Data(0) = s0; sp->Data(1) = s1; package->Scalar = sp; PublicTaskPrivate(package); } // Binary with 1..8 scalars (each scalar is independent generic type) public static unsafe void PublicTask( MatrixSegmentEnumeration left, MatrixSegmentEnumeration right, MatrixSegmentEnumeration ans, delegate**, MatrixKernel*, MatrixKernel*, void> Operation, TScalar0 s0) where T: unmanaged, INumber where TScalar0: unmanaged, INumber { MatrixParallelTaskPackage* package = MatrixParallelFactory.CreateBaseTask(); package->Left = left.Source; package->Right = right.Source; package->Result = ans.Source; package->LeftPrimOffset = left.PrimOffset; package->RightPrimOffset = right.PrimOffset; package->ResultPrimOffset = ans.PrimOffset; package->LeftPrimStride = left.PrimStride; package->RightPrimStride = right.PrimStride; package->ResultPrimStride = ans.PrimStride; package->LeftSecOffset = left.SecondaryOffset; package->RightSecOffset = right.SecondaryOffset; package->ResultSecOffset = ans.SecondaryOffset; package->LeftSecStride = left.SecondaryStride; package->RightSecStride = right.SecondaryStride; package->ResultSecStride = ans.SecondaryStride; package->PrimCount = left.PrimSize; package->SecCount = left.SecondarySize; package->ComputeHandle = (nint)Operation; package->ElementSize = sizeof(T); package->ComputeMode = 4; // BinaryScalar ScalarPacket* sp = MatrixParallelFactory.CreateScalarPacket(); sp->Data(0) = s0; package->Scalar = sp; PublicTaskPrivate(package); } public static unsafe void PublicTask( MatrixSegmentEnumeration source, MatrixSegmentEnumeration ans, delegate**, MatrixKernel*, MatrixKernel*, void> Operation, TScalar0 s0, TScalar1 s1, TScalar2 s2) where T: unmanaged, INumber where TScalar0: unmanaged, INumber where TScalar1: unmanaged, INumber where TScalar2: unmanaged, INumber { MatrixParallelTaskPackage* package = MatrixParallelFactory.CreateBaseTask(); package->Right = source.Source; package->Result = ans.Source; package->RightPrimOffset = source.PrimOffset; package->ResultPrimOffset = ans.PrimOffset; package->RightPrimStride = source.PrimStride; package->ResultPrimStride = ans.PrimStride; package->RightSecOffset = source.SecondaryOffset; package->ResultSecOffset = ans.SecondaryOffset; package->RightSecStride = source.SecondaryStride; package->ResultSecStride = ans.SecondaryStride; package->PrimCount = source.PrimSize; package->SecCount = source.SecondarySize; package->ComputeHandle = (nint)Operation; package->ElementSize = sizeof(T); package->ComputeMode = 2; ScalarPacket* sp = MatrixParallelFactory.CreateScalarPacket(); sp->Data(0) = s0; sp->Data(1) = s1; sp->Data(2) = s2; package->Scalar = sp; PublicTaskPrivate(package); } public static unsafe void PublicTask( MatrixSegmentEnumeration left, MatrixSegmentEnumeration right, MatrixSegmentEnumeration ans, delegate**, MatrixKernel*, MatrixKernel*, void> Operation, TScalar0 s0, TScalar1 s1) where T: unmanaged, INumber where TScalar0: unmanaged, INumber where TScalar1: unmanaged, INumber { MatrixParallelTaskPackage* package = MatrixParallelFactory.CreateBaseTask(); package->Left = left.Source; package->Right = right.Source; package->Result = ans.Source; package->LeftPrimOffset = left.PrimOffset; package->RightPrimOffset = right.PrimOffset; package->ResultPrimOffset = ans.PrimOffset; package->LeftPrimStride = left.PrimStride; package->RightPrimStride = right.PrimStride; package->ResultPrimStride = ans.PrimStride; package->LeftSecOffset = left.SecondaryOffset; package->RightSecOffset = right.SecondaryOffset; package->ResultSecOffset = ans.SecondaryOffset; package->LeftSecStride = left.SecondaryStride; package->RightSecStride = right.SecondaryStride; package->ResultSecStride = ans.SecondaryStride; package->PrimCount = left.PrimSize; package->SecCount = left.SecondarySize; package->ComputeHandle = (nint)Operation; package->ElementSize = sizeof(T); package->ComputeMode = 4; ScalarPacket* sp = MatrixParallelFactory.CreateScalarPacket(); sp->Data(0) = s0; sp->Data(1) = s1; package->Scalar = sp; PublicTaskPrivate(package); } public static unsafe void PublicTask( MatrixSegmentEnumeration source, MatrixSegmentEnumeration ans, delegate**, MatrixKernel*, MatrixKernel*, void> Operation, TScalar0 s0, TScalar1 s1, TScalar2 s2, TScalar3 s3) where T: unmanaged, INumber where TScalar0: unmanaged, INumber where TScalar1: unmanaged, INumber where TScalar2: unmanaged, INumber where TScalar3: unmanaged, INumber { MatrixParallelTaskPackage* package = MatrixParallelFactory.CreateBaseTask(); package->Right = source.Source; package->Result = ans.Source; package->RightPrimOffset = source.PrimOffset; package->ResultPrimOffset = ans.PrimOffset; package->RightPrimStride = source.PrimStride; package->ResultPrimStride = ans.PrimStride; package->RightSecOffset = source.SecondaryOffset; package->ResultSecOffset = ans.SecondaryOffset; package->RightSecStride = source.SecondaryStride; package->ResultSecStride = ans.SecondaryStride; package->PrimCount = source.PrimSize; package->SecCount = source.SecondarySize; package->ComputeHandle = (nint)Operation; package->ElementSize = sizeof(T); package->ComputeMode = 2; ScalarPacket* sp = MatrixParallelFactory.CreateScalarPacket(); sp->Data(0) = s0; sp->Data(1) = s1; sp->Data(2) = s2; sp->Data(3) = s3; package->Scalar = sp; PublicTaskPrivate(package); } public static unsafe void PublicTask( MatrixSegmentEnumeration left, MatrixSegmentEnumeration right, MatrixSegmentEnumeration ans, delegate**, MatrixKernel*, MatrixKernel*, void> Operation, TScalar0 s0, TScalar1 s1, TScalar2 s2) where T: unmanaged, INumber where TScalar0: unmanaged, INumber where TScalar1: unmanaged, INumber where TScalar2: unmanaged, INumber { MatrixParallelTaskPackage* package = MatrixParallelFactory.CreateBaseTask(); package->Left = left.Source; package->Right = right.Source; package->Result = ans.Source; package->LeftPrimOffset = left.PrimOffset; package->RightPrimOffset = right.PrimOffset; package->ResultPrimOffset = ans.PrimOffset; package->LeftPrimStride = left.PrimStride; package->RightPrimStride = right.PrimStride; package->ResultPrimStride = ans.PrimStride; package->LeftSecOffset = left.SecondaryOffset; package->RightSecOffset = right.SecondaryOffset; package->ResultSecOffset = ans.SecondaryOffset; package->LeftSecStride = left.SecondaryStride; package->RightSecStride = right.SecondaryStride; package->ResultSecStride = ans.SecondaryStride; package->PrimCount = left.PrimSize; package->SecCount = left.SecondarySize; package->ComputeHandle = (nint)Operation; package->ElementSize = sizeof(T); package->ComputeMode = 4; ScalarPacket* sp = MatrixParallelFactory.CreateScalarPacket(); sp->Data(0) = s0; sp->Data(1) = s1; sp->Data(2) = s2; package->Scalar = sp; PublicTaskPrivate(package); } public static unsafe void PublicTask( MatrixSegmentEnumeration source, MatrixSegmentEnumeration ans, delegate**, MatrixKernel*, MatrixKernel*, void> Operation, TScalar0 s0, TScalar1 s1, TScalar2 s2, TScalar3 s3, TScalar4 s4) where T: unmanaged, INumber where TScalar0: unmanaged, INumber where TScalar1: unmanaged, INumber where TScalar2: unmanaged, INumber where TScalar3: unmanaged, INumber where TScalar4: unmanaged, INumber { MatrixParallelTaskPackage* package = MatrixParallelFactory.CreateBaseTask(); package->Right = source.Source; package->Result = ans.Source; package->RightPrimOffset = source.PrimOffset; package->ResultPrimOffset = ans.PrimOffset; package->RightPrimStride = source.PrimStride; package->ResultPrimStride = ans.PrimStride; package->RightSecOffset = source.SecondaryOffset; package->ResultSecOffset = ans.SecondaryOffset; package->RightSecStride = source.SecondaryStride; package->ResultSecStride = ans.SecondaryStride; package->PrimCount = source.PrimSize; package->SecCount = source.SecondarySize; package->ComputeHandle = (nint)Operation; package->ElementSize = sizeof(T); package->ComputeMode = 2; ScalarPacket* sp = MatrixParallelFactory.CreateScalarPacket(); sp->Data(0) = s0; sp->Data(1) = s1; sp->Data(2) = s2; sp->Data(3) = s3; sp->Data(4) = s4; package->Scalar = sp; PublicTaskPrivate(package); } public static unsafe void PublicTask( MatrixSegmentEnumeration left, MatrixSegmentEnumeration right, MatrixSegmentEnumeration ans, delegate**, MatrixKernel*, MatrixKernel*, void> Operation, TScalar0 s0, TScalar1 s1, TScalar2 s2, TScalar3 s3) where T: unmanaged, INumber where TScalar0: unmanaged, INumber where TScalar1: unmanaged, INumber where TScalar2: unmanaged, INumber where TScalar3: unmanaged, INumber { MatrixParallelTaskPackage* package = MatrixParallelFactory.CreateBaseTask(); package->Left = left.Source; package->Right = right.Source; package->Result = ans.Source; package->LeftPrimOffset = left.PrimOffset; package->RightPrimOffset = right.PrimOffset; package->ResultPrimOffset = ans.PrimOffset; package->LeftPrimStride = left.PrimStride; package->RightPrimStride = right.PrimStride; package->ResultPrimStride = ans.PrimStride; package->LeftSecOffset = left.SecondaryOffset; package->RightSecOffset = right.SecondaryOffset; package->ResultSecOffset = ans.SecondaryOffset; package->LeftSecStride = left.SecondaryStride; package->RightSecStride = right.SecondaryStride; package->ResultSecStride = ans.SecondaryStride; package->PrimCount = left.PrimSize; package->SecCount = left.SecondarySize; package->ComputeHandle = (nint)Operation; package->ElementSize = sizeof(T); package->ComputeMode = 4; ScalarPacket* sp = MatrixParallelFactory.CreateScalarPacket(); sp->Data(0) = s0; sp->Data(1) = s1; sp->Data(2) = s2; sp->Data(3) = s3; package->Scalar = sp; PublicTaskPrivate(package); } public static unsafe void PublicTask( MatrixSegmentEnumeration source, MatrixSegmentEnumeration ans, delegate**, MatrixKernel*, MatrixKernel*, void> Operation, TScalar0 s0, TScalar1 s1, TScalar2 s2, TScalar3 s3, TScalar4 s4, TScalar5 s5) where T: unmanaged, INumber where TScalar0: unmanaged, INumber where TScalar1: unmanaged, INumber where TScalar2: unmanaged, INumber where TScalar3: unmanaged, INumber where TScalar4: unmanaged, INumber where TScalar5: unmanaged, INumber { MatrixParallelTaskPackage* package = MatrixParallelFactory.CreateBaseTask(); package->Right = source.Source; package->Result = ans.Source; package->RightPrimOffset = source.PrimOffset; package->ResultPrimOffset = ans.PrimOffset; package->RightPrimStride = source.PrimStride; package->ResultPrimStride = ans.PrimStride; package->RightSecOffset = source.SecondaryOffset; package->ResultSecOffset = ans.SecondaryOffset; package->RightSecStride = source.SecondaryStride; package->ResultSecStride = ans.SecondaryStride; package->PrimCount = source.PrimSize; package->SecCount = source.SecondarySize; package->ComputeHandle = (nint)Operation; package->ElementSize = sizeof(T); package->ComputeMode = 2; ScalarPacket* sp = MatrixParallelFactory.CreateScalarPacket(); sp->Data(0) = s0; sp->Data(1) = s1; sp->Data(2) = s2; sp->Data(3) = s3; sp->Data(4) = s4; sp->Data(5) = s5; package->Scalar = sp; PublicTaskPrivate(package); } public static unsafe void PublicTask( MatrixSegmentEnumeration left, MatrixSegmentEnumeration right, MatrixSegmentEnumeration ans, delegate**, MatrixKernel*, MatrixKernel*, void> Operation, TScalar0 s0, TScalar1 s1, TScalar2 s2, TScalar3 s3, TScalar4 s4) where T: unmanaged, INumber where TScalar0: unmanaged, INumber where TScalar1: unmanaged, INumber where TScalar2: unmanaged, INumber where TScalar3: unmanaged, INumber where TScalar4: unmanaged, INumber { MatrixParallelTaskPackage* package = MatrixParallelFactory.CreateBaseTask(); package->Left = left.Source; package->Right = right.Source; package->Result = ans.Source; package->LeftPrimOffset = left.PrimOffset; package->RightPrimOffset = right.PrimOffset; package->ResultPrimOffset = ans.PrimOffset; package->LeftPrimStride = left.PrimStride; package->RightPrimStride = right.PrimStride; package->ResultPrimStride = ans.PrimStride; package->LeftSecOffset = left.SecondaryOffset; package->RightSecOffset = right.SecondaryOffset; package->ResultSecOffset = ans.SecondaryOffset; package->LeftSecStride = left.SecondaryStride; package->RightSecStride = right.SecondaryStride; package->ResultSecStride = ans.SecondaryStride; package->PrimCount = left.PrimSize; package->SecCount = left.SecondarySize; package->ComputeHandle = (nint)Operation; package->ElementSize = sizeof(T); package->ComputeMode = 4; ScalarPacket* sp = MatrixParallelFactory.CreateScalarPacket(); sp->Data(0) = s0; sp->Data(1) = s1; sp->Data(2) = s2; sp->Data(3) = s3; sp->Data(4) = s4; package->Scalar = sp; PublicTaskPrivate(package); } public static unsafe void PublicTask( MatrixSegmentEnumeration source, MatrixSegmentEnumeration ans, delegate**, MatrixKernel*, MatrixKernel*, void> Operation, TScalar0 s0, TScalar1 s1, TScalar2 s2, TScalar3 s3, TScalar4 s4, TScalar5 s5, TScalar6 s6) where T: unmanaged, INumber where TScalar0: unmanaged, INumber where TScalar1: unmanaged, INumber where TScalar2: unmanaged, INumber where TScalar3: unmanaged, INumber where TScalar4: unmanaged, INumber where TScalar5: unmanaged, INumber where TScalar6: unmanaged, INumber { MatrixParallelTaskPackage* package = MatrixParallelFactory.CreateBaseTask(); package->Right = source.Source; package->Result = ans.Source; package->RightPrimOffset = source.PrimOffset; package->ResultPrimOffset = ans.PrimOffset; package->RightPrimStride = source.PrimStride; package->ResultPrimStride = ans.PrimStride; package->RightSecOffset = source.SecondaryOffset; package->ResultSecOffset = ans.SecondaryOffset; package->RightSecStride = source.SecondaryStride; package->ResultSecStride = ans.SecondaryStride; package->PrimCount = source.PrimSize; package->SecCount = source.SecondarySize; package->ComputeHandle = (nint)Operation; package->ElementSize = sizeof(T); package->ComputeMode = 2; ScalarPacket* sp = MatrixParallelFactory.CreateScalarPacket(); sp->Data(0) = s0; sp->Data(1) = s1; sp->Data(2) = s2; sp->Data(3) = s3; sp->Data(4) = s4; sp->Data(5) = s5; sp->Data(6) = s6; package->Scalar = sp; PublicTaskPrivate(package); } public static unsafe void PublicTask( MatrixSegmentEnumeration left, MatrixSegmentEnumeration right, MatrixSegmentEnumeration ans, delegate**, MatrixKernel*, MatrixKernel*, void> Operation, TScalar0 s0, TScalar1 s1, TScalar2 s2, TScalar3 s3, TScalar4 s4, TScalar5 s5) where T: unmanaged, INumber where TScalar0: unmanaged, INumber where TScalar1: unmanaged, INumber where TScalar2: unmanaged, INumber where TScalar3: unmanaged, INumber where TScalar4: unmanaged, INumber where TScalar5: unmanaged, INumber { MatrixParallelTaskPackage* package = MatrixParallelFactory.CreateBaseTask(); package->Left = left.Source; package->Right = right.Source; package->Result = ans.Source; package->LeftPrimOffset = left.PrimOffset; package->RightPrimOffset = right.PrimOffset; package->ResultPrimOffset = ans.PrimOffset; package->LeftPrimStride = left.PrimStride; package->RightPrimStride = right.PrimStride; package->ResultPrimStride = ans.PrimStride; package->LeftSecOffset = left.SecondaryOffset; package->RightSecOffset = right.SecondaryOffset; package->ResultSecOffset = ans.SecondaryOffset; package->LeftSecStride = left.SecondaryStride; package->RightSecStride = right.SecondaryStride; package->ResultSecStride = ans.SecondaryStride; package->PrimCount = left.PrimSize; package->SecCount = left.SecondarySize; package->ComputeHandle = (nint)Operation; package->ElementSize = sizeof(T); package->ComputeMode = 4; ScalarPacket* sp = MatrixParallelFactory.CreateScalarPacket(); sp->Data(0) = s0; sp->Data(1) = s1; sp->Data(2) = s2; sp->Data(3) = s3; sp->Data(4) = s4; sp->Data(5) = s5; package->Scalar = sp; PublicTaskPrivate(package); } public static unsafe void PublicTask( MatrixSegmentEnumeration source, MatrixSegmentEnumeration ans, delegate**, MatrixKernel*, MatrixKernel*, void> Operation, TScalar0 s0, TScalar1 s1, TScalar2 s2, TScalar3 s3, TScalar4 s4, TScalar5 s5, TScalar6 s6, TScalar7 s7) where T: unmanaged, INumber where TScalar0: unmanaged, INumber where TScalar1: unmanaged, INumber where TScalar2: unmanaged, INumber where TScalar3: unmanaged, INumber where TScalar4: unmanaged, INumber where TScalar5: unmanaged, INumber where TScalar6: unmanaged, INumber where TScalar7: unmanaged, INumber { MatrixParallelTaskPackage* package = MatrixParallelFactory.CreateBaseTask(); package->Right = source.Source; package->Result = ans.Source; package->RightPrimOffset = source.PrimOffset; package->ResultPrimOffset = ans.PrimOffset; package->RightPrimStride = source.PrimStride; package->ResultPrimStride = ans.PrimStride; package->RightSecOffset = source.SecondaryOffset; package->ResultSecOffset = ans.SecondaryOffset; package->RightSecStride = source.SecondaryStride; package->ResultSecStride = ans.SecondaryStride; package->PrimCount = source.PrimSize; package->SecCount = source.SecondarySize; package->ComputeHandle = (nint)Operation; package->ElementSize = sizeof(T); package->ComputeMode = 2; ScalarPacket* sp = MatrixParallelFactory.CreateScalarPacket(); sp->Data(0) = s0; sp->Data(1) = s1; sp->Data(2) = s2; sp->Data(3) = s3; sp->Data(4) = s4; sp->Data(5) = s5; sp->Data(6) = s6; sp->Data(7) = s7; package->Scalar = sp; PublicTaskPrivate(package); } public static unsafe void PublicTask( MatrixSegmentEnumeration left, MatrixSegmentEnumeration right, MatrixSegmentEnumeration ans, delegate**, MatrixKernel*, MatrixKernel*, void> Operation, TScalar0 s0, TScalar1 s1, TScalar2 s2, TScalar3 s3, TScalar4 s4, TScalar5 s5, TScalar6 s6) where T: unmanaged, INumber where TScalar0: unmanaged, INumber where TScalar1: unmanaged, INumber where TScalar2: unmanaged, INumber where TScalar3: unmanaged, INumber where TScalar4: unmanaged, INumber where TScalar5: unmanaged, INumber where TScalar6: unmanaged, INumber { MatrixParallelTaskPackage* package = MatrixParallelFactory.CreateBaseTask(); package->Left = left.Source; package->Right = right.Source; package->Result = ans.Source; package->LeftPrimOffset = left.PrimOffset; package->RightPrimOffset = right.PrimOffset; package->ResultPrimOffset = ans.PrimOffset; package->LeftPrimStride = left.PrimStride; package->RightPrimStride = right.PrimStride; package->ResultPrimStride = ans.PrimStride; package->LeftSecOffset = left.SecondaryOffset; package->RightSecOffset = right.SecondaryOffset; package->ResultSecOffset = ans.SecondaryOffset; package->LeftSecStride = left.SecondaryStride; package->RightSecStride = right.SecondaryStride; package->ResultSecStride = ans.SecondaryStride; package->PrimCount = left.PrimSize; package->SecCount = left.SecondarySize; package->ComputeHandle = (nint)Operation; package->ElementSize = sizeof(T); package->ComputeMode = 4; ScalarPacket* sp = MatrixParallelFactory.CreateScalarPacket(); sp->Data(0) = s0; sp->Data(1) = s1; sp->Data(2) = s2; sp->Data(3) = s3; sp->Data(4) = s4; sp->Data(5) = s5; sp->Data(6) = s6; package->Scalar = sp; PublicTaskPrivate(package); } public static unsafe void PublicTask( MatrixSegmentEnumeration left, MatrixSegmentEnumeration right, MatrixSegmentEnumeration ans, delegate**, MatrixKernel*, MatrixKernel*, void> Operation, TScalar0 s0, TScalar1 s1, TScalar2 s2, TScalar3 s3, TScalar4 s4, TScalar5 s5, TScalar6 s6, TScalar7 s7) where T: unmanaged, INumber where TScalar0: unmanaged, INumber where TScalar1: unmanaged, INumber where TScalar2: unmanaged, INumber where TScalar3: unmanaged, INumber where TScalar4: unmanaged, INumber where TScalar5: unmanaged, INumber where TScalar6: unmanaged, INumber where TScalar7: unmanaged, INumber { MatrixParallelTaskPackage* package = MatrixParallelFactory.CreateBaseTask(); package->Left = left.Source; package->Right = right.Source; package->Result = ans.Source; package->LeftPrimOffset = left.PrimOffset; package->RightPrimOffset = right.PrimOffset; package->ResultPrimOffset = ans.PrimOffset; package->LeftPrimStride = left.PrimStride; package->RightPrimStride = right.PrimStride; package->ResultPrimStride = ans.PrimStride; package->LeftSecOffset = left.SecondaryOffset; package->RightSecOffset = right.SecondaryOffset; package->ResultSecOffset = ans.SecondaryOffset; package->LeftSecStride = left.SecondaryStride; package->RightSecStride = right.SecondaryStride; package->ResultSecStride = ans.SecondaryStride; package->PrimCount = left.PrimSize; package->SecCount = left.SecondarySize; package->ComputeHandle = (nint)Operation; package->ElementSize = sizeof(T); package->ComputeMode = 4; ScalarPacket* sp = MatrixParallelFactory.CreateScalarPacket(); sp->Data(0) = s0; sp->Data(1) = s1; sp->Data(2) = s2; sp->Data(3) = s3; sp->Data(4) = s4; sp->Data(5) = s5; sp->Data(6) = s6; sp->Data(7) = s7; package->Scalar = sp; PublicTaskPrivate(package); } private static unsafe void PublicTaskPrivate(MatrixParallelTaskPackage* package) where T: unmanaged, INumber { int primCount = package->PrimCount; int secCount = package->SecCount; int threadPerGroup = (1024 / primCount) + 1; secCount /= threadPerGroup; } } }