Neko  0.8.1
A portable framework for high-order spectral element flow simulations
device_mathops Module Reference

Data Types

interface  hip_opchsign
 
interface  hip_opcolv
 
interface  hip_opcolv3c
 
interface  hip_opadd2cm
 
interface  hip_opadd2col
 

Functions/Subroutines

subroutine, public device_opchsign (a1_d, a2_d, a3_d, gdim, n)
 \( a = -a \) More...
 
subroutine, public device_opcolv (a1_d, a2_d, a3_d, c_d, gdim, n)
 \( a = a * c \) More...
 
subroutine, public device_opcolv3c (a1_d, a2_d, a3_d, b1_d, b2_d, b3_d, c_d, d, n, gdim)
 \( a(i) = b(i) * c(i) * d \) More...
 
subroutine, public device_opadd2cm (a1_d, a2_d, a3_d, b1_d, b2_d, b3_d, c, n, gdim)
 \( a(i) = a + b(i) * c \) More...
 
subroutine, public device_opadd2col (a1_d, a2_d, a3_d, b1_d, b2_d, b3_d, c_d, n, gdim)
 \( a(i) = a + b(i) * c(i) \) More...
 

Function/Subroutine Documentation

◆ device_opadd2cm()

subroutine, public device_mathops::device_opadd2cm ( type(c_ptr)  a1_d,
type(c_ptr)  a2_d,
type(c_ptr)  a3_d,
type(c_ptr)  b1_d,
type(c_ptr)  b2_d,
type(c_ptr)  b3_d,
real(kind=rp)  c,
integer  n,
integer  gdim 
)

\( a(i) = a + b(i) * c \)

Definition at line 242 of file device_mathops.F90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ device_opadd2col()

subroutine, public device_mathops::device_opadd2col ( type(c_ptr)  a1_d,
type(c_ptr)  a2_d,
type(c_ptr)  a3_d,
type(c_ptr)  b1_d,
type(c_ptr)  b2_d,
type(c_ptr)  b3_d,
type(c_ptr)  c_d,
integer  n,
integer  gdim 
)

\( a(i) = a + b(i) * c(i) \)

Definition at line 258 of file device_mathops.F90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ device_opchsign()

subroutine, public device_mathops::device_opchsign ( type(c_ptr)  a1_d,
type(c_ptr)  a2_d,
type(c_ptr)  a3_d,
integer  gdim,
integer  n 
)

\( a = -a \)

Definition at line 195 of file device_mathops.F90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ device_opcolv()

subroutine, public device_mathops::device_opcolv ( type(c_ptr)  a1_d,
type(c_ptr)  a2_d,
type(c_ptr)  a3_d,
type(c_ptr)  c_d,
integer  gdim,
integer  n 
)

\( a = a * c \)

Definition at line 210 of file device_mathops.F90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ device_opcolv3c()

subroutine, public device_mathops::device_opcolv3c ( type(c_ptr)  a1_d,
type(c_ptr)  a2_d,
type(c_ptr)  a3_d,
type(c_ptr)  b1_d,
type(c_ptr)  b2_d,
type(c_ptr)  b3_d,
type(c_ptr)  c_d,
real(kind=rp)  d,
integer  n,
integer  gdim 
)

\( a(i) = b(i) * c(i) * d \)

Definition at line 225 of file device_mathops.F90.

Here is the call graph for this function:
Here is the caller graph for this function: