generic_thomas_2d Subroutine

private subroutine generic_thomas_2d(mp, n, A, B, C, r, u, err)

Arguments

Type IntentOptional Attributes Name
integer(kind=i_d), intent(in) :: mp
integer(kind=i_d), intent(in) :: n
real(kind=r_2), intent(in), DIMENSION(1:mp,1:n,1:2,1:2) :: A
real(kind=r_2), intent(in), DIMENSION(1:mp,1:n,1:2,1:2) :: B
real(kind=r_2), intent(in), DIMENSION(1:mp,1:n,1:2,1:2) :: C
real(kind=r_2), intent(in), DIMENSION(1:mp,1:n,1:2) :: r
real(kind=r_2), intent(out), DIMENSION(1:mp,1:n,1:2) :: u
integer(kind=i_d), intent(out), optional :: err