subroutine f77sub(arg) integer arg print *, 'The value of arg is ', arg end