ASMB NAM NAMCK,7 . 92903-16001 REV.1805 770712 * * SOURCE 92903-18043 * * SPC 2 ************************************************************** * (C) COPYRIGHT HEWLETT-PACKARD COMPANY 1978. ALL RIGHTS * * RESERVED. NO PART OF THIS PROGRAM MAY BE PHOTOCOPIED, RE- * * PRODUCED, OR TRANSLATED TO ANOTHER PROGRAM LANGUAGE WITH- * * OUT THE PRIOR WRITTEN CONSENT OF HEWLETT-PACKARD COMPANY. * ************************************************************** SPC 2 * * SUBROUTINE USED TO CALL NAM.. ROUTINE FROM A * FORTRAN PROGRAM * * ENT NAMCK EXT NAM..,.ENTR * NAME NOP NAMCK NOP JSB .ENTR DEF NAME JSB NAM.. DEF *+2 DEF NAME,I SZA CCA JMP NAMCK,I END