Added intent to subroutine arguments and renamed bare 'end' to 'end subroutine name' and same for program.