m_cuda_kernels_fieldops Module


Uses

  • module~~m_cuda_kernels_fieldops~~UsesGraph module~m_cuda_kernels_fieldops m_cuda_kernels_fieldops cudafor cudafor module~m_cuda_kernels_fieldops->cudafor module~m_common m_common module~m_cuda_kernels_fieldops->module~m_common module~m_cuda_common m_cuda_common module~m_cuda_kernels_fieldops->module~m_cuda_common

Used by

  • module~~m_cuda_kernels_fieldops~~UsedByGraph module~m_cuda_kernels_fieldops m_cuda_kernels_fieldops module~m_cuda_backend m_cuda_backend module~m_cuda_backend->module~m_cuda_kernels_fieldops program~xcompact xcompact program~xcompact->module~m_cuda_backend

Subroutines

public subroutine axpby(n, alpha, x, beta, y)

Arguments

Type IntentOptional Attributes Name
integer, intent(in), value :: n
real(kind=dp), intent(in), value :: alpha
real(kind=dp), intent(in), device, dimension(:, :, :) :: x
real(kind=dp), intent(in), value :: beta
real(kind=dp), intent(inout), device, dimension(:, :, :) :: y

public subroutine buffer_copy(u_send_s, u_send_e, u, n, n_halo)

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(inout), device, dimension(:, :, :) :: u_send_s
real(kind=dp), intent(inout), device, dimension(:, :, :) :: u_send_e
real(kind=dp), intent(in), device, dimension(:, :, :) :: u
integer, intent(in), value :: n
integer, intent(in), value :: n_halo

public subroutine field_scale(f, alpha, n)

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(inout), device, dimension(:, :, :) :: f
real(kind=dp), intent(in), value :: alpha
integer, intent(in), value :: n

public subroutine field_shift(f, const, n)

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(inout), device, dimension(:, :, :) :: f
real(kind=dp), intent(in), value :: const
integer, intent(in), value :: n

public subroutine scalar_product(s, x, y, n, n_i_pad, n_j)

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(inout), device :: s
real(kind=dp), intent(in), device, dimension(:, :, :) :: x
real(kind=dp), intent(in), device, dimension(:, :, :) :: y
integer, intent(in), value :: n
integer, intent(in), value :: n_i_pad
integer, intent(in), value :: n_j

public subroutine field_max_sum(max_f, sum_f, f, n, n_i_pad, n_j)

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(inout), device :: max_f
real(kind=dp), intent(inout), device :: sum_f
real(kind=dp), intent(in), device, dimension(:, :, :) :: f
integer, intent(in), value :: n
integer, intent(in), value :: n_i_pad
integer, intent(in), value :: n_j

public subroutine field_set_y_face(f, c_start, c_end, nx, ny, nz)

Set domain Y_FACE to a constant c_start at the bottom and c_end at the top

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(inout), device, dimension(:, :, :) :: f
real(kind=dp), intent(in), value :: c_start
real(kind=dp), intent(in), value :: c_end
integer, intent(in), value :: nx
integer, intent(in), value :: ny
integer, intent(in), value :: nz

public subroutine volume_integral(s, f, n, n_i_pad, n_j)

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(inout), device :: s
real(kind=dp), intent(in), device, dimension(:, :, :) :: f
integer, intent(in), value :: n
integer, intent(in), value :: n_i_pad
integer, intent(in), value :: n_j