opr_convect_scalar.cu File Reference

#include <string.h>
#include <stdlib.h>
#include <stdio.h>
#include "convect_scalar_kernel.h"
#include "elem_block_tune.h"
#include <device/device_config.h>
#include <device/cuda/check.h>
#include <common/neko_log.h>

Go to the source code of this file.

Macros
#define	CASE_1D(LX, C)
#define	CASE_1D_SEL(LX, SEL)
#define	CASE_KSTEP(LX, C)
#define	CASE_KSTEP_SEL(LX, SEL)
#define	CASE(LX)
#define	CASE_LARGE(LX)

Functions
template<const int >
int	tune_convect_scalar (void *du, void *u, void *cr, void *cs, void *ct, void *dx, void *dy, void *dz, int *nel, int *lx, int *eb_sel, int *ch_sel)
void	cuda_convect_scalar (void *du, void *u, void *cr, void *cs, void *ct, void *dx, void *dy, void *dz, int *nel, int *lx)

Macro Definition Documentation

CASE

#define CASE

(

LX

)

Value:

    case LX:                                                                    \
      if(autotune[LX] == 0 ) {                                                  \
        autotune[LX]=tune_convect_scalar<LX>(du, u,                             \
                                    cr, cs, ct,                                 \
                                    dx, dy, dz,                                 \
                                    nel, lx, &autotune_eb[LX],                  \
                                    &autotune_ch[LX]);                          \
      } else if (autotune[LX] == 1 ) {                                          \
        CASE_1D_SEL(LX, autotune_ch[LX]);                                       \
      } else if (autotune[LX] == 2 ) {                                          \
        CASE_KSTEP_SEL(LX, autotune_eb[LX]);                                    \
      }                                                                         \
      break

CASE_1D

#define CASE_1D	(		LX,
			C
	)

Value:

    convect_scalar_kernel_1d<real, LX, NEKO_CHUNKS(LX, C)>                      \
      <<<nblcks, NEKO_CHUNKS_NTHRDS(LX, C), 0, stream>>>                        \
      ((real *) du, (real *) u,                                                 \
       (real *) cr, (real *) cs, (real *) ct,                                   \
       (real *) dx, (real *) dy, (real *) dz);                                  \
    CUDA_CHECK(cudaGetLastError());

CASE_1D_SEL

#define CASE_1D_SEL	(		LX,
			SEL
	)

Value:

    switch (SEL) {                                                              \
    case 0:  CASE_1D(LX, 0); break;                                             \
    case 1:  CASE_1D(LX, 1); break;                                             \
    case 2:  CASE_1D(LX, 2); break;                                             \
    default: CASE_1D(LX, 3); break;                                             \
    }

CASE_KSTEP

#define CASE_KSTEP	(		LX,
			C
	)

Value:

    convect_scalar_kernel_kstep<real, LX, NEKO_EB(LX, C)>                       \
      <<<NEKO_EB_NBLCKS(*nel, LX, C), NEKO_EB_NTHRDS(LX, C), 0, stream>>>       \
      ((real *) du, (real *) u,                                                 \
       (real *) cr, (real *) cs, (real *) ct,                                   \
       (real *) dx, (real *) dy, (real *) dz, *nel);                            \
    CUDA_CHECK(cudaGetLastError());

CASE_KSTEP_SEL

#define CASE_KSTEP_SEL	(		LX,
			SEL
	)

Value:

    switch (SEL) {                                                              \
    case 0:  CASE_KSTEP(LX, 0); break;                                          \
    case 1:  CASE_KSTEP(LX, 1); break;                                          \
    default: CASE_KSTEP(LX, 2); break;                                          \
    }

CASE_LARGE

#define CASE_LARGE

(

LX

)

Value:

    case LX:                                                                    \
      CASE_KSTEP(LX, 0);                                                        \
      break

Function Documentation

cuda_convect_scalar()

void cuda_convect_scalar	(	void *	du,
		void *	u,
		void *	cr,
		void *	cs,
		void *	ct,
		void *	dx,
		void *	dy,
		void *	dz,
		int *	nel,
		int *	lx
	)

Fortran wrapper for device cuda convective terms

Definition at line 58 of file opr_convect_scalar.cu.

Here is the call graph for this function:

Here is the caller graph for this function:

tune_convect_scalar()

template<const int >

int tune_convect_scalar	(	void *	du,
		void *	u,
		void *	cr,
		void *	cs,
		void *	ct,
		void *	dx,
		void *	dy,
		void *	dz,
		int *	nel,
		int *	lx,
		int *	eb_sel,
		int *	ch_sel
	)

Definition at line 165 of file opr_convect_scalar.cu.

Here is the call graph for this function: