ax_helm_compr_sx Module Reference

SX Helmholtz matrix-vector product on compressed geometric factors. More...

Data Types
type	ax_helm_compr_sx_t
	SX matrix-vector product for a Helmholtz problem, reading the geometric factors \( G_{ij} \) from their compressed form in coef_t. More...

Functions/Subroutines
subroutine	ax_helm_compr_sx_compute (this, w, u, coef, msh, xh)
subroutine	sx_ax_helm_compr_lx (w, u, dx, dy, dz, dxt, dyt, dzt, h1, g11, g22, g33, g12, g13, g23, ind, n, m, lx)
subroutine	sx_ax_helm_compr_lx14 (w, u, dx, dy, dz, dxt, dyt, dzt, h1, g11, g22, g33, g12, g13, g23, ind, n, m)
subroutine	sx_ax_helm_compr_lx13 (w, u, dx, dy, dz, dxt, dyt, dzt, h1, g11, g22, g33, g12, g13, g23, ind, n, m)
subroutine	sx_ax_helm_compr_lx12 (w, u, dx, dy, dz, dxt, dyt, dzt, h1, g11, g22, g33, g12, g13, g23, ind, n, m)
subroutine	sx_ax_helm_compr_lx11 (w, u, dx, dy, dz, dxt, dyt, dzt, h1, g11, g22, g33, g12, g13, g23, ind, n, m)
subroutine	sx_ax_helm_compr_lx10 (w, u, dx, dy, dz, dxt, dyt, dzt, h1, g11, g22, g33, g12, g13, g23, ind, n, m)
subroutine	sx_ax_helm_compr_lx9 (w, u, dx, dy, dz, dxt, dyt, dzt, h1, g11, g22, g33, g12, g13, g23, ind, n, m)
subroutine	sx_ax_helm_compr_lx8 (w, u, dx, dy, dz, dxt, dyt, dzt, h1, g11, g22, g33, g12, g13, g23, ind, n, m)
subroutine	sx_ax_helm_compr_lx7 (w, u, dx, dy, dz, dxt, dyt, dzt, h1, g11, g22, g33, g12, g13, g23, ind, n, m)
subroutine	sx_ax_helm_compr_lx6 (w, u, dx, dy, dz, dxt, dyt, dzt, h1, g11, g22, g33, g12, g13, g23, ind, n, m)
subroutine	sx_ax_helm_compr_lx5 (w, u, dx, dy, dz, dxt, dyt, dzt, h1, g11, g22, g33, g12, g13, g23, ind, n, m)
subroutine	sx_ax_helm_compr_lx4 (w, u, dx, dy, dz, dxt, dyt, dzt, h1, g11, g22, g33, g12, g13, g23, ind, n, m)
subroutine	sx_ax_helm_compr_lx3 (w, u, dx, dy, dz, dxt, dyt, dzt, h1, g11, g22, g33, g12, g13, g23, ind, n, m)
subroutine	sx_ax_helm_compr_lx2 (w, u, dx, dy, dz, dxt, dyt, dzt, h1, g11, g22, g33, g12, g13, g23, ind, n, m)

Detailed Description

Note

The kernels are those of ax_helm_sx with the geometric factors read at G(:,:,:,ind(e)), so a change to one belongs in the other.

Function/Subroutine Documentation

ax_helm_compr_sx_compute()

subroutine ax_helm_compr_sx::ax_helm_compr_sx_compute	(	class(ax_helm_compr_sx_t), intent(in)	this,
		real(kind=rp), dimension(xh%lx, xh%ly, xh%lz, msh%nelv), intent(inout)	w,
		real(kind=rp), dimension(xh%lx, xh%ly, xh%lz, msh%nelv), intent(in)	u,
		type(coef_t), intent(in)	coef,
		type(mesh_t), intent(in)	msh,
		type(space_t), intent(in)	xh
	)

Definition at line 59 of file ax_helm_compr_sx.f90.

Here is the call graph for this function:

sx_ax_helm_compr_lx()

subroutine ax_helm_compr_sx::sx_ax_helm_compr_lx ( real(kind=rp), dimension(lx, lx, lx, n), intent(inout)  w, real(kind=rp), dimension(lx, lx, lx, n), intent(in)  u, real(kind=rp), dimension(lx, lx), intent(in)  dx, real(kind=rp), dimension(lx, lx), intent(in)  dy, real(kind=rp), dimension(lx, lx), intent(in)  dz, real(kind=rp), dimension(lx, lx), intent(in)  dxt, real(kind=rp), dimension(lx, lx), intent(in)  dyt, real(kind=rp), dimension(lx, lx), intent(in)  dzt, real(kind=rp), dimension(lx, lx, lx, n), intent(in)  h1, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g11, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g22, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g33, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g12, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g13, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g23, integer, dimension(n), intent(in)  ind, integer, intent(in)  n, integer, intent(in)  m, integer, intent(in)  lx  )

private

Definition at line 169 of file ax_helm_compr_sx.f90.

Here is the caller graph for this function:

sx_ax_helm_compr_lx10()

subroutine ax_helm_compr_sx::sx_ax_helm_compr_lx10 ( real(kind=rp), dimension(lx, lx, lx, n), intent(inout)  w, real(kind=rp), dimension(lx, lx, lx, n), intent(in)  u, real(kind=rp), dimension(lx, lx), intent(in)  dx, real(kind=rp), dimension(lx, lx), intent(in)  dy, real(kind=rp), dimension(lx, lx), intent(in)  dz, real(kind=rp), dimension(lx, lx), intent(in)  dxt, real(kind=rp), dimension(lx, lx), intent(in)  dyt, real(kind=rp), dimension(lx, lx), intent(in)  dzt, real(kind=rp), dimension(lx, lx, lx, n), intent(in)  h1, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g11, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g22, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g33, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g12, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g13, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g23, integer, dimension(n), intent(in)  ind, integer, intent(in)  n, integer, intent(in)  m  )

private

Definition at line 828 of file ax_helm_compr_sx.f90.

Here is the caller graph for this function:

sx_ax_helm_compr_lx11()

subroutine ax_helm_compr_sx::sx_ax_helm_compr_lx11 ( real(kind=rp), dimension(lx, lx, lx, n), intent(inout)  w, real(kind=rp), dimension(lx, lx, lx, n), intent(in)  u, real(kind=rp), dimension(lx, lx), intent(in)  dx, real(kind=rp), dimension(lx, lx), intent(in)  dy, real(kind=rp), dimension(lx, lx), intent(in)  dz, real(kind=rp), dimension(lx, lx), intent(in)  dxt, real(kind=rp), dimension(lx, lx), intent(in)  dyt, real(kind=rp), dimension(lx, lx), intent(in)  dzt, real(kind=rp), dimension(lx, lx, lx, n), intent(in)  h1, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g11, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g22, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g33, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g12, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g13, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g23, integer, dimension(n), intent(in)  ind, integer, intent(in)  n, integer, intent(in)  m  )

private

Definition at line 696 of file ax_helm_compr_sx.f90.

Here is the caller graph for this function:

sx_ax_helm_compr_lx12()

subroutine ax_helm_compr_sx::sx_ax_helm_compr_lx12 ( real(kind=rp), dimension(lx, lx, lx, n), intent(inout)  w, real(kind=rp), dimension(lx, lx, lx, n), intent(in)  u, real(kind=rp), dimension(lx, lx), intent(in)  dx, real(kind=rp), dimension(lx, lx), intent(in)  dy, real(kind=rp), dimension(lx, lx), intent(in)  dz, real(kind=rp), dimension(lx, lx), intent(in)  dxt, real(kind=rp), dimension(lx, lx), intent(in)  dyt, real(kind=rp), dimension(lx, lx), intent(in)  dzt, real(kind=rp), dimension(lx, lx, lx, n), intent(in)  h1, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g11, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g22, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g33, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g12, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g13, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g23, integer, dimension(n), intent(in)  ind, integer, intent(in)  n, integer, intent(in)  m  )

private

Definition at line 564 of file ax_helm_compr_sx.f90.

Here is the caller graph for this function:

sx_ax_helm_compr_lx13()

subroutine ax_helm_compr_sx::sx_ax_helm_compr_lx13 ( real(kind=rp), dimension(lx, lx, lx, n), intent(inout)  w, real(kind=rp), dimension(lx, lx, lx, n), intent(in)  u, real(kind=rp), dimension(lx, lx), intent(in)  dx, real(kind=rp), dimension(lx, lx), intent(in)  dy, real(kind=rp), dimension(lx, lx), intent(in)  dz, real(kind=rp), dimension(lx, lx), intent(in)  dxt, real(kind=rp), dimension(lx, lx), intent(in)  dyt, real(kind=rp), dimension(lx, lx), intent(in)  dzt, real(kind=rp), dimension(lx, lx, lx, n), intent(in)  h1, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g11, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g22, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g33, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g12, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g13, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g23, integer, dimension(n), intent(in)  ind, integer, intent(in)  n, integer, intent(in)  m  )

private

Definition at line 432 of file ax_helm_compr_sx.f90.

Here is the caller graph for this function:

sx_ax_helm_compr_lx14()

subroutine ax_helm_compr_sx::sx_ax_helm_compr_lx14 ( real(kind=rp), dimension(lx, lx, lx, n), intent(inout)  w, real(kind=rp), dimension(lx, lx, lx, n), intent(in)  u, real(kind=rp), dimension(lx, lx), intent(in)  dx, real(kind=rp), dimension(lx, lx), intent(in)  dy, real(kind=rp), dimension(lx, lx), intent(in)  dz, real(kind=rp), dimension(lx, lx), intent(in)  dxt, real(kind=rp), dimension(lx, lx), intent(in)  dyt, real(kind=rp), dimension(lx, lx), intent(in)  dzt, real(kind=rp), dimension(lx, lx, lx, n), intent(in)  h1, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g11, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g22, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g33, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g12, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g13, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g23, integer, dimension(n), intent(in)  ind, integer, intent(in)  n, integer, intent(in)  m  )

private

Definition at line 300 of file ax_helm_compr_sx.f90.

Here is the caller graph for this function:

sx_ax_helm_compr_lx2()

subroutine ax_helm_compr_sx::sx_ax_helm_compr_lx2 ( real(kind=rp), dimension(lx, lx, lx, n), intent(inout)  w, real(kind=rp), dimension(lx, lx, lx, n), intent(in)  u, real(kind=rp), dimension(lx, lx), intent(in)  dx, real(kind=rp), dimension(lx, lx), intent(in)  dy, real(kind=rp), dimension(lx, lx), intent(in)  dz, real(kind=rp), dimension(lx, lx), intent(in)  dxt, real(kind=rp), dimension(lx, lx), intent(in)  dyt, real(kind=rp), dimension(lx, lx), intent(in)  dzt, real(kind=rp), dimension(lx, lx, lx, n), intent(in)  h1, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g11, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g22, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g33, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g12, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g13, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g23, integer, dimension(n), intent(in)  ind, integer, intent(in)  n, integer, intent(in)  m  )

private

Definition at line 1860 of file ax_helm_compr_sx.f90.

Here is the caller graph for this function:

sx_ax_helm_compr_lx3()

subroutine ax_helm_compr_sx::sx_ax_helm_compr_lx3 ( real(kind=rp), dimension(lx, lx, lx, n), intent(inout)  w, real(kind=rp), dimension(lx, lx, lx, n), intent(in)  u, real(kind=rp), dimension(lx, lx), intent(in)  dx, real(kind=rp), dimension(lx, lx), intent(in)  dy, real(kind=rp), dimension(lx, lx), intent(in)  dz, real(kind=rp), dimension(lx, lx), intent(in)  dxt, real(kind=rp), dimension(lx, lx), intent(in)  dyt, real(kind=rp), dimension(lx, lx), intent(in)  dzt, real(kind=rp), dimension(lx, lx, lx, n), intent(in)  h1, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g11, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g22, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g33, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g12, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g13, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g23, integer, dimension(n), intent(in)  ind, integer, intent(in)  n, integer, intent(in)  m  )

private

Definition at line 1743 of file ax_helm_compr_sx.f90.

Here is the caller graph for this function:

sx_ax_helm_compr_lx4()

subroutine ax_helm_compr_sx::sx_ax_helm_compr_lx4 ( real(kind=rp), dimension(lx, lx, lx, n), intent(inout)  w, real(kind=rp), dimension(lx, lx, lx, n), intent(in)  u, real(kind=rp), dimension(lx, lx), intent(in)  dx, real(kind=rp), dimension(lx, lx), intent(in)  dy, real(kind=rp), dimension(lx, lx), intent(in)  dz, real(kind=rp), dimension(lx, lx), intent(in)  dxt, real(kind=rp), dimension(lx, lx), intent(in)  dyt, real(kind=rp), dimension(lx, lx), intent(in)  dzt, real(kind=rp), dimension(lx, lx, lx, n), intent(in)  h1, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g11, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g22, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g33, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g12, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g13, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g23, integer, dimension(n), intent(in)  ind, integer, intent(in)  n, integer, intent(in)  m  )

private

Definition at line 1620 of file ax_helm_compr_sx.f90.

Here is the caller graph for this function:

sx_ax_helm_compr_lx5()

subroutine ax_helm_compr_sx::sx_ax_helm_compr_lx5 ( real(kind=rp), dimension(lx, lx, lx, n), intent(inout)  w, real(kind=rp), dimension(lx, lx, lx, n), intent(in)  u, real(kind=rp), dimension(lx, lx), intent(in)  dx, real(kind=rp), dimension(lx, lx), intent(in)  dy, real(kind=rp), dimension(lx, lx), intent(in)  dz, real(kind=rp), dimension(lx, lx), intent(in)  dxt, real(kind=rp), dimension(lx, lx), intent(in)  dyt, real(kind=rp), dimension(lx, lx), intent(in)  dzt, real(kind=rp), dimension(lx, lx, lx, n), intent(in)  h1, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g11, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g22, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g33, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g12, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g13, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g23, integer, dimension(n), intent(in)  ind, integer, intent(in)  n, integer, intent(in)  m  )

private

Definition at line 1488 of file ax_helm_compr_sx.f90.

Here is the caller graph for this function:

sx_ax_helm_compr_lx6()

subroutine ax_helm_compr_sx::sx_ax_helm_compr_lx6 ( real(kind=rp), dimension(lx, lx, lx, n), intent(inout)  w, real(kind=rp), dimension(lx, lx, lx, n), intent(in)  u, real(kind=rp), dimension(lx, lx), intent(in)  dx, real(kind=rp), dimension(lx, lx), intent(in)  dy, real(kind=rp), dimension(lx, lx), intent(in)  dz, real(kind=rp), dimension(lx, lx), intent(in)  dxt, real(kind=rp), dimension(lx, lx), intent(in)  dyt, real(kind=rp), dimension(lx, lx), intent(in)  dzt, real(kind=rp), dimension(lx, lx, lx, n), intent(in)  h1, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g11, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g22, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g33, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g12, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g13, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g23, integer, dimension(n), intent(in)  ind, integer, intent(in)  n, integer, intent(in)  m  )

private

Definition at line 1356 of file ax_helm_compr_sx.f90.

Here is the caller graph for this function:

sx_ax_helm_compr_lx7()

subroutine ax_helm_compr_sx::sx_ax_helm_compr_lx7 ( real(kind=rp), dimension(lx, lx, lx, n), intent(inout)  w, real(kind=rp), dimension(lx, lx, lx, n), intent(in)  u, real(kind=rp), dimension(lx, lx), intent(in)  dx, real(kind=rp), dimension(lx, lx), intent(in)  dy, real(kind=rp), dimension(lx, lx), intent(in)  dz, real(kind=rp), dimension(lx, lx), intent(in)  dxt, real(kind=rp), dimension(lx, lx), intent(in)  dyt, real(kind=rp), dimension(lx, lx), intent(in)  dzt, real(kind=rp), dimension(lx, lx, lx, n), intent(in)  h1, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g11, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g22, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g33, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g12, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g13, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g23, integer, dimension(n), intent(in)  ind, integer, intent(in)  n, integer, intent(in)  m  )

private

Definition at line 1224 of file ax_helm_compr_sx.f90.

Here is the caller graph for this function:

sx_ax_helm_compr_lx8()

subroutine ax_helm_compr_sx::sx_ax_helm_compr_lx8 ( real(kind=rp), dimension(lx, lx, lx, n), intent(inout)  w, real(kind=rp), dimension(lx, lx, lx, n), intent(in)  u, real(kind=rp), dimension(lx, lx), intent(in)  dx, real(kind=rp), dimension(lx, lx), intent(in)  dy, real(kind=rp), dimension(lx, lx), intent(in)  dz, real(kind=rp), dimension(lx, lx), intent(in)  dxt, real(kind=rp), dimension(lx, lx), intent(in)  dyt, real(kind=rp), dimension(lx, lx), intent(in)  dzt, real(kind=rp), dimension(lx, lx, lx, n), intent(in)  h1, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g11, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g22, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g33, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g12, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g13, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g23, integer, dimension(n), intent(in)  ind, integer, intent(in)  n, integer, intent(in)  m  )

private

Definition at line 1092 of file ax_helm_compr_sx.f90.

Here is the caller graph for this function:

sx_ax_helm_compr_lx9()

subroutine ax_helm_compr_sx::sx_ax_helm_compr_lx9 ( real(kind=rp), dimension(lx, lx, lx, n), intent(inout)  w, real(kind=rp), dimension(lx, lx, lx, n), intent(in)  u, real(kind=rp), dimension(lx, lx), intent(in)  dx, real(kind=rp), dimension(lx, lx), intent(in)  dy, real(kind=rp), dimension(lx, lx), intent(in)  dz, real(kind=rp), dimension(lx, lx), intent(in)  dxt, real(kind=rp), dimension(lx, lx), intent(in)  dyt, real(kind=rp), dimension(lx, lx), intent(in)  dzt, real(kind=rp), dimension(lx, lx, lx, n), intent(in)  h1, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g11, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g22, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g33, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g12, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g13, real(kind=rp), dimension(lx, lx, lx, m), intent(in)  g23, integer, dimension(n), intent(in)  ind, integer, intent(in)  n, integer, intent(in)  m  )

private

Definition at line 960 of file ax_helm_compr_sx.f90.

Here is the caller graph for this function: