Neko  0.9.99
A portable framework for high-order spectral element flow simulations
sx_jacobi Module Reference

Jacobi preconditioner SX-Aurora backend.

Data Types

type  sx_jacobi_t
 Defines a jacobi preconditioner for SX-Aurora. More...
 

Functions/Subroutines

subroutine sx_jacobi_init (this, coef, dof, gs_h)
 
subroutine sx_jacobi_free (this)
 
subroutine sx_jacobi_solve (this, z, r, n)
 The jacobi preconditioner \( J z = r \) \( z = J^{-1}r\) where \( J^{-1} ~= 1/diag(A) \). More...
 
subroutine sx_jacobi_update (this)
 
subroutine sx_update_lx (d, dxt, dyt, dzt, G11, G22, G33, G12, G13, G23, n, lx)
 
subroutine sx_update_lx14 (d, dxt, dyt, dzt, G11, G22, G33, G12, G13, G23, n)
 
subroutine sx_update_lx13 (d, dxt, dyt, dzt, G11, G22, G33, G12, G13, G23, n)
 
subroutine sx_update_lx12 (d, dxt, dyt, dzt, G11, G22, G33, G12, G13, G23, n)
 
subroutine sx_update_lx11 (d, dxt, dyt, dzt, G11, G22, G33, G12, G13, G23, n)
 
subroutine sx_update_lx10 (d, dxt, dyt, dzt, G11, G22, G33, G12, G13, G23, n)
 
subroutine sx_update_lx9 (d, dxt, dyt, dzt, G11, G22, G33, G12, G13, G23, n)
 
subroutine sx_update_lx8 (d, dxt, dyt, dzt, G11, G22, G33, G12, G13, G23, n)
 
subroutine sx_update_lx7 (d, dxt, dyt, dzt, G11, G22, G33, G12, G13, G23, n)
 
subroutine sx_update_lx6 (d, dxt, dyt, dzt, G11, G22, G33, G12, G13, G23, n)
 
subroutine sx_update_lx5 (d, dxt, dyt, dzt, G11, G22, G33, G12, G13, G23, n)
 
subroutine sx_update_lx4 (d, dxt, dyt, dzt, G11, G22, G33, G12, G13, G23, n)
 
subroutine sx_update_lx3 (d, dxt, dyt, dzt, G11, G22, G33, G12, G13, G23, n)
 
subroutine sx_update_lx2 (d, dxt, dyt, dzt, G11, G22, G33, G12, G13, G23, n)
 

Function/Subroutine Documentation

◆ sx_jacobi_free()

subroutine sx_jacobi::sx_jacobi_free ( class(sx_jacobi_t), intent(inout)  this)
private

Definition at line 74 of file pc_jacobi_sx.f90.

◆ sx_jacobi_init()

subroutine sx_jacobi::sx_jacobi_init ( class(sx_jacobi_t), intent(inout)  this,
type(coef_t), intent(inout), target  coef,
type(dofmap_t), intent(inout), target  dof,
type(gs_t), intent(inout), target  gs_h 
)

Definition at line 59 of file pc_jacobi_sx.f90.

Here is the call graph for this function:

◆ sx_jacobi_solve()

subroutine sx_jacobi::sx_jacobi_solve ( class(sx_jacobi_t), intent(inout)  this,
real(kind=rp), dimension(n), intent(inout)  z,
real(kind=rp), dimension(n), intent(inout)  r,
integer, intent(in)  n 
)
private

Definition at line 86 of file pc_jacobi_sx.f90.

Here is the call graph for this function:

◆ sx_jacobi_update()

subroutine sx_jacobi::sx_jacobi_update ( class(sx_jacobi_t), intent(inout)  this)
private

Definition at line 94 of file pc_jacobi_sx.f90.

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

◆ sx_update_lx()

subroutine sx_jacobi::sx_update_lx ( real(kind=rp), dimension(lx, lx, lx, n), intent(inout)  d,
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)  G11,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G22,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G33,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G12,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G13,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G23,
integer, intent(in)  n,
integer, intent(in)  lx 
)
private

Definition at line 157 of file pc_jacobi_sx.f90.

Here is the caller graph for this function:

◆ sx_update_lx10()

subroutine sx_jacobi::sx_update_lx10 ( real(kind=rp), dimension(lx, lx, lx, n), intent(inout)  d,
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)  G11,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G22,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G33,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G12,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G13,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G23,
integer, intent(in)  n 
)
private

Definition at line 549 of file pc_jacobi_sx.f90.

Here is the caller graph for this function:

◆ sx_update_lx11()

subroutine sx_jacobi::sx_update_lx11 ( real(kind=rp), dimension(lx, lx, lx, n), intent(inout)  d,
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)  G11,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G22,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G33,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G12,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G13,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G23,
integer, intent(in)  n 
)
private

Definition at line 470 of file pc_jacobi_sx.f90.

Here is the caller graph for this function:

◆ sx_update_lx12()

subroutine sx_jacobi::sx_update_lx12 ( real(kind=rp), dimension(lx, lx, lx, n), intent(inout)  d,
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)  G11,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G22,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G33,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G12,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G13,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G23,
integer, intent(in)  n 
)
private

Definition at line 391 of file pc_jacobi_sx.f90.

Here is the caller graph for this function:

◆ sx_update_lx13()

subroutine sx_jacobi::sx_update_lx13 ( real(kind=rp), dimension(lx, lx, lx, n), intent(inout)  d,
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)  G11,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G22,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G33,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G12,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G13,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G23,
integer, intent(in)  n 
)
private

Definition at line 312 of file pc_jacobi_sx.f90.

Here is the caller graph for this function:

◆ sx_update_lx14()

subroutine sx_jacobi::sx_update_lx14 ( real(kind=rp), dimension(lx, lx, lx, n), intent(inout)  d,
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)  G11,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G22,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G33,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G12,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G13,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G23,
integer, intent(in)  n 
)
private

Definition at line 233 of file pc_jacobi_sx.f90.

◆ sx_update_lx2()

subroutine sx_jacobi::sx_update_lx2 ( real(kind=rp), dimension(lx, lx, lx, n), intent(inout)  d,
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)  G11,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G22,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G33,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G12,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G13,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G23,
integer, intent(in)  n 
)
private

Definition at line 1181 of file pc_jacobi_sx.f90.

Here is the caller graph for this function:

◆ sx_update_lx3()

subroutine sx_jacobi::sx_update_lx3 ( real(kind=rp), dimension(lx, lx, lx, n), intent(inout)  d,
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)  G11,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G22,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G33,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G12,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G13,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G23,
integer, intent(in)  n 
)
private

Definition at line 1102 of file pc_jacobi_sx.f90.

◆ sx_update_lx4()

subroutine sx_jacobi::sx_update_lx4 ( real(kind=rp), dimension(lx, lx, lx, n), intent(inout)  d,
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)  G11,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G22,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G33,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G12,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G13,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G23,
integer, intent(in)  n 
)
private

Definition at line 1023 of file pc_jacobi_sx.f90.

Here is the caller graph for this function:

◆ sx_update_lx5()

subroutine sx_jacobi::sx_update_lx5 ( real(kind=rp), dimension(lx, lx, lx, n), intent(inout)  d,
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)  G11,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G22,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G33,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G12,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G13,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G23,
integer, intent(in)  n 
)
private

Definition at line 944 of file pc_jacobi_sx.f90.

Here is the caller graph for this function:

◆ sx_update_lx6()

subroutine sx_jacobi::sx_update_lx6 ( real(kind=rp), dimension(lx, lx, lx, n), intent(inout)  d,
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)  G11,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G22,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G33,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G12,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G13,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G23,
integer, intent(in)  n 
)
private

Definition at line 865 of file pc_jacobi_sx.f90.

Here is the caller graph for this function:

◆ sx_update_lx7()

subroutine sx_jacobi::sx_update_lx7 ( real(kind=rp), dimension(lx, lx, lx, n), intent(inout)  d,
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)  G11,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G22,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G33,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G12,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G13,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G23,
integer, intent(in)  n 
)
private

Definition at line 786 of file pc_jacobi_sx.f90.

Here is the caller graph for this function:

◆ sx_update_lx8()

subroutine sx_jacobi::sx_update_lx8 ( real(kind=rp), dimension(lx, lx, lx, n), intent(inout)  d,
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)  G11,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G22,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G33,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G12,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G13,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G23,
integer, intent(in)  n 
)
private

Definition at line 707 of file pc_jacobi_sx.f90.

Here is the caller graph for this function:

◆ sx_update_lx9()

subroutine sx_jacobi::sx_update_lx9 ( real(kind=rp), dimension(lx, lx, lx, n), intent(inout)  d,
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)  G11,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G22,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G33,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G12,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G13,
real(kind=rp), dimension(lx, lx, lx, n), intent(in)  G23,
integer, intent(in)  n 
)
private

Definition at line 628 of file pc_jacobi_sx.f90.

Here is the caller graph for this function: