; file aa2cm1 ; init: Nov 12 2014 Rob Rutten Pune ; last: Nov 12 2014 Rob Rutten Pune function aa2cm1,wavaa ;+ ; converts air wavelength in AA to wavenumber in cm^-1 ; history: May 30 2016 Rob Rutten ;- airtovac,wavaa,vacaa return,1./(vacaa/1.E8) end ; ==================== test Hyper-C ============== print,aa2cm1(6301.5) end