 	omp_input_host_t omp_hostRight = Kokkos::create_mirror_view(omp_kokkosRight);
 	omp_output_host_t omp_hostOut = Kokkos::create_mirror_view(omp_kokkosOut);
 
-	// Copy into Kokkos host views.
+	// Copy into Kokkos host views and cuda
 	// Need to change this so that its 1-D and cl has stride 1
 	for (int cl = 0; cl < c; ++cl) {
 		for (int lbf = 0; lbf < l; ++lbf) {

 * Kokkos Cuda contractfieldfieldtensor.
 *
 * Contracts two Kokkos Cuda host views (two double ***** tensors -> one double
 * *** tensor). Since 
 *
 * Note that all input and output is in Kokkos host views --- the user is
 * responsible for getting the data in and out of them.


typedef Intrepid::RealSpaceTools<double> rst;

#define BLOCK_SIZE 64;

//Pre-C++11 timing (thanks jeff)
double getElapsedTime(const timespec start, const timespec end) {
	timespec temp;
