Subroutine ledhmz1

subroutine ledhmz1

        ! Variables
    integer, intent(in) :: n
    integer, intent(in) :: flag
    double precision, intent(in) :: rm
    double precision, intent(in) :: alpha
    double precision, intent(inout), dimension (0:n-1) :: f
    integer :: i
    integer :: k
    double precision, dimension (0:n,3) :: a

end subroutine ledhmz1

Description of Variables

n

integer, intent(in) :: n

flag

integer, intent(in) :: flag

rm

double precision, intent(in) :: rm

alpha

double precision, intent(in) :: alpha

f

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

i

integer :: i

k

integer :: k

a

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