C A sample subprogram to illustrate how to use the MAKE utility SUBROUTINE A WRITE (6,*) 'A' RETURN END