Neko 0.9.99
A portable framework for high-order spectral element flow simulations
Loading...
Searching...
No Matches
tensor.hip File Reference
#include <hip/hip_runtime.h>
#include <device/device_config.h>
#include <device/hip/check.h>
#include "tensor_kernel.h"
#include <stdio.h>

Go to the source code of this file.

Macros

#define max(a, b)
 
#define CASE(N)
 
#define CASE2(N)
 

Functions

void hip_tnsr3d (void *v, int *nv, void *u, int *nu, void *A, void *Bt, void *Ct, int *nel)
 
void hip_tnsr3d_el_list (void *v, int *nv, void *u, int *nu, void *A, void *Bt, void *Ct, int *elements, int *n_points)
 

Macro Definition Documentation

◆ CASE

#define CASE (   N)
Value:
case N: \
nblcks, nthrds, 0, \
(hipStream_t) glb_cmd_queue, \
(real *) v, *nv, \
(real *) u, *nu, \
(real *) A, (real *) Bt, (real *) Ct); \
break
__global__ void T *__restrict__ T *__restrict__ const T *__restrict__ u
__global__ void T *__restrict__ T *__restrict__ const T *__restrict__ const T *__restrict__ v
__global__ void dirichlet_apply_scalar_kernel(const int *__restrict__ msk, T *__restrict__ x, const T g, const int m)
double real

◆ CASE2

#define CASE2 (   N)
Value:
case N: \
nblcks, nthrds, 0, \
(hipStream_t) glb_cmd_queue, \
(real *) v, *nv, \
(real *) u, *nu, \
(real *) A, (real *) Bt, (real *) Ct, \
(int *) elements, *n_points); \
break

◆ max

#define max (   a,
 
)
Value:
({ __typeof__ (a) _a = (a); \
__typeof__ (b) _b = (b); \
_a > _b ? _a : _b; })

Definition at line 41 of file tensor.hip.

Function Documentation

◆ hip_tnsr3d()

void hip_tnsr3d ( void v,
int nv,
void u,
int nu,
void A,
void Bt,
void Ct,
int nel 
)

Fortran wrapper for tnsr3d

Definition at line 50 of file tensor.hip.

Here is the call graph for this function:

◆ hip_tnsr3d_el_list()

void hip_tnsr3d_el_list ( void v,
int nv,
void u,
int nu,
void A,
void Bt,
void Ct,
int elements,
int n_points 
)

Fortran wrapper for tnsr3d

Definition at line 93 of file tensor.hip.

Here is the call graph for this function: