;------------------------------------------------------------
; Get sw information from an HDF file

function get_sw_sara, filename, attrname

file_id = eos_sw_open(filename, /read)

;Attempt to catch some errors
CATCH, Error_status
If Error_status NE 0 then begin
       Print, 'Error index: ', Error_status
       Print, 'Error message: ', !ERR_STRING
       var = -99999.
       return, var
endif

sw_id = eos_sw_attach(file_id, 'MOP02')
sws_id = eos_sw_readfield(sw_id, attrname, databuffer)
status = eos_sw_detach(sw_id)
status = eos_sw_close(file_id)			;(sw_id) this was the original

return, databuffer
end