double precision nu02(1:Nline_mx) integer index2(1:Nline_mx) integer isotope2(1:Nline_mx) double precision Sref2(1:Nline_mx) double precision gamma_air2(1:Nline_mx) double precision gamma_self2(1:Nline_mx) double precision Elow2(1:Nline_mx) double precision n_air2(1:Nline_mx) double precision delta_air2(1:Nline_mx) double precision n_self2(1:Nline_mx) common /ba/ nu02 common /bb/ index2 common /bc/ isotope2 common /bd/ Sref2 common /be/ gamma_air2 common /bf/ gamma_self2 common /bg/ Elow2 common /bh/ n_air2 common /bi/ delta_air2 common /bj/ n_self2 save /ba/,/bb/,/bc/,/bd/,/be/,/bf/,/bg/,/bh/,/bi/,/bj/