wtn Interface

interface
public subroutine wtn(a, nn, isign, wtstep)

Arguments

Type IntentOptional AttributesName
real(kind=SP), intent(inout), DIMENSION(:):: a
integer(kind=I4B), intent(in), DIMENSION(:):: nn
integer(kind=I4B), intent(in) :: isign
subroutine wtstep(a, isign)
Arguments
Type IntentOptional AttributesName
real(kind=SP), intent(inout), DIMENSION(:):: a
integer(kind=I4B), intent(in) :: isign