; return the list of object names function objname20201128 datestr = '201128' echo=1 NCP = nsxng_load_ncp() redo = 0 c = nsxng_constants() ; load NSX contants (were globals) ncp = nsxng_load_ncp() ; load NSX edge of slit polynomials foo = rdnight(datestr, indx0, n, h, /nodata, $ dateobs=dateobs, utc=utc, airmass=airmass, rditime=rditime, $ itime=itime, object=object, obstype=obstype, coadds=coadds, numfs=numfs, $ targra=targra, targdec=targdec, targname=targname, rotposn=rotposn, rotmode=rotmode) indx = indgen(n)+indx0 s = object[sort(object)] uniqobjects = s[uniq(s)] & delvarx, s return, uniqobjects end