Viewing contents of file '../idllib/contrib/tappin/graffer/gr_byt_rd.pro'
function Gr_byt_rd, iunit, nvals

;+
; GR_BYT_RD
;	Read byte value(s) from a binary GRAFFER file
;
; Usage:
;	val = gr_byt_rd(ilu, nvals)
;
; Return value:
;	val	byte	The required byte
;
; Arguments:
;	iunit	int	input	The IDL file unit number
;	nvals	int	input	How many?
;
; History:
;	Original: 15/1/97; SJT
;	Made unique in 8.3: 11/2/97; SJT
;-

if (nvals eq 1) then val = 0b $
else val = bytarr(nvals)

readu, iunit, val

return, val

end