Subroutine lenhmz1ny

subroutine lenhmz1ny

        ! Variables
    integer, intent(in) :: n
    integer, intent(in) :: n1
    integer, intent(in) :: flag
    integer, intent(in) :: mx
    double precision, intent(in) :: rm
    double precision, intent(in) :: alpha
    double precision, intent(in), dimension (0:mx) :: aa
    double precision, intent(in), dimension (0:mx) :: ww
    double precision, intent(out), dimension (0:n-1) :: f
    integer :: i
    integer :: k
    integer :: init
    double precision, dimension (1:n,3) :: a

end subroutine lenhmz1ny

Description of Variables

n

integer, intent(in) :: n

n1

integer, intent(in) :: n1

flag

integer, intent(in) :: flag

mx

integer, intent(in) :: mx

rm

double precision, intent(in) :: rm

alpha

double precision, intent(in) :: alpha

aa

double precision, intent(in), dimension (0:mx) :: aa

ww

double precision, intent(in), dimension (0:mx) :: ww

f

double precision, intent(out), dimension (0:n-1) :: f

i

integer :: i

k

integer :: k

init

integer :: init

a

double precision, dimension (1:n,3) :: a