-------------------------------------------------------------------------- -------------------------------------------------------------------------- SATIRE-M_wu18_tsi.txt ---------- HEADER: decadal solar total irradiance 6755 BC -- 1885 AD ' File structure:' 1. calendar year, 6755 BC -- 1885 AD' 2. TSI(calendar year)W/m2' array dimensions: [2,865]' Reference: Wu, C.-J., Krivova, N. A., Solanki, S. K., Usoskin, I. G., A&A, 620, A120, 12' ---------- IDL code to read the file: filename='PATH_TO_FILE/SATIRE-M_wu18_tsi.txt' temp=read_ascii(filename,data_start=8,header=header,comment_sym=';') temp=temp.(0) date=temp[0,*] tsi=temp[1,*] -------------------------------------------------------------------------- -------------------------------------------------------------------------- -------------------------------------------------------------------------- -------------------------------------------------------------------------- SATIRE-M_wu18_ssi.txt ---------- HEADER: decadal solar spectral irradiance 6755 BC -- 1885 AD File structure' 1. wavelength: array[1070],nm' 2. wavelength bin: array[1070],nm' 3. date: array[865], calendar year 6755 BC -- 1885 AD' 4. SSI(wavelength,date): array[1070,865], W m-2 nm-1' Reference: Wu, C.-J., Krivova, N. A., Solanki, S. K., Usoskin, I. G., A&A, 620, A120, 12' ---------- IDL code to read the file: filename='PATH_TO_FILE/SATIRE-M_wu18_ssi.txt' N=865 header=strarr(9) satire_wl=fltarr(1070) satire_dwl=fltarr(1070) date=fltarr(N) ssi=dblarr(1070,N) openr,1,filename readf,1,header readf,1,satire_wl readf,1,satire_dwl readf,1,date readf,1,ssi close,1 ;Calculate TSI N=865 tsi=dblarr(N) for i=0L,N-1 do tsi[i]=total(satire_dwl*ssi[*,i]) -------------------------------------------------------------------------- --------------------------------------------------------------------------