function vistaReadSun, file readcol, file, ra,dec, y,yu, j,ju, h,hu, k,ku, delimiter=',', /silent empty={val:0.,unc:0.} solar = replicate({ra:0., dec:0., Y:empty, J:empty, H:empty, Ks:empty}, n_elements(ra) ) solar.ra = ra solar.dec = dec solar.Y.val = y solar.Y.unc = yu solar.J.val = J solar.J.unc = Ju solar.H.val = H solar.H.unc = Hu solar.Ks.val = K solar.Ks.unc = Ku return, solar end