IDL code to reduce and analyze Spitzer IRS data