@@ -1122,7 +1122,7 @@ void colNorms_kernel(
11221122 Kernel::policy (m),
11231123 KOKKOS_LAMBDA (TeamMember team)
11241124 {
1125- ColNormsKernel_Inf<ExecSpace,ViewType,NormT,RowBlockSize,ColBlockSize,TeamSize,VectorSize> kernel (data, norms, team);
1125+ Kernel kernel (data, norms, team);
11261126 for (unsigned j_block=0 ; j_block<n; j_block+=ColBlockSize) {
11271127 if (j_block+ColBlockSize <= n)
11281128 kernel.template run <ColBlockSize>(j_block, ColBlockSize);
@@ -1146,7 +1146,7 @@ void colNorms_kernel(
11461146 Kernel::policy (m),
11471147 KOKKOS_LAMBDA (TeamMember team)
11481148 {
1149- ColNormsKernel_1<ExecSpace,ViewType,NormT,RowBlockSize,ColBlockSize,TeamSize,VectorSize> kernel (data, norms, team);
1149+ Kernel kernel (data, norms, team);
11501150 for (unsigned j_block=0 ; j_block<n; j_block+=ColBlockSize) {
11511151 if (j_block+ColBlockSize <= n)
11521152 kernel.template run <ColBlockSize>(j_block, ColBlockSize);
@@ -1169,7 +1169,7 @@ void colNorms_kernel(
11691169 Kernel::policy (m),
11701170 KOKKOS_LAMBDA (TeamMember team)
11711171 {
1172- ColNormsKernel_2<ExecSpace,ViewType,NormT,RowBlockSize,ColBlockSize,TeamSize,VectorSize> kernel (data, norms, team);
1172+ Kernel kernel (data, norms, team);
11731173 for (unsigned j_block=0 ; j_block<n; j_block+=ColBlockSize) {
11741174 if (j_block+ColBlockSize <= n)
11751175 kernel.template run <ColBlockSize>(j_block, ColBlockSize);
@@ -1358,7 +1358,7 @@ void colSums_kernel(
13581358 Kernel::policy (m),
13591359 KOKKOS_LAMBDA (TeamMember team)
13601360 {
1361- ColSumsKernel<ExecSpace,ViewType,SumT,RowBlockSize,ColBlockSize,TeamSize,VectorSize> kernel (data, sums, team);
1361+ Kernel kernel (data, sums, team);
13621362 for (unsigned j_block=0 ; j_block<n; j_block+=ColBlockSize) {
13631363 if (j_block+ColBlockSize <= n)
13641364 kernel.template run <ColBlockSize>(j_block, ColBlockSize);
@@ -1474,7 +1474,7 @@ void colScale_kernel(const ViewType& data, const Genten::ArrayT<ExecSpace>& v)
14741474 Kokkos::parallel_for (" Genten::FacMatrix::colScale_kernel" ,
14751475 Kernel::policy (m), KOKKOS_LAMBDA (TeamMember team)
14761476 {
1477- ColScaleKernel<ExecSpace,ViewType,ColBlockSize,RowBlockSize,TeamSize,VectorSize> kernel (data, v, team);
1477+ Kernel kernel (data, v, team);
14781478 for (unsigned j_block=0 ; j_block<n; j_block+=ColBlockSize) {
14791479 if (j_block+ColBlockSize <= n)
14801480 kernel.template run <ColBlockSize>(j_block, ColBlockSize);
@@ -1568,11 +1568,13 @@ rowScale(const Genten::ArrayT<ExecSpace> & v, bool inverse) const
15681568
15691569// Only called by Ben Allan's parallel test code. It appears he uses the Linux
15701570// random number generator in a special way.
1571- #if !defined(_WIN32)
15721571template <typename ExecSpace>
15731572void Genten::FacMatrixT<ExecSpace>::
15741573scaleRandomElements (ttb_real fraction, ttb_real scale, bool columnwise) const
15751574{
1575+ #if defined(_WIN32)
1576+ Genten::error (" Genten::FacMatrix::scaleRandomElements - not implemented on Windows" );
1577+ #else
15761578 const ttb_indx nrows = data.extent (0 );
15771579 const ttb_indx ncols = data.extent (1 );
15781580 auto data_1d = make_data_1d ();
@@ -1614,8 +1616,8 @@ scaleRandomElements(ttb_real fraction, ttb_real scale, bool columnwise) const
16141616 }
16151617 }
16161618 }
1619+ #endif
16171620}
1618- #endif
16191621
16201622// TODO: This function really should be removed and replaced with a ktensor norm function, because that's kind of how it's used.
16211623template <typename ExecSpace>
@@ -3143,7 +3145,7 @@ ttb_real mat_innerprod_kernel(const MatViewType& x, const MatViewType& y,
31433145 Kernel::policy (m),
31443146 KOKKOS_LAMBDA (TeamMember team, ttb_real& d)
31453147 {
3146- MatInnerProdKernel<ExecSpace,MatViewType,WeightViewType,RowBlockSize,ColBlockSize,TeamSize,VectorSize> kernel (x, y, w, team);
3148+ Kernel kernel (x, y, w, team);
31473149 for (unsigned j_block=0 ; j_block<n; j_block+=ColBlockSize) {
31483150 if (j_block+ColBlockSize <= n)
31493151 kernel.template run <ColBlockSize>(j_block, ColBlockSize, d);
0 commit comments