Subroutine chdhmz1

subroutine chdhmz1

        ! Variables
    integer :: flag
    integer :: init

end subroutine chdhmz1

Description of Variables

integer :: flag

integer :: init