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