surfgf Subroutine

public subroutine surfgf(ndim, ml, m0, mr, x, itermax, errmax, ichck)

Uses

Solve surface green's function: method: decimation technique input: ml,m0,mr - complex rectangular matrices output: x - result, matrix of same type as before

Note

NEW VERSION (speeded up) by V.Bellini (march,1999)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: ndim
complex(kind=dp), intent(in), dimension (ndim, ndim) :: ml
complex(kind=dp), intent(in), dimension (ndim, ndim) :: m0
complex(kind=dp), intent(in), dimension (ndim, ndim) :: mr
complex(kind=dp), intent(out), dimension (ndim, ndim) :: x
integer, intent(in) :: itermax
real(kind=dp), intent(in) :: errmax
integer, intent(in) :: ichck