The TELEMAC-MASCARET system  trunk
Functions/Subroutines
precd9.f File Reference

Go to the source code of this file.

Functions/Subroutines

subroutine precd9 (X1, X2, X3, A11, A12, A13, A21, A22, A23, A31, A32, A33, B1, B2, B3, D1, D2, D3, MESH, PRECON, PREXSM, DIADON)
 

Function/Subroutine Documentation

◆ precd9()

subroutine precd9 ( type(bief_obj), intent(inout)  X1,
type(bief_obj), intent(inout)  X2,
type(bief_obj), intent(inout)  X3,
type(bief_obj), intent(inout)  A11,
type(bief_obj), intent(inout)  A12,
type(bief_obj), intent(inout)  A13,
type(bief_obj), intent(inout)  A21,
type(bief_obj), intent(inout)  A22,
type(bief_obj), intent(inout)  A23,
type(bief_obj), intent(inout)  A31,
type(bief_obj), intent(inout)  A32,
type(bief_obj), intent(inout)  A33,
type(bief_obj), intent(inout)  B1,
type(bief_obj), intent(inout)  B2,
type(bief_obj), intent(inout)  B3,
type(bief_obj), intent(inout)  D1,
type(bief_obj), intent(inout)  D2,
type(bief_obj), intent(inout)  D3,
type(bief_mesh), intent(inout)  MESH,
integer, intent(in)  PRECON,
logical, intent(in)  PREXSM,
logical, intent(in)  DIADON 
)
Parameters
[in]precon[in, out] A33 Term (3,3) of matrix
[in,out]B1First right-hand side
[in,out]B2Second right-hand side
[in,out]B3Third right-hand side
[out]D1Diagonal matrix
[out]D2Diagonal matrix
[out]D3Diagonal matrix
[in]DIADON.true. : diagonals are given
[in]MESHMesh structure
[in]PRECONChoice of preconditioning
[in]PREXSM.true. : preconditioning x1,x2 and b1,b2
[in,out]X1First initial guess
[in]X2Second initial guess
[in]X3Third initial guess

Definition at line 8 of file precd9.f.

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