!*** MODULE $SRFDEF ***
!DEC$ OPTIONS/ALIGN=(RECORDS=PACKED,COMMONS=PACKED)/NOWARN
 ! 
 !  Symbol reference (SYM$M_DEF in GSY$W_FLAGS is 0)
 ! 
	PARAMETER SRF$K_NAME = '00000005'X
	PARAMETER SRF$C_NAME = '00000005'X
	STRUCTURE /SRFDEF/
	    UNION
	        MAP
	        BYTE      SRF$B_GSDTYP			 ! Maps over GSY$B_GSDTYP 
	        END MAP
	        MAP
	            ! unsupported type CHARACTER*0 SRF$T_START
	            BYTE      %FILL
	        END MAP
	    END UNION
	    BYTE      SRF$B_DATYP			 ! Maps over GSY$B_DATYP 
	    INTEGER*2 SRF$W_FLAGS			 ! Maps over GSY$W_FLAGS 
	    BYTE      SRF$B_NAMLNG			 ! Length of symbol name 
	    CHARACTER*31 SRF$T_NAME			 ! Symbol name 
	END STRUCTURE	! SRFDEF
!DEC$ END OPTIONS