;
;$Header: /cassini2/uvis_fm/daps_tools/RCS/attget.pro,v 1.1 1999/06/18 17:32:46 uvis_fm Exp $
;
FUNCTION cg_ATTGET, name, attlist, ngatts, fileid
; Search the list of available attribute names, and if present, get the
; requested attribute from the NetCDF file.
; Joshua Colwell	LASP, University of Colorado	30 April 1999
i = -1
result = 'UNDEFINED'
REPEAT i = i+1 UNTIL (i EQ ngatts) OR (attlist(i<(ngatts-1)) EQ name)
IF i LT ngatts THEN NCDF_ATTGET, fileid, name, result, /GLOBAL
RETURN, result
END