cflibs_v31.m

% MATLAB implementation of a calibration-free algorithm based on:
% CIUCCI, A., et al. New procedure for quantitative elemental analysis by laser-induced plasma spectroscopy. Applied spectroscopy, 1999, vol. 53, no 8, p. 960-964.
% and some other works referenced in the code
% version:
%  v23 mar2021 first version posted on github.
%  v24 24mar2021 configuration for "pastillonCF" experiments
%      28jun2021 new fig(9) with emission lines and mean spectra together, to better config the used lines
%  v25 29jun2021 some improvements in peak fitting, configured for LA-ICP comparison
%  v26 12jul2021 NOT YET IMPLEMENTED - add deconvolution with instrumental response (peaks of calibration HgAr & Ne ligth sources) 
%      8nov2021  new double index [idx1 idx2] in DEBUG
%  v27 12nov2021 fixing excel export (no 2D yet), integrated-intensity monitoring and discarding
%  v28 30nov2021 adding airPLS baseline correction fromm https://github.com/zmzhang/airPLS
%      10dic2021 new lambda calibration, irradiance correction is resampled, bug in idx_nz(2:end) corrected
%  v29 13dic2021 new options Fixed_Ne & FILE_IRRADIANCE_CORRECTION; 4th parameter 'c' removed in lorentzfit, result in fitting errors and should be zero anyway
%  v30 27dic2021 two-step peak fitting: first a "fitting-zero" is performed with a chosen spatial point or an average of all spectra, then the fitting of each spatial point, then the SHB plots 
%      19ene2022 loops split: fit->BP->Ne->SHBP. Ne update in SHBP loop.
%      v30.6 filtered spectrum only used for FZ!=0 and only for peak excursion
%  v31 22ene2022 added more lines (Cr, Ti, Na, Si) for al welded sample . 
%      26ene2022 added more lines for GSW steel: Li, P, S, 
%{
MIT License
Copyright (c) 2021 Adolfo Cobo, Photonics Engineering Group, University of Cantabria, Spain

Permission is hereby granted, free of charge, to any person obtaining a copy
of this software and associated documentation files (the "Software"), to deal
in the Software without restriction, including without limitation the rights
to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
copies of the Software, and to permit persons to whom the Software is
furnished to do so, subject to the following conditions:

The above copyright notice and this permission notice shall be included in all
copies or substantial portions of the Software.

THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
SOFTWARE.
%}

%% CONFIGURATION FOLDER WITH EXPERIMENTAL DATA TO LOAD

% a file "matlabdata.mat" is read from this folder, it is generated by the measurment script

PN='D:\UNICAN\Proyecto deepRAMP - LIBS\Arqueo\lapas2D\05112021-181031_LanMayo2006_3_largo';


%v30 spectra8raw is not loaded, that is the raw (multichannel spectra) to perform 
load([ PN, '\', 'matlabData'] , '-regexp', '^(?!PN$|objWin|objDoc|objDocs|objSpe|objExp|objPul$|tmp_audio|tmp_spectra_snr|frame|serialInfo|videoinput|imaqdevice|spectra8raw)\w'); % read the variables in the .MAT data file, 
spectra_is_valid(:,:,:)=1;
diary([ PN '\\' mfilename '_' datestr(now,'ddmmyyyy_HHMMSS') '_processing_output.txt']); % the output of this script is saved in a text file "processing_output", so details about the processing can be found there



%% CONFIGURATION SECTION
DO_EXCEL = 0;  % export results in excel
DO_SSA = 0; % v30.7 SSA is used to get the *high frequency* variability of the sequences
SSA_SMOOTH = 2;  % degree of smooth (number of components going to "signal" in SSA: 2=strong, 4=weak, 1=strongest, changing dimensions M=16 gives even more filtering
REARRANGE = 0; % old matrix format for spectra to prevent memory errors with older (32bits) matlab versions, not really used in recent years 
DISCARD_NONVALID_SPECTRA = 1; % general procedure (step 6) to discard INDIVIDUAL spectra based on peak height, shouldn't be disable
DISCARD_ALSO_WEAK_PEAKS = 0; % if 1, an entire spectrum is marked as not valid if ONE of the peaks in composition is below the value of 
DISCARD_LINE_ABOVE_SAT_PERCENTAGE  = 0; % *new* v24 24mar2021 the percentaje of SATURATED peaks above which the ENTIRE emission line is discarded for further consideration. 100 = only discarded if ALL spectra are saturated, this allow to retain the line even if a few spectra survive; if exact 0, no line discarding is made
REMOVE_BACKGROUND = 1;  % =1 SUBSTRACT the ELECTRONIC background using the first spectra with the laser not firing. software baseline correction (removing emission background) has been moved to flag REMOVE_BASELINE
REMOVE_BASELINE = 0; % =1  apply Yun2009 algorithm to remove baseline (emission background), not related to electronic background removing; =2 uses the airPLS algorithm from https://github.com/zmzhang/airPLS
IRRADIANCE_CORRECTION = 1; % 1= se dividen todos los espectros por la respuesta, igual que con CF=1
DO_USE_HR2000=0;  %=1 there is additional spectra from a simultaneous measurement with our HR2000 spectrometer, those are copied to spectra() 
DO_USE_PIMAX3=0; %=1 there is additional spectra from a simultaneous measurement with our PIMAX3+ACTON spectrometer, those are copied to spectra() 
DO_USE_AVANTES=1; %=1 normal use, spectra are in spectra()
REMOVE_OVERLAPPED_LINES = 1 % if =1 the wavelengths of used lines (piUse=1) are sorted, and too close lines discarded
REMOVE_RESONANT_LINES=0; % =1 remove resonant lines (piResonant()=1) from database (piUse=0)
REMOVE_LOWER_LEVEL_ZERO=0; % =1 remove lines with Ei (lower level) < 0.2 !!!!!! do not use until all lines have their Ei declared!!!
CORRECT_SELFABSORPTION = 0; % 0= no correction, 1=Praher2010, 2=Sun2009 (IRSAC)
FIRST_SHOT_FOR_AVERAGING = 0; % the first laser shot to calculate the average,useful to reach a stable plasma temperature with many shots on the same spot
LAST_SHOT_FOR_AVERAGING =9999; % the last laser shot to calculate the average,useful to select a small subset of shots with simmilar plasma parameters
AVERAGE_ONLY_FIRST=8; %if >0 then the N first valid spectra (starting at firtLaserPulse) are marked as valid, all other discarded, useful to isolate a range of shots, a range of depths...
ALTERNATE_DELAY_WHICH_ONE = 0; % 0=do nothing, leave spectra() at it is; =1 difference of hotter and colder spectra; =2 leave only the HOTTER spectra; =3 leave only the COLDER spectra
LINE_INTENSITY = 1;  % for CF with peak fitting: 0=height over baseline, 1=area (calculated using AREA_METHOD), 2=raw peak height (no baseline correction, nothing)
AREA_METHOD = 3; % for CF, how to calculate peak area: 0=area of modeled lorentzian peak; 1=trapezoidal integration of the oversampled modeled lorentzian peak; 2=two halves ; 3=integrated area of the NOT oversampled baseline-corrected SPECTRA
DO_NORMALIZE=0; % divides each spectrum to the summed intensities, relative to a total averaged summed intensity, so the overall intensities do not change much
WHICH_SPECTRA_FOR_FITTING_ZERO = 0 % if 0, an average of ALL spectra is used, if != 0, that spatial point is used 
%GLOBAL_LAMBDA_SHIFT = -0.04; %the theoretical value of each emission line is shifted this value and stored in pilaObs()
LAMBDA_RECALIBRATE=0; % v25 if 1, the lambda vector is shifted with recalibration data, somewhere in the code
SAVITZKY_GOLAY_PEAK_EXTENSION_ORDER = 1; %v30 only used for peak excursion %v24 if not 0, the spectrum is filtered with this filter&order ONLY to search for the fitting-zero and baseline estimation. best are order=1 with frame=5
DO_DECONVOLUTION = 0; %v26 NOT YET IMPLEMENTED  peform deconvolution of every peak with the instrumental response, using function getSpectrometerResponse(lambda)
DISCARD_SPECTRA_INTENSITY_OUTLIERS = 0; %v27 if ==1, the spectra with integrated intensity < DISCARD_SPECTRA_INTENSITY_THRESHOLD
    DISCARD_SPECTRA_INTENSITY_THRESHOLD = 0.3; % spatial points below this value can be discarded
RESIN_LAMBDA_MONITORING = 288.161; %v27 if not zero, the raw intensity value of this emission line is stored in resin_intensity(idx1,idx2)
AUTO_RESIN_REMOVAL = 0; % if !=0, points of sequence for which  Iresin > N*Iresin_min are changed to NaN
FILE_IRRADIANCE_CORRECTION = 'avantes_irradiance_response_fiber_1mmSR_nolenses_split_07dic2021.mat'; % 7dec2021
%FILE_IRRADIANCE_CORRECTION = 'respuesta_espectrometro_avantes_roja_1mmSR_con_lentes_split_22ene2021'; % 22jan021
NeStarkNe0=6E16; % initival Ne for iterative Ne *new* v30: this value is used to discard outliers (due to fitting errors and peak assymetry, got values as bad as 1e10)
%NeFromHalfaPercentage=0; % 0=only other's peaks Stark is used for Ne ; 100=only Halfa Stark is used for Ne ; new V31: moved to the configuration of each sample, as some could have Halfa, or not
FIXED_Ne = -1; % 1.05e16; % false; % 1.71E17; % set to zero or false to calculate Ne for each point and use it, set to -1 to use a single AVERAGED value from each-point values


%% DEBUGGING OPTIONS
%Nparam1=112; %OJO!!!!la anchura es 44.4mm, se acabó el recorrido del posicionador
%Nparam1=8;  % to speed things up for debugging, only this spatial point is processed
DEBUG_DISCARDING=[0 0]; % shows information of the spectra-discarding step for averaging, with specific statistics of idx1=DEBUG_DISCARDING
DEBUG_PEAKS=[0 0]; % -11; % plot peak fitting, any number not zero and will stop at that idx and show the plots; new! v25 if negative, the fitting is shown for ALL spatial points for peak # -DEBUG_PEAKS
DEBUG_FITTING_ZERO= 0; % if 1, the peak fitting of the spectrum used for fitting-zero is shown, could be: first spatial point, any spatial point, averaged range of spatial points, averaged all valid spatial points; if 2, only figure(15) the spectrum is show
DEBUG_BP=[0 0]; % plot Boltzmann-plots any number not zero is the idx1,idx2 value to display
DEBUG_SBP=[0 0]; % plot Saha-boltzmann-plots
DEBUG_NE_HISTOGRAM=[ 0 0]; % plot Ne from Stark histogram
DEBUG_STABILITY=1; % info about stability of calcs point by point (such as number of valid peaks in each BP...)


% CALIBRATION-FREE DATABASE 
CFNlines = 2000; % emission lines in the database, max number just to speed up matrices allocation 1feb2022 up to KII: 1895 lines
Halfa=1;CaI=2;CaII=3;MgI=4;MgII=5;SrI=6;SrII=7;ZnI=8;ZnII=9;CuI=10;CuII=11;AlI=12;AlII=13;SnI=14;SnII=15;VI=16;VII=17;FeI=18;FeII=19;NiI=20;NiII=21;MnI=22;MnII=23;TiI=24;TiII=25;HgI=26;HgII=27;ArI=28;ArII=29;NeI=30;NeII=31;CI=32;CII=33;SiI=34;SiII=35;NaI=36;NaII=37;CrI=38;CrII=39;PbI=40;PbII=41;LiI=42;LiII=43;PI=44;PII=45;SI=46;SII=47;KI=48;KII=49;
species = [ Halfa CaI CaII MgI MgII SrI SrII ZnI ZnII CuI CuII AlI AlII SnI SnII VI VII FeI FeII NiI NiII MnI MnII TiI TiII HgI HgII ArI ArII NeI NeII CI CII SiI SiII NaI NaII CrI CrII PbI PbII LiI LiII PI PII SI SII KI KII];
speciesStr = { 'Halfa',  'CaI ', 'CaII', 'MgI ', 'MgII', 'SrI ', 'SrII', 'ZnI','ZnII','CuI','CuII',   'AlI','AlII',   'SnI','SnII',     'VI','VII',       'FeI','FeII', 'NiI','NiII'       ,'MnI','MnII',  'TiI','TiII'   , 'HgI','HgII'  , 'ArI','ArII' , 'NeI','NeII' , 'CI','CII'      , 'SiI','SiII',     'NaI','NaII'    , 'CrI','CrII' , 'PbI','PbII'  , 'LiI', 'LiII',   'PI','PII',     'SI','SII',  'KI','KII'         }; % each specie
atomicWeights = [1.008 , 40.078, 40.078 , 24.305, 24.305, 87.62 , 87.62, 65.38, 65.38, 63.546, 63.546, 26.982, 26.982, 118.71 , 118.71 , 50.9415, 50.9415, 55.845,55.845,58.6934, 58.69334 , 54.938,54.938, 47.867,47.867 , 200.59,200.59 , 39.948,39.948, 20.179,20.179, 12.0107, 12.0107, 28.0855, 28.0855,22.98977,22.98977, 51.996,51.996 , 207.2,207.2   , 6.941,6.941 , 30.97376,30.97376, 32.06,32.06, 39.0983,39.0983  ];
Nspecies = max(species); % number of species
EACH_BP=-1;SINGLE_TE_BP=-2;SAHA_BP=-3;SINGLE_TE_SAHA_BP=-4;Te0_FROM_MEAN_TE=-5;Te0_FROM_SINGLE_TE_BP=-6;Te0_FROM_EACH_SPECIE=-7; % enumeration of options for concentration calcs and with Te from BP should be used

% other species not in composition[] , and pi_use()=0, are not proccesed
%  'composition' should be: [neutral, ion, neutral, ion...] (neutrals first, all z=1 ions should be included)

composition = [FeI FeII CrI CrII MnI MnII CI CII]; 
expectedWeightConcentrations = [ 0.97617 0.01143 0.0088 0.0036]; % should be in weight , some are max values, is not a reference composition
getTe0From = Te0_FROM_SINGLE_TE_BP; % # Te0_FROM_EACH_SPECIE (each specie's Te is used, whichSpecieIsUsed) Te0_FROM_MEAN_TE (the mean value of all species' Te) or Te0_FROM_SINGLE_TE_BP (the single fitting for all species)
whichSpeciesForSingleBPTe = [FeI FeII CrI CrII MnI MnII CI CII]; % only these species are used for the simultaneus fitting of all BPs 
whichSpeciesForSingleSahaBPTe = [FeI FeII CrI CrII MnI MnII CI CII]; % only these species are used for the simultaneus fitting of all SAHA BPs 
getConcentrationsFrom = SINGLE_TE_SAHA_BP;  % EACH_BP or SINGLE_TE_BP or SAHA_BP or SINGLE_TE_SAHA_BP
whichSpecieIsUsed = FeI; % in case Te should be obtained from a single specie, this is the one
WHICH_RATIO_TO_EXPORT = 'weight_cf_z1'; %   'lir_from_mean' = line intensity ratio from mean spectrum; 'mean_lir' = mean of ratios from individual spectra; 'molar_cf' = molar concentration from cf libs; 'molar_cf_z1' with z1 substitution ; 'weight_cf_z1' weight concentration (not molar)
elementA = CrI; % should be the neutral specie 
elementB = FeI; 

composition = [AlI AlII SiI SiII FeI FeII CuI CuII MnI MnII MgI MgII CrI CrII ZnI ZnII TiI TiII ArI ArII LiI LiII NaI NaII KI KII]; 
expectedWeightConcentrations = [0.9458 0.0014 0.00188 0.00048 0.00349 0.04673 0.00002 0.000020 0.000180  0.0 0.0 0.0 0.0]; % should be in weight , some are max values, is not a reference composition
getTe0From = Te0_FROM_SINGLE_TE_BP; % # Te0_FROM_EACH_SPECIE (each specie's Te is used, whichSpecieIsUsed) Te0_FROM_MEAN_TE (the mean value of all species' Te) or Te0_FROM_SINGLE_TE_BP (the single fitting for all species)
whichSpeciesForSingleBPTe = [AlI AlII SiI SiII FeI FeII MnII MgI CrII ]; % only these species are used for the simultaneus fitting of all BPs 
whichSpeciesForSingleSahaBPTe = [AlI AlII SiI SiII FeI FeII MnII MgI CrII ]; % only these species are used for the simultaneus fitting of all SAHA BPs 
getConcentrationsFrom = SINGLE_TE_SAHA_BP;  % EACH_BP or SINGLE_TE_BP or SAHA_BP or SINGLE_TE_SAHA_BP
whichSpecieIsUsed = AlII; % nearest value to single-Te ; in case Te should be obtained from a single specie, this is the one
WHICH_RATIO_TO_EXPORT = 'weight_cf_z1'; %   'lir_from_mean' = line intensity ratio from mean spectrum; 'mean_lir' = mean of ratios from individual spectra; 'molar_cf' = molar concentration from cf libs; 'molar_cf_z1' with z1 substitution ; 'weight_cf_z1' weight concentration (not molar)
elementA = MgI; % should be the neutral specie 
elementB = FeI; 

% 304 steel
composition = [FeI FeII CrI CrII NiI NiII MnI MnII SiI SiII ArI ArII LiI LiII NaI NaII KI KII]; 
expectedWeightConcentrations = [ 0.7025  0.18 0.09 0.02 0.0075 0 0 0 0 ]; % should be in weight , some are max values, is not a reference composition
getTe0From = Te0_FROM_SINGLE_TE_BP; % # Te0_FROM_EACH_SPECIE (each specie's Te is used, whichSpecieIsUsed) Te0_FROM_MEAN_TE (the mean value of all species' Te) or Te0_FROM_SINGLE_TE_BP (the single fitting for all species)
whichSpeciesForSingleBPTe =  [FeI CrI CrII NiI NiII MnI MnII SiI SiII ]; % only these species are used for the simultaneus fitting of all BPs 
whichSpeciesForSingleSahaBPTe =  [FeI FeII CrI CrII NiI NiII MnI MnII SiI SiII ]; % only these species are used for the simultaneus fitting of all SAHA BPs 
getConcentrationsFrom = SINGLE_TE_SAHA_BP;  % EACH_BP or SINGLE_TE_BP or SAHA_BP or SINGLE_TE_SAHA_BP
whichSpecieIsUsed = CrI; % nearest value to single-Te ; in case Te should be obtained from a single specie, this is the one
WHICH_RATIO_TO_EXPORT = 'molar_cf_z1'; %   'lir_from_mean' = line intensity ratio from mean spectrum; 'mean_lir' = mean of ratios from individual spectra; 'molar_cf' = molar concentration from cf libs; 'molar_cf_z1' with z1 substitution ; 'weight_cf_z1' weight concentration (not molar)
elementA = CrI; % should be the neutral specie 
elementB = FeI; 

%%%% LAPAS
composition = [CaI CaII MgI MgII ]; %lapas
realComposition = [ 0.9847 0.0153 ]; % 25 mmol/mol of Mg, equals 1.53% in weight, 20 mmol/mol are 1.22% in weight, 10mmol/mol 0.61%
getTe0From = Te0_FROM_SINGLE_TE_BP; % # Te0_FROM_EACH_SPECIE (each specie's Te is used, whichSpecieIsUsed) Te0_FROM_MEAN_TE (the mean value of all species' Te) or Te0_FROM_SINGLE_TE_BP (the single fitting for all species)
whichSpeciesForSingleBPTe = [MgI MgII CaI CaII ]; % only these species are used for the simultaneus fitting of all BPs 
whichSpeciesForSingleSahaBPTe = [MgI MgII CaI CaII ]; % only these species are used for the simultaneus fitting of all SAHA BPs 
getConcentrationsFrom = SINGLE_TE_SAHA_BP;  % EACH_BP or SINGLE_TE_BP or SAHA_BP or SINGLE_TE_SAHA_BP
whichSpecieIsUsed = CaI; % in case Te should be obtained from a single specie, this is the one
NeFromHalfaPercentage=0; % 0=only other's peaks Stark is used for Ne ; 100=only Halfa Stark is used for Ne
WHICH_RATIO_TO_EXPORT = 'molar_cf_z1'; %   'lir_from_mean' = line intensity ratio from mean spectrum; 'mean_lir' = mean of ratios from individual spectra; 'molar_cf' = molar concentration from cf libs; 'molar_cf_z1' with z1 substitution ; 'weight_cf_z1' weight concentration (not molar)
elementA = MgI; % should be the neutral specie 
elementB = CaI; 


%% end of configuration section  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
piquees=zeros(CFNlines,1); %identificador de especie
piUse=zeros(CFNlines,1); %si se usan o no, por defecto es 0
pila=zeros(CFNlines,1); %lambdas
pilaobs=zeros(CFNlines,1); %observed lambda for a line (miscalibration...), if not zero, pila() is substituted by pilaobs
pipx=zeros(CFNlines,1); %pixeles
piGA=zeros(CFNlines,1); %producto gxA en el NIST
piEm=zeros(CFNlines,1); %energía del nivel superior
piStark=zeros(CFNlines,1); %cociente Nreferencia/omega de ensanchamiento HWHM stark de la línea, en nm
pigk=zeros(CFNlines,1); % integer degenerate value g_k (for partition function)
piAcc=cell(CFNlines,''); % accuracy of lines from NIST, strings using their format: A+, A, B+ ...
pi_lngAI=zeros(CFNlines,1); %valores de Ln(g.A/I) para el boltzmann-plot as for 13dic2018, WITHOUT LAMBDA
corr_pi_lngAI=zeros(CFNlines,1); %valores de Ln(g.A/I) corregidos para el saha-boltzmann-plot
corr_piEm=zeros(CFNlines,1); %energía del nivel superior
pi_z=zeros(CFNlines,1); % valor de ionización para Saha-Boltzmann, z=0 para I, z=1 para II


%quick and dirty definition of parameteres for the multiple-line BP fitting
mdl1 = @(beta,x) beta(1)*x+beta(2);
mdl2 = @(beta,x) beta(1)*x+beta(3);
mdl3 = @(beta,x) beta(1)*x+beta(4);
mdl4 = @(beta,x) beta(1)*x+beta(5);
mdl5 = @(beta,x) beta(1)*x+beta(6);
mdl6 = @(beta,x) beta(1)*x+beta(7);
mdl7 = @(beta,x) beta(1)*x+beta(8);
mdl8 = @(beta,x) beta(1)*x+beta(9);
mdl9 = @(beta,x) beta(1)*x+beta(10);
mdl10 = @(beta,x) beta(1)*x+beta(11);


%% Table of emission lines
% i is just an arbitrary index
% piUse=1 if the line should be used for CF calculations 
% piquees is the ID of the species ( speciesStr(piquees()) gives the name)
% pila is the wavelength
% piEi is Ei lower level from ASD in eV units (default units are cm-1)
% piEm is Ek upper level from ASD in eV units (default units are cm-1)
% piGA is the product g*A, should be chosen from the configuration screen
% pi_Z is the ionization state, 0 for "I" , 1 for "II" ...
% pi_gk is the statistical weight of the upper leve, from ASD (check "g" in configuration screen, lower-right corner) 
% pi_Stark is the linear Stark parameter as Ne_REF/HWHM (nm) units . LIBS++
%    database has a 1E16 ref value , half width values, and wavelength in AMSTRONGS
% IRSAC_reference(specie) = i; 
% Reasons to remove lines from database, all values are zero, just to state a reason
DISCARDED_Ek0 = 0; % lower energy zero
DISCARDED_TEST = 0; % testing what happen
DISCARDED_NOTSEEN = 0; % not really seen, better not to look for it (bad fitting)
DISCARDED_VAR = 0; % sometimes appears, introduces variability in concentration sequences
DISCARDED_TOO_FAR = 0; % isolated line too far away from others
DISCARDED_OVERLAP = 0; % not resolved overlapped lines
DISCARDED_SAT =0; % always saturated
DISCARDED_NOPARAM=0; % some parameteres are missing, i.e, GA probability
DISCARDED_WIDTH=0; % too wide
DISCARDED_NOBP=0; % we don't want this peak to enter the BP: outlier, testing, no z1 species...
DISCARDED_FIT=0; %the fitting for this line is too bad for some reason
DISCARDED_NOTCLEARID=0; % it is not clear what specie it is

%FIRST peak is special: Halfa for Ne estimation. Its stark parameter is larger but not linearly dependent on Ne
%warning! halfa line is heavily shifted due to stark shift
i=1;   piUse(i)=1;piquees(i)=Halfa;pila(i)=656.279; piEm(i)=12.088; piGA(i)=7.94E8; pi_z(i)=0;pigk(i)=18;piStark(i)=1; % Stark parameter not valid, H uses another formula
%CaI 
SN=0; % add/drop lines with SA coefficient>1 (according to IRSAC processing)
i=i+1; piUse(i)=1;piquees(i)=CaI;pila(i)=227.546;  piEm(i)=5.4470569; piGA(i)=9.03E7; pi_z(i)=0;pigk(i)=3;piAcc{i}='C+';% CaI seen in limpets
i=i+1; piUse(i)=1;piquees(i)=CaI;pila(i)=239.856;  piEm(i)=5.1675384; piGA(i)=5.01E7; pi_z(i)=0;pigk(i)=3;piAcc{i}='C+';% CaI seen in limpets
i=i+1; piUse(i)=SN+DISCARDED_TEST;piquees(i)=CaI;pila(i)=299.496; PiEi(i)=1.879;piEm(i)=6.01789; piGA(i)=1.1E8; pi_z(i)=0;pigk(i)=3;  % son dos líneas muy juntas
i=i+1; piUse(i)=SN+DISCARDED_TEST;piquees(i)=CaI;pila(i)=299.731;  PiEi(i)=1.886;piEm(i)=6.0211; piGA(i)=1.2E8; pi_z(i)=0;pigk(i)=5;  % dos muy juntas
i=i+1; piUse(i)=DISCARDED_OVERLAP;piquees(i)=CaI;pila(i)=299.964;  PiEi(i)=1.886;piEm(i)=6.01789; piGA(i)=8.37E7; pi_z(i)=0;pigk(i)=3;  % too overlapped
i=i+1; piUse(i)=DISCARDED_OVERLAP;piquees(i)=CaI;pila(i)=300.086;  PiEi(i)=1.886;piEm(i)=6.01622; piGA(i)=1.58e8; pi_z(i)=0;pigk(i)=1;  % two overlapped lines, very faint in limpet
i=i+1; piUse(i)=0*1;piquees(i)=CaI;pila(i)=300.686; PiEi(i)=1.899;piEm(i)=6.0211; piGA(i)=3.8E8; pi_z(i)=0;pigk(i)=5; % pico Ca ventana primigenia, realmente son tres mezclados de intensidad parecida
i=i+1; piUse(i)=SN+DISCARDED_TEST;piquees(i)=CaI;pila(i)=300.921; PiEi(i)=1.899;piEm(i)=6.017898; piGA(i)=1.29E8; pi_z(i)=0;pigk(i)=3;  
i=i+1; piUse(i)=SN+DISCARDED_TEST;piquees(i)=CaI;pila(i)=328.607;  piEm(i)=5.6708741; piGA(i)=1.6E7; pi_z(i)=0;pigk(i)=3;piAcc{i}='D';% CaI seen in limpets
i=i+1; piUse(i)=DISCARDED_TEST;piquees(i)=CaI;pila(i)=335.03;  piEm(i)=5.585; piGA(i)=4.335E7; pi_z(i)=0;pigk(i)=3;  % slight overlap with 336nm, observed with shift at 334.95? fitting fails
i=i+1; piUse(i)=DISCARDED_OVERLAP;piquees(i)=CaI;pila(i)=336.192;  piEm(i)=5.5857825; piGA(i)=9.400000E7; pi_z(i)=0;pigk(i)=7;piAcc{i}='C';  % overlap with 336.214nm and very different GA, value is the mean, better not to use
i=i+1; piUse(i)=SN+DISCARDED_TEST;piquees(i)=CaI;pila(i)=347.476;  piEm(i)=5.4529201; piGA(i)=1.4E7; pi_z(i)=0;pigk(i)=3;piAcc{i}='D';% CaI seen in limpets
i=i+1; piUse(i)=SN+DISCARDED_TEST;piquees(i)=CaI;pila(i)=348.760;  piEm(i)=5.4529201; piGA(i)=2.3E7; pi_z(i)=0;pigk(i)=3;piAcc{i}='D';% CaI seen in limpets
i=i+1; piUse(i)=DISCARDED_TEST;piquees(i)=CaI;pila(i)=362.41;  piEi(i)=1.879;piEm(i)=5.29946; piGA(i)=6.36E7; pi_z(i)=0;pigk(i)=3;  % 
i=i+1; piUse(i)=SN+DISCARDED_TEST;piquees(i)=CaI;pila(i)=363.075; piEi(i)=1.885;piEm(i)=5.300; piGA(i)=11.25E7; pi_z(i)=0;pigk(i)=5;  % TWO OVERLAPPED LINES
i=i+1; piUse(i)=DISCARDED_OVERLAP;piquees(i)=CaI;pila(i)=364.44;  piEm(i)=5.30; piGA(i)=1.47500000000E8; pi_z(i)=0;pigk(i)=7;  % TWO OVERLAPPED LINES, better not to use, GA value is the mean, gk is different
i=i+1; piUse(i)=DISCARDED_TEST;piquees(i)=CaI;pila(i)=394.890;  piEm(i)=5.0181663; piGA(i)=3.34E6; pi_z(i)=0;pigk(i)=3;  % seen in limpet
i=i+1; piUse(i)=DISCARDED_Ek0;piquees(i)=CaI;pila(i)=422.67;  piEi(i)=0.0;piEm(i)=2.93; piGA(i)=6.54E8; pi_z(i)=0; piStark(i)=1E16/0.0063; pigk(i)=3;% CaI  Ek=000000! NO USAR REF: https://griem.obspm.fr/index.php?page=pages/result.php&element=Ca&base=1
i=i+1; piUse(i)=DISCARDED_VAR ;piquees(i)=CaI;pila(i)=428.30;  piEi(i)=1.886;piEm(i)=4.7798; piGA(i)=2.17E8; pi_z(i)=0;pigk(i)=5;% 
i=i+1; piUse(i)=DISCARDED_VAR ;piquees(i)=CaI;pila(i)=428.93;  piEi(i)=1.879;piEm(i)=4.769; piGA(i)=1.8E8; pi_z(i)=0;pigk(i)=3;%  
i=i+1; piUse(i)=DISCARDED_VAR ;piquees(i)=CaI;pila(i)=430.253; piEm(i)=4.779; piGA(i)=6.8E8; pi_z(i)=0;pigk(i)=5;% CaI dos subpicos lados, seems reversed in alternateDelay of apex
i=i+1; piUse(i)=SN+DISCARDED_TEST;piquees(i)=CaI;pila(i)=430.77;  piEm(i)=4.7631; piGA(i)=1.99E8; pi_z(i)=0;pigk(i)=1;% CaI 
i=i+1; piUse(i)=DISCARDED_VAR ;piquees(i)=CaI;pila(i)=431.86;  piEi(i)=1.8989;piEm(i)=4.769; piGA(i)=2.2E8; pi_z(i)=0;pigk(i)=3;piStark(i)=1E16/0.00077; % CaI REF: BD LIBS++ (Amstr-1E16-halfwidth)
i=i+1; piUse(i)=DISCARDED_SAT;piquees(i)=CaI;pila(i)=442.54;  piEm(i)=4.68; piGA(i)=1.49E8; pi_z(i)=0;pigk(i)=3;piStark(i)=1E16/0.00145; % CaI % CaI del artículo de pandhija  442.5nm
i=i+1; piUse(i)=DISCARDED_OVERLAP;piquees(i)=CaI;pila(i)=443.569; piEm(i)=0.0; piGA(i)=0; pi_z(i)=0;pigk(i)=3;% CaI  TWO OVERLAPPED LINES
i=i+1; piUse(i)=DISCARDED_SAT;piquees(i)=CaI;pila(i)=445.47;  piEm(i)=4.681; piGA(i)=6.1E8; pi_z(i)=0;pigk(i)=5;% CaI% CaI del artículo de pandhija  445.5nm
i=i+1; piUse(i)=SN+DISCARDED_TEST;piquees(i)=CaI;pila(i)=452.694;  piEm(i)=5.44706; piGA(i)=1.2E8; pi_z(i)=0;pigk(i)=3;piAcc{i}='D';% CaI seen in limpets
i=i+1; piUse(i)=SN+DISCARDED_TEST;piquees(i)=CaI;pila(i)=468.527;  piEm(i)=5.578; piGA(i)=4.0E7; pi_z(i)=0;pigk(i)=5;piAcc{i}='D';% CaI seen in limpets
i=i+1; piUse(i)=SN+DISCARDED_TEST;piquees(i)=CaI;pila(i)=487.813;  piEm(i)=5.25; piGA(i)=1.32E8; pi_z(i)=0;pigk(i)=7;piAcc{i}='C';% CaI seen in limpets
i=i+1; piUse(i)=0*1;piquees(i)=CaI;pila(i)=504.16;  piEm(i)=5.167; piGA(i)=9.9E7; pi_z(i)=0;pigk(i)=3;% CaI aislado *
i=i+1; piUse(i)=SN+DISCARDED_TEST;piquees(i)=CaI;pila(i)=518.88;  piEm(i)=5.321; piGA(i)=2E8;pi_z(i)=0; pigk(i)=5;% CaI aislado , too overlapped in apex
i=i+1; piUse(i)=DISCARDED_SAT;piquees(i)=CaI;pila(i)=526.56;  piEm(i)=4.877; piGA(i)=1.3E8; pi_z(i)=0;pigk(i)=3;% CaI aislado *
i=i+1; piUse(i)=DISCARDED_NOPARAM;piquees(i)=CaI;pila(i)=534.9465;  piEm(i)=5.0260582; piGA(i)=0000; pi_z(i)=0;pigk(i)=3;% CaI GA not known 
i=i+1; piUse(i)=DISCARDED_WIDTH;piquees(i)=CaI;pila(i)=551.298; piEm(i)=5.181; piGA(i)=1.1E8; pi_z(i)=0;pigk(i)=1;
i=i+1; piUse(i)=1+DISCARDED_SAT;piquees(i)=CaI;pila(i)=558.197; piEm(i)=4.7435; piGA(i)=0.42E8; pi_z(i)=0;pigk(i)=7; % selected CaI lines in [Praher2010] below self-absorption threshold, an outlier in BP apex
IRSAC_reference(CaI) = i; % the above line has, according to Praher2010, the lowest selfabsorption coefficient.
i=i+1; piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CaI;pila(i)=560.129; piEm(i)=4.7386; piGA(i)=0.43E8; pi_z(i)=0;pigk(i)=5; % selected CaI lines in [Praher2010] below self-absorption threshold  reversed in alternateDelay in Apex
i=i+1; piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CaI;pila(i)=560.285; piEm(i)=4.7353; piGA(i)=0.42E8; pi_z(i)=0;pigk(i)=3; % selected CaI lines in [Praher2010] below self-absorption threshold  reversed in alternateDelay in Apex


% CaII
i=i+1; piUse(i)=1+DISCARDED_NOBP;piquees(i)=CaII;pila(i)=315.89; piEm(i)=7.047; piGA(i)=1.2E9; pi_z(i)=1;pigk(i)=4;piStark(i)=1E16/0.00292; % CaII flojo REF: LIBS++
i=i+1; piUse(i)=DISCARDED_OVERLAP;piquees(i)=CaII;pila(i)=317.93 ; piEm(i)=7.050; piGA(i)=2.2E9; pi_z(i)=1;pigk(i)=6;piStark(i)=1E16/0.00292;% CaII  REF:LIBS++ reversed in alternateDelay OR two overlapped lines
i=i+1; piUse(i)=DISCARDED_OVERLAP;piquees(i)=CaII;pila(i)=318.127; piEm(i)=7.047; piGA(i)=2.3E8; pi_z(i)=1;pigk(i)=4;% CaII , selected CaII line in [Praher2010] below self-absorption threshold
i=i+1; piUse(i)=1+DISCARDED_NOBP;piquees(i)=CaII;pila(i)=370.603; piEi(i)=3.123;piEm(i)=6.4679; piGA(i)=1.8E8; pi_z(i)=1;pigk(i)=2;piStark(i)=1E16/0.0035; % CaII aislado *
i=i+1; piUse(i)=1+DISCARDED_NOBP;piquees(i)=CaII;pila(i)=373.69 ; piEi(i)=3.151;piEm(i)=6.4679; piGA(i)=3.4E8; pi_z(i)=1;pigk(i)=2;% CaII aislado * , selected CaII line in [Praher2010] below self-absorption threshold, fit completely fails with original wl
i=i+1; piUse(i)=DISCARDED_SAT;piquees(i)=CaII;pila(i)=393.36 ; piEi(i)=0.0;  piEm(i)=3.151; piGA(i)=5.88E8; pi_z(i)=1;pigk(i)=4;piStark(i)=1E16/0.00065; % CaII  ! Ek=0! pero hay pocos, reversed in alternateDelay of apex
i=i+1; piUse(i)=DISCARDED_SAT;piquees(i)=CaII;pila(i)=396.84 ; piEi(i)=0.0;  piEm(i)=3.123; piGA(i)=2.8E8; pi_z(i)=1;pigk(i)=2;piStark(i)=1E16/0.00065;% CaII Ek=0 totally reversed in alternateDelay apex
i=i+1; piUse(i)=DISCARDED_TOO_FAR;piquees(i)=CaII;pila(i)=849.802 ; piEi(i)=1.692;  piEm(i)=3.151; piGA(i)=4.44E6; pi_z(i)=1;pigk(i)=4;piStark(i)=0;% CaII from ASD-LIBS
%IRSAC_reference(CaII) = i; 


%MgI
i=i+1; piUse(i)=0;piquees(i)=MgI;pila(i)=277.983;  piEi(i)=2.715; piEm(i)=7.173; piGA(i)=8E8; piStark(i)=0; pi_z(i)=0; pigk(i)=4;  %MgI DON'T USE: two overlapped lines, parameters are the mean of the two
i=i+1; piUse(i)=DISCARDED_Ek0;piquees(i)=MgI;pila(i)=285.2127; piEi(i)=0;piEm(i)=4.3458; piGA(i)=1.47E9; piStark(i)=1.28E17/0.00025; pi_z(i)=0; pigk(i)=3;%MgI REF: ASD Ek=0! 
i=i+1; piUse(i)=DISCARDED_TEST;piquees(i)=MgI;pila(i)=333.2146; piEi(i)=2.7116;piEm(i)=6.4314; piGA(i)=3.06E7; piStark(i)=0; pi_z(i)=0; pigk(i)=3;%MgI REF: LIBS++ , selected MgI line in [Praher2010] below self-absorption threshold
IRSAC_reference(MgI) = i; % the 333.21nm line has, according to Praher2010, the lowest selfabsorption coefficient, but is not seen in the limpet shell.
i=i+1; piUse(i)=DISCARDED_TEST;piquees(i)=MgI;pila(i)=333.6674; piEi(i)=2.7166;piEm(i)=6.4314; piGA(i)=5.10E7; piStark(i)=0; pi_z(i)=0; pigk(i)=3;%MgI , selected MgI line in [Praher2010] below self-absorption threshold
i=i+1; piUse(i)=1;piquees(i)=MgI;pila(i)=382.9355; piEi(i)=2.7091;piEm(i)=5.9459; piGA(i)=2.70E8; piStark(i)=0; pi_z(i)=0; pigk(i)=3;%MgI , selected MgI line in [Praher2010] below self-absorption threshold
i=i+1; piUse(i)=0*1;piquees(i)=MgI;pila(i)=383.23; piEi(i)=2.711;piEm(i)=5.9459; piGA(i)=6.05e8; pi_z(i)=0; piStark(i)=1E16/0.0107;pigk(i)=5; %MgI
i=i+1; piUse(i)=0*1;piquees(i)=MgI;pila(i)=383.83; piEi(i)=2.716;piEm(i)=5.9459; piGA(i)=1.13E9; pi_z(i)=0; piStark(i)=1E16/0.0107;pigk(i)=7; %MgI*  , selected MgI line in [Praher2010] below self-absorption threshold
i=i+1; piUse(i)=1;piquees(i)=MgI;pila(i)=516.7322; piEi(i)=2.709;piEm(i)=5.1078; piGA(i)=3.39E7; piStark(i)=1E16/0.00328; pi_z(i)=0; pigk(i)=3; %MgI , selected MgI line in [Praher2010] below self-absorption threshold, stark from LIBS++
i=i+1; piUse(i)=1;piquees(i)=MgI;pila(i)=517.2684; piEi(i)=2.7115;piEm(i)=5.1078; piGA(i)=1.019E8; piStark(i)=1E16/0.00328; pi_z(i)=0; pigk(i)=3; %MgI , from ASD-LIBS, STark from LIBS++
i=i+1; piUse(i)=1;piquees(i)=MgI;pila(i)=518.360; piEi(i)=2.7166;piEm(i)=5.1078; piGA(i)=1.68E8; piStark(i)=0; pi_z(i)=0; pigk(i)=3; %MgI , from ASD-LIBS


%MgII
i=i+1; piUse(i)=DISCARDED_TEST;piquees(i)=MgII;pila(i)=279.078;piEi(i)=4.422;piEm(i)=8.8637; piGA(i)=1.6e9;piStark(i)=1E16/0.00089; pi_z(i)=1;pigk(i)=4;%MgII  from ASD-LIBS
i=i+1; piUse(i)=1;piquees(i)=MgII;pila(i)=279.55;piEi(i)=0.0;piEm(i)=4.4338; piGA(i)=1.04e9;piStark(i)=1E16/0.000218; pi_z(i)=1;pigk(i)=4;%MgII    Ek=0!!  REF: LIBS++ should check with https://griem.obspm.fr/index.php?page=pages/result.php&element=Mg&base=2   gives too large Ne values (>1E18, surely selfabsorbed)
i=i+1; piUse(i)=DISCARDED_TEST;piquees(i)=MgII;pila(i)=279.7998;piEi(i)=4.4338;piEm(i)=8.8637; piGA(i)=2.87e9;piStark(i)=1E16/0.00089; pi_z(i)=1;pigk(i)=6;%MgII  from ASD-LIBS
i=i+1; piUse(i)=1;piquees(i)=MgII;pila(i)=280.2704;piEi(i)=0.0;piEm(i)=4.4224; piGA(i)=5.14E8;piStark(i)=1E16/0.00019; pi_z(i)=1;pigk(i)=2;%Mg Ek=00000!!!!!!  gives too large Ne values (>1E18, surely selfabsorbed)
i=i+1; piUse(i)=DISCARDED_NOTSEEN;piquees(i)=MgII;pila(i)=292.8634;piEi(i)=4.4224;piEm(i)=8.6547; piGA(i)=2.3e8;piStark(i)=0; pi_z(i)=1;pigk(i)=2;%MgII  from ASD-LIBS
i=i+1; piUse(i)=DISCARDED_NOTSEEN;piquees(i)=MgII;pila(i)=293.6509;piEi(i)=4.4337;piEm(i)=8.6547; piGA(i)=4.6e8;piStark(i)=0; pi_z(i)=1;pigk(i)=2;%MgII  from ASD-LIBS
%IRSAC_reference(MgII) = i;



%SrI updated 17nov2021 more limpet peaks (seen)
i=i+1; piUse(i)=1;piquees(i)=SrI;pila(i)=330.1734; piEi(i)=1.775;piEm(i)=5.529; piGA(i)=1.8E8; pi_z(i)=0;pigk(i)=3;piAcc{i}='B';  % from ASD
i=i+1; piUse(i)=1;piquees(i)=SrI;pila(i)=460.73; piEi(i)=0.0;piEm(i)=2.69; piGA(i)=6.03E8; pi_z(i)=0;pigk(i)=3;piAcc{i}='AA';  % 460.6nm SrI del artículo de pandhija easily reversed
i=i+1; piUse(i)=1;piquees(i)=SrI;pila(i)=472.2278; piEi(i)=1.798308;piEm(i)=4.42309; piGA(i)=1.8E8; pi_z(i)=0;pigk(i)=5;piAcc{i}='B+';  % 472.22 seen in limpets
i=i+1; piUse(i)=1;piquees(i)=SrI;pila(i)=474.192; piEi(i)=1.77514;piEm(i)=4.38905; piGA(i)=1.2E8; pi_z(i)=0;pigk(i)=3;piAcc{i}='B+';  % 474.192 seen in limpets
i=i+1; piUse(i)=1;piquees(i)=SrI;pila(i)=478.432; piEi(i)=1.7983;piEm(i)=4.38905; piGA(i)=9.0E7; pi_z(i)=0;pigk(i)=3;piAcc{i}='B+';  % 478.432 seen in limpets
i=i+1; piUse(i)=1;piquees(i)=SrI;pila(i)=496.2263; piEi(i)=1.8472;piEm(i)=4.345; piGA(i)=4.3E8; pi_z(i)=0;pigk(i)=7;piAcc{i}='AA';  % 496.2263 seen in limpets
i=i+1; piUse(i)=1;piquees(i)=SrI;pila(i)=481.1881; piEi(i)=1.84712;piEm(i)=4.42309; piGA(i)=4.5E8; pi_z(i)=0;pigk(i)=5;piAcc{i}='B+';  % 481.1nm SrI del artículo de pandhija
i=i+1; piUse(i)=1;piquees(i)=SrI;pila(i)=661.7266; piEi(i)=2.2514;piEm(i)=4.1246; piGA(i)=8.0E7; pi_z(i)=0;pigk(i)=5;piAcc{i}='C+';  % 661.7266  seen in limpets
i=i+1; piUse(i)=1;piquees(i)=SrI;pila(i)=687.8313; piEi(i)=1.7983;piEm(i)=3.6003; piGA(i)=8.1E7; pi_z(i)=0;pigk(i)=3;piAcc{i}='B+';  % 687.8313  seen in limpets

%SrII
i=i+1; piUse(i)=1;piquees(i)=SrII;pila(i)=338.0711; piEi(i)=2.940;piEm(i)=6.6066; piGA(i)=0.0000;piStark(i)=0; pi_z(i)=1;pigk(i)=4; %SrII  from ASD, gAk not in ASD, not seen in ASD-LIBS
i=i+1; piUse(i)=1;piquees(i)=SrII;pila(i)=346.4457; piEi(i)=3.04;piEm(i)=6.6174; piGA(i)=1.9E9;piStark(i)=0; pi_z(i)=1;pigk(i)=6; %SrII  from ASD-LIBS
i=i+1; piUse(i)=1;piquees(i)=SrII;pila(i)=407.7; piEi(i)=0.0;piEm(i)=3.04; piGA(i)=5.64E8;piStark(i)=1E16/0.0016; pi_z(i)=1;pigk(i)=4; %SrII  REF: LIBS++ EASILY REVERSED
i=i+1; piUse(i)=1;piquees(i)=SrII;pila(i)=416.1796; piEi(i)=2.940;piEm(i)=5.9186; piGA(i)=1.3E8;piStark(i)=1E16/0.0016; pi_z(i)=1;pigk(i)=2; %SrII  from ASD-LIBS
i=i+1; piUse(i)=1;piquees(i)=SrII;pila(i)=421.5524; piEi(i)=0.0;piEm(i)=2.9403; piGA(i)=2.55E8;piStark(i)=1E16/0.0016; pi_z(i)=1;pigk(i)=2; %SrII  from ASD-LIBS Ek=0


%ZnI 
i=i+1; piUse(i)=DISCARDED_FIT;piquees(i)=ZnI;pila(i)= 213.857; piEi(i)=0.0; piEm(i)=5.796; piGA(i)=2.14E9; piStark(i)=0; pi_z(i)=0;pigk(i)=3; piResonant(i)=1;  % highest in ASD-LIBS, interference with left peak,discarded, too much interference, Ei=0, but using it reduces the error!
%i=i+1; piUse(i)=0;piquees(i)=ZnI;pila(i)= 280.086; piEm(i)=8.503; piGA(i)=1E9; piStark(i)=0; pi_z(i)=0;pigk(i)=7;  % DO NOT USE: no Ak in ASD or elsewhere, arbitrary value just to try
i=i+1; piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ZnI;pila(i)= 307.59; piEi(i)=0.0;piEm(i)=4.03; piGA(i)=1.1E5; piStark(i)=0; pi_z(i)=0;pigk(i)=3;  % ASD, strong in brass spectra, Ei=0 but low transition probability
IRSAC_reference(ZnI) = i; % chosen due to low gAk
i=i+1; piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ZnI;pila(i)= 328.23; piEi(i)=4.006; piEm(i)=7.782; piGA(i)=2.7E8; piStark(i)=0; pi_z(i)=0;pigk(i)=3;  % from colao 2004 (too much background in coin spectra, though) removed due to interference of a peak on the left (coin)
i=i+1; piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ZnI;pila(i)= 330.26; piEi(i)=4.029; piEm(i)=7.7827; piGA(i)=6.0E8; piStark(i)=1E16/0.007; pi_z(i)=0;pigk(i)=5;  % from LIBS++ % three overlapped lines? - according to ASD-LIBS, there is no interferences, rechecked: if used, everything burn into flames; zhao2018 uses these two lines, gAk=5.35E8
i=i+1; piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ZnI;pila(i)= 334.50; piEi(i)=4.077; piEm(i)=7.7833; piGA(i)=1.19E9; piStark(i)=1E16/0.0087; pi_z(i)=0;pigk(i)=7;  % from LIBS++ - according to ASD-LIBS, there is no interferences, Zhao2018 uses these two lines, gAk=1.05E9
i=i+1; piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ZnI;pila(i)= 468.014; piEi(i)=4.006; piEm(i)=6.655; piGA(i)=3*1.4E7; piStark(i)=1E16/0.0014; pi_z(i)=0;pigk(i)=3;  % Ak from GENIE, added again because gA value was wrong; not seen in ASD-LIBS nor nordic gold
i=i+1; piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ZnI;pila(i)= 472.21; piEi(i)=4.029; piEm(i)=6.6545; piGA(i)=3*4.2E7; piStark(i)=1E16/0.001335; pi_z(i)=0;pigk(i)=3;  % no Ak in ASD, source for alternate Aki: https://www-amdis.iaea.org/GENIE/ ; not seen in ASD-LIBS nor nordic gold
i=i+1; piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ZnI;pila(i)= 481.053; piEi(i)=4.077; piEm(i)=6.6545; piGA(i)=3*7.0E7;piStark(i)=1E16/0.001022; pi_z(i)=0;pigk(i)=3;  %   no Ak in ASD, source for alternate Aki: https://www-amdis.iaea.org/GENIE/; not seen in ASD-LIBS nor nordic gold
i=i+1; piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ZnI;pila(i)= 636.24; piEi(i)=5.796; piEm(i)=7.7438; piGA(i)=2.4E8; piStark(i)=0; pi_z(i)=0;pigk(i)=5;  % from ASD larger intensities, it shows up at 636.15nm but there is no other possible line in this wavelength range.; not seen in ASD-LIBS but seen clearly in nordic gold

%ZnII
i=i+1; piUse(i)=DISCARDED_FIT;piquees(i)=ZnII;pila(i)= 206.2; piEm(i)=6.0108; piGA(i)=1.32E9; pi_z(i)=1;pigk(i)=4;  %  discarded <230nm too noisy
i=i+1; piUse(i)=DISCARDED_NOTCLEARID;piquees(i)=ZnII;pila(i)= 202.548; piEm(i)=6.119; piGA(i)=1.63E9; pi_z(i)=1;pigk(i)=4;  % ASD larger relative intensities  , discarded <230nm too noisy
i=i+1; piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ZnII;pila(i)= 250.20; piEm(i)=10.965; piGA(i)=3.94E8; pi_z(i)=1;pigk(i)=2;  % ASD larger relative intensities   removed because fitting is wrong, could be used if another window/baseline processing fix that.
IRSAC_reference(ZnII) = i; % the above line has been selected due to low Ak and high Ek,
i=i+1; piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ZnII;pila(i)= 255.795; piEm(i)=10.965; piGA(i)=7.82E8; pi_z(i)=1;pigk(i)=2;  % ASD larger relative intensities  
i=i+1; piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ZnII;pila(i)= 491.16; piEm(i)=14.539; piGA(i)=1.09E9; pi_z(i)=1;pigk(i)=6;  %  wide weird peak
i=i+1; piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ZnII;pila(i)= 492.401; piEm(i)=14.538; piGA(i)=2.18E9; pi_z(i)=1;pigk(i)=8;  %  seen in nordic gold
i=i+1; piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ZnII;pila(i)= 589.43; piEm(i)=8.114; piGA(i)=0; pi_z(i)=1;pigk(i)=4;  %  Ak is not in ASD, not found elsewhere

%CuI  i=64
i=i+1; piUse(i)=0;piquees(i)=CuI;pila(i)=216.509; piEi(i)=0.0;piEm(i)=5.724; piGA(i)=2.2E8; piStark(i)=0; pi_z(i)=0;pigk(i)=4; piResonant(i)=1;  % from ADS-LIBS, gives a bad vertical value,but i do not know why... wait! Ek=0!!!
i=i+1; piUse(i)=0;piquees(i)=CuI;pila(i)=217.894; piEi(i)=0.0 ;piEm(i)=5.68; piGA(i)=2.0E8; piStark(i)=0; pi_z(i)=0;pigk(i)=4; piResonant(i)=1;  % from ADS-LIBS , discarded: overlapped with CuII
i=i+1; piUse(i)=0;piquees(i)=CuI;pila(i)=219.975; piEi(i)=1.6422;piEm(i)=7.2768; piGA(i)=1.2564E9; piStark(i)=0; pi_z(i)=0;pigk(i)=4;piResonant(i)=1;  % reference line in [sun2009] Ak from LIBS++ (units of 1E8). overlapped with 219.959
i=i+1; piUse(i)=1;piquees(i)=CuI;pila(i)=261.837; piEi(i)=1.389;piEm(i)=6.123; piGA(i)=1.23E8; piStark(i)=0; pi_z(i)=0;pigk(i)=4;  % ASD, strong in brass spectra
i=i+1; piUse(i)=1;piquees(i)=CuI;pila(i)=276.64; piEi(i)=1.642;piEm(i)=6.123; piGA(i)=3.8E7; piStark(i)=0; pi_z(i)=0;pigk(i)=4;piResonant(i)=1;  % ASD, strong in brass spectra
i=i+1; piUse(i)=0;piquees(i)=CuI;pila(i)= 306.341; piEi(i)=1.642 ;piEm(i)=5.688; piGA(i)=6.20E6; piStark(i)=0; pi_z(i)=0;pigk(i)=4;  % ASD
i=i+1; piUse(i)=0;piquees(i)=CuI;pila(i)= 319.410; piEi(i)=1.642 ;piEm(i)=5.5228; piGA(i)=6.2E6; piStark(i)=0; pi_z(i)=0;pigk(i)=4;  % ASD
i=i+1; piUse(i)=DISCARDED_FIT;piquees(i)=CuI;pila(i)= 324.7540;piEi(i)=0.0000000;piEm(i)=3.8166920;piGA(i)=5.580e+08;piAcc{i}='AA';pi_z(i)=0;pigk(i)=4;piIntens(i)=10000;piStark(i)=0;% auto imported from NIST ASD Intensity>400
i=i+1; piUse(i)=1;piquees(i)=CuI;pila(i)= 327.395; piEi(i)=1.642 ;piEm(i)=3.7859; piGA(i)=2.752E8; piStark(i)=0; pi_z(i)=0;pigk(i)=2;piResonant(i)=1;   % from Tognoni 2007 Ek=0!!! discarded ad-hoc becouse got worse Te
i=i+1; piUse(i)=1;piquees(i)=CuI;pila(i)= 333.785; piEi(i)=1.389 ;piEm(i)=5.102; piGA(i)=3.0E6; piStark(i)=0; pi_z(i)=0;pigk(i)=8;  % ASD
i=i+1; piUse(i)=0;piquees(i)=CuI;pila(i)= 402.26; piEi(i)=3.786 ;piEm(i)=6.867; piGA(i)=7.60E7; piStark(i)=0; pi_z(i)=0;pigk(i)=4;  % ASD
i=i+1; piUse(i)=0;piquees(i)=CuI;pila(i)= 406.264; piEi(i)=3.817;piEm(i)=6.868; piGA(i)=1.26E8; piStark(i)=0; pi_z(i)=0;pigk(i)=6;  % ASD
i=i+1; piUse(i)=0;piquees(i)=CuI;pila(i)= 424.896; piEi(i)=5.076;piEm(i)=7.994; piGA(i)=3.9E7; piStark(i)=0; pi_z(i)=0;pigk(i)=2;  % ASD, strong in brass spectra
i=i+1; piUse(i)=1;piquees(i)=CuI;pila(i)= 427.51; piEi(i)=4.838;piEm(i)=7.73; piGA(i)=2.76E8; piStark(i)=1E16/0.004; pi_z(i)=0;pigk(i)=8;  % from LIBS++
i=i+1; piUse(i)=DISCARDED_FIT;piquees(i)=CuI;pila(i)= 448.03; piEi(i)=3.786;piEm(i)=6.55; piGA(i)=6.0E6; piStark(i)=1E16/0.012; pi_z(i)=0;pigk(i)=2;  % from LIBS++%
%IRSAC_reference(CuI) = i; % the above line has been selected due to low Ak and high Ek, the reference in [sun2009] @ 219.98nm is not seen 
i=i+1; piUse(i)=0;piquees(i)=CuI;pila(i)= 453.07; piEi(i)=3.817;piEm(i)=6.55; piGA(i)=1.7E7; piStark(i)=1E16/0.011; pi_z(i)=0;pigk(i)=2;  % from LIBS++
i=i+1; piUse(i)=0;piquees(i)=CuI;pila(i)= 453.96; piEi(i)=5.153;piEm(i)=7.88; piGA(i)=8.48E7; piStark(i)=1E16/0.09; pi_z(i)=0;pigk(i)=4;  % from LIBS++
i=i+1; piUse(i)=0;piquees(i)=CuI;pila(i)= 458.697; piEi(i)=5.102;piEm(i)=7.805; piGA(i)=1.92E8; piStark(i)=1E16/0.07; pi_z(i)=0;pigk(i)=6;  % from LIBS++
i=i+1; piUse(i)=0;piquees(i)=CuI;pila(i)= 465.11; piEi(i)=5.072;piEm(i)=7.737; piGA(i)=3.04E8; piStark(i)=1E16/0.00435; pi_z(i)=0;pigk(i)=8;  % from LIBS++
i=i+1; piUse(i)=0;piquees(i)=CuI;pila(i)= 470.46; piEi(i)=5.102;piEm(i)=7.737; piGA(i)=4.04E7; piStark(i)=0; pi_z(i)=0;pigk(i)=8;  % ASD, seen in nordic gold
i=i+1; piUse(i)=0;piquees(i)=CuI;pila(i)= 501.66; piEi(i)=5.522;piEm(i)=7.993; piGA(i)=2*0.1618E8; piStark(i)=0; pi_z(i)=0;pigk(i)=2;  % from LIBS++
i=i+1; piUse(i)=0;piquees(i)=CuI;pila(i)= 510.55; piEi(i)=1.389;piEm(i)=3.8167; piGA(i)=8.0E6; piStark(i)=1E16/0.00215; pi_z(i)=0;pigk(i)=4;  % from LIBS++
i=i+1; piUse(i)=0;piquees(i)=CuI;pila(i)= 511.191; piEi(i)=5.569;piEm(i)=7.993; piGA(i)=2*0.1049E8; piStark(i)=0; pi_z(i)=0;pigk(i)=2;  % from ASD, gAk from LIBS++
i=i+1; piUse(i)=0;piquees(i)=CuI;pila(i)= 515.32; piEi(i)=3.786;piEm(i)=6.1911; piGA(i)=2.46E8; piStark(i)=1E16/0.0095; pi_z(i)=0;pigk(i)=4;  % 
i=i+1; piUse(i)=0;piquees(i)=CuI;pila(i)= 521.8202; piEi(i)=3.816692; piEm(i)=6.1920251; piGA(i)=4.5e+08; piAcc{i}='C+'; pi_z(i)=0; pigk(i)=6; piIntens(i)=2500;piStark(i)=0; % auto imported from NIST ASD Intensity>400
i=i+1; piUse(i)=0;piquees(i)=CuI;pila(i)= 529.25; piEi(i)=5.395;piEm(i)=7.737; piGA(i)=8.72E7; piStark(i)=0; pi_z(i)=0;pigk(i)=8;  % ASD, seen in nordic gold coin with DP
IRSAC_reference(CuI) = i;
i=i+1; piUse(i)=0;piquees(i)=CuI;pila(i)= 555.494; piEi(i)=5.506;piEm(i)=7.737; piGA(i)=8*0.006201E8; piStark(i)=0; pi_z(i)=0;pigk(i)=8;  % ASD, seen in nordic gold coin with DP
i=i+1; piUse(i)=0;piquees(i)=CuI;pila(i)= 570.024; piEi(i)=1.642;piEm(i)=3.8167; piGA(i)=9.6E5; piStark(i)=0; pi_z(i)=0;pigk(i)=4;  % ASD ; REMOVED DUE TO MISCALIBRATION OF THAT CHANNEL, PEAK FITTING IS WRONG
i=i+1; piUse(i)=0*1;piquees(i)=CuI;pila(i)= 578.21; piEi(i)=1.642;piEm(i)=3.7859; piGA(i)=3.3E6; piStark(i)=1E16/0.0036; pi_z(i)=0;pigk(i)=2;  % from LIBS++;  REMOVED DUE TO MISCALIBRATION OF THAT CHANNEL, PEAK FITTING IS WRONG
%i=i+1; piUse(i)=1;piquees(i)=CuI;pila(i)=793.31;%piEm(i)=5.3483;piGA(i)=???; piStark(i)=1E16/0.016;pi_z(i)=0;pigk(i)=2;  %%from LIBS++, gk not known; 


%CuII we need lines above 250nm. according to ASD-LIBS for Cu, no CuII above 248nm
i=i+1; piUse(i)=0;piquees(i)=CuII;pila(i)= 204.38; piEm(i)=8.783; piGA(i)=9.94E8; pi_z(i)=1;pigk(i)=7;  % from ASD-LIBS, not too much interference, 
i=i+1; piUse(i)=0;piquees(i)=CuII;pila(i)= 205.498; piEm(i)=8.864; piGA(i)=8.25E8; pi_z(i)=1;pigk(i)=5;  % from ASD-LIBS, not too much interference, 
i=i+1; piUse(i)=0;piquees(i)=CuII;pila(i)= 207.86; piEm(i)=14.20; piGA(i)=1.9E9;  pi_z(i)=1;pigk(i)=3;  % from ASD larger intensities, discarded <230nm too noisy
i=i+1; piUse(i)=0;piquees(i)=CuII;pila(i)= 211.21; piEm(i)=9.125; piGA(i)=1.0E9;  pi_z(i)=1;pigk(i)=3;  % from ASD larger intensities, discarded <230nm too noisy
i=i+1; piUse(i)=0;piquees(i)=CuII;pila(i)= 213.598; piEm(i)=8.52; piGA(i)=4.13E9; pi_z(i)=1;pigk(i)=9;  % from ASD-LIBS, not too much interference, overlapped with ZnI
i=i+1; piUse(i)=0;piquees(i)=CuII;pila(i)= 214.898; piEm(i)=8.486; piGA(i)=6.2E8; pi_z(i)=1;pigk(i)=7;  % from ASD-LIBS, not too much interference, 
i=i+1; piUse(i)=0;piquees(i)=CuII;pila(i)= 219.22; piEm(i)=8.486; piGA(i)=2.0E9;  pi_z(i)=1;pigk(i)=7;  % from ASD-LIBS, not too much interference, but adding this peak got worse results
i=i+1; piUse(i)=0;piquees(i)=CuII;pila(i)= 221.81; piEm(i)=8.42; piGA(i)=1.0E9;   pi_z(i)=1;pigk(i)=3;  % from ASD-LIBS, not too much interference, but adding this peak got worse results
i=i+1; piUse(i)=DISCARDED_FIT;piquees(i)=CuII;pila(i)= 224.70; piEm(i)=8.235; piGA(i)=1.6E9;  pi_z(i)=1;pigk(i)=5;  % from ASD larger intensities, removed due to interference with peak to the left, could be used if another window/baseline processing fix that.
i=i+1; piUse(i)=0;piquees(i)=CuII;pila(i)= 236.99; piEi(i)=3.256;piEm(i)=8.486; piGA(i)=3.7E8;  pi_z(i)=1;pigk(i)=7;  % ASD, in coind with DP, I think the peak is 236.93 of AlI
i=i+1; piUse(i)=0;piquees(i)=CuII;pila(i)= 240.01; piEi(i)=3.256;piEm(i)=8.420; piGA(i)=2.1E7;  pi_z(i)=1;pigk(i)=3;  % ASD, seen in coin spectra with DP, no interference verified
i=i+1; piUse(i)=0;piquees(i)=CuII;pila(i)= 240.33; piEi(i)=8.2349;piEm(i)=13.392; piGA(i)=7.4E8;  pi_z(i)=1;pigk(i)=7;  % ASD, seen in coin spectra with DP, no interference verified
i=i+1; piUse(i)=0;piquees(i)=CuII;pila(i)= 248.58; piEi(i)=8.6625;piEm(i)=13.649; piGA(i)=4.26E8;  pi_z(i)=1;pigk(i)=3;  % ASD, seen in coin spectra with DP, no interference verified
i=i+1; piUse(i)=0;piquees(i)=CuII;pila(i)= 248.97; piEi(i)=3.2564;piEm(i)=8.235; piGA(i)=5.0E6;  pi_z(i)=1;pigk(i)=5;  % ASD, seen in coin spectra with DP, no interference verified
IRSAC_reference(CuII) = i; % chosen randomly, check
i=i+1; piUse(i)=0;piquees(i)=CuII;pila(i)= 250.63; piEm(i)=13.43; piGA(i)=1.0E9;  pi_z(i)=1;pigk(i)=5;  % from ASD larger intensities, seen in coin spectra, verified no interferences
i=i+1; piUse(i)=0;piquees(i)=CuII;pila(i)= 254.48; piEm(i)=13.39; piGA(i)=1.36E9; pi_z(i)=1;pigk(i)=7;  % from ASD larger intensities, checked no interferences with ASD-LIBS and coin spectra
i=i+1;piUse(i)=1;piquees(i)=CuII;pila(i)=273.97662;piEi(i)=9.12471797;piEm(i)=13.64873556;piGA(i)=1.2e+07;piAcc{i}='D';pi_z(i)=1;pigk(i)=3;piIntens(i)=86000;piStark(i)=0;% auto imported from NIST ASD Intensity>400
i=i+1;piUse(i)=0;piquees(i)=CuII;pila(i)=274.52710;piEi(i)=8.91695539;piEm(i)=13.43190338;piGA(i)=7.00e+07;piAcc{i}='C+';pi_z(i)=1;pigk(i)=5;piIntens(i)=140000;piStark(i)=0;% auto imported from NIST ASD Intensity>400
i=i+1;piUse(i)=0;piquees(i)=CuII;pila(i)=276.96690;piEi(i)=8.91695539;piEm(i)=13.39213290;piGA(i)=4.7e+08;piAcc{i}='C+';pi_z(i)=1;pigk(i)=7;piIntens(i)=310000;piStark(i)=0;% auto imported from NIST ASD Intensity>400
i=i+1;piUse(i)=0;piquees(i)=CuII;pila(i)=283.73682;piEi(i)=9.06349786;piEm(i)=13.43190338;piGA(i)=1.2e+08;piAcc{i}='C+';pi_z(i)=1;pigk(i)=5;piIntens(i)=150000;piStark(i)=0;% auto imported from NIST ASD Intensity>400
i=i+1;piUse(i)=0;piquees(i)=CuII;pila(i)=287.76996;piEi(i)=9.12471797;piEm(i)=13.43190338;piGA(i)=1.2e+08;piAcc{i}='C+';pi_z(i)=1;pigk(i)=5;piIntens(i)=170000;piStark(i)=0;% auto imported from NIST ASD Intensity>400
i=i+1;piUse(i)=0;piquees(i)=CuII;pila(i)= 329.04; piEi(i)=14.328;piEm(i)=18.096; piGA(i)=7.7E8; pi_z(i)=1;pigk(i)=13;  % ASD
i=i+1;piUse(i)=0;piquees(i)=CuII;pila(i)= 336.56; piEi(i)=14.423;piEm(i)=18.105; piGA(i)=2.6E8; pi_z(i)=1;pigk(i)=9;  % ASD,
i=i+1;piUse(i)=0;piquees(i)=CuII;pila(i)= 338.071; piEi(i)=14.696;piEm(i)=18.362; piGA(i)=2.4E8; pi_z(i)=1;pigk(i)=7;  % ASD, seen in nordic gold
i=i+1;piUse(i)=0;piquees(i)=CuII;pila(i)= 422.7; piEi(i)=14.423;piEm(i)=18.105; piGA(i)=2.6E8; pi_z(i)=1;pigk(i)=9;  % ASD, not seen, removed
i=i+1;piUse(i)=0;piquees(i)=CuII;pila(i)=490.973351;piEi(i)=14.32872908;piEm(i)=16.85329769;piGA(i)=2.65e+09;piAcc{i}='B+';pi_z(i)=1;pigk(i)=13;piIntens(i)=160000;piStark(i)=0;% auto imported from NIST ASD Intensity>400
i=i+1;piUse(i)=0;piquees(i)=CuII;pila(i)=491.83779;piEi(i)=14.59881073;piEm(i)=17.1189423;piGA(i)=2.6e+09;piAcc{i}='C';pi_z(i)=1;pigk(i)=9;piIntens(i)=54000;piStark(i)=0;% auto imported from NIST ASD Intensity>400
i=i+1;piUse(i)=0;piquees(i)=CuII;pila(i)=493.16982;piEi(i)=14.34032994;piEm(i)=16.85365487;piGA(i)=2.1e+09;piAcc{i}='C';pi_z(i)=1;pigk(i)=11;piIntens(i)=140000;piStark(i)=0;% auto imported from NIST ASD Intensity>400
i=i+1;piUse(i)=0;piquees(i)=CuII;pila(i)=495.37244;piEi(i)=14.61564135;piEm(i)=17.1177911;piGA(i)=3.4e+09;piAcc{i}='C';pi_z(i)=1;pigk(i)=11;piIntens(i)=82000;piStark(i)=0;% auto imported from NIST ASD Intensity>400
i=i+1;piUse(i)=0;piquees(i)=CuII;pila(i)=498.550499;piEi(i)=14.39211337;piEm(i)=16.87831320;piGA(i)=8.7e+08;piAcc{i}='C+';pi_z(i)=1;pigk(i)=9;piIntens(i)=70000;piStark(i)=0;% auto imported from NIST ASD Intensity>400
i=i+1;piUse(i)=0;piquees(i)=CuII;pila(i)=505.179210;piEi(i)=14.42818740;piEm(i)=16.88176497;piGA(i)=1.70e+09;piAcc{i}='C+';pi_z(i)=1;pigk(i)=11;piIntens(i)=120000;piStark(i)=0;% auto imported from NIST ASD Intensity>400
i=i+1;piUse(i)=0;piquees(i)=CuII;pila(i)=506.545858;piEi(i)=14.69012052;piEm(i)=17.13707847;piGA(i)=1.45e+09;piAcc{i}='C+';pi_z(i)=1;pigk(i)=9;piIntens(i)=70000;piStark(i)=0;% auto imported from NIST ASD Intensity>400
i=i+1;piUse(i)=0;piquees(i)=CuII;pila(i)= 715.776; piEi(i)=13.392;piEm(i)=15.124; piGA(i)=2.6E6; pi_z(i)=1;pigk(i)=5;  % ASD, seen in nordic gold
i=i+1;piUse(i)=0;piquees(i)=CuII;pila(i)=740.43561;piEi(i)=14.88955769;piEm(i)=16.56357367;piGA(i)=1.4e+08;piAcc{i}='D+';pi_z(i)=1;pigk(i)=7;piIntens(i)=55000;piStark(i)=0;% auto imported from NIST ASD Intensity>400
i=i+1;piUse(i)=0;piquees(i)=CuII;pila(i)=766.46451;piEi(i)=14.96299725;piEm(i)=16.58016355;piGA(i)=1.8e+08;piAcc{i}='D+';pi_z(i)=1;pigk(i)=5;piIntens(i)=52000;piStark(i)=0;% auto imported from NIST ASD Intensity>400
i=i+1;piUse(i)=0;piquees(i)=CuII;pila(i)=780.76534;piEi(i)=14.97602748;piEm(i)=16.56357367;piGA(i)=2.5e+08;piAcc{i}='C+';pi_z(i)=1;pigk(i)=7;piIntens(i)=82000;piStark(i)=0;% auto imported from NIST ASD Intensity>400
i=i+1;piUse(i)=0;piquees(i)=CuII;pila(i)=782.56528;piEi(i)=13.39213290;piEm(i)=14.97602748;piGA(i)=4.7e+08;piAcc{i}='B';pi_z(i)=1;pigk(i)=9;piIntens(i)=59000;piStark(i)=0;% auto imported from NIST ASD Intensity>400

%AlI imported 24ene2022
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=212.3362;piEi(i)=0.013894;piEm(i)=5.8511;piGA(i)=73200000;piAcc{i}='C';pi_z(i)=0;pigk(i)=6;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=212.9663;piEi(i)=0;piEm(i)=5.8199;piGA(i)=60800000;piAcc{i}='C';pi_z(i)=0;pigk(i)=4;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=213.4733;piEi(i)=0.013894;piEm(i)=5.82;piGA(i)=109000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=6;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=214.5555;piEi(i)=0;piEm(i)=5.7768;piGA(i)=82400000;piAcc{i}='C';pi_z(i)=0;pigk(i)=4;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=215.0699;piEi(i)=0.013894;piEm(i)=5.7769;piGA(i)=148000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=6;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=216.8805;piEi(i)=0;piEm(i)=5.7149;piGA(i)=118000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=4;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=217.4028;piEi(i)=0.013894;piEm(i)=5.715;piGA(i)=212000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=6;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=219.915;piEi(i)=0;piEm(i)=5.636;piGA(i)=3500000;piAcc{i}='C';pi_z(i)=0;pigk(i)=2;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=220.459;piEi(i)=0.013894;piEm(i)=5.636;piGA(i)=6980000;piAcc{i}='C';pi_z(i)=0;pigk(i)=2;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=220.466;piEi(i)=0;piEm(i)=5.622;piGA(i)=175000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=4;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=221.0046;piEi(i)=0.013894;piEm(i)=5.6221;piGA(i)=312000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=6;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=225.7999;piEi(i)=0;piEm(i)=5.4892;piGA(i)=7540000;piAcc{i}='C';pi_z(i)=0;pigk(i)=2;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=226.3462;piEi(i)=0;piEm(i)=5.4759;piGA(i)=273000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=4;piIntens(i)=4;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=226.3731;piEi(i)=0.013894;piEm(i)=5.4892;piGA(i)=15000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=2;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=226.9096;piEi(i)=0.013894;piEm(i)=5.4762;piGA(i)=455000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=6;piIntens(i)=4;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=226.922;piEi(i)=0.013894;piEm(i)=5.4759;piGA(i)=50400000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=4;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=236.7052;piEi(i)=0;piEm(i)=5.2363;piGA(i)=304000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=4;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=237.207;piEi(i)=0;piEm(i)=5.2252;piGA(i)=11500000;piAcc{i}='C';pi_z(i)=0;pigk(i)=2;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=DISCARDED_SAT;piquees(i)=AlI;pila(i)=237.3124;piEi(i)=0.013894;piEm(i)=5.2368;piGA(i)=544000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=6;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=237.3349;piEi(i)=0.013894;piEm(i)=5.2363;piGA(i)=60400000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=4;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=237.8368;piEi(i)=0.013894;piEm(i)=5.2252;piGA(i)=22800000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=2;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=AlI;pila(i)=256.7984;piEi(i)=0;piEm(i)=4.8266;piGA(i)=76800000;piAcc{i}='B';pi_z(i)=0;pigk(i)=4;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=DISCARDED_SAT;piquees(i)=AlI;pila(i)=257.5094;piEi(i)=0.013894;piEm(i)=4.8272;piGA(i)=216000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=6;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=257.5393;piEi(i)=0.013894;piEm(i)=4.8266;piGA(i)=24000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=4;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=AlI;pila(i)=265.2484;piEi(i)=0;piEm(i)=4.6729;piGA(i)=28400000;piAcc{i}='B';pi_z(i)=0;pigk(i)=2;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=AlI;pila(i)=266.0393;piEi(i)=0.013894;piEm(i)=4.6729;piGA(i)=56800000;piAcc{i}='B';pi_z(i)=0;pigk(i)=2;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1; piUse(i)=1;piquees(i)=AlI;pila(i)= 305.47; piEm(i)=7.6557; piGA(i)=7.08E5;pi_z(i)=0;pigk(i)=4; piStark(i)=0;%  reference line for IRSAC [sun2009], gkAk value from GENIE, not sure it is Ok, discarded due to strong peak to the right 
IRSAC_reference(AlI) = i; % it is the line with highest coeff in the first trial, it could be the one with lowest SA;  lowest gA, reference line in [sun2009] is 305.47 which dos not have gAk value
%IRSAC_reference(AlI) = 0; % the only possible line is 305.47 but gives way too low values of SA coefficient
i=i+1;piUse(i)=DISCARDED_SAT;piquees(i)=AlI;pila(i)=308.2153;piEi(i)=0;piEm(i)=4.0215;piGA(i)=235000000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=4;piIntens(i)=24;piStark(i)=1E16/0.0029;% auto imported from NIST ASD Intensity>=1, STark from Kumar 2020
i=i+1;piUse(i)=DISCARDED_SAT;piquees(i)=AlI;pila(i)=309.271;piEi(i)=0.013894;piEm(i)=4.0217;piGA(i)=437000000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=6;piIntens(i)=26;piStark(i)=1E16/0037;% auto imported from NIST ASD Intensity>=1, Stark from Kumar 2020
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=309.2839;piEi(i)=0.013894;piEm(i)=4.0215;piGA(i)=46400000;piAcc{i}='B';pi_z(i)=0;pigk(i)=4;piIntens(i)=20;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=DISCARDED_SAT;piquees(i)=AlI;pila(i)=394.4006;piEi(i)=0;piEm(i)=3.1427;piGA(i)=99800000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=2;piIntens(i)=24;piStark(i)=1E16/0.0021;% auto imported from NIST ASD Intensity>=1 stark from LIBS++;% Stark from Kumar 2020
i=i+1;piUse(i)=DISCARDED_SAT;piquees(i)=AlI;pila(i)=396.152;piEi(i)=0.013894;piEm(i)=3.1427;piGA(i)=197000000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=2;piIntens(i)=26;piStark(i)=1E16/0.0024;% auto imported from NIST ASD Intensity>=1, Stark from Kumar 2020
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=555.7063;piEi(i)=3.1427;piEm(i)=5.3732;piGA(i)=920000;piAcc{i}='C';pi_z(i)=0;pigk(i)=4;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=555.7948;piEi(i)=3.1427;piEm(i)=5.3729;piGA(i)=458000;piAcc{i}='C';pi_z(i)=0;pigk(i)=2;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=669.6015;piEi(i)=3.1427;piEm(i)=4.9938;piGA(i)=4000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=4;piIntens(i)=13;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=669.8673;piEi(i)=3.1427;piEm(i)=4.9931;piGA(i)=2000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=2;piIntens(i)=11;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=690.64;piEi(i)=4.0217;piEm(i)=5.8164;piGA(i)=9200000;piAcc{i}='C';pi_z(i)=0;pigk(i)=8;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=708.3968;piEi(i)=4.0215;piEm(i)=5.7712;piGA(i)=9240000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=6;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=708.4644;piEi(i)=4.0217;piEm(i)=5.7712;piGA(i)=13200000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=8;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=736.1568;piEi(i)=4.0215;piEm(i)=5.7052;piGA(i)=13900000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=6;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=736.2297;piEi(i)=4.0217;piEm(i)=5.7052;piGA(i)=19900000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=8;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=760.6159;piEi(i)=4.0853;piEm(i)=5.7149;piGA(i)=1740000;piAcc{i}='D';pi_z(i)=0;pigk(i)=4;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=761.482;piEi(i)=4.0872;piEm(i)=5.715;piGA(i)=3120000;piAcc{i}='C';pi_z(i)=0;pigk(i)=6;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=761.5339;piEi(i)=4.0872;piEm(i)=5.7149;piGA(i)=347000;piAcc{i}='E';pi_z(i)=0;pigk(i)=4;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=783.5309;piEi(i)=4.0215;piEm(i)=5.6034;piGA(i)=22300000;piAcc{i}='B';pi_z(i)=0;pigk(i)=6;piIntens(i)=11;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=783.6134;piEi(i)=4.0217;piEm(i)=5.6034;piGA(i)=1590000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=6;piIntens(i)=12;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=783.6134;piEi(i)=4.0217;piEm(i)=5.6034;piGA(i)=31800000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=8;piIntens(i)=12;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=806.5968;piEi(i)=4.0853;piEm(i)=5.622;piGA(i)=1770000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=4;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=807.5353;piEi(i)=4.0872;piEm(i)=5.6221;piGA(i)=3170000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=6;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=807.6289;piEi(i)=4.0872;piEm(i)=5.622;piGA(i)=352000;piAcc{i}='C';pi_z(i)=0;pigk(i)=4;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=877.2866;piEi(i)=4.0215;piEm(i)=5.4344;piGA(i)=38800000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=6;piIntens(i)=13;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=877.3896;piEi(i)=4.0217;piEm(i)=5.4344;piGA(i)=55600000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=8;piIntens(i)=14;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=877.3896;piEi(i)=4.0217;piEm(i)=5.4344;piGA(i)=2770000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=6;piIntens(i)=14;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=882.8909;piEi(i)=4.0853;piEm(i)=5.4892;piGA(i)=1340000;piAcc{i}='C';pi_z(i)=0;pigk(i)=2;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=884.1277;piEi(i)=4.0872;piEm(i)=5.4892;piGA(i)=2680000;piAcc{i}='C';pi_z(i)=0;pigk(i)=2;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
%lambdas>889.3566 are outside the range of our spectrometer
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=891.29;piEi(i)=4.0853;piEm(i)=5.4759;piGA(i)=912000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=4;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=892.3555;piEi(i)=4.0872;piEm(i)=5.4762;piGA(i)=1640000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=6;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlI;pila(i)=892.5504;piEi(i)=4.0872;piEm(i)=5.4759;piGA(i)=182000;piAcc{i}='C';pi_z(i)=0;pigk(i)=4;piIntens(i)=4;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
  

%AlII imported 24ene2022
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=181.8352;piEi(i)=11.8466;piEm(i)=18.6651;piGA(i)=3820000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=7;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=181.8392;piEi(i)=11.8468;piEm(i)=18.6651;piGA(i)=477000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=7;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=181.9285;piEi(i)=11.8468;piEm(i)=18.6618;piGA(i)=2120000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=5;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=182.0124;piEi(i)=11.8469;piEm(i)=18.6587;piGA(i)=1370000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=3;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=182.8588;piEi(i)=11.3166;piEm(i)=18.0969;piGA(i)=2360000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=5;piIntens(i)=290;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=183.2837;piEi(i)=11.3166;piEm(i)=18.0812;piGA(i)=1410000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=3;piIntens(i)=225;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=183.4808;piEi(i)=11.3166;piEm(i)=18.0739;piGA(i)=467000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=1;piIntens(i)=170;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=183.6963;piEi(i)=10.5983;piEm(i)=17.3477;piGA(i)=121000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=3;piIntens(i)=60;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=185.5929;piEi(i)=4.6361;piEm(i)=11.3166;piGA(i)=251000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=3;piIntens(i)=190;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=AlII;pila(i)=185.8026;piEi(i)=4.6437;piEm(i)=11.3166;piGA(i)=747000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=3;piIntens(i)=315;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=185.998;piEi(i)=10.5983;piEm(i)=17.2642;piGA(i)=608000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=7;piIntens(i)=110;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=AlII;pila(i)=186.2311;piEi(i)=4.6591;piEm(i)=11.3166;piGA(i)=1220000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=3;piIntens(i)=400;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=190.4326;piEi(i)=11.665;piEm(i)=18.1757;piGA(i)=810000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=3;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=190.6408;piEi(i)=11.6728;piEm(i)=18.1763;piGA(i)=1000000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=5;piIntens(i)=25;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=190.6596;piEi(i)=11.6728;piEm(i)=18.1757;piGA(i)=600000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=3;piIntens(i)=4;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=190.6674;piEi(i)=11.6728;piEm(i)=18.1754;piGA(i)=820000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=1;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=191.0825;piEi(i)=11.6878;piEm(i)=18.1763;piGA(i)=2900000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=5;piIntens(i)=80;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=191.1013;piEi(i)=11.6878;piEm(i)=18.1757;piGA(i)=1000000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=3;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=192.9977;piEi(i)=11.6728;piEm(i)=18.0969;piGA(i)=575000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=5;piIntens(i)=150;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=193.1048;piEi(i)=7.4207;piEm(i)=13.8413;piGA(i)=1040000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=1;piIntens(i)=125;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=193.2377;piEi(i)=11.665;piEm(i)=18.0812;piGA(i)=459000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=3;piIntens(i)=150;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=193.4503;piEi(i)=11.6878;piEm(i)=18.0969;piGA(i)=1720000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=5;piIntens(i)=225;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=193.4713;piEi(i)=11.6728;piEm(i)=18.0812;piGA(i)=342000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=3;piIntens(i)=125;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=193.6907;piEi(i)=11.6728;piEm(i)=18.0739;piGA(i)=456000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=1;piIntens(i)=125;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=193.9261;piEi(i)=11.6878;piEm(i)=18.0812;piGA(i)=567000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=3;piIntens(i)=150;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=195.877;piEi(i)=11.8466;piEm(i)=18.1763;piGA(i)=2800000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=5;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=198.365;piEi(i)=11.8466;piEm(i)=18.0969;piGA(i)=20300000;piAcc{i}='C';pi_z(i)=1;pigk(i)=5;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=198.8699;piEi(i)=11.8468;piEm(i)=18.0812;piGA(i)=10800000;piAcc{i}='C';pi_z(i)=1;pigk(i)=3;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=199.0531;piEi(i)=7.4207;piEm(i)=13.6494;piGA(i)=6900000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=5;piIntens(i)=315;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=199.105;piEi(i)=11.8469;piEm(i)=18.0739;piGA(i)=4770000;piAcc{i}='D';pi_z(i)=1;pigk(i)=1;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=201.6053;piEi(i)=11.8466;piEm(i)=17.9945;piGA(i)=884000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=9;piIntens(i)=150;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=201.6193;piEi(i)=11.8466;piEm(i)=17.9941;piGA(i)=77000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=7;piIntens(i)=80;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=201.6234;piEi(i)=11.8468;piEm(i)=17.9941;piGA(i)=611000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=7;piIntens(i)=150;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=201.6334;piEi(i)=11.8468;piEm(i)=17.9938;piGA(i)=76500000;piAcc{i}='D';pi_z(i)=1;pigk(i)=5;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=201.6369;piEi(i)=11.8469;piEm(i)=17.9938;piGA(i)=412000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=5;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=202.2081;piEi(i)=10.5983;piEm(i)=16.7279;piGA(i)=122000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=3;piIntens(i)=40;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=207.4009;piEi(i)=10.5983;piEm(i)=16.5744;piGA(i)=987000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=7;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=209.4264;piEi(i)=11.8466;piEm(i)=17.7649;piGA(i)=1660000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=9;piIntens(i)=700;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=209.4744;piEi(i)=11.8466;piEm(i)=17.7636;piGA(i)=144000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=7;piIntens(i)=150;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=209.479;piEi(i)=11.8468;piEm(i)=17.7636;piGA(i)=1150000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=7;piIntens(i)=300;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=209.51;piEi(i)=11.8468;piEm(i)=17.7627;piGA(i)=144000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=5;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=209.514;piEi(i)=11.8469;piEm(i)=17.7627;piGA(i)=775000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=5;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=219.2604;piEi(i)=11.8466;piEm(i)=17.4995;piGA(i)=2220000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=9;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=219.4189;piEi(i)=11.8466;piEm(i)=17.4954;piGA(i)=192000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=7;piIntens(i)=20;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=219.4245;piEi(i)=11.8468;piEm(i)=17.4954;piGA(i)=1530000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=7;piIntens(i)=70;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=219.5456;piEi(i)=11.8468;piEm(i)=17.4923;piGA(i)=192000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=5;piIntens(i)=300;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=219.5502;piEi(i)=11.8469;piEm(i)=17.4923;piGA(i)=1040000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=5;piIntens(i)=300;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=224.3045;piEi(i)=11.822;piEm(i)=17.3477;piGA(i)=90900000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=3;piIntens(i)=300;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=232.4199;piEi(i)=11.8466;piEm(i)=17.1795;piGA(i)=311000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=9;piIntens(i)=350;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=232.5436;piEi(i)=11.8466;piEm(i)=17.1766;piGA(i)=27000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=7;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=232.5494;piEi(i)=11.8468;piEm(i)=17.1766;piGA(i)=215000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=7;piIntens(i)=300;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=232.6445;piEi(i)=11.8468;piEm(i)=17.1745;piGA(i)=26900000;piAcc{i}='C';pi_z(i)=1;pigk(i)=5;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=232.6496;piEi(i)=11.8469;piEm(i)=17.1745;piGA(i)=145000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=5;piIntens(i)=300;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=247.5252;piEi(i)=10.5983;piEm(i)=15.6058;piGA(i)=138000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=3;piIntens(i)=1500;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=252.6486;piEi(i)=11.822;piEm(i)=16.7279;piGA(i)=58200000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=3;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=AlII;pila(i)=263.1546;piEi(i)=10.5983;piEm(i)=15.3084;piGA(i)=1740000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=7;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=263.7689;piEi(i)=11.8466;piEm(i)=16.5457;piGA(i)=256000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=9;piIntens(i)=3000;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=263.8178;piEi(i)=11.8466;piEm(i)=16.5448;piGA(i)=22300000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=7;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=263.8255;piEi(i)=11.8468;piEm(i)=16.5448;piGA(i)=177000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=7;piIntens(i)=2500;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=263.8627;piEi(i)=11.8468;piEm(i)=16.5442;piGA(i)=22200000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=5;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=263.869;piEi(i)=11.8469;piEm(i)=16.5442;piGA(i)=120000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=5;piIntens(i)=2000;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=AlII;pila(i)=266.9157;piEi(i)=0;piEm(i)=4.6437;piGA(i)=9840;piAcc{i}='A+';pi_z(i)=1;pigk(i)=3;piIntens(i)=2500;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=AlII;pila(i)=281.6185;piEi(i)=7.4207;piEm(i)=11.822;piGA(i)=357000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=1;piIntens(i)=4000;piStark(i)=1E16/0.00212;  % El Sherbini 2006, stark from LIBS++
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=299.4277;piEi(i)=13.0713;piEm(i)=17.2109;piGA(i)=12100000;piAcc{i}='C';pi_z(i)=1;pigk(i)=3;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=299.5525;piEi(i)=13.0731;piEm(i)=17.2109;piGA(i)=27200000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=5;piIntens(i)=400;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=299.815;piEi(i)=13.0767;piEm(i)=17.2109;piGA(i)=50800000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=7;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=302.2789;piEi(i)=13.0713;piEm(i)=17.1718;piGA(i)=8040000;piAcc{i}='E';pi_z(i)=1;pigk(i)=3;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=302.4077;piEi(i)=13.0731;piEm(i)=17.1718;piGA(i)=24100000;piAcc{i}='D';pi_z(i)=1;pigk(i)=3;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=302.6761;piEi(i)=13.0767;piEm(i)=17.1718;piGA(i)=39900000;piAcc{i}='C';pi_z(i)=1;pigk(i)=3;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=307.4691;piEi(i)=13.6494;piEm(i)=17.6806;piGA(i)=63100000;piAcc{i}='C';pi_z(i)=1;pigk(i)=7;piIntens(i)=750;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=308.8516;piEi(i)=13.2565;piEm(i)=17.2697;piGA(i)=54000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=5;piIntens(i)=800;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=327.5767;piEi(i)=11.822;piEm(i)=15.6058;piGA(i)=22200000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=3;piIntens(i)=80;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=331.3344;piEi(i)=11.8466;piEm(i)=15.5875;piGA(i)=6650000;piAcc{i}='C';pi_z(i)=1;pigk(i)=5;piIntens(i)=80;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=331.347;piEi(i)=11.8468;piEm(i)=15.5875;piGA(i)=1180000;piAcc{i}='D';pi_z(i)=1;pigk(i)=5;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=331.4883;piEi(i)=11.8468;piEm(i)=15.5859;piGA(i)=3540000;piAcc{i}='C';pi_z(i)=1;pigk(i)=3;piIntens(i)=40;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=331.4981;piEi(i)=11.8469;piEm(i)=15.5859;piGA(i)=1180000;piAcc{i}='D';pi_z(i)=1;pigk(i)=3;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=331.5608;piEi(i)=11.8469;piEm(i)=15.5852;piGA(i)=1580000;piAcc{i}='D';pi_z(i)=1;pigk(i)=1;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=335.1462;piEi(i)=13.6494;piEm(i)=17.3477;piGA(i)=31200000;piAcc{i}='C';pi_z(i)=1;pigk(i)=3;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=342.8894;piEi(i)=13.6494;piEm(i)=17.2642;piGA(i)=40500000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=7;piIntens(i)=30;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=353.4856;piEi(i)=13.8413;piEm(i)=17.3477;piGA(i)=2430000;piAcc{i}='C';pi_z(i)=1;pigk(i)=3;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=358.6557;piEi(i)=11.8466;piEm(i)=15.3025;piGA(i)=2120000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=9;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=358.692;piEi(i)=11.8466;piEm(i)=15.3022;piGA(i)=183000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=7;piIntens(i)=75;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=AlII;pila(i)=358.7068;piEi(i)=11.8468;piEm(i)=15.3022;piGA(i)=1460000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=7;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=DISCARDED_FIT;piquees(i)=AlII;pila(i)=358.7185;piEi(i)=11.8466;piEm(i)=15.3019;piGA(i)=5150000;piAcc{i}='C';pi_z(i)=1;pigk(i)=5;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=358.733;piEi(i)=11.8468;piEm(i)=15.3019;piGA(i)=183000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=5;piIntens(i)=80;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=358.745;piEi(i)=11.8469;piEm(i)=15.3019;piGA(i)=985000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=5;piIntens(i)=70;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=364.92;piEi(i)=13.0713;piEm(i)=16.4679;piGA(i)=37800000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=3;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=365.1078;piEi(i)=13.0731;piEm(i)=16.4679;piGA(i)=85000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=5;piIntens(i)=70;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=365.4991;piEi(i)=13.0767;piEm(i)=16.4679;piGA(i)=158000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=7;piIntens(i)=85;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=370.3219;piEi(i)=13.2565;piEm(i)=16.6035;piGA(i)=162000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=5;piIntens(i)=30;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=373.1952;piEi(i)=13.0713;piEm(i)=16.3926;piGA(i)=14800000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=3;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=373.3908;piEi(i)=13.0731;piEm(i)=16.3926;piGA(i)=44400000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=3;piIntens(i)=20;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=373.8015;piEi(i)=13.0767;piEm(i)=16.3926;piGA(i)=73800000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=3;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=386.616;piEi(i)=13.2565;piEm(i)=16.4625;piGA(i)=42600000;piAcc{i}='B';pi_z(i)=1;pigk(i)=1;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=390.0675;piEi(i)=7.4207;piEm(i)=10.5983;piGA(i)=2400000;piAcc{i}='E';pi_z(i)=1;pigk(i)=5;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=399.5838;piEi(i)=15.062;piEm(i)=18.164;piGA(i)=63400000;piAcc{i}='C';pi_z(i)=1;pigk(i)=9;piIntens(i)=40;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=399.6075;piEi(i)=15.062;piEm(i)=18.1638;piGA(i)=5500000;piAcc{i}='E';pi_z(i)=1;pigk(i)=7;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=399.6143;piEi(i)=15.0621;piEm(i)=18.1638;piGA(i)=43800000;piAcc{i}='D';pi_z(i)=1;pigk(i)=7;piIntens(i)=30;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=399.6323;piEi(i)=15.0621;piEm(i)=18.1637;piGA(i)=5500000;piAcc{i}='E';pi_z(i)=1;pigk(i)=5;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=399.637;piEi(i)=15.0621;piEm(i)=18.1637;piGA(i)=29600000;piAcc{i}='D';pi_z(i)=1;pigk(i)=5;piIntens(i)=20;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=402.65;piEi(i)=13.6494;piEm(i)=16.7279;piGA(i)=34800000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=3;piIntens(i)=20;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=422.6813;piEi(i)=15.062;piEm(i)=17.9945;piGA(i)=84300000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=9;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=422.742;piEi(i)=15.062;piEm(i)=17.9941;piGA(i)=7280000;piAcc{i}='D';pi_z(i)=1;pigk(i)=7;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=422.7492;piEi(i)=15.0621;piEm(i)=17.9941;piGA(i)=58200000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=7;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=422.7875;piEi(i)=15.062;piEm(i)=17.9938;piGA(i)=206000;piAcc{i}='E';pi_z(i)=1;pigk(i)=5;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=422.7945;piEi(i)=15.0621;piEm(i)=17.9938;piGA(i)=7300000;piAcc{i}='D';pi_z(i)=1;pigk(i)=5;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=422.7999;piEi(i)=15.0621;piEm(i)=17.9938;piGA(i)=39200000;piAcc{i}='C';pi_z(i)=1;pigk(i)=5;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=434.6897;piEi(i)=15.3019;piEm(i)=18.1534;piGA(i)=29300000;piAcc{i}='D';pi_z(i)=1;pigk(i)=7;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=458.5817;piEi(i)=15.062;piEm(i)=17.7649;piGA(i)=90000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=9;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=458.8082;piEi(i)=15.062;piEm(i)=17.7636;piGA(i)=7840000;piAcc{i}='D';pi_z(i)=1;pigk(i)=7;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=458.8191;piEi(i)=15.0621;piEm(i)=17.7636;piGA(i)=62400000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=7;piIntens(i)=400;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=458.9674;piEi(i)=15.0621;piEm(i)=17.7627;piGA(i)=7800000;piAcc{i}='D';pi_z(i)=1;pigk(i)=5;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=458.9742;piEi(i)=15.0621;piEm(i)=17.7627;piGA(i)=42000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=5;piIntens(i)=300;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=AlII;pila(i)=466.3056;piEi(i)=10.5983;piEm(i)=13.2565;piGA(i)=174000000;piAcc{i}='A+';pi_z(i)=1;pigk(i)=3;piIntens(i)=1000;piStark(i)=1E16/0.003015; %  El Sherbini 2006, stark from LIBS++
IRSAC_reference(AlII) = i; % not many to choose from
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=527.862;piEi(i)=15.5852;piEm(i)=17.9333;piGA(i)=3330000;piAcc{i}='D';pi_z(i)=1;pigk(i)=3;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=528.0214;piEi(i)=15.5859;piEm(i)=17.9333;piGA(i)=7450000;piAcc{i}='D';pi_z(i)=1;pigk(i)=5;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=528.3735;piEi(i)=15.5875;piEm(i)=17.9334;piGA(i)=14000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=7;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=528.5842;piEi(i)=15.6058;piEm(i)=17.9507;piGA(i)=16400000;piAcc{i}='C';pi_z(i)=1;pigk(i)=5;piIntens(i)=30;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=538.848;piEi(i)=15.0476;piEm(i)=17.3477;piGA(i)=4290000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=3;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=559.3302;piEi(i)=13.2565;piEm(i)=15.4725;piGA(i)=463000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=5;piIntens(i)=800;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=561.3291;piEi(i)=15.4725;piEm(i)=17.6806;piGA(i)=24000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=7;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=585.362;piEi(i)=15.062;piEm(i)=17.1795;piGA(i)=115000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=9;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=586.153;piEi(i)=15.0621;piEm(i)=17.1766;piGA(i)=79800000;piAcc{i}='B';pi_z(i)=1;pigk(i)=7;piIntens(i)=80;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=586.781;piEi(i)=15.0621;piEm(i)=17.1745;piGA(i)=53500000;piAcc{i}='B';pi_z(i)=1;pigk(i)=5;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=597.198;piEi(i)=15.6058;piEm(i)=17.6813;piGA(i)=29000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=5;piIntens(i)=80;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=599.975;piEi(i)=15.5852;piEm(i)=17.6511;piGA(i)=6210000;piAcc{i}='C';pi_z(i)=1;pigk(i)=3;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=600.176;piEi(i)=15.5859;piEm(i)=17.6511;piGA(i)=14000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=5;piIntens(i)=60;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=600.188;piEi(i)=15.5859;piEm(i)=17.6511;piGA(i)=4650000;piAcc{i}='D';pi_z(i)=1;pigk(i)=3;piIntens(i)=40;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=600.641;piEi(i)=15.5875;piEm(i)=17.6511;piGA(i)=26000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=7;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=606.1124;piEi(i)=15.6058;piEm(i)=17.6508;piGA(i)=8380000;piAcc{i}='C';pi_z(i)=1;pigk(i)=1;piIntens(i)=30;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=606.637;piEi(i)=15.5852;piEm(i)=17.6284;piGA(i)=2660000;piAcc{i}='D';pi_z(i)=1;pigk(i)=3;piIntens(i)=25;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=606.847;piEi(i)=15.5859;piEm(i)=17.6284;piGA(i)=7980000;piAcc{i}='C';pi_z(i)=1;pigk(i)=3;piIntens(i)=65;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=607.3198;piEi(i)=15.5875;piEm(i)=17.6284;piGA(i)=13300000;piAcc{i}='C';pi_z(i)=1;pigk(i)=3;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=618.163;piEi(i)=15.3019;piEm(i)=17.3071;piGA(i)=169000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=7;piIntens(i)=110;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=622.618;piEi(i)=13.0713;piEm(i)=15.0621;piGA(i)=188000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=3;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=623.1745;piEi(i)=13.0731;piEm(i)=15.0621;piGA(i)=420000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=5;piIntens(i)=75;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=624.336;piEi(i)=13.0767;piEm(i)=15.062;piGA(i)=777000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=7;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=633.5701;piEi(i)=13.6494;piEm(i)=15.6058;piGA(i)=45900000;piAcc{i}='B';pi_z(i)=1;pigk(i)=3;piIntens(i)=30;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=669.639;piEi(i)=14.8896;piEm(i)=16.7406;piGA(i)=1370000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=5;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=669.946;piEi(i)=14.8896;piEm(i)=16.7398;piGA(i)=819000;piAcc{i}='C';pi_z(i)=1;pigk(i)=3;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=681.669;piEi(i)=13.0713;piEm(i)=14.8896;piGA(i)=36000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=3;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=682.348;piEi(i)=13.0731;piEm(i)=14.8896;piGA(i)=108000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=3;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=683.714;piEi(i)=13.0767;piEm(i)=14.8896;piGA(i)=178000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=3;piIntens(i)=80;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=691.793;piEi(i)=15.4725;piEm(i)=17.2642;piGA(i)=69300000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=7;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=691.996;piEi(i)=13.2565;piEm(i)=15.0476;piGA(i)=100000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=1;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=AlII;pila(i)=704.206;piEi(i)=11.3166;piEm(i)=13.0767;piGA(i)=289000000;piAcc{i}='A+';pi_z(i)=1;pigk(i)=5;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=AlII;pila(i)=705.66;piEi(i)=11.3166;piEm(i)=13.0731;piGA(i)=172000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=3;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=706.364;piEi(i)=11.3166;piEm(i)=13.0713;piGA(i)=57300000;piAcc{i}='A';pi_z(i)=1;pigk(i)=1;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=744.942;piEi(i)=15.6058;piEm(i)=17.2697;piGA(i)=58000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=5;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=747.141;piEi(i)=13.6494;piEm(i)=15.3084;piGA(i)=390000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=7;piIntens(i)=90;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=762.448;piEi(i)=15.5852;piEm(i)=17.2109;piGA(i)=13800000;piAcc{i}='B';pi_z(i)=1;pigk(i)=3;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=762.785;piEi(i)=15.5859;piEm(i)=17.2109;piGA(i)=31000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=5;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=763.533;piEi(i)=15.5875;piEm(i)=17.2109;piGA(i)=57800000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=7;piIntens(i)=20;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=781.231;piEi(i)=15.5852;piEm(i)=17.1718;piGA(i)=4650000;piAcc{i}='C';pi_z(i)=1;pigk(i)=3;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=781.583;piEi(i)=15.5859;piEm(i)=17.1718;piGA(i)=13900000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=3;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=782.372;piEi(i)=15.5875;piEm(i)=17.1718;piGA(i)=23100000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=3;piIntens(i)=20;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=808.691;piEi(i)=16.6035;piEm(i)=18.1362;piGA(i)=14100000;piAcc{i}='C';pi_z(i)=1;pigk(i)=7;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=811.972;piEi(i)=16.4679;piEm(i)=17.9945;piGA(i)=26200000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=9;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=812.203;piEi(i)=16.4679;piEm(i)=17.9941;piGA(i)=18100000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=7;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=835.4318;piEi(i)=15.062;piEm(i)=16.5457;piGA(i)=384000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=9;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=835.923;piEi(i)=15.062;piEm(i)=16.5448;piGA(i)=33200000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=7;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=835.9492;piEi(i)=15.0621;piEm(i)=16.5448;piGA(i)=265000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=7;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=836.3251;piEi(i)=15.0621;piEm(i)=16.5442;piGA(i)=33200000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=5;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=836.3469;piEi(i)=15.0621;piEm(i)=16.5442;piGA(i)=179000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=5;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=864.0705;piEi(i)=11.822;piEm(i)=13.2565;piGA(i)=90000000;piAcc{i}='A+';pi_z(i)=1;pigk(i)=3;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=AlII;pila(i)=867.121;piEi(i)=16.5442;piEm(i)=17.9736;piGA(i)=38600000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=7;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=1


%SnI
i=i+1; piUse(i)=1;piquees(i)=SnI;pila(i)=235.48;piEm(i)=5.47; piGA(i)=8.5E8;pi_z(i)=0;pigk(i)=5; piStark(i)=0;  piResonant(i)=1; %  from ASD larger intensities, checked no interferences with ASD_LIBS, totally overlapped
i=i+1; piUse(i)=1;piquees(i)=SnI;pila(i)=242.16;piEm(i)=6.186; piGA(i)=1.8E9;pi_z(i)=0;pigk(i)=7; piStark(i)=0; piResonant(i)=1;  %  from ASD larger intensities, checked no interferences with ASD_LIBS
i=i+1; piUse(i)=1;piquees(i)=SnI;pila(i)=242.95;piEm(i)=5.53; piGA(i)=1E9;pi_z(i)=0;pigk(i)=7; piStark(i)=0; piResonant(i)=1; %  from ASD larger intensities, checked no interferences with ASD_LIBS
i=i+1; piUse(i)=1;piquees(i)=SnI;pila(i)=249.57;piEm(i)=6.03; piGA(i)=3.1E8;pi_z(i)=0;pigk(i)=5; piStark(i)=0;%  from ASD larger intensities, checked with ASD-LIBS: interference with CuI, discarded
i=i+1; piUse(i)=1;piquees(i)=SnI;pila(i)=266.12;piEm(i)=4.87; piGA(i)=3.3E7;pi_z(i)=0;pigk(i)=3; piStark(i)=0; piResonant(i)=1; %  from ASD larger intensities, checked no interferences with ASD-LIBS, but was an outlier, removing this peak overall error decrease a lot
i=i+1; piUse(i)=1;piquees(i)=SnI;pila(i)=283.998;piEm(i)=4.789;piGA(i)=8.58E8;pi_z(i)=0;pigk(i)=5; piStark(i)=0; piResonant(i)=1; %  from ASD larger intensities, peaks not confirmed, it seems isolated , checked with ASD-LIBS; gAk is 1.7E8 in GENIE and 1.57 in Griffoni 2016 ¿?
i=i+1; piUse(i)=1;piquees(i)=SnI;pila(i)=286.33;piEm(i)=4.329;piGA(i)=1.6E8;pi_z(i)=0;pigk(i)=3; piStark(i)=0; piResonant(i)=1; %  from ASD larger intensities, peaks not confirmed, it seems isolated , checked
i=i+1; piUse(i)=1;piquees(i)=SnI;pila(i)=317.50;piEm(i)=4.329;piGA(i)=3.0E8;pi_z(i)=0;pigk(i)=3; piStark(i)=0; piResonant(i)=1; %  from ASD larger intensities, peaks not confirmed, it seems isolated , checked
i=i+1; piUse(i)=1;piquees(i)=SnI;pila(i)=326.23;piEm(i)=4.87;piGA(i)=8.1E8;pi_z(i)=0;pigk(i)=3; piStark(i)=0; piResonant(i)=1; %  from ASD larger intensities, peaks not confirmed, it seems isolated , does not appears in ASD-LIBS
i=i+1; piUse(i)=1;piquees(i)=SnI;pila(i)=380.10;piEm(i)=4.329;piGA(i)=8.4E7;pi_z(i)=0;pigk(i)=3; piStark(i)=0; piResonant(i)=1;%  from ASD larger intensities, peaks not confirmed, it seems isolated , checked
i=i+1; piUse(i)=1;piquees(i)=SnI;pila(i)=452.47;piEm(i)=4.867;piGA(i)=7.8E7;pi_z(i)=0;pigk(i)=3; piStark(i)=0;%  from ASD larger intensities, peaks not confirmed, it seems isolated , does not appear in ASD-LIBS
IRSAC_reference(SnI) = i; % most are resonant


%SnII - none with enough intensity in the coin spectrum
i=i+1; piUse(i)=1;piquees(i)=SnII;pila(i)=328.31;piEm(i)=11.07; piGA(i)=1.02E9;pi_z(i)=1;pigk(i)=6; piStark(i)=0;  %  from ASD larger intensities, could be CuII @328.32, too much background and interferences, IT'S ZnI
IRSAC_reference(SnII) = 0; % not many to choose from

%VI - Vanadium
i=i+1; piUse(i)=1;piquees(i)=VI;pila(i)=292.362;piEi(i)=0.0686;piEm(i)=4.308; piGA(i)=6.6E8;pi_z(i)=0;pigk(i)=8;  % from Cremers book p.264
i=i+1; piUse(i)=1;piquees(i)=VI;pila(i)=318.396;piEi(i)=0.04;piEm(i)=3.933; piGA(i)=2.8E9;pi_z(i)=0;pigk(i)=10;  % from Cremers book
i=i+1; piUse(i)=1;piquees(i)=VI;pila(i)=370.357;piEi(i)=0.3;piEm(i)=3.647; piGA(i)=8.96E8;pi_z(i)=0;pigk(i)=8;  % from Cremers book
i=i+1; piUse(i)=1;piquees(i)=VI;pila(i)=411.178;piEi(i)=0.3;piEm(i)=3.315; piGA(i)=1.00E9;pi_z(i)=0;pigk(i)=10;  % from Cremers book
i=i+1; piUse(i)=1;piquees(i)=VI;pila(i)=438.47;piEi(i)=0.287;piEm(i)=3.113; piGA(i)=9.2E8;pi_z(i)=0;pigk(i)=10;  % from ASD larger intensities
i=i+1; piUse(i)=1;piquees(i)=VI;pila(i)=438.998;piEi(i)=0.275;piEm(i)=3.098; piGA(i)=9.2E8;pi_z(i)=0;pigk(i)=10;  % from ASD larger intensities
i=i+1; piUse(i)=1;piquees(i)=VI;pila(i)=437.92;piEi(i)=0.3;piEm(i)=3.131; piGA(i)=1.38E9;pi_z(i)=0;pigk(i)=12;  % from Cremers book
i=i+1; piUse(i)=1;piquees(i)=VI;pila(i)=446.03;piEi(i)=0.3;piEm(i)=3.079; piGA(i)=2.09E8;pi_z(i)=0;pigk(i)=8;  % from Cremers book
i=i+1; piUse(i)=1;piquees(i)=VI;pila(i)=459.41;piEi(i)=0.06;piEm(i)=2.766; piGA(i)=6.8E7;pi_z(i)=0;pigk(i)=12;  % from Cremers book
i=i+1; piUse(i)=1;piquees(i)=VI;pila(i)=488.156;piEi(i)=0.068;piEm(i)=2.607; piGA(i)=6.2E7;pi_z(i)=0;pigk(i)=8;  % from Cremers book
i=i+1; piUse(i)=1;piquees(i)=VI;pila(i)=572.705;piEi(i)=1.08;piEm(i)=3.244; piGA(i)=1.94E8;pi_z(i)=0;pigk(i)=10;  % from Cremers book
i=i+1; piUse(i)=1;piquees(i)=VI;pila(i)=624.31;piEi(i)=0.3;piEm(i)=2.286; piGA(i)=1.94E7;pi_z(i)=0;pigk(i)=10;  % from Cremers book


%VII 
i=i+1; piUse(i)=1;piquees(i)=VII;pila(i)=289.332;piEi(i)=0.368;piEm(i)=4.652; piGA(i)=8.61E8;pi_z(i)=1;pigk(i)=7;  % from Cremers book
i=i+1; piUse(i)=1;piquees(i)=VII;pila(i)=309.31;piEi(i)=0.392;piEm(i)=4.399; piGA(i)=2.6E9;pi_z(i)=1;pigk(i)=13;  % from Cremers book
i=i+1; piUse(i)=1;piquees(i)=VII;pila(i)=310.23;piEi(i)=0.368;piEm(i)=4.363; piGA(i)=1.96E9;pi_z(i)=1;pigk(i)=11;  % from ASD larger intensities
i=i+1; piUse(i)=1;piquees(i)=VII;pila(i)=311.07;piEi(i)=0.348;piEm(i)=4.332; piGA(i)=1.42E9;pi_z(i)=1;pigk(i)=9;  % from ASD larger intensities
i=i+1; piUse(i)=1;piquees(i)=VII;pila(i)=311.838;piEi(i)=0.333;piEm(i)=4.307; piGA(i)=1.03E9;pi_z(i)=1;pigk(i)=7;  % from ASD larger intensities
i=i+1; piUse(i)=1;piquees(i)=VII;pila(i)=312.528;piEi(i)=0.323;piEm(i)=4.289; piGA(i)=7.50E8;pi_z(i)=1;pigk(i)=5;  % from ASD larger intensities
i=i+1; piUse(i)=1;piquees(i)=VII;pila(i)=327.61;piEi(i)=1.128;piEm(i)=4.911; piGA(i)=1.87E9;pi_z(i)=1;pigk(i)=11;  % from Cremers book

%FeI -- Iron
i=i+1; piUse(i)=0;piquees(i)=FeI; pila(i)=346.59;piEm(i)=3.686; piGA(i)=0.119E8;pi_z(i)=0;pigk(i)=3; piStark(i)=0; % Shah 2012, piEi=0.110,  ARTICULO: Quantitative elemental analysis of steel using calibration-free laser-induced breakdown spectroscopy
i=i+1; piUse(i)=0;piquees(i)=FeI; pila(i)=355.49;piEm(i)=6.319; piGA(i)=1.40E8;pi_z(i)=0;pigk(i)=13; piStark(i)=0; % Shah 2012, piEi=2.832,  ARTICULO: Quantitative elemental analysis of steel using calibration-free laser-induced breakdown spectroscopy
i=i+1; piUse(i)=1;piquees(i)=FeI; pila(i)=361.88;piEm(i)=4.415; piGA(i)=0.722E8;pi_z(i)=0;pigk(i)=7; piStark(i)=0; % Shah 2012, piEi=0.990,  ARTICULO: Quantitative elemental analysis of steel using calibration-free laser-induced breakdown spectroscopy
i=i+1; piUse(i)=DISCARDED_SAT;piquees(i)=FeI;pila(i)=363.1463;piEi(i)=0.95816;piEm(i)=4.3714;piGA(i)=465000000;piAcc{i}='A';pi_z(i)=0;pigk(i)=9;piIntens(i)=1150000;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1; piUse(i)=1;piquees(i)=FeI; pila(i)=367.9913;piEm(i)=3.36826; piGA(i)=1.24E7;pi_z(i)=0;pigk(i)=9; piStark(i)=0; % , selected FeI line in [Praher2010] below self-absorption threshold, Ei=0!!!
IRSAC_reference(FeI) = i; % 367.9913 lowest selfabsorption in Praher2010
i=i+1; piUse(i)=1;piquees(i)=FeI; pila(i)=368.7456;piEm(i)=4.2203; piGA(i)=7.2E7;pi_z(i)=0;pigk(i)=9; piStark(i)=0; % , selected FeI line in [Praher2010] below self-absorption threshold
i=i+1; piUse(i)=1;piquees(i)=FeI; pila(i)=370.556;piEm(i)=3.39; piGA(i)=0.0322E8;pi_z(i)=0;pigk(i)=7; piStark(i)=0;  %  S.M. Pershin 2012, piEi=0.052, ARTICULO: Physics of selective evaporation of components during laser ablation of stainless steels
i=i+1; piUse(i)=1;piquees(i)=FeI; pila(i)=370.925;piEm(i)=4.25; piGA(i)=0.156E8;pi_z(i)=0;pigk(i)=7; piStark(i)=0;  %  S.M. Pershin 2012, piEi=0.91, ARTICULO: Physics of selective evaporation of components during laser ablation of stainless steels  , selected FeI line in [Praher2010] below self-absorption threshold
i=i+1; piUse(i)=1;piquees(i)=FeI; pila(i)=371.994;piEm(i)=3.33; piGA(i)=0.162E8;pi_z(i)=0;pigk(i)=11; piStark(i)=0;  %  S.M. Pershin 2012, piEi=0.00, ARTICULO: Physics of selective evaporation of components during laser ablation of stainless steels
i=i+1; piUse(i)=1;piquees(i)=FeI; pila(i)=372.762;piEm(i)=4.28; piGA(i)=0.225E8;pi_z(i)=0;pigk(i)=5; piStark(i)=0;  %  S.M. Pershin 2012, piEi=0.96, ARTICULO: Physics of selective evaporation of components during laser ablation of stainless steels, , selected FeI line in [Praher2010] below self-absorption threshold
i=i+1; piUse(i)=DISCARDED_SAT;piquees(i)=FeI; pila(i)=373.486;piEm(i)=4.18; piGA(i)=0.901E8;pi_z(i)=0;pigk(i)=11; piStark(i)=0;  %  from Aragon 2014, piEi=0.86
i=i+1; piUse(i)=0;piquees(i)=FeI; pila(i)=373.713;piEm(i)=3.36; piGA(i)=0.141E8;pi_z(i)=0;pigk(i)=9; piStark(i)=0;  %  S.M. Pershin 2012, piEi=0.052, ARTICULO: Physics of selective evaporation of components during laser ablation of stainless steels
i=i+1; piUse(i)=0;piquees(i)=FeI; pila(i)=374.3362;piEm(i)=4.301278; piGA(i)=7.80E7;pi_z(i)=0;pigk(i)=3; piStark(i)=0; % , selected FeI line in [Praher2010] below self-absorption threshold
i=i+1; piUse(i)=0;piquees(i)=FeI; pila(i)=374.556;piEm(i)=3.39; piGA(i)=0.115E8;pi_z(i)=0;pigk(i)=7; piStark(i)=0;  %  S.M. Pershin 2012, piEi=0.087, ARTICULO: Physics of selective evaporation of components during laser ablation of stainless steels
i=i+1; piUse(i)=0;piquees(i)=FeI; pila(i)=374.589;piEm(i)=3.43; piGA(i)=0.0733E8;pi_z(i)=0;pigk(i)=3; piStark(i)=0;  %  S.M. Pershin 2012, piEi=0.12, ARTICULO: Physics of selective evaporation of components during laser ablation of stainless steels
i=i+1; piUse(i)=0;piquees(i)=FeI; pila(i)=374.826;piEm(i)=3.41; piGA(i)=0.0915E8;pi_z(i)=0;pigk(i)=5; piStark(i)=0;  %  S.M. Pershin 2012, piEi=0.11, ARTICULO: Physics of selective evaporation of components during laser ablation of stainless steels
i=i+1; piUse(i)=DISCARDED_FIT;piquees(i)=FeI; pila(i)=374.948;piEm(i)=4.22; piGA(i)=0.763E8;pi_z(i)=0;pigk(i)=9; piStark(i)=0;  %  from Aragon 2014, piEi=0.91
i=i+1; piUse(i)=DISCARDED_FIT;piquees(i)=FeI; pila(i)=375.823;piEm(i)=4.26; piGA(i)=0.634E8;pi_z(i)=0;pigk(i)=7; piStark(i)=0;  %  from Aragon 2014, piEi=0.96
i=i+1; piUse(i)=1;piquees(i)=FeI; pila(i)=376.3789;piEm(i)=4.28; piGA(i)=0.544E8;pi_z(i)=0;pigk(i)=5; piStark(i)=0;  %  from Aragon 2014, piEi=0.99
i=i+1; piUse(i)=0;piquees(i)=FeI; pila(i)=376.5539;piEm(i)=6.53; piGA(i)=0.951E8;pi_z(i)=0;pigk(i)=15; piStark(i)=0;  %  from Aragon 2014, piEi=3.24 ,pigi=13
i=i+1; piUse(i)=0;piquees(i)=FeI; pila(i)=376.7192;piEm(i)=4.30; piGA(i)=0.639E8;pi_z(i)=0;pigk(i)=3; piStark(i)=0;  %  from Aragon 2014, piEi=1.01 ,
i=i+1; piUse(i)=0;piquees(i)=FeI; pila(i)=379.5002;piEm(i)=4.26; piGA(i)=0.115E8;pi_z(i)=0;pigk(i)=7; piStark(i)=0;  %  from Aragon 2014, piEi=0.99 ,pigi=5
i=i+1; piUse(i)=0;piquees(i)=FeI; pila(i)=379.7515;piEm(i)=6.5; piGA(i)=0.457E8;pi_z(i)=0;pigk(i)=13; piStark(i)=0;  %  from Aragon 2014, piEi=3.24 ,
i=i+1; piUse(i)=0;piquees(i)=FeI; pila(i)=380.5343;piEm(i)=6.56; piGA(i)=0.860E8;pi_z(i)=0;pigk(i)=11; piStark(i)=0;  %  from Aragon 2014, piEi=3.30 ,pigi=9
i=i+1; piUse(i)=1;piquees(i)=FeI; pila(i)=381.584;piEm(i)=4.73; piGA(i)=1.12E8;pi_z(i)=0;pigk(i)=7; piStark(i)=0;  %  from Aragon 2014, piEi=1.48 ,pigi=9
i=i+1; piUse(i)=0;piquees(i)=FeI; pila(i)=382.0425;piEm(i)=4.10; piGA(i)=0.667E8;pi_z(i)=0;pigk(i)=9; piStark(i)=0;  %  from Aragon 2014, piEi=0.86 ,pigi=11
i=i+1; piUse(i)=0;piquees(i)=FeI; pila(i)=382.1178;piEm(i)=6.51; piGA(i)=0.554E8;pi_z(i)=0;pigk(i)=13; piStark(i)=0;  %  from Aragon 2014, piEi=3.27 ,pigi=11
i=i+1; piUse(i)=0;piquees(i)=FeI; pila(i)=382.4444;piEm(i)=3.24097; piGA(i)=1.98E7;pi_z(i)=0;pigk(i)=7; piStark(i)=0; % , selected FeI line in [Praher2010] below self-absorption threshold
i=i+1; piUse(i)=0;piquees(i)=FeI; pila(i)=382.7823;piEm(i)=4.80; piGA(i)=1.05E8;pi_z(i)=0;pigk(i)=5; piStark(i)=0;  %  from Aragon 2014, piEi=1.56 ,pigi=7
i=i+1; piUse(i)=0;piquees(i)=FeI; pila(i)=383.4222;piEm(i)=4.19; piGA(i)=0.452E8;pi_z(i)=0;pigk(i)=5; piStark(i)=0;  %  from Aragon 2014, piEi=0.96 ,pigi=7
i=i+1; piUse(i)=0;piquees(i)=FeI; pila(i)=384.1048;piEm(i)=4.83; piGA(i)=1.36E8;pi_z(i)=0;pigk(i)=3; piStark(i)=0;  %  from Aragon 2014, piEi=1.61 ,pigi=5
i=i+1; piUse(i)=0;piquees(i)=FeI; pila(i)=385.6372;piEm(i)=3.27; piGA(i)=0.0464E8;pi_z(i)=0;pigk(i)=5; piStark(i)=0;  %  from Aragon 2014, piEi=0.05 ,pigi=7
i=i+1; piUse(i)=0;piquees(i)=FeI; pila(i)=385.9212;piEm(i)=5.62; piGA(i)=0.0725E8;pi_z(i)=0;pigk(i)=11; piStark(i)=0;  %  from Aragon 2014, piEi=2.40 ,pigi=13
i=i+1; piUse(i)=0;piquees(i)=FeI; pila(i)=385.9911;piEm(i)=3.21; piGA(i)=0.0969E8;pi_z(i)=0;pigk(i)=9; piStark(i)=0;  %  from Aragon 2014, piEi=0.00 
i=i+1; piUse(i)=0;piquees(i)=FeI; pila(i)=386.5523;piEm(i)=4.22; piGA(i)=0.155E8;pi_z(i)=0;pigk(i)=3; piStark(i)=0;  %  from Aragon 2014, piEi=1.01 
i=i+1; piUse(i)=0;piquees(i)=FeI; pila(i)=387.2501;piEm(i)=4.19; piGA(i)=0.105E8;pi_z(i)=0;pigk(i)=5; piStark(i)=0;  %  from Aragon 2014, piEi=0.99
i=i+1; piUse(i)=0;piquees(i)=FeI; pila(i)=387.3760;piEm(i)=5.63; piGA(i)=0.0657E8;pi_z(i)=0;pigk(i)=9; piStark(i)=0;  %  from Aragon 2014, piEi=2.43 , pigi=11
i=i+1; piUse(i)=0;piquees(i)=FeI; pila(i)=389.9707;piEm(i)=3.2657; piGA(i)=1.29E7;pi_z(i)=0;pigk(i)=5; piStark(i)=0; % , selected FeI line in [Praher2010] below self-absorption threshold
i=i+1; piUse(i)=0;piquees(i)=FeI; pila(i)=396.93;piEm(i)=4.608; piGA(i)=0.226E8;pi_z(i)=0;pigk(i)=7; piStark(i)=0; % Shah 2012, piEi=1.485,  ARTICULO: Quantitative elemental analysis of steel using calibration-free laser-induced breakdown spectroscopy
i=i+1; piUse(i)=0;piquees(i)=FeI; pila(i)=425.08;piEm(i)=4.473; piGA(i)=0.102E8;pi_z(i)=0;pigk(i)=7; piStark(i)=0; % Shah 2012, piEi=1.557,  ARTICULO: Quantitative elemental analysis of steel using calibration-free laser-induced breakdown spectroscopy
i=i+1; piUse(i)=0;piquees(i)=FeI; pila(i)=426.05;piEm(i)=5.308; piGA(i)=0.399E8;pi_z(i)=0;pigk(i)=11; piStark(i)=0; % Shah 2012, piEi=2.399,  ARTICULO: Quantitative elemental analysis of steel using calibration-free laser-induced breakdown spectroscopy
i=i+1; piUse(i)=0;piquees(i)=FeI; pila(i)=432.58;piEm(i)=4.473; piGA(i)=0.516E8;pi_z(i)=0;pigk(i)=7; piStark(i)=0; % Shah 2012, piEi=1.608,  ARTICULO: Quantitative elemental analysis of steel using calibration-free laser-induced breakdown spectroscopy
i=i+1;piUse(i)=0;piquees(i)=FeI;pila(i)=489.1492;piEi(i)=2.8512;piEm(i)=5.3852;piGA(i)=216000000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=7;piIntens(i)=117000;piStark(i)=0;% auto imported from NIST ASD Intensity>=150000
i=i+1;piUse(i)=0;piquees(i)=FeI;pila(i)=492.0503;piEi(i)=2.8325;piEm(i)=5.3516;piGA(i)=322000000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=9;piIntens(i)=195000;piStark(i)=0;% auto imported from NIST ASD Intensity>=150000 and  Shah 2012, piEi=2.832,  ARTICULO: Quantitative elemental analysis of steel using calibration-free laser-induced breakdown spectroscopy
i=i+1;piUse(i)=0;piquees(i)=FeI;pila(i)=495.7597;piEi(i)=2.8083;piEm(i)=5.3085;piGA(i)=464000000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=11;piIntens(i)=295000;piStark(i)=0;% auto imported from NIST ASD Intensity>=150000
i=i+1;piUse(i)=0;piquees(i)=FeI;pila(i)=516.7488;piEi(i)=1.4849;piEm(i)=3.8835;piGA(i)=19000000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=7;piIntens(i)=760000;piStark(i)=0;% auto imported from NIST ASD Intensity>=150000
i=i+1;piUse(i)=0;piquees(i)=FeI;pila(i)=517.1596;piEi(i)=1.4849;piEm(i)=3.8816;piGA(i)=4010000;piAcc{i}='A';pi_z(i)=0;pigk(i)=9;piIntens(i)=162000;piStark(i)=0;% auto imported from NIST ASD Intensity>=150000
i=i+1;piUse(i)=0;piquees(i)=FeI;pila(i)=522.7189;piEi(i)=1.5574;piEm(i)=3.9286;piGA(i)=14400000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=5;piIntens(i)=437000;piStark(i)=0;% auto imported from NIST ASD Intensity>=150000
i=i+1;piUse(i)=0;piquees(i)=FeI;pila(i)=523.294;piEi(i)=2.9398;piEm(i)=5.3085;piGA(i)=213000000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=11;piIntens(i)=123000;piStark(i)=0;% auto imported from NIST ASD Intensity>=150000
i=i+1;piUse(i)=0;piquees(i)=FeI;pila(i)=526.9537;piEi(i)=0.859;piEm(i)=3.2112;piGA(i)=11400000;piAcc{i}='A';pi_z(i)=0;pigk(i)=9;piIntens(i)=1020000;piStark(i)=0;% auto imported from NIST ASD Intensity>=150000
i=i+1;piUse(i)=0;piquees(i)=FeI;pila(i)=527.0356;piEi(i)=1.6079;piEm(i)=3.9597;piGA(i)=11000000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=3;piIntens(i)=288000;piStark(i)=0;% auto imported from NIST ASD Intensity>=150000
i=i+1;piUse(i)=0;piquees(i)=FeI;pila(i)=532.8038;piEi(i)=0.9146;piEm(i)=3.241;piGA(i)=8050000;piAcc{i}='A';pi_z(i)=0;pigk(i)=7;piIntens(i)=740000;piStark(i)=0;% auto imported from NIST ASD Intensity>=150000
i=i+1;piUse(i)=0;piquees(i)=FeI;pila(i)=532.8531;piEi(i)=1.5574;piEm(i)=3.8835;piGA(i)=3320000;piAcc{i}='B';pi_z(i)=0;pigk(i)=7;piIntens(i)=105000;piStark(i)=0;% auto imported from NIST ASD Intensity>=150000
i=i+1;piUse(i)=0;piquees(i)=FeI;pila(i)=537.1489;piEi(i)=0.95816;piEm(i)=3.2657;piGA(i)=5250000;piAcc{i}='A';pi_z(i)=0;pigk(i)=5;piIntens(i)=389000;piStark(i)=0;% auto imported from NIST ASD Intensity>=150000
i=i+1;piUse(i)=0;piquees(i)=FeI;pila(i)=539.7128;piEi(i)=0.9146;piEm(i)=3.2112;piGA(i)=2320000;piAcc{i}='A';pi_z(i)=0;pigk(i)=9;piIntens(i)=132000;piStark(i)=0;% auto imported from NIST ASD Intensity>=150000
i=i+1;piUse(i)=0;piquees(i)=FeI;pila(i)=540.5775;piEi(i)=0.99011;piEm(i)=3.283;piGA(i)=3270000;piAcc{i}='A';pi_z(i)=0;pigk(i)=3;piIntens(i)=145000;piStark(i)=0;% auto imported from NIST ASD Intensity>=150000
i=i+1;piUse(i)=0;piquees(i)=FeI;pila(i)=542.9696;piEi(i)=0.95816;piEm(i)=3.241;piGA(i)=2990000;piAcc{i}='A';pi_z(i)=0;pigk(i)=7;piIntens(i)=145000;piStark(i)=0;% auto imported from NIST ASD Intensity>=150000
i=i+1;piUse(i)=0;piquees(i)=FeI;pila(i)=543.4524;piEi(i)=1.0111;piEm(i)=3.2918;piGA(i)=1700000;piAcc{i}='A';pi_z(i)=0;pigk(i)=1;piIntens(i)=107000;piStark(i)=0;% auto imported from NIST ASD Intensity>=150000
i=i+1;piUse(i)=0;piquees(i)=FeI;pila(i)=544.6916;piEi(i)=0.99011;piEm(i)=3.2657;piGA(i)=2740000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=5;piIntens(i)=182000;piStark(i)=0;% auto imported from NIST ASD Intensity>=150000
i=i+1;piUse(i)=0;piquees(i)=FeI;pila(i)=545.5609;piEi(i)=1.0111;piEm(i)=3.283;piGA(i)=1820000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=3;piIntens(i)=115000;piStark(i)=0;% auto imported from NIST ASD Intensity>=150000
i=i+1;piUse(i)=0;piquees(i)=FeI;pila(i)=639.3601;piEi(i)=2.4327;piEm(i)=4.3714;piGA(i)=4330000;piAcc{i}='C';pi_z(i)=0;pigk(i)=9;piIntens(i)=302000;piStark(i)=0;% auto imported from NIST ASD Intensity>=150000
i=i+1;piUse(i)=0;piquees(i)=FeI;pila(i)=640.0001;piEi(i)=3.6025;piEm(i)=5.5392;piGA(i)=83400000;piAcc{i}='B';pi_z(i)=0;pigk(i)=9;piIntens(i)=490000;piStark(i)=0;% auto imported from NIST ASD Intensity>=150000
i=i+1;piUse(i)=0;piquees(i)=FeI;pila(i)=641.1649;piEi(i)=3.6537;piEm(i)=5.5869;piGA(i)=31000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=7;piIntens(i)=219000;piStark(i)=0;% auto imported from NIST ASD Intensity>=150000
i=i+1;piUse(i)=0;piquees(i)=FeI;pila(i)=642.135;piEi(i)=2.2786;piEm(i)=4.2089;piGA(i)=1520000;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=257000;piStark(i)=0;% auto imported from NIST ASD Intensity>=150000
i=i+1;piUse(i)=0;piquees(i)=FeI;pila(i)=643.0846;piEi(i)=2.1759;piEm(i)=4.1034;piGA(i)=1590000;piAcc{i}='B';pi_z(i)=0;pigk(i)=9;piIntens(i)=209000;piStark(i)=0;% auto imported from NIST ASD Intensity>=150000
i=i+1;piUse(i)=0;piquees(i)=FeI;pila(i)=649.498;piEi(i)=2.4041;piEm(i)=4.3125;piGA(i)=8430000;piAcc{i}='B';pi_z(i)=0;pigk(i)=11;piIntens(i)=870000;piStark(i)=0;% auto imported from NIST ASD Intensity>=150000
i=i+1;piUse(i)=0;piquees(i)=FeI;pila(i)=654.6239;piEi(i)=2.7586;piEm(i)=4.652;piGA(i)=4530000;piAcc{i}='C';pi_z(i)=0;pigk(i)=5;piIntens(i)=224000;piStark(i)=0;% auto imported from NIST ASD Intensity>=150000
i=i+1;piUse(i)=0;piquees(i)=FeI;pila(i)=659.2913;piEi(i)=2.7275;piEm(i)=4.6076;piGA(i)=5160000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=7;piIntens(i)=155000;piStark(i)=0;% auto imported from NIST ASD Intensity>=150000
i=i+1;piUse(i)=0;piquees(i)=FeI;pila(i)=667.7986;piEi(i)=2.6924;piEm(i)=4.5485;piGA(i)=5710000;piAcc{i}='B';pi_z(i)=0;pigk(i)=9;piIntens(i)=240000;piStark(i)=0;% auto imported from NIST ASD Intensity>=150000



%FeII
i=i+1; piUse(i)=DISCARDED_FIT;piquees(i)=FeII; pila(i)=233.28;piEm(i)=5.361; piGA(i)=1.31E8;pi_z(i)=1;pigk(i)=6; piStark(i)=0; % Shah 2012, piEi=0.048,  ARTICULO: Quantitative elemental analysis of steel using calibration-free laser-induced breakdown spectroscopy
i=i+1; piUse(i)=1;piquees(i)=FeII; pila(i)=233.80;piEm(i)=5.408; piGA(i)=1.13E8;pi_z(i)=1;pigk(i)=4; piStark(i)=0; % Shah 2012, piEi=0.107,  ARTICULO: Quantitative elemental analysis of steel using calibration-free laser-induced breakdown spectroscopy
i=i+1; piUse(i)=0;piquees(i)=FeII; pila(i)=236.8596;piEm(i)=5.58; piGA(i)=0.606E8;pi_z(i)=1;pigk(i)=4; piStark(i)=0;  %  from Aragon 2014, piEi=0.35, pigi=6
i=i+1; piUse(i)=0;piquees(i)=FeII; pila(i)=237.3736;piEm(i)=5.22; piGA(i)=0.425E8;pi_z(i)=1;pigk(i)=10; piStark(i)=0;  %  from Aragon 2014, piEi=0.00, 
i=i+1; piUse(i)=0;piquees(i)=FeII; pila(i)=237.5193;piEm(i)=5.60; piGA(i)=0.981E8;pi_z(i)=1;pigk(i)=2; piStark(i)=0;  %  from Aragon 2014, piEi=0.39, pigi=4
i=i+1; piUse(i)=DISCARDED_FIT;piquees(i)=FeII; pila(i)=238.2093;piEm(i)=5.20; piGA(i)=3.13E8;pi_z(i)=1;pigk(i)=12; piStark(i)=0;  %  from Aragon 2014, piEi=0.00, pigi=10 % gave >20% fitting errors
i=i+1; piUse(i)=0;piquees(i)=FeII; pila(i)=239.1478;piEm(i)=5.48; piGA(i)=0.0377E8;pi_z(i)=1;pigk(i)=10; piStark(i)=0;  %  from Aragon 2014, piEi=0.30, pigi=8
i=i+1; piUse(i)=1;piquees(i)=FeII; pila(i)=239.5626;piEm(i)=5.22; piGA(i)=1.926E8;pi_z(i)=1;pigk(i)=14; piStark(i)=0;  %  from Aragon 2014, piEi=0.05, 
i=i+1; piUse(i)=DISCARDED_FIT;piquees(i)=FeII; pila(i)=240.4887;piEm(i)=5.24; piGA(i)=1.96E8;pi_z(i)=1;pigk(i)=8; piStark(i)=0;  %  from Aragon 2014, piEi=0.08, pigi=6
i=i+1; piUse(i)=DISCARDED_OVERLAP;piquees(i)=FeII; pila(i)=241.0520;piEm(i)=5.25; piGA(i)=1.55E8;pi_z(i)=1;pigk(i)=6; piStark(i)=0;  %  from Aragon 2014, piEi=0.11, pigi=4
i=i+1; piUse(i)=DISCARDED_OVERLAP;piquees(i)=FeII; pila(i)=241.1069;piEm(i)=5.26; piGA(i)=2.37E8;pi_z(i)=1;pigk(i)=2; piStark(i)=0;  %  from Aragon 2014, piEi=0.12, 
i=i+1; piUse(i)=1;piquees(i)=FeII; pila(i)=241.33;piEm(i)=5.257; piGA(i)=1.02E8;pi_z(i)=1;pigk(i)=4; piStark(i)=0; % Shah 2012, piEi=0.121,  ARTICULO: Quantitative elemental analysis of steel using calibration-free laser-induced breakdown spectroscopy
i=i+1; piUse(i)=0;piquees(i)=FeII; pila(i)=243.0079;piEm(i)=7.93; piGA(i)=1.91E8;pi_z(i)=1;pigk(i)=10; piStark(i)=0;  %  from Aragon 2014, piEi=2.83, 
i=i+1; piUse(i)=0;piquees(i)=FeII; pila(i)=243.2262;piEm(i)=7.94; piGA(i)=1.57E8;pi_z(i)=1;pigk(i)=8; piStark(i)=0;  %  from Aragon 2014, piEi=2.84, pigi=6
i=i+1; piUse(i)=0;piquees(i)=FeII; pila(i)=243.9302;piEm(i)=8.23; piGA(i)=2.25E8;pi_z(i)=1;pigk(i)=14; piStark(i)=0;  %  from Aragon 2014, piEi=3.15, pigi=12
i=i+1; piUse(i)=0;piquees(i)=FeII; pila(i)=244.4516;piEm(i)=7.65; piGA(i)=2.78E8;pi_z(i)=1;pigk(i)=8; piStark(i)=0;  %  from Aragon 2014, piEi=2.58, pigi=6
i=i+1; piUse(i)=DISCARDED_FIT;piquees(i)=FeII; pila(i)=258.5876;piEm(i)=4.79; piGA(i)=0.894E8;pi_z(i)=1;pigk(i)=8; piStark(i)=0;  %  from Aragon 2014, piEi=0.00, 
i=i+1; piUse(i)=0;piquees(i)=FeII; pila(i)=259.1543;piEm(i)=5.82; piGA(i)=0.5725E8;pi_z(i)=1;pigk(i)=6; piStark(i)=0;  %  from Aragon 2014, piEi=1.04,
i=i+1; piUse(i)=0;piquees(i)=FeII; pila(i)=259.2785;piEm(i)=8.86; piGA(i)=2.74E8;pi_z(i)=1;pigk(i)=16; piStark(i)=0;  %  from Aragon 2014, piEi=4.08, pigi=14
i=i+1; piUse(i)=0;piquees(i)=FeII; pila(i)=259.8370;piEm(i)=4.82; piGA(i)=1.43E8;pi_z(i)=1;pigk(i)=6; piStark(i)=0;  %  from Aragon 2014, piEi=0.05, pigi=8
i=i+1; piUse(i)=0;piquees(i)=FeII; pila(i)=259.9396;piEm(i)=4.77; piGA(i)=2.35E8;pi_z(i)=1;pigk(i)=10; piStark(i)=0;  %  from Aragon 2014, piEi=0.00, 
i=i+1; piUse(i)=1;piquees(i)=FeII; pila(i)=261.1874;piEm(i)=4.79; piGA(i)=1.20E8;pi_z(i)=1;pigk(i)=8; piStark(i)=0;  %  from Aragon 2014, piEi=0.05, 
i=i+1; piUse(i)=0;piquees(i)=FeII; pila(i)=261.7618;piEm(i)=4.82; piGA(i)=0.488E8;pi_z(i)=1;pigk(i)=6; piStark(i)=0;  %  from Aragon 2014, piEi=0.08, 
i=i+1; piUse(i)=0;piquees(i)=FeII; pila(i)=272.754;piEm(i)=5.58; piGA(i)=0.857E8;pi_z(i)=1;pigk(i)=4; piStark(i)=0;  %  S.M. Pershin 2012, piEi=1.04, ARTICULO: Physics of selective evaporation of components during laser ablation of stainless steels
i=i+1; piUse(i)=0;piquees(i)=FeII; pila(i)=273.0734;piEm(i)=5.62; piGA(i)=0.279E8;pi_z(i)=1;pigk(i)=4; piStark(i)=0;  %  from Aragon 2014, piEi=1.08, 
i=i+1; piUse(i)=0;piquees(i)=FeII; pila(i)=273.6966;piEm(i)=5.60; piGA(i)=1.22E8;pi_z(i)=1;pigk(i)=2; piStark(i)=0;  %  from Aragon 2014, piEi=1.08, pigi=4
i=i+1; piUse(i)=0;piquees(i)=FeII; pila(i)=273.9548;piEm(i)=5.51; piGA(i)=2.21E8;pi_z(i)=1;pigk(i)=8; piStark(i)=0;  %  from Aragon 2014, piEi=0.99,
i=i+1; piUse(i)=0;piquees(i)=FeII; pila(i)=274.3197;piEm(i)=5.62; piGA(i)=1.97E8;pi_z(i)=1;pigk(i)=4; piStark(i)=0;  %  from Aragon 2014, piEi=1.10,pigi=2
i=i+1; piUse(i)=0;piquees(i)=FeII; pila(i)=274.6484;piEm(i)=5.59; piGA(i)=2.05E8;pi_z(i)=1;pigk(i)=6; piStark(i)=0;  %  from Aragon 2014, piEi=1.08,pigi=4
i=i+1; piUse(i)=0;piquees(i)=FeII; pila(i)=274.6982;piEm(i)=5.55; piGA(i)=1.69E8;pi_z(i)=1;pigk(i)=6; piStark(i)=0;  %  from Aragon 2014, piEi=1.04,
i=i+1; piUse(i)=0;piquees(i)=FeII; pila(i)=275.3288;piEm(i)=7.77; piGA(i)=1.89E8;pi_z(i)=1;pigk(i)=12; piStark(i)=0;  %  from Aragon 2014, piEi=3.27,pigi=10
i=i+1; piUse(i)=1;piquees(i)=FeII; pila(i)=275.5737;piEm(i)=5.48; piGA(i)=2.15E8;pi_z(i)=1;pigk(i)=10; piStark(i)=0;  %  from Aragon 2014, piEi=0.99,pigi=8
i=i+1; piUse(i)=0;piquees(i)=FeII; pila(i)=276.181;piEm(i)=5.58; piGA(i)=0.11E8;pi_z(i)=1;pigk(i)=4; piStark(i)=0;  %  S.M. Pershin 2012, piEi=1.09, ARTICULO: Physics of selective evaporation of components during laser ablation of stainless steels
i=i+1; piUse(i)=0;piquees(i)=FeII; pila(i)=298.482;piEm(i)=5.823; piGA(i)=2.6E8;pi_z(i)=1;pigk(i)=6; piStark(i)=0; % , selected FeII line in [Praher2010] below self-absorption threshold
i=i+1; piUse(i)=0;piquees(i)=FeII; pila(i)=298.554;piEm(i)=5.8756; piGA(i)=9.56E7;pi_z(i)=1;pigk(i)=4; piStark(i)=0; % , selected FeII line in [Praher2010] below self-absorption threshold
IRSAC_reference(FeII) = i; % 298.554 lowest selfabsorption in Praher2010
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=300.2643;piEi(i)=8.7179;piEm(i)=12.8459;piGA(i)=920000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=10;piIntens(i)=40000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=300.2643;piEi(i)=1.6953;piEm(i)=5.8232;piGA(i)=107000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=6;piIntens(i)=40000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=302.6745;piEi(i)=8.9225;piEm(i)=13.0176;piGA(i)=2700000;piAcc{i}='D';pi_z(i)=1;pigk(i)=8;piIntens(i)=4000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=304.8992;piEi(i)=5.8756;piEm(i)=9.9408;piGA(i)=150000000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=4;piIntens(i)=5000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=306.2235;piEi(i)=4.0803;piEm(i)=8.1279;piGA(i)=140000000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=10;piIntens(i)=6000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=307.1125;piEi(i)=5.9049;piEm(i)=9.9408;piGA(i)=100000000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=4;piIntens(i)=4000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=307.6435;piEi(i)=5.8756;piEm(i)=9.9045;piGA(i)=230000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=6;piIntens(i)=8000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=307.7169;piEi(i)=4.0761;piEm(i)=8.1041;piGA(i)=170000000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=12;piIntens(i)=7000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=307.868;piEi(i)=5.8232;piEm(i)=9.8492;piGA(i)=450000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=8;piIntens(i)=18000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=311.4295;piEi(i)=3.8887;piEm(i)=7.8687;piGA(i)=26000000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=4;piIntens(i)=4000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=311.658;piEi(i)=3.8916;piEm(i)=7.8687;piGA(i)=22000000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=4;piIntens(i)=4000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=313.5362;piEi(i)=3.8916;piEm(i)=7.8448;piGA(i)=50000000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=6;piIntens(i)=11000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=315.4201;piEi(i)=3.7677;piEm(i)=7.6973;piGA(i)=206000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=10;piIntens(i)=18000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=316.2801;piEi(i)=4.1536;piEm(i)=8.0726;piGA(i)=44000000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=8;piIntens(i)=4000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=316.7855;piEi(i)=3.8143;piEm(i)=7.727;piGA(i)=130000000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=8;piIntens(i)=15000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=317.7534;piEi(i)=3.9034;piEm(i)=7.8042;piGA(i)=139000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=8;piIntens(i)=21000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=318.6737;piEi(i)=1.6953;piEm(i)=5.5848;piGA(i)=16000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=4;piIntens(i)=6000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=318.7299;piEi(i)=4.1493;piEm(i)=8.0381;piGA(i)=50000000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=10;piIntens(i)=4000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=319.3801;piEi(i)=1.724;piEm(i)=5.6049;piGA(i)=11000000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=2;piIntens(i)=5000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=319.3857;piEi(i)=3.8143;piEm(i)=7.6951;piGA(i)=31000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=8;piIntens(i)=5000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=319.6071;piEi(i)=1.6706;piEm(i)=5.5488;piGA(i)=13000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=8;piIntens(i)=5000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=321.0445;piEi(i)=1.724;piEm(i)=5.5848;piGA(i)=14000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=4;piIntens(i)=6000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=321.0829;piEi(i)=5.8756;piEm(i)=9.7359;piGA(i)=3000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=40000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=321.3309;piEi(i)=1.6953;piEm(i)=5.5526;piGA(i)=37000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=6;piIntens(i)=15000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=322.7743;piEi(i)=1.6706;piEm(i)=5.5107;piGA(i)=71000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=8;piIntens(i)=27000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=323.279;piEi(i)=4.1536;piEm(i)=7.9877;piGA(i)=30000000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=6;piIntens(i)=4000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=324.7177;piEi(i)=3.8887;piEm(i)=7.7058;piGA(i)=43000000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=6;piIntens(i)=4000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=325.8773;piEi(i)=3.8916;piEm(i)=7.6951;piGA(i)=75000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=8;piIntens(i)=10000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=325.9051;piEi(i)=3.9034;piEm(i)=7.7066;piGA(i)=67000000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=10;piIntens(i)=8000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=327.7349;piEi(i)=0.98633;piEm(i)=4.7683;piGA(i)=3300000;piAcc{i}='B';pi_z(i)=1;pigk(i)=10;piIntens(i)=4000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=492.3922;piEi(i)=2.891;piEm(i)=5.4083;piGA(i)=17000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=4;piIntens(i)=5000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=500.1953;piEi(i)=10.2726;piEm(i)=12.7506;piGA(i)=2200000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=14;piIntens(i)=13000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=500.4188;piEi(i)=10.2726;piEm(i)=12.7495;piGA(i)=850000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=12;piIntens(i)=5000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=501.8435;piEi(i)=2.891;piEm(i)=5.3609;piGA(i)=12000000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=6;piIntens(i)=8000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=503.57;piEi(i)=10.288;piEm(i)=12.7495;piGA(i)=1100000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=12;piIntens(i)=7000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=510.0734;piEi(i)=10.3808;piEm(i)=12.8108;piGA(i)=1330000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=12;piIntens(i)=8000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=514.9462;piEi(i)=10.4477;piEm(i)=12.8548;piGA(i)=900000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=10;piIntens(i)=4000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=515.191;piEi(i)=10.4515;piEm(i)=12.8574;piGA(i)=700000;piAcc{i}='D';pi_z(i)=1;pigk(i)=10;piIntens(i)=5000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=516.9028;piEi(i)=2.891;piEm(i)=5.2889;piGA(i)=34000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=8;piIntens(i)=7000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=521.6858;piEi(i)=10.5028;piEm(i)=12.8787;piGA(i)=740000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=10;piIntens(i)=10000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=521.6858;piEi(i)=10.4801;piEm(i)=12.8561;piGA(i)=1200000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=12;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=522.7486;piEi(i)=10.4515;piEm(i)=12.8226;piGA(i)=1710000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=14;piIntens(i)=10000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=524.7955;piEi(i)=10.531;piEm(i)=12.8929;piGA(i)=858000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=6;piIntens(i)=6000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=525.1225;piEi(i)=10.5194;piEm(i)=12.8798;piGA(i)=640000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=8;piIntens(i)=5000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=526.0254;piEi(i)=10.419;piEm(i)=12.7754;piGA(i)=2960000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=16;piIntens(i)=24000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=529.1661;piEi(i)=10.4801;piEm(i)=12.8225;piGA(i)=830000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=12;piIntens(i)=5000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=531.6214;piEi(i)=10.419;piEm(i)=12.7506;piGA(i)=517000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=14;piIntens(i)=4000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=533.9594;piEi(i)=10.4515;piEm(i)=12.7728;piGA(i)=770000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=14;piIntens(i)=4000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=538.7063;piEi(i)=10.5217;piEm(i)=12.8226;piGA(i)=730000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=14;piIntens(i)=4000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=542.9987;piEi(i)=10.596;piEm(i)=12.8787;piGA(i)=600000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=10;piIntens(i)=4000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=546.5932;piEi(i)=10.6229;piEm(i)=12.8906;piGA(i)=500000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=8;piIntens(i)=5000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=550.6199;piEi(i)=10.5217;piEm(i)=12.7728;piGA(i)=1600000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=14;piIntens(i)=9000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=564.3869;piEi(i)=7.6531;piEm(i)=9.8492;piGA(i)=9600000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=8;piIntens(i)=7000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=571.5098;piEi(i)=10.8577;piEm(i)=13.0265;piGA(i)=19000000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=8;piIntens(i)=6000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=591.4547;piEi(i)=8.0381;piEm(i)=10.1338;piGA(i)=600000;piAcc{i}='D';pi_z(i)=1;pigk(i)=8;piIntens(i)=5000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000
i=i+1;piUse(i)=0;piquees(i)=FeII;pila(i)=692.2027;piEi(i)=11.1492;piEm(i)=12.9398;piGA(i)=1200000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=14;piIntens(i)=4000;piStark(i)=0;% auto imported from NIST ASD Intensity>=4000


%NiI Nickel
i=i+1; piUse(i)=1;piquees(i)=NiI; pila(i)=310.1557;piEi(i)=0.10908;piEm(i)=4.105; piGA(i)=4.4E8;pi_z(i)=0;pigk(i)=7; piStark(i)=0; % from ? there is another interfering line at 310.1878nm
i=i+1; piUse(i)=1;piquees(i)=NiI; pila(i)=341.476;piEi(i)=0.0254;piEm(i)=3.6552; piGA(i)=5.0E8;pi_z(i)=0;pigk(i)=9; piStark(i)=1E16/0.000381; % from Cremer's book p. 264 & LIBS++ Stark & Reinhard !!! Ej too small
i=i+1; piUse(i)=1;piquees(i)=NiI; pila(i)=344.626;piEi(i)=0.109;piEm(i)=3.706; piGA(i)=2.2E8;pi_z(i)=0;pigk(i)=5; piStark(i)=0; % from Cremer's book p. 264
i=i+1; piUse(i)=1;piquees(i)=NiI; pila(i)=345.289;piEi(i)=0.109;piEm(i)=3.699; piGA(i)=6.9E7;pi_z(i)=0;pigk(i)=7; piStark(i)=0; % from Cremer's book p. 264
i=i+1; piUse(i)=1;piquees(i)=NiI; pila(i)=345.847;piEi(i)=0.212;piEm(i)=3.796; piGA(i)=3.0E8;pi_z(i)=0;pigk(i)=5; piStark(i)=0; % from Cremer's book p. 264
i=i+1; piUse(i)=1;piquees(i)=NiI; pila(i)=347.254;piEi(i)=0.109;piEm(i)=3.679; piGA(i)=8.4E7;pi_z(i)=0;pigk(i)=7; piStark(i)=0; % from Cremer's book p. 264
i=i+1; piUse(i)=1;piquees(i)=NiI; pila(i)=349.296;piEi(i)=0.109;piEm(i)=3.657; piGA(i)=2.9E8;pi_z(i)=0;pigk(i)=3; piStark(i)=0; % from Cremer's book p. 264
i=i+1; piUse(i)=1;piquees(i)=NiI; pila(i)=351.034;piEi(i)=0.212;piEm(i)=3.743; piGA(i)=1.2E8;pi_z(i)=0;pigk(i)=1; piStark(i)=0; % from Cremer's book p. 264
i=i+1; piUse(i)=1;piquees(i)=NiI; pila(i)=351.505;piEi(i)=0.109;piEm(i)=3.635; piGA(i)=2.9E8;pi_z(i)=0;pigk(i)=7; piStark(i)=0; % from Cremer's book p. 264
i=i+1; piUse(i)=1;piquees(i)=NiI; pila(i)=352.454;piEi(i)=0.02539;piEm(i)=3.542; piGA(i)=5.0E8;pi_z(i)=0;pigk(i)=5; piStark(i)=0; % from Cremer's book p. 264
i=i+1; piUse(i)=1;piquees(i)=NiI; pila(i)=361.939;piEi(i)=0.423;piEm(i)=3.847; piGA(i)=4.6E8;pi_z(i)=0;pigk(i)=7; piStark(i)=1E16/0.001; % from Cremer's & LIBS++ Stark
i=i+1; piUse(i)=1;piquees(i)=NiI; pila(i)=385.8297;piEi(i)=0.423;piEm(i)=3.635; piGA(i)=4.8E7;pi_z(i)=0;pigk(i)=7; piStark(i)=0; % from NIST higher intensities
i=i+1; piUse(i)=1;piquees(i)=NiI; pila(i)=388.97;piEi(i)=0.2748;piEm(i)=3.46455; piGA(i)=1.2E4;pi_z(i)=0;pigk(i)=3; piStark(i)=0; % reference line in [sun2009] IRSAC
IRSAC_reference(NiI) = i; % the above line has been selected as reference in [sun2009] IRSAC
i=i+1; piUse(i)=0;piquees(i)=NiI; pila(i)=471.441;piEi(i)=3.380;piEm(i)=6.09; piGA(i)=5.1E8;pi_z(i)=0;pigk(i)=11; piStark(i)=0; % from a table of a book?

%NiII 
i=i+1; piUse(i)=0;piquees(i)=NiII; pila(i)=220.672;piEi(i)=1.254;piEm(i)=6.871; piGA(i)=1.33E9;pi_z(i)=1;pigk(i)=8; piStark(i)=0; % NIST higher intensities
IRSAC_reference(NiII) = i; % the reference line in [sun2009] IRSAC 221.32 does not exist. the one above has the lowest gA and higer Em
i=i+1; piUse(i)=0;piquees(i)=NiII; pila(i)=221.648;piEi(i)=1.0407;piEm(i)=6.632; piGA(i)=4.1E9;pi_z(i)=1;pigk(i)=12; piStark(i)=0; % NIST higher intensities
i=i+1; piUse(i)=0;piquees(i)=NiII; pila(i)=231.604;piEi(i)=1.0407;piEm(i)=6.538734; piGA(i)=2.3E9;pi_z(i)=1;pigk(i)=8; piStark(i)=0; % Reinhard book  p. 529

%MnI Manganese 
i=i+1; piUse(i)=DISCARDED_SAT;piquees(i)=MnI; pila(i)=279.482;piEi(i)=0.000;piEm(i)=4.435; piGA(i)=3.0E9;pi_z(i)=0;pigk(i)=8; piStark(i)=0; % Cremers !!! Ei=0 
i=i+1; piUse(i)=DISCARDED_SAT;piquees(i)=MnI; pila(i)=280.106;piEi(i)=0.000;piEm(i)=4.429; piGA(i)=1.5E9;pi_z(i)=0;pigk(i)=4; piStark(i)=0; % NIST higher intensities !!! Ei=0 
i=i+1; piUse(i)=1;piquees(i)=MnI; pila(i)=380.6711;piEi(i)=2.114;piEm(i)=5.370; piGA(i)=7.1E8;pi_z(i)=0;pigk(i)=12; piStark(i)=0; % NIST higher intensities 
i=i+1; piUse(i)=1;piquees(i)=MnI; pila(i)=404.136;piEi(i)=2.114;piEm(i)=5.181; piGA(i)=7.87E8;pi_z(i)=0;pigk(i)=10; piStark(i)=0; % Cremers ,  there is another interfering line at 310.1878nm
IRSAC_reference(MnI) = i; % the above line has been selected as reference in [sun2009] IRSAC
i=i+1; piUse(i)=DISCARDED_FIT;piquees(i)=MnI; pila(i)=403.076;piEi(i)=0.000;piEm(i)=3.075; piGA(i)=1.4E8;pi_z(i)=0;pigk(i)=8; piStark(i)=0'; % cremers book apendix c.2 !!! Ei=0
i=i+1; piUse(i)=1;piquees(i)=MnI; pila(i)=482.352;piEi(i)=2.319;piEm(i)=4.889; piGA(i)=3.99E8;pi_z(i)=0;pigk(i)=8; piStark(i)=0'; % cremers book apendix c.2


%MnII
i=i+1; piUse(i)=DISCARDED_SAT;piquees(i)=MnII; pila(i)=257.61;piEi(i)=0;piEm(i)=4.811; piGA(i)=2.52E9;pi_z(i)=1;pigk(i)=9; piStark(i)=0; % Reinhard book !!! Ei=0
i=i+1; piUse(i)=1;piquees(i)=MnII; pila(i)=261.020;piEi(i)=3.415;piEm(i)=8.164; piGA(i)=4.5E9;pi_z(i)=1;pigk(i)=15; piStark(i)=0; % NIST higher intensities
i=i+1; piUse(i)=1;piquees(i)=MnII; pila(i)=261.815;piEi(i)=3.418;piEm(i)=8.152; piGA(i)=3.8E9;pi_z(i)=1;pigk(i)=13; piStark(i)=0; % NIST higher intensities
i=i+1; piUse(i)=DISCARDED_OVERLAP;piquees(i)=MnII; pila(i)=263.817;piEi(i)=3.421;piEm(i)=8.119; piGA(i)=1.9E9;pi_z(i)=1;pigk(i)=7; piStark(i)=0; % Reinhard book p. 516
i=i+1; piUse(i)=DISCARDED_FIT;piquees(i)=MnII; pila(i)=270.84;piEi(i)=3.4199;piEm(i)=7.9963; piGA(i)=1.5E9;pi_z(i)=1;pigk(i)=9; piStark(i)=0; % reference line in [sun2009] IRSAC
IRSAC_reference(MnII) = i; % the above line has been selected as reference in [sun2009] IRSAC
i=i+1; piUse(i)=1;piquees(i)=MnII; pila(i)=293.305;piEi(i)=1.1745;piEm(i)=5.400; piGA(i)=6.12E8;pi_z(i)=1;pigk(i)=3; piStark(i)=0; % Reinhard book p. 270
i=i+1; piUse(i)=1;piquees(i)=MnII; pila(i)=294.92;piEi(i)=1.1745;piEm(i)=5.377; piGA(i)=1.37E9;pi_z(i)=1;pigk(i)=7; piStark(i)=0; % Reinhard book p. 517 

%TiI Titanium
i=i+1; piUse(i)=1;piquees(i)=TiI; pila(i)=334.853;piEi(i)=0.000;piEm(i)=3.701; piGA(i)=2.7E6;pi_z(i)=0;pigk(i)=3; piStark(i)=0; % Cremers !!! Ei=0 
i=i+1; piUse(i)=1;piquees(i)=TiI; pila(i)=365.349;piEi(i)=0.048;piEm(i)=3.440; piGA(i)=9.5E8;pi_z(i)=0;pigk(i)=11; piStark(i)=0; % Cremers !!! Ei=0 
i=i+1; piUse(i)=DISCARDED_NOTSEEN;piquees(i)=TiI; pila(i)=498.17;piEi(i)=0.848;piEm(i)=3.336; piGA(i)=8.58E8;pi_z(i)=0;pigk(i)=13; piStark(i)=0; % Cremers C.2 
i=i+1; piUse(i)=DISCARDED_NOTSEEN;piquees(i)=TiI; pila(i)=499.11;piEi(i)=0.836;piEm(i)=3.319; piGA(i)=6.42E8;pi_z(i)=0;pigk(i)=11; piStark(i)=0; % paper ¿?
i=i+1; piUse(i)=DISCARDED_NOTSEEN;piquees(i)=TiI; pila(i)=503.646;piEi(i)=1.443;piEm(i)=3.905; piGA(i)=3.55E8;pi_z(i)=0;pigk(i)=9; piStark(i)=0; % NIST higher intensities, not Ei=0
i=i+1; piUse(i)=1;piquees(i)=TiI; pila(i)=521.038;piEi(i)=0.048;piEm(i)=2.427; piGA(i)=3.5E7;pi_z(i)=0;pigk(i)=9; piStark(i)=0; % NIST higher intensities
% Cremers table C.2: 351.9, 398.92nm cant't find in NIST

%TiII
i=i+1; piUse(i)=DISCARDED_NOTSEEN;piquees(i)=TiII; pila(i)=308.803;piEi(i)=0.04878;piEm(i)=4.062; piGA(i)=1.2E9;pi_z(i)=1;pigk(i)=8; piStark(i)=0; % paper ¿? !!! Ei=0
i=i+1; piUse(i)=1;piquees(i)=TiII; pila(i)=323.452;piEi(i)=0.0487;piEm(i)=3.881; piGA(i)=1.71E9;pi_z(i)=1;pigk(i)=10; piStark(i)=0; % Cremers !!! Ei=0
i=i+1; piUse(i)=1;piquees(i)=TiII; pila(i)=336.1;piEi(i)=0.0280;piEm(i)=3.716; piGA(i)=1.58E9;pi_z(i)=1;pigk(i)=10; piStark(i)=0; % paper ¿? !!! Ei=0
i=i+1; piUse(i)=DISCARDED_NOTSEEN;piquees(i)=TiII; pila(i)=439.503;piEi(i)=1.084;piEm(i)=3.904; piGA(i)=7.5E7;pi_z(i)=1;pigk(i)=8; piStark(i)=0; % paper ¿? 

%Hg lines FOR CALIBRATION PORPOUSES mainly
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=184.94994;piEi(i)=0.0000000;piEm(i)=6.7036623;piGA(i)=2.24e+09;piAcc{i}='A';pi_z(i)=0;pigk(i)=3;piIntens(i)=5000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=234.543;piEi(i)=4.6673829;piEm(i)=9.951960;piGA(i)=0;piAcc{i}='';pi_z(i)=0;pigk(i)=3;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=237.8324;piEi(i)=4.6673829;piEm(i)=9.878884;piGA(i)=1.1e+07;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=4000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=248.2001;piEi(i)=4.8864946;piEm(i)=9.880321;piGA(i)=0;piAcc{i}='';pi_z(i)=0;pigk(i)=5;piIntens(i)=300;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=248.3815;piEi(i)=4.8864946;piEm(i)=9.876651;piGA(i)=0;piAcc{i}='';pi_z(i)=0;pigk(i)=5;piIntens(i)=170;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=253.4772;piEi(i)=4.6673829;piEm(i)=9.5572499;piGA(i)=0;piAcc{i}='';pi_z(i)=0;pigk(i)=3;piIntens(i)=2000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=253.65210;piEi(i)=0.0000000;piEm(i)=4.8864946;piGA(i)=2.52e+07;piAcc{i}='A+';pi_z(i)=0;pigk(i)=3;piIntens(i)=900000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=257.6285;piEi(i)=4.8864946;piEm(i)=9.697563;piGA(i)=0;piAcc{i}='';pi_z(i)=0;pigk(i)=3;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=265.2039;piEi(i)=4.8864946;piEm(i)=9.5601496;piGA(i)=2.0e+08;piAcc{i}='B+';pi_z(i)=0;pigk(i)=5;piIntens(i)=1600;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=265.3690;piEi(i)=4.8864946;piEm(i)=9.5572499;piGA(i)=0;piAcc{i}='';pi_z(i)=0;pigk(i)=3;piIntens(i)=6000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=265.5134;piEi(i)=4.8864946;piEm(i)=9.5547145;piGA(i)=5.50e+07;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=400;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=269.8828;piEi(i)=5.4606247;piEm(i)=10.053254;piGA(i)=0;piAcc{i}='';pi_z(i)=0;pigk(i)=7;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=269.9376;piEi(i)=5.4606247;piEm(i)=10.052323;piGA(i)=0;piAcc{i}='';pi_z(i)=0;pigk(i)=5;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=275.2777;piEi(i)=4.6673829;piEm(i)=9.1700120;piGA(i)=1.8e+07;piAcc{i}='B';pi_z(i)=0;pigk(i)=3;piIntens(i)=400;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=280.3466;piEi(i)=5.4606247;piEm(i)=9.881854;piGA(i)=0;piAcc{i}='';pi_z(i)=0;pigk(i)=7;piIntens(i)=180;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=289.36010;piEi(i)=4.8864946;piEm(i)=9.1700120;piGA(i)=4.71e+07;piAcc{i}='B+';pi_z(i)=0;pigk(i)=3;piIntens(i)=800;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=296.72830;piEi(i)=4.6673829;piEm(i)=8.8445373;piGA(i)=1.4e+08;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=3000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=302.15040;piEi(i)=5.4606247;piEm(i)=9.5628233;piGA(i)=3.6e+08;piAcc{i}='B+';pi_z(i)=0;pigk(i)=7;piIntens(i)=1200;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=302.3471;piEi(i)=5.4606247;piEm(i)=9.5601496;piGA(i)=4.7e+07;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=300;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=312.56740;piEi(i)=4.8864946;piEm(i)=8.8519848;piGA(i)=3.3e+08;piAcc{i}='B+';pi_z(i)=0;pigk(i)=5;piIntens(i)=4000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=0;piquees(i)=HgI;pila(i)=313.15550;piEi(i)=4.8864946;piEm(i)=8.8445373;piGA(i)=0;piAcc{i}='';pi_z(i)=0;pigk(i)=3;piIntens(i)=3000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=0;piquees(i)=HgI;pila(i)=313.18440;piEi(i)=4.8864946;piEm(i)=8.8441713;piGA(i)=0;piAcc{i}='';pi_z(i)=0;pigk(i)=5;piIntens(i)=4000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=334.14840;piEi(i)=5.4606247;piEm(i)=9.1700120;piGA(i)=5.04e+07;piAcc{i}='B+';pi_z(i)=0;pigk(i)=3;piIntens(i)=700;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=365.01580;piEi(i)=5.4606247;piEm(i)=8.8563375;piGA(i)=9.03e+08;piAcc{i}='B+';pi_z(i)=0;pigk(i)=7;piIntens(i)=9000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=365.48420;piEi(i)=5.4606247;piEm(i)=8.8519848;piGA(i)=9.20e+07;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=3000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=366.28870;piEi(i)=5.4606247;piEm(i)=8.8445373;piGA(i)=1.1e+07;piAcc{i}='C';pi_z(i)=0;pigk(i)=3;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=366.32840;piEi(i)=5.4606247;piEm(i)=8.8441713;piGA(i)=0;piAcc{i}='';pi_z(i)=0;pigk(i)=5;piIntens(i)=2000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=404.65650;piEi(i)=4.6673829;piEm(i)=7.7304550;piGA(i)=6.21e+07;piAcc{i}='B';pi_z(i)=0;pigk(i)=3;piIntens(i)=12000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=407.78370;piEi(i)=4.8864946;piEm(i)=7.9260766;piGA(i)=4.0e+06;piAcc{i}='B';pi_z(i)=0;pigk(i)=1;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=434.74945;piEi(i)=6.7036623;piEm(i)=9.5547145;piGA(i)=4.2e+07;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=150;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=435.83350;piEi(i)=4.8864946;piEm(i)=7.7304550;piGA(i)=1.7e+08;piAcc{i}='B';pi_z(i)=0;pigk(i)=3;piIntens(i)=12000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=496.010;piEi(i)=9.539998;piEm(i)=12.03889;piGA(i)=0;piAcc{i}='';pi_z(i)=0;pigk(i)=7;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=535.4034;piEi(i)=7.7304550;piEm(i)=10.045526;piGA(i)=0;piAcc{i}='';pi_z(i)=0;pigk(i)=5;piIntens(i)=130;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=546.07500;piEi(i)=5.4606247;piEm(i)=7.7304550;piGA(i)=1.5e+08;piAcc{i}='B';pi_z(i)=0;pigk(i)=3;piIntens(i)=6000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=567.581;piEi(i)=7.7304550;piEm(i)=9.914254;piGA(i)=0;piAcc{i}='';pi_z(i)=0;pigk(i)=3;piIntens(i)=600;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=576.96100;piEi(i)=6.7036623;piEm(i)=8.8519848;piGA(i)=1.18e+08;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=579.06700;piEi(i)=6.7036623;piEm(i)=8.8441713;piGA(i)=1.6e+08;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=900;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=580.3782;piEi(i)=7.9260766;piEm(i)=10.0617497;piGA(i)=0;piAcc{i}='';pi_z(i)=0;pigk(i)=3;piIntens(i)=400;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=585.9254;piEi(i)=7.7304550;piEm(i)=9.8459093;piGA(i)=0;piAcc{i}='';pi_z(i)=0;pigk(i)=3;piIntens(i)=130;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=671.634;piEi(i)=7.9260766;piEm(i)=9.771569;piGA(i)=7.2e+05;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=600;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=690.746;piEi(i)=7.7304550;piEm(i)=9.524891;piGA(i)=8.0e+06;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=708.1901;piEi(i)=7.7304550;piEm(i)=9.4806917;piGA(i)=0;piAcc{i}='';pi_z(i)=0;pigk(i)=3;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=HgI;pila(i)=709.1860;piEi(i)=7.7304550;piEm(i)=9.4782338;piGA(i)=0;piAcc{i}='';pi_z(i)=0;pigk(i)=1;piIntens(i)=800;piStark(i)=0;% auto imported from NIST ADD Intensity>100

%ArI  Argon lines, used mainly for calibration
i=i+1;piUse(i)=DISCARDED_FIT;piquees(i)=ArI;pila(i)=415.8590;piEi(i)=11.54835433;piEm(i)=14.52891337;piGA(i)=7.00e+06;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=400;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=ArI;pila(i)=419.0713;piEi(i)=11.54835433;piEm(i)=14.50606752;piGA(i)=1.40e+06;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArI;pila(i)=419.8317;piEi(i)=11.62359262;piEm(i)=14.57594866;piGA(i)=2.57e+06;piAcc{i}='B';pi_z(i)=0;pigk(i)=1;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArI;pila(i)=420.0674;piEi(i)=11.54835433;piEm(i)=14.49905352;piGA(i)=6.8e+06;piAcc{i}='B+';pi_z(i)=0;pigk(i)=7;piIntens(i)=400;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArI;pila(i)=425.9362;piEi(i)=11.82807106;piEm(i)=14.73811524;piGA(i)=3.98e+06;piAcc{i}='B+';pi_z(i)=0;pigk(i)=1;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArI;pila(i)=426.6286;piEi(i)=11.62359262;piEm(i)=14.52891337;piGA(i)=1.6e+06;piAcc{i}='C+';pi_z(i)=0;pigk(i)=5;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArI;pila(i)=427.2169;piEi(i)=11.62359262;piEm(i)=14.52491318;piGA(i)=2.4e+06;piAcc{i}='B';pi_z(i)=0;pigk(i)=3;piIntens(i)=150;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=ArI;pila(i)=430.0101;piEi(i)=11.62359262;piEm(i)=14.50606752;piGA(i)=1.88e+06;piAcc{i}='B+';pi_z(i)=0;pigk(i)=5;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArI;pila(i)=433.3561;piEi(i)=11.82807106;piEm(i)=14.68829018;piGA(i)=2.8e+06;piAcc{i}='B+';pi_z(i)=0;pigk(i)=5;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArI;pila(i)=451.0733;piEi(i)=11.82807106;piEm(i)=14.57594866;piGA(i)=1.18e+06;piAcc{i}='B+';pi_z(i)=0;pigk(i)=1;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArI;pila(i)=667.7282;piEi(i)=11.62359262;piEm(i)=13.47988670;piGA(i)=2.36e+05;piAcc{i}='B';pi_z(i)=0;pigk(i)=1;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArI;pila(i)=675.2834;piEi(i)=12.90701519;piEm(i)=14.74254073;piGA(i)=9.65e+06;piAcc{i}='C';pi_z(i)=0;pigk(i)=5;piIntens(i)=150;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArI;pila(i)=687.1289;piEi(i)=12.90701519;piEm(i)=14.71089798;piGA(i)=8.34e+06;piAcc{i}='C';pi_z(i)=0;pigk(i)=3;piIntens(i)=150;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=DISCARDED_SAT;piquees(i)=ArI;pila(i)=696.5431;piEi(i)=11.54835433;piEm(i)=13.32785693;piGA(i)=1.9e+07;piAcc{i}='B+';pi_z(i)=0;pigk(i)=3;piIntens(i)=10000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArI;pila(i)=703.0251;piEi(i)=13.07571560;piEm(i)=14.83881088;piGA(i)=1.34e+07;piAcc{i}='C';pi_z(i)=0;pigk(i)=5;piIntens(i)=150;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=DISCARDED_OVERLAP;piquees(i)=ArI;pila(i)=706.7218;piEi(i)=11.54835433;piEm(i)=13.30222736;piGA(i)=1.9e+07;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=10000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArI;pila(i)=706.8736;piEi(i)=13.09487245;piEm(i)=14.84836887;piGA(i)=6.0e+06;piAcc{i}='D+';pi_z(i)=0;pigk(i)=3;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=ArI;pila(i)=714.7042;piEi(i)=11.54835433;piEm(i)=13.28263891;piGA(i)=1.9e+06;piAcc{i}='B';pi_z(i)=0;pigk(i)=3;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=ArI;pila(i)=727.2936;piEi(i)=11.62359262;piEm(i)=13.32785693;piGA(i)=5.49e+06;piAcc{i}='B+';pi_z(i)=0;pigk(i)=3;piIntens(i)=2000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArI;pila(i)=737.2118;piEi(i)=13.07571560;piEm(i)=14.7570515;piGA(i)=1.7e+07;piAcc{i}='D+';pi_z(i)=0;pigk(i)=9;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=DISCARDED_SAT;piquees(i)=ArI;pila(i)=738.3980;piEi(i)=11.62359262;piEm(i)=13.30222736;piGA(i)=4.2e+07;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=10000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=DISCARDED_SAT;piquees(i)=ArI;pila(i)=750.3869;piEi(i)=11.82807106;piEm(i)=13.47988670;piGA(i)=4.5e+07;piAcc{i}='B';pi_z(i)=0;pigk(i)=1;piIntens(i)=20000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=DISCARDED_SAT;piquees(i)=ArI;pila(i)=751.4652;piEi(i)=11.62359262;piEm(i)=13.27303799;piGA(i)=4.0e+07;piAcc{i}='B';pi_z(i)=0;pigk(i)=1;piIntens(i)=15000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=DISCARDED_SAT;piquees(i)=ArI;pila(i)=763.5106;piEi(i)=11.54835433;piEm(i)=13.17177759;piGA(i)=1.22e+08;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=25000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=DISCARDED_OVERLAP;piquees(i)=ArI;pila(i)=772.3761;piEi(i)=11.54835433;piEm(i)=13.15314376;piGA(i)=1.6e+07;piAcc{i}='B+';pi_z(i)=0;pigk(i)=3;piIntens(i)=15000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=DISCARDED_OVERLAP;piquees(i)=ArI;pila(i)=772.4207;piEi(i)=11.72316029;piEm(i)=13.32785693;piGA(i)=3.51e+07;piAcc{i}='B+';pi_z(i)=0;pigk(i)=3;piIntens(i)=10000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=ArI;pila(i)=794.8176;piEi(i)=11.72316029;piEm(i)=13.28263891;piGA(i)=5.58e+07;piAcc{i}='B';pi_z(i)=0;pigk(i)=3;piIntens(i)=20000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=ArI;pila(i)=800.6157;piEi(i)=11.62359262;piEm(i)=13.17177759;piGA(i)=2.4e+07;piAcc{i}='C+';pi_z(i)=0;pigk(i)=5;piIntens(i)=20000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=ArI;pila(i)=801.4786;piEi(i)=11.54835433;piEm(i)=13.09487245;piGA(i)=4.6e+07;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=25000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=DISCARDED_SAT;piquees(i)=ArI;pila(i)=810.3693;piEi(i)=11.62359262;piEm(i)=13.15314376;piGA(i)=7.50e+07;piAcc{i}='B+';pi_z(i)=0;pigk(i)=3;piIntens(i)=20000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=DISCARDED_SAT;piquees(i)=ArI;pila(i)=811.5311;piEi(i)=11.54835433;piEm(i)=13.07571560;piGA(i)=2.3e+08;piAcc{i}='B';pi_z(i)=0;pigk(i)=7;piIntens(i)=35000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=ArI;pila(i)=826.4522;piEi(i)=11.82807106;piEm(i)=13.32785693;piGA(i)=4.59e+07;piAcc{i}='B+';pi_z(i)=0;pigk(i)=3;piIntens(i)=10000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=ArI;pila(i)=840.8210;piEi(i)=11.82807106;piEm(i)=13.30222736;piGA(i)=1.12e+08;piAcc{i}='B+';pi_z(i)=0;pigk(i)=5;piIntens(i)=15000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=ArI;pila(i)=842.4648;piEi(i)=11.62359262;piEm(i)=13.09487245;piGA(i)=1.08e+08;piAcc{i}='B+';pi_z(i)=0;pigk(i)=5;piIntens(i)=20000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=ArI;pila(i)=852.1442;piEi(i)=11.82807106;piEm(i)=13.28263891;piGA(i)=4.17e+07;piAcc{i}='B';pi_z(i)=0;pigk(i)=3;piIntens(i)=15000;piStark(i)=0;% auto imported from NIST ADD Intensity>100
i=i+1;piUse(i)=1;piquees(i)=ArI;pila(i)=866.7944;piEi(i)=11.72316029;piEm(i)=13.15314376;piGA(i)=7.29e+06;piAcc{i}='B';pi_z(i)=0;pigk(i)=3;piIntens(i)=4500;piStark(i)=0;% auto imported from NIST ADD Intensity>100

%ArII 
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArII;pila(i)=294.3754;piEi(i)=17.14;piEm(i)=21.3518;piGA(i)=210000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=4;piIntens(i)=1047;piStark(i)=0;% auto imported from NIST ASD Intensity>=1000
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArII;pila(i)=349.2535;piEi(i)=19.2229;piEm(i)=22.7729;piGA(i)=1850000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=8;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ASD Intensity>=1000
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArII;pila(i)=356.0525;piEi(i)=19.68;piEm(i)=23.1622;piGA(i)=2300000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=8;piIntens(i)=1445;piStark(i)=0;% auto imported from NIST ASD Intensity>=1000
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArII;pila(i)=356.2047;piEi(i)=21.1431;piEm(i)=24.6238;piGA(i)=4000000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=10;piIntens(i)=1023;piStark(i)=0;% auto imported from NIST ASD Intensity>=1000
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArII;pila(i)=357.7636;piEi(i)=19.549;piEm(i)=23.0145;piGA(i)=2200000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=8;piIntens(i)=12303;piStark(i)=0;% auto imported from NIST ASD Intensity>=1000
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArII;pila(i)=358.9464;piEi(i)=19.4945;piEm(i)=22.9486;piGA(i)=3030000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=10;piIntens(i)=12303;piStark(i)=0;% auto imported from NIST ASD Intensity>=1000
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArII;pila(i)=427.8732;piEi(i)=18.4541;piEm(i)=21.3518;piGA(i)=320000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=4;piIntens(i)=1995;piStark(i)=0;% auto imported from NIST ASD Intensity>=1000
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArII;pila(i)=434.9286;piEi(i)=16.6439;piEm(i)=19.4945;piGA(i)=936800000;piAcc{i}='A';pi_z(i)=1;pigk(i)=8;piIntens(i)=1995;piStark(i)=0;% auto imported from NIST ASD Intensity>=1000
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArII;pila(i)=440.2222;piEi(i)=16.4065;piEm(i)=19.2229;piGA(i)=182000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=6;piIntens(i)=8710;piStark(i)=0;% auto imported from NIST ASD Intensity>=1000
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArII;pila(i)=442.7244;piEi(i)=16.7485;piEm(i)=19.549;piGA(i)=490000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=6;piIntens(i)=1514;piStark(i)=0;% auto imported from NIST ASD Intensity>=1000
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArII;pila(i)=454.6326;piEi(i)=17.14;piEm(i)=19.8672;piGA(i)=188000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=4;piIntens(i)=1738;piStark(i)=0;% auto imported from NIST ASD Intensity>=1000
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArII;pila(i)=459.1184;piEi(i)=18.4265;piEm(i)=21.127;piGA(i)=398000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=6;piIntens(i)=25704;piStark(i)=0;% auto imported from NIST ASD Intensity>=1000
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArII;pila(i)=461.0858;piEi(i)=18.4541;piEm(i)=21.1431;piGA(i)=631000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=8;piIntens(i)=2291;piStark(i)=0;% auto imported from NIST ASD Intensity>=1000
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArII;pila(i)=465.9205;piEi(i)=17.14;piEm(i)=19.8011;piGA(i)=178000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=2;piIntens(i)=1445;piStark(i)=0;% auto imported from NIST ASD Intensity>=1000
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArII;pila(i)=472.819;piEi(i)=17.14;piEm(i)=19.7623;piGA(i)=235000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=4;piIntens(i)=23442;piStark(i)=0;% auto imported from NIST ASD Intensity>=1000
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArII;pila(i)=473.723;piEi(i)=16.6439;piEm(i)=19.2611;piGA(i)=232000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=4;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ASD Intensity>=1000
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArII;pila(i)=476.6197;piEi(i)=17.2658;piEm(i)=19.8672;piGA(i)=260000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=4;piIntens(i)=2344;piStark(i)=0;% auto imported from NIST ASD Intensity>=1000
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArII;pila(i)=480.7363;piEi(i)=16.6439;piEm(i)=19.2229;piGA(i)=468000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=6;piIntens(i)=1820;piStark(i)=0;% auto imported from NIST ASD Intensity>=1000
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArII;pila(i)=488.1226;piEi(i)=17.14;piEm(i)=19.68;piGA(i)=494000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=6;piIntens(i)=2239;piStark(i)=0;% auto imported from NIST ASD Intensity>=1000
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=ArII;pila(i)=501.8562;piEi(i)=18.6565;piEm(i)=21.127;piGA(i)=124000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=6;piIntens(i)=7413;piStark(i)=0;% auto imported from NIST ASD Intensity>=1000


% Neon lines for calibration
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=341.79031;piEi(i)=16.67082679;piEm(i)=20.29727974;piGA(i)=4.4e+06;piAcc{i}='C';pi_z(i)=0;pigk(i)=5;piIntens(i)=5000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=344.77022;piEi(i)=16.61906995;piEm(i)=20.21417951;piGA(i)=1.06e+07;piAcc{i}='C+';pi_z(i)=0;pigk(i)=5;piIntens(i)=2000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=346.65781;piEi(i)=16.71538094;piEm(i)=20.29091559;piGA(i)=3.75e+06;piAcc{i}='C';pi_z(i)=0;pigk(i)=3;piIntens(i)=2000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=347.25706;piEi(i)=16.61906995;piEm(i)=20.18843456;piGA(i)=1.18e+07;piAcc{i}='C+';pi_z(i)=0;pigk(i)=7;piIntens(i)=5000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=350.12154;piEi(i)=16.67082679;piEm(i)=20.21098944;piGA(i)=3.60e+06;piAcc{i}='C';pi_z(i)=0;pigk(i)=3;piIntens(i)=2000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=351.51900;piEi(i)=16.67082679;piEm(i)=20.19691626;piGA(i)=3.4e+06;piAcc{i}='C';pi_z(i)=0;pigk(i)=5;piIntens(i)=2000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=352.04714;piEi(i)=16.84805355;piEm(i)=20.36885387;piGA(i)=7.58e+06;piAcc{i}='C+';pi_z(i)=0;pigk(i)=1;piIntens(i)=10000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=359.35263;piEi(i)=16.84805355;piEm(i)=20.29727974;piGA(i)=4.44e+06;piAcc{i}='C+';pi_z(i)=0;pigk(i)=5;piIntens(i)=5000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=359.36385;piEi(i)=16.84805355;piEm(i)=20.29717103;piGA(i)=2.2e+06;piAcc{i}='C';pi_z(i)=0;pigk(i)=3;piIntens(i)=3000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=503.13484;piEi(i)=18.55510789;piEm(i)=21.01865501;piGA(i)=9.38e+06;piAcc{i}='C+';pi_z(i)=0;pigk(i)=7;piIntens(i)=2500;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=503.77512;piEi(i)=18.55510789;piEm(i)=21.01552421;piGA(i)=4.00e+07;piAcc{i}='C+';pi_z(i)=0;pigk(i)=9;piIntens(i)=5000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=508.03830;piEi(i)=18.57583585;piEm(i)=21.01560530;piGA(i)=2.37e+07;piAcc{i}='C+';pi_z(i)=0;pigk(i)=7;piIntens(i)=1500;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=511.65032;piEi(i)=18.38162308;piEm(i)=20.80416986;piGA(i)=1.30e+07;piAcc{i}='C+';pi_z(i)=0;pigk(i)=5;piIntens(i)=1500;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=512.22565;piEi(i)=18.69335927;piEm(i)=21.11318520;piGA(i)=9.80e+06;piAcc{i}='C+';pi_z(i)=0;pigk(i)=5;piIntens(i)=1500;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=540.05616;piEi(i)=16.67082679;piEm(i)=18.96595353;piGA(i)=9.00e+05;piAcc{i}='B+';pi_z(i)=0;pigk(i)=1;piIntens(i)=20000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=576.44188;piEi(i)=18.55510789;piEm(i)=20.70536489;piGA(i)=1.01e+08;piAcc{i}='B';pi_z(i)=0;pigk(i)=9;piIntens(i)=7000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=582.01558;piEi(i)=18.57583585;piEm(i)=20.70550140;piGA(i)=6.02e+07;piAcc{i}='C+';pi_z(i)=0;pigk(i)=7;piIntens(i)=5000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=585.24878;piEi(i)=16.84805355;piEm(i)=18.96595353;piGA(i)=6.15e+07;piAcc{i}='AA';pi_z(i)=0;pigk(i)=1;piIntens(i)=20000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=588.18950;piEi(i)=16.61906995;piEm(i)=18.72638130;piGA(i)=3.45e+07;piAcc{i}='B+';pi_z(i)=0;pigk(i)=3;piIntens(i)=10000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=594.48340;piEi(i)=16.61906995;piEm(i)=18.70407102;piGA(i)=5.65e+07;piAcc{i}='B+';pi_z(i)=0;pigk(i)=5;piIntens(i)=5000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=597.55343;piEi(i)=16.61906995;piEm(i)=18.69335927;piGA(i)=1.05e+07;piAcc{i}='B+';pi_z(i)=0;pigk(i)=3;piIntens(i)=6000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=602.99968;piEi(i)=16.67082679;piEm(i)=18.72638130;piGA(i)=1.68e+07;piAcc{i}='B+';pi_z(i)=0;pigk(i)=3;piIntens(i)=10000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=607.43376;piEi(i)=16.67082679;piEm(i)=18.71137652;piGA(i)=6.03e+07;piAcc{i}='B+';pi_z(i)=0;pigk(i)=1;piIntens(i)=10000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=609.61630;piEi(i)=16.67082679;piEm(i)=18.70407102;piGA(i)=9.05e+07;piAcc{i}='B+';pi_z(i)=0;pigk(i)=5;piIntens(i)=3000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=614.30627;piEi(i)=16.61906995;piEm(i)=18.63679141;piGA(i)=1.41e+08;piAcc{i}='B+';pi_z(i)=0;pigk(i)=5;piIntens(i)=10000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=616.35937;piEi(i)=16.71538094;piEm(i)=18.72638130;piGA(i)=4.38e+07;piAcc{i}='B+';pi_z(i)=0;pigk(i)=3;piIntens(i)=10000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=621.72812;piEi(i)=16.61906995;piEm(i)=18.61270512;piGA(i)=1.91e+07;piAcc{i}='B+';pi_z(i)=0;pigk(i)=3;piIntens(i)=10000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=626.64952;piEi(i)=16.71538094;piEm(i)=18.69335927;piGA(i)=7.47e+07;piAcc{i}='B+';pi_z(i)=0;pigk(i)=3;piIntens(i)=10000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=633.44276;piEi(i)=16.61906995;piEm(i)=18.57583585;piGA(i)=8.05e+07;piAcc{i}='B+';pi_z(i)=0;pigk(i)=5;piIntens(i)=10000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=638.29914;piEi(i)=16.67082679;piEm(i)=18.61270512;piGA(i)=9.63e+07;piAcc{i}='B+';pi_z(i)=0;pigk(i)=3;piIntens(i)=10000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=640.22480;piEi(i)=16.61906995;piEm(i)=18.55510789;piGA(i)=3.604e+08;piAcc{i}='AAA';pi_z(i)=0;pigk(i)=7;piIntens(i)=20000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=650.65277;piEi(i)=16.67082679;piEm(i)=18.57583585;piGA(i)=1.50e+08;piAcc{i}='B+';pi_z(i)=0;pigk(i)=5;piIntens(i)=15000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=659.89528;piEi(i)=16.84805355;piEm(i)=18.72638130;piGA(i)=6.96e+07;piAcc{i}='B+';pi_z(i)=0;pigk(i)=3;piIntens(i)=10000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=667.82766;piEi(i)=16.84805355;piEm(i)=18.70407102;piGA(i)=1.16e+08;piAcc{i}='B+';pi_z(i)=0;pigk(i)=5;piIntens(i)=5000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=692.94672;piEi(i)=16.84805355;piEm(i)=18.63679141;piGA(i)=8.70e+07;piAcc{i}='B+';pi_z(i)=0;pigk(i)=5;piIntens(i)=100000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=702.40500;piEi(i)=16.84805355;piEm(i)=18.61270512;piGA(i)=5.67e+06;piAcc{i}='B+';pi_z(i)=0;pigk(i)=3;piIntens(i)=34000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=703.24128;piEi(i)=16.61906995;piEm(i)=18.38162308;piGA(i)=7.98e+07;piAcc{i}='B+';pi_z(i)=0;pigk(i)=3;piIntens(i)=85000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=705.12922;piEi(i)=18.38162308;piEm(i)=20.13945716;piGA(i)=7.14e+06;piAcc{i}='C+';pi_z(i)=0;pigk(i)=3;piIntens(i)=2200;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=705.91079;piEi(i)=18.38162308;piEm(i)=20.13751108;piGA(i)=3.73e+07;piAcc{i}='B+';pi_z(i)=0;pigk(i)=5;piIntens(i)=10000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=717.39380;piEi(i)=16.84805355;piEm(i)=18.57583585;piGA(i)=1.44e+07;piAcc{i}='B+';pi_z(i)=0;pigk(i)=5;piIntens(i)=77000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=724.51665;piEi(i)=16.67082679;piEm(i)=18.38162308;piGA(i)=3.03e+07;piAcc{i}='B+';pi_z(i)=0;pigk(i)=3;piIntens(i)=77000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=743.88981;piEi(i)=16.71538094;piEm(i)=18.38162308;piGA(i)=7.41e+06;piAcc{i}='B+';pi_z(i)=0;pigk(i)=3;piIntens(i)=60000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=747.24383;piEi(i)=18.38162308;piEm(i)=20.04038629;piGA(i)=8.88e+06;piAcc{i}='C+';pi_z(i)=0;pigk(i)=3;piIntens(i)=3100;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=748.88712;piEi(i)=18.38162308;piEm(i)=20.03674654;piGA(i)=1.16e+08;piAcc{i}='B+';pi_z(i)=0;pigk(i)=5;piIntens(i)=32000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=753.57739;piEi(i)=18.38162308;piEm(i)=20.02644506;piGA(i)=9.18e+07;piAcc{i}='B+';pi_z(i)=0;pigk(i)=3;piIntens(i)=28000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=754.40439;piEi(i)=18.38162308;piEm(i)=20.02464191;piGA(i)=3.87e+07;piAcc{i}='B';pi_z(i)=0;pigk(i)=1;piIntens(i)=13000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=811.85495;piEi(i)=18.61270512;piEm(i)=20.13945716;piGA(i)=1.16e+07;piAcc{i}='C+';pi_z(i)=0;pigk(i)=3;piIntens(i)=3800;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=826.60769;piEi(i)=18.63679141;piEm(i)=20.13629502;piGA(i)=2.33e+07;piAcc{i}='C+';pi_z(i)=0;pigk(i)=7;piIntens(i)=7200;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=837.76070;piEi(i)=18.55510789;piEm(i)=20.03464876;piGA(i)=4.49e+08;piAcc{i}='B+';pi_z(i)=0;pigk(i)=9;piIntens(i)=76000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=841.71597;piEi(i)=18.57583585;piEm(i)=20.04842432;piGA(i)=7.49e+06;piAcc{i}='C+';pi_z(i)=0;pigk(i)=7;piIntens(i)=2700;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=849.53591;piEi(i)=18.57583585;piEm(i)=20.03486930;piGA(i)=2.75e+08;piAcc{i}='B+';pi_z(i)=0;pigk(i)=7;piIntens(i)=69000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=859.12583;piEi(i)=18.69335927;piEm(i)=20.13610655;piGA(i)=1.56e+08;piAcc{i}='B+';pi_z(i)=0;pigk(i)=5;piIntens(i)=41000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=863.46472;piEi(i)=18.61270512;piEm(i)=20.04820273;piGA(i)=1.14e+08;piAcc{i}='B+';pi_z(i)=0;pigk(i)=5;piIntens(i)=35000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=878.37539;piEi(i)=18.72638130;piEm(i)=20.13751108;piGA(i)=1.62e+08;piAcc{i}='B+';pi_z(i)=0;pigk(i)=5;piIntens(i)=43000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500
i=i+1;piUse(i)=1;piquees(i)=NeI;pila(i)=885.38669;piEi(i)=18.63679141;piEm(i)=20.03674654;piGA(i)=8.20e+07;piAcc{i}='B+';pi_z(i)=0;pigk(i)=5;piIntens(i)=27000;piStark(i)=0;% auto imported from NIST ADD Intensity>1500

%CI
% carbon lines
i=i+1;piUse(i)=0*1;piquees(i)=CI;pila(i)=193.090540;piEi(i)=1.2637284;piEm(i)=7.68476771;piGA(i)=1.02e+09;piAcc{i}='A';pi_z(i)=0;pigk(i)=3;piIntens(i)=20000000000;piStark(i)=0;% auto imported from NIST ASD Intensity>50000
i=i+1;piUse(i)=0;piquees(i)=CI;pila(i)=199.3627;piEi(i)=1.2637284;piEm(i)=7.48277591;piGA(i)=2.5e+05;piAcc{i}='B';pi_z(i)=0;pigk(i)=3;piIntens(i)=13000000000;piStark(i)=0;% auto imported from NIST ASD Intensity>50000
i=i+1;piUse(i)=1;piquees(i)=CI;pila(i)=247.85612;piEi(i)=2.6840136;piEm(i)=7.68476771;piGA(i)=8.4e+07;piAcc{i}='C+';pi_z(i)=0;pigk(i)=3;piIntens(i)=640000000;piStark(i)=0;% auto imported from NIST ASD Intensity>50000
i=i+1;piUse(i)=0;piquees(i)=CI;pila(i)=258.29010;piEi(i)=2.6840136;piEm(i)=7.48277591;piGA(i)=1.7e+04;piAcc{i}='C+';pi_z(i)=0;pigk(i)=3;piIntens(i)=530000;piStark(i)=0;% auto imported from NIST ASD Intensity>50000
i=i+1;piUse(i)=0;piquees(i)=CI;pila(i)=296.48460;piEi(i)=0.0020354130;piEm(i)=4.1826219;piGA(i)=4.e+01;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=6900000;piStark(i)=0;% auto imported from NIST ASD Intensity>50000
i=i+1;piUse(i)=0;piquees(i)=CI;pila(i)=296.72240;piEi(i)=0.0053825826;piEm(i)=4.1826219;piGA(i)=1.0e+02;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=13000000;piStark(i)=0;% auto imported from NIST ASD Intensity>50000
i=i+1;piUse(i)=0;piquees(i)=CI;pila(i)=477.173346;piEi(i)=7.48779862;piEm(i)=10.08537735;piGA(i)=4.0e+06;piAcc{i}='C';pi_z(i)=0;pigk(i)=5;piIntens(i)=69000;piStark(i)=0;% auto imported from NIST ASD Intensity>50000
i=i+1;piUse(i)=0;piquees(i)=CI;pila(i)=493.202553;piEi(i)=7.68476771;piEm(i)=10.19792594;piGA(i)=6.0e+06;piAcc{i}='B';pi_z(i)=0;pigk(i)=1;piIntens(i)=73000;piStark(i)=0;% auto imported from NIST ASD Intensity>50000
i=i+1;piUse(i)=0;piquees(i)=CI;pila(i)=505.214919;piEi(i)=7.68476771;piEm(i)=10.13817181;piGA(i)=1.3e+07;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=160000;piStark(i)=0;% auto imported from NIST ASD Intensity>50000
i=i+1;piUse(i)=0;piquees(i)=CI;pila(i)=538.03308;piEi(i)=7.68476771;piEm(i)=9.98852470;piGA(i)=5.58e+06;piAcc{i}='B';pi_z(i)=0;pigk(i)=3;piIntens(i)=120000;piStark(i)=0;% auto imported from NIST ASD Intensity>50000
i=i+1;piUse(i)=0;piquees(i)=CI;pila(i)=601.322;piEi(i)=8.64716033;piEm(i)=10.708468;piGA(i)=9.0e+06;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=79000;piStark(i)=0;% auto imported from NIST ASD Intensity>50000
i=i+1;piUse(i)=0;piquees(i)=CI;pila(i)=601.322;piEi(i)=8.64716033;piEm(i)=10.7084389;piGA(i)=4.0e+06;piAcc{i}='D';pi_z(i)=0;pigk(i)=9;piIntens(i)=79000;piStark(i)=0;% auto imported from NIST ASD Intensity>50000
i=i+1;piUse(i)=0;piquees(i)=CI;pila(i)=711.3180;piEi(i)=8.64716033;piEm(i)=10.38970413;piGA(i)=2.22e+07;piAcc{i}='B';pi_z(i)=0;pigk(i)=9;piIntens(i)=110000;piStark(i)=0;% auto imported from NIST ASD Intensity>50000
i=i+1;piUse(i)=0;piquees(i)=CI;pila(i)=711.519;piEi(i)=8.64039597;piEm(i)=10.38244864;piGA(i)=4.4e+06;piAcc{i}='B';pi_z(i)=0;pigk(i)=1;piIntens(i)=110000;piStark(i)=0;% auto imported from NIST ASD Intensity>50000
i=i+1;piUse(i)=0;piquees(i)=CI;pila(i)=711.519;piEi(i)=8.64302361;piEm(i)=10.38507435;piGA(i)=1.53e+07;piAcc{i}='B';pi_z(i)=0;pigk(i)=7;piIntens(i)=110000;piStark(i)=0;% auto imported from NIST ASD Intensity>50000
i=i+1;piUse(i)=0;piquees(i)=CI;pila(i)=786.088;piEi(i)=8.85066275;piEm(i)=10.42745830;piGA(i)=7.65e+06;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=110000;piStark(i)=0;% auto imported from NIST ASD Intensity>50000
i=i+1;piUse(i)=0;piquees(i)=CI;pila(i)=805.859;piEi(i)=8.85066275;piEm(i)=10.38877079;piGA(i)=5.45e+06;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=59000;piStark(i)=0;% auto imported from NIST ASD Intensity>50000
i=i+1;piUse(i)=0*1;piquees(i)=CI;pila(i)=833.51443;piEi(i)=7.68476771;piEm(i)=9.17184604;piGA(i)=3.51e+07;piAcc{i}='B+';pi_z(i)=0;pigk(i)=1;piIntens(i)=5900000;piStark(i)=0;% auto imported from NIST ASD Intensity>50000

% Carbon II

i=i+1;piUse(i)=0;piquees(i)=CII;pila(i)=250.912;piEi(i)=13.715649;piEm(i)=18.655492;piGA(i)=1.88e+08;piAcc{i}='A';pi_z(i)=1;pigk(i)=4;piIntens(i)=250;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=CII;pila(i)=251.206;piEi(i)=13.720781;piEm(i)=18.654858;piGA(i)=3.37e+08;piAcc{i}='A';pi_z(i)=1;pigk(i)=6;piIntens(i)=350;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=CII;pila(i)=274.649;piEi(i)=16.331740;piEm(i)=20.844687;piGA(i)=1.74e+08;piAcc{i}='B';pi_z(i)=1;pigk(i)=4;piIntens(i)=250;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=CII;pila(i)=283.671;piEi(i)=11.963699;piEm(i)=16.333123;piGA(i)=1.32e+08;piAcc{i}='B+';pi_z(i)=1;pigk(i)=4;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=CII;pila(i)=283.760;piEi(i)=11.963699;piEm(i)=16.331740;piGA(i)=6.58e+07;piAcc{i}='B+';pi_z(i)=1;pigk(i)=2;piIntens(i)=800;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=CII;pila(i)=391.898;piEi(i)=16.331740;piEm(i)=19.494540;piGA(i)=1.27e+08;piAcc{i}='B';pi_z(i)=1;pigk(i)=2;piIntens(i)=570;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=CII;pila(i)=392.069;piEi(i)=16.333123;piEm(i)=19.494540;piGA(i)=2.54e+08;piAcc{i}='B';pi_z(i)=1;pigk(i)=2;piIntens(i)=800;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=CII;pila(i)=426.700;piEi(i)=18.045809;piEm(i)=20.950644;piGA(i)=1.34e+09;piAcc{i}='C+';pi_z(i)=1;pigk(i)=6;piIntens(i)=800;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=CII;pila(i)=426.726;piEi(i)=18.045987;piEm(i)=20.950644;piGA(i)=1.90e+09;piAcc{i}='C+';pi_z(i)=1;pigk(i)=8;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=CII;pila(i)=426.726;piEi(i)=18.045987;piEm(i)=20.950644;piGA(i)=9.54e+07;piAcc{i}='C+';pi_z(i)=1;pigk(i)=6;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=CII;pila(i)=513.294;piEi(i)=20.701286;piEm(i)=23.116071;piGA(i)=1.56e+08;piAcc{i}='B';pi_z(i)=1;pigk(i)=4;piIntens(i)=350;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=CII;pila(i)=513.328;piEi(i)=20.704212;piEm(i)=23.118840;piGA(i)=1.68e+08;piAcc{i}='B';pi_z(i)=1;pigk(i)=6;piIntens(i)=350;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=CII;pila(i)=514.349;piEi(i)=20.704212;piEm(i)=23.114045;piGA(i)=1.55e+08;piAcc{i}='B';pi_z(i)=1;pigk(i)=2;piIntens(i)=350;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=CII;pila(i)=514.516;piEi(i)=20.709788;piEm(i)=23.118840;piGA(i)=3.89e+08;piAcc{i}='B';pi_z(i)=1;pigk(i)=6;piIntens(i)=570;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=CII;pila(i)=515.109;piEi(i)=20.709788;piEm(i)=23.116071;piGA(i)=1.66e+08;piAcc{i}='B';pi_z(i)=1;pigk(i)=4;piIntens(i)=400;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=CII;pila(i)=564.807;piEi(i)=20.704212;piEm(i)=22.898763;piGA(i)=7.88e+07;piAcc{i}='B';pi_z(i)=1;pigk(i)=4;piIntens(i)=250;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=CII;pila(i)=566.247;piEi(i)=20.709788;piEm(i)=22.898763;piGA(i)=1.17e+08;piAcc{i}='B';pi_z(i)=1;pigk(i)=4;piIntens(i)=350;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=CII;pila(i)=588.977;piEi(i)=18.045987;piEm(i)=20.150478;piGA(i)=1.26e+08;piAcc{i}='B';pi_z(i)=1;pigk(i)=4;piIntens(i)=570;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=CII;pila(i)=589.159;piEi(i)=18.045809;piEm(i)=20.149650;piGA(i)=6.98e+07;piAcc{i}='B';pi_z(i)=1;pigk(i)=2;piIntens(i)=350;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=CII;pila(i)=657.805;piEi(i)=14.448827;piEm(i)=16.333123;piGA(i)=1.47e+08;piAcc{i}='A';pi_z(i)=1;pigk(i)=4;piIntens(i)=800;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=CII;pila(i)=658.288;piEi(i)=14.448827;piEm(i)=16.331740;piGA(i)=7.32e+07;piAcc{i}='A';pi_z(i)=1;pigk(i)=2;piIntens(i)=570;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=CII;pila(i)=678.390;piEi(i)=20.709788;piEm(i)=22.536906;piGA(i)=2.92e+08;piAcc{i}='B';pi_z(i)=1;pigk(i)=8;piIntens(i)=250;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=CII;pila(i)=711.563;piEi(i)=22.532398;piEm(i)=24.274338;piGA(i)=2.88e+08;piAcc{i}='B';pi_z(i)=1;pigk(i)=8;piIntens(i)=250;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=CII;pila(i)=711.990;piEi(i)=22.536906;piEm(i)=24.277799;piGA(i)=4.19e+08;piAcc{i}='B';pi_z(i)=1;pigk(i)=10;piIntens(i)=350;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=CII;pila(i)=723.132;piEi(i)=16.331740;piEm(i)=18.045809;piGA(i)=1.40e+08;piAcc{i}='A';pi_z(i)=1;pigk(i)=4;piIntens(i)=800;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=CII;pila(i)=723.642;piEi(i)=16.333123;piEm(i)=18.045987;piGA(i)=2.51e+08;piAcc{i}='A';pi_z(i)=1;pigk(i)=6;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ASD Intensity>1

% Silicon I
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=180.909;piEi(i)=0.78096;piEm(i)=7.6343;piGA(i)=478000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=7;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=181.407;piEi(i)=0.78096;piEm(i)=7.6155;piGA(i)=805000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=7;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=183.651;piEi(i)=0.009561;piEm(i)=6.7606;piGA(i)=65500000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=5;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=184.115;piEi(i)=0;piEm(i)=6.7341;piGA(i)=45000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=184.144;piEi(i)=0.027668;piEm(i)=6.7606;piGA(i)=184000000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=5;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=184.377;piEi(i)=0.009561;piEm(i)=6.7341;piGA(i)=100000000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=3;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=184.551;piEi(i)=0;piEm(i)=6.7181;piGA(i)=504000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=3;piIntens(i)=300;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=184.61;piEi(i)=0.009561;piEm(i)=6.7255;piGA(i)=56800000;piAcc{i}='E';pi_z(i)=0;pigk(i)=1;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=184.747;piEi(i)=0.009561;piEm(i)=6.7206;piGA(i)=1160000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=5;piIntens(i)=400;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=184.814;piEi(i)=0.009561;piEm(i)=6.7181;piGA(i)=369000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=3;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=184.874;piEi(i)=0.027668;piEm(i)=6.7341;piGA(i)=118000000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=3;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=185.067;piEi(i)=0.027668;piEm(i)=6.7271;piGA(i)=2140000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=7;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=185.246;piEi(i)=0.027668;piEm(i)=6.7206;piGA(i)=370000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=5;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=185.315;piEi(i)=0.027668;piEm(i)=6.7181;piGA(i)=23800000;piAcc{i}='C';pi_z(i)=0;pigk(i)=3;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=187.484;piEi(i)=0.78096;piEm(i)=7.394;piGA(i)=321000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=188.185;piEi(i)=0.027668;piEm(i)=6.6161;piGA(i)=35000000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=7;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=190.133;piEi(i)=0.78096;piEm(i)=7.3019;piGA(i)=700000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=7;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=190.466;piEi(i)=0.78096;piEm(i)=7.2905;piGA(i)=14600000;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=212.412;piEi(i)=0.78096;piEm(i)=6.6161;piGA(i)=2080000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=7;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=220.798;piEi(i)=0;piEm(i)=5.6135;piGA(i)=78600000;piAcc{i}='B';pi_z(i)=0;pigk(i)=3;piIntens(i)=110;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=221.089;piEi(i)=0.009561;piEm(i)=5.6157;piGA(i)=173000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=115;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=221.174;piEi(i)=0.009561;piEm(i)=5.6135;piGA(i)=54300000;piAcc{i}='B';pi_z(i)=0;pigk(i)=3;piIntens(i)=110;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=221.667;piEi(i)=0.027668;piEm(i)=5.6192;piGA(i)=318000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=7;piIntens(i)=120;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=221.806;piEi(i)=0.027668;piEm(i)=5.6157;piGA(i)=54500000;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=120;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=221.891;piEi(i)=0.027668;piEm(i)=5.6135;piGA(i)=3150000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=3;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=230.306;piEi(i)=1.9087;piEm(i)=7.2905;piGA(i)=1040000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=3;piIntens(i)=55;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=1;piquees(i)=SiI;pila(i)=243.515;piEi(i)=0.78096;piEm(i)=5.8708;piGA(i)=222000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=300;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_FIT;piquees(i)=SiI;pila(i)=243.877;piEi(i)=0;piEm(i)=5.0823;piGA(i)=2370000;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=65;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_FIT;piquees(i)=SiI;pila(i)=244.336;piEi(i)=0.009561;piEm(i)=5.0823;piGA(i)=3960000;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=65;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=1;piquees(i)=SiI;pila(i)=245.212;piEi(i)=0.027668;piEm(i)=5.0823;piGA(i)=519000;piAcc{i}='E';pi_z(i)=0;pigk(i)=3;piIntens(i)=70;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=1;piquees(i)=SiI;pila(i)=250.69;piEi(i)=0.009561;piEm(i)=4.9538;piGA(i)=274000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=425;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=1;piquees(i)=SiI;pila(i)=251.432;piEi(i)=0;piEm(i)=4.9296;piGA(i)=222000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=3;piIntens(i)=375;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=1;piquees(i)=SiI;pila(i)=251.6113;piEi(i)=0.027668;piEm(i)=4.9538;piGA(i)=840000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=1;piquees(i)=SiI;pila(i)=251.9202;piEi(i)=0.009561;piEm(i)=4.9296;piGA(i)=165000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=3;piIntens(i)=350;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_FIT;piquees(i)=SiI;pila(i)=252.4108;piEi(i)=0.009561;piEm(i)=4.9201;piGA(i)=222000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=1;piIntens(i)=425;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=1;piquees(i)=SiI;pila(i)=252.8509;piEi(i)=0.027668;piEm(i)=4.9296;piGA(i)=271000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=3;piIntens(i)=450;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=253.2381;piEi(i)=1.9087;piEm(i)=6.8031;piGA(i)=73500000;piAcc{i}='C';pi_z(i)=0;pigk(i)=3;piIntens(i)=110;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_FIT;piquees(i)=SiI;pila(i)=256.3679;piEi(i)=0.78096;piEm(i)=5.6157;piGA(i)=0.021;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=30;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=1;piquees(i)=SiI;pila(i)=256.8641;piEi(i)=1.9087;piEm(i)=6.7341;piGA(i)=12700000;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=85;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_SAT;piquees(i)=SiI;pila(i)=263.1282;piEi(i)=1.9087;piEm(i)=6.6192;piGA(i)=318000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=3;piIntens(i)=190;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=1;piquees(i)=SiI;pila(i)=288.1579;piEi(i)=0.78096;piEm(i)=5.0823;piGA(i)=651000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=3;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=297.0355;piEi(i)=0.78096;piEm(i)=4.9538;piGA(i)=300000;piAcc{i}='E';pi_z(i)=0;pigk(i)=5;piIntens(i)=55;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=298.7645;piEi(i)=0.78096;piEm(i)=4.9296;piGA(i)=7980000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=3;piIntens(i)=150;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=300.6739;piEi(i)=0.009561;piEm(i)=4.1319;piGA(i)=5500;piAcc{i}='E';pi_z(i)=0;pigk(i)=5;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=1;piquees(i)=SiI;pila(i)=302.0004;piEi(i)=0.027668;piEm(i)=4.1319;piGA(i)=16000;piAcc{i}='E';pi_z(i)=0;pigk(i)=5;piIntens(i)=75;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=390.5523;piEi(i)=1.9087;piEm(i)=5.0823;piGA(i)=39900000;piAcc{i}='B';pi_z(i)=0;pigk(i)=3;piIntens(i)=300;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=410.2936;piEi(i)=1.9087;piEm(i)=4.9296;piGA(i)=183000;piAcc{i}='E';pi_z(i)=0;pigk(i)=3;piIntens(i)=70;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=1;piquees(i)=SiI;pila(i)=478.2991;piEi(i)=4.9538;piEm(i)=7.5453;piGA(i)=5100000;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=479.2212;piEi(i)=4.9296;piEm(i)=7.5161;piGA(i)=2200000;piAcc{i}='D';pi_z(i)=0;pigk(i)=1;piIntens(i)=35;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=479.2324;piEi(i)=4.9538;piEm(i)=7.5402;piGA(i)=8500000;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=80;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=494.7607;piEi(i)=5.0823;piEm(i)=7.5876;piGA(i)=4200000;piAcc{i}='D';pi_z(i)=0;pigk(i)=1;piIntens(i)=30;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=500.6061;piEi(i)=5.0823;piEm(i)=7.5583;piGA(i)=14000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=40;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=562.2221;piEi(i)=4.9296;piEm(i)=7.1343;piGA(i)=4800000;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=30;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=564.5611;piEi(i)=4.9296;piEm(i)=7.1252;piGA(i)=4800000;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=90;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=566.5554;piEi(i)=4.9201;piEm(i)=7.1079;piGA(i)=1890000;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=80;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=568.4484;piEi(i)=4.9538;piEm(i)=7.1343;piGA(i)=7800000;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=120;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=569.0425;piEi(i)=4.9296;piEm(i)=7.1079;piGA(i)=2780000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=3;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=570.1105;piEi(i)=4.9296;piEm(i)=7.1038;piGA(i)=1830000;piAcc{i}='D';pi_z(i)=0;pigk(i)=1;piIntens(i)=90;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=570.8397;piEi(i)=4.9538;piEm(i)=7.1252;piGA(i)=6950000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=5;piIntens(i)=160;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=575.422;piEi(i)=4.9538;piEm(i)=7.1079;piGA(i)=3690000;piAcc{i}='E';pi_z(i)=0;pigk(i)=3;piIntens(i)=45;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=577.2145;piEi(i)=5.0823;piEm(i)=7.2297;piGA(i)=3560000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=1;piIntens(i)=70;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=578.0384;piEi(i)=4.9201;piEm(i)=7.0644;piGA(i)=891000;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=70;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=579.3071;piEi(i)=4.9296;piEm(i)=7.0693;piGA(i)=1920000;piAcc{i}='E';pi_z(i)=0;pigk(i)=5;piIntens(i)=90;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=579.7859;piEi(i)=4.9538;piEm(i)=7.0917;piGA(i)=1770000;piAcc{i}='D';pi_z(i)=0;pigk(i)=7;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=594.8545;piEi(i)=5.0823;piEm(i)=7.166;piGA(i)=11100000;piAcc{i}='C';pi_z(i)=0;pigk(i)=5;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=633.1954;piEi(i)=5.0823;piEm(i)=7.0399;piGA(i)=30000;piAcc{i}='E';pi_z(i)=0;pigk(i)=3;piIntens(i)=45;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=655.5462;piEi(i)=5.984;piEm(i)=7.8748;piGA(i)=6200000;piAcc{i}='D';pi_z(i)=0;pigk(i)=9;piIntens(i)=45;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=672.1853;piEi(i)=5.8625;piEm(i)=7.7065;piGA(i)=17000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=697.6523;piEi(i)=5.9537;piEm(i)=7.7304;piGA(i)=16300000;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=80;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=700.3567;piEi(i)=5.9639;piEm(i)=7.7337;piGA(i)=23900000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=7;piIntens(i)=180;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=700.5883;piEi(i)=5.984;piEm(i)=7.7532;piGA(i)=34500000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=9;piIntens(i)=180;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=719.358;piEi(i)=6.0787;piEm(i)=7.8018;piGA(i)=2150000;piAcc{i}='E';pi_z(i)=0;pigk(i)=3;piIntens(i)=65;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=768.0267;piEi(i)=5.8625;piEm(i)=7.4764;piGA(i)=23100000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=5;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=774.271;piEi(i)=6.206;piEm(i)=7.8069;piGA(i)=58700000;piAcc{i}='C';pi_z(i)=0;pigk(i)=11;piIntens(i)=40;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=791.8386;piEi(i)=5.9537;piEm(i)=7.5191;piGA(i)=26100000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=5;piIntens(i)=90;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=793.2349;piEi(i)=5.9639;piEm(i)=7.5265;piGA(i)=35900000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=7;piIntens(i)=120;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=794.4001;piEi(i)=5.984;piEm(i)=7.5443;piGA(i)=51800000;piAcc{i}='B';pi_z(i)=0;pigk(i)=9;piIntens(i)=140;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=797.0306;piEi(i)=5.9639;piEm(i)=7.5191;piGA(i)=3560000;piAcc{i}='C';pi_z(i)=0;pigk(i)=5;piIntens(i)=35;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=803.5619;piEi(i)=5.984;piEm(i)=7.5265;piGA(i)=5680000;piAcc{i}='D';pi_z(i)=0;pigk(i)=7;piIntens(i)=35;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=809.3241;piEi(i)=5.8625;piEm(i)=7.394;piGA(i)=4500000;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=70;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiI;pila(i)=864.8462;piEi(i)=6.206;piEm(i)=7.6392;piGA(i)=100000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=11;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>1


%silicon II
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=180.8;piEi(i)=0;piEm(i)=6.8575;piGA(i)=10200000;piAcc{i}='C';pi_z(i)=1;pigk(i)=4;piIntens(i)=150;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=181.692;piEi(i)=0.035613;piEm(i)=6.8594;piGA(i)=15900000;piAcc{i}='C';pi_z(i)=1;pigk(i)=6;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=181.745;piEi(i)=0.035613;piEm(i)=6.8575;piGA(i)=1290000;piAcc{i}='C';pi_z(i)=1;pigk(i)=4;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=207.202;piEi(i)=6.8575;piEm(i)=12.8393;piGA(i)=580000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=207.27;piEi(i)=6.8594;piEm(i)=12.8393;piGA(i)=800000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=8;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=233.44;piEi(i)=0;piEm(i)=5.3095;piGA(i)=11000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=2;piIntens(i)=30;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=233.461;piEi(i)=0.035613;piEm(i)=5.3447;piGA(i)=14600;piAcc{i}='D+';pi_z(i)=1;pigk(i)=6;piIntens(i)=30;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=234.42;piEi(i)=0.035613;piEm(i)=5.323;piGA(i)=5240;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=235.017;piEi(i)=0.035613;piEm(i)=5.3095;piGA(i)=9400;piAcc{i}='D+';pi_z(i)=1;pigk(i)=2;piIntens(i)=20;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=268.221;piEi(i)=10.0739;piEm(i)=14.695;piGA(i)=14000000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=4;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=288.751;piEi(i)=9.8388;piEm(i)=14.1313;piGA(i)=25600000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=4;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=290.428;piEi(i)=9.8367;piEm(i)=14.1045;piGA(i)=215000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=6;piIntens(i)=300;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=290.569;piEi(i)=9.8388;piEm(i)=14.1045;piGA(i)=306000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=8;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=320.387;piEi(i)=10.0664;piEm(i)=13.9351;piGA(i)=178000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=4;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=321.003;piEi(i)=10.0739;piEm(i)=13.9352;piGA(i)=317000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=6;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=1;piquees(i)=SiII;pila(i)=333.314;piEi(i)=10.0664;piEm(i)=13.7851;piGA(i)=20000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=2;piIntens(i)=300;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=333.982;piEi(i)=10.0739;piEm(i)=13.7851;piGA(i)=40000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=2;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=385.366;piEi(i)=6.8575;piEm(i)=10.0739;piGA(i)=20400000;piAcc{i}='C';pi_z(i)=1;pigk(i)=4;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=385.602;piEi(i)=6.8594;piEm(i)=10.0739;piGA(i)=176000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=4;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=386.26;piEi(i)=6.8575;piEm(i)=10.0664;piGA(i)=78200000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=2;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=407.545;piEi(i)=9.8388;piEm(i)=12.8801;piGA(i)=16000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=4;piIntens(i)=20;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=407.678;piEi(i)=9.8367;piEm(i)=12.8771;piGA(i)=8000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=2;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=412.807;piEi(i)=9.8367;piEm(i)=12.8393;piGA(i)=894000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=6;piIntens(i)=300;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=413.089;piEi(i)=9.8388;piEm(i)=12.8393;piGA(i)=1390000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=8;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=462.142;piEi(i)=12.5253;piEm(i)=15.2073;piGA(i)=76800000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=462.172;piEi(i)=12.5254;piEm(i)=15.2073;piGA(i)=110000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=8;piIntens(i)=150;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=504.103;piEi(i)=10.0664;piEm(i)=12.5253;piGA(i)=280000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=4;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=505.598;piEi(i)=10.0739;piEm(i)=12.5254;piGA(i)=870000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=6;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=546.643;piEi(i)=12.5253;piEm(i)=14.7927;piGA(i)=130000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=6;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=546.687;piEi(i)=12.5254;piEm(i)=14.7927;piGA(i)=9240000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=6;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=563.297;piEi(i)=14.1856;piEm(i)=16.386;piGA(i)=32000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=8;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=566.066;piEi(i)=14.1748;piEm(i)=16.3644;piGA(i)=42000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=6;piIntens(i)=150;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=566.956;piEi(i)=14.1998;piEm(i)=16.386;piGA(i)=400000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=8;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=568.144;piEi(i)=14.1671;piEm(i)=16.3488;piGA(i)=40000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=4;piIntens(i)=30;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=568.881;piEi(i)=14.1856;piEm(i)=16.3644;piGA(i)=276000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=6;piIntens(i)=300;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=570.137;piEi(i)=14.1748;piEm(i)=16.3488;piGA(i)=180000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=4;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=570.637;piEi(i)=14.1671;piEm(i)=16.3392;piGA(i)=122000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=2;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=595.756;piEi(i)=10.0664;piEm(i)=12.147;piGA(i)=112000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=2;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=597.893;piEi(i)=10.0739;piEm(i)=12.147;piGA(i)=226000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=2;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=634.71;piEi(i)=8.121;piEm(i)=10.0739;piGA(i)=234000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=4;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=637.136;piEi(i)=8.121;piEm(i)=10.0664;piGA(i)=136000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=2;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=666.052;piEi(i)=14.5035;piEm(i)=16.3644;piGA(i)=218000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=6;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=666.5;piEi(i)=14.4891;piEm(i)=16.3488;piGA(i)=86400000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=4;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=667.188;piEi(i)=14.5282;piEm(i)=16.386;piGA(i)=384000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=8;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=669.938;piEi(i)=14.4891;piEm(i)=16.3392;piGA(i)=84000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=2;piIntens(i)=20;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=675.028;piEi(i)=14.5282;piEm(i)=16.3644;piGA(i)=89400000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=6;piIntens(i)=20;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=681.845;piEi(i)=12.8771;piEm(i)=14.695;piGA(i)=43200000;piAcc{i}='C';pi_z(i)=1;pigk(i)=4;piIntens(i)=30;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=682.982;piEi(i)=12.8801;piEm(i)=14.695;piGA(i)=8640000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=4;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=784.88;piEi(i)=12.5253;piEm(i)=14.1045;piGA(i)=224000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=6;piIntens(i)=400;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=SiII;pila(i)=784.972;piEi(i)=12.5254;piEm(i)=14.1045;piGA(i)=319000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=8;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>1

% Na I
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=285.2811;piEi(i)=0;piEm(i)=4.3448;piGA(i)=2150000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=4;piIntens(i)=16;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=285.3013;piEi(i)=0;piEm(i)=4.3445;piGA(i)=1060000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=2;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=330.2369;piEi(i)=0;piEm(i)=3.7533;piGA(i)=11000000;piAcc{i}='A';pi_z(i)=0;pigk(i)=4;piIntens(i)=19;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=330.2979;piEi(i)=0;piEm(i)=3.7526;piGA(i)=5460000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=2;piIntens(i)=18;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=342.73;piEi(i)=32.7002;piEm(i)=36.3167;piGA(i)=170000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=6;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=348.9;piEi(i)=32.7002;piEm(i)=36.2529;piGA(i)=250000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=6;piIntens(i)=130;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=350.25;piEi(i)=32.7002;piEm(i)=36.2392;piGA(i)=350000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=4;piIntens(i)=160;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=351.1;piEi(i)=32.7002;piEm(i)=36.2306;piGA(i)=230000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=2;piIntens(i)=130;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=384.8;piEi(i)=33.0956;piEm(i)=36.3167;piGA(i)=170000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=6;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=386.55;piEi(i)=33.0525;piEm(i)=36.2591;piGA(i)=460000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=8;piIntens(i)=130;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=387.29;piEi(i)=33.0525;piEm(i)=36.2529;piGA(i)=72000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=6;piIntens(i)=19;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=388.18;piEi(i)=33.0525;piEm(i)=36.2456;piGA(i)=1630000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=10;piIntens(i)=420;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=388.57;piEi(i)=33.1388;piEm(i)=36.3286;piGA(i)=250000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=4;piIntens(i)=36;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=390.04;piEi(i)=33.1388;piEm(i)=36.3167;piGA(i)=460000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=6;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=391.79;piEi(i)=33.0956;piEm(i)=36.2591;piGA(i)=530000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=8;piIntens(i)=160;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=392.56;piEi(i)=33.0956;piEm(i)=36.2529;piGA(i)=270000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=6;piIntens(i)=85;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=393.06;piEi(i)=33.1752;piEm(i)=36.3286;piGA(i)=100000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=4;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=394.26;piEi(i)=33.0956;piEm(i)=36.2392;piGA(i)=84000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=4;piIntens(i)=32;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=398.03;piEi(i)=33.1388;piEm(i)=36.2529;piGA(i)=30000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=6;piIntens(i)=14;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=399.77;piEi(i)=33.1388;piEm(i)=36.2392;piGA(i)=30000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=4;piIntens(i)=14;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=400.88;piEi(i)=33.1388;piEm(i)=36.2306;piGA(i)=30000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=2;piIntens(i)=27;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=417.67;piEi(i)=33.2915;piEm(i)=36.2591;piGA(i)=280000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=8;piIntens(i)=82;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=418.55;piEi(i)=33.2915;piEm(i)=36.2529;piGA(i)=290000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=6;piIntens(i)=150;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=420.49;piEi(i)=33.2915;piEm(i)=36.2392;piGA(i)=100000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=4;piIntens(i)=46;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=425.252;piEi(i)=2.1044;piEm(i)=5.0192;piGA(i)=368000;piAcc{i}='B';pi_z(i)=0;pigk(i)=2;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=425.38;piEi(i)=33.339;piEm(i)=36.2529;piGA(i)=30000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=6;piIntens(i)=17;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=427.3642;piEi(i)=2.1023;piEm(i)=5.0026;piGA(i)=1560000;piAcc{i}='C';pi_z(i)=0;pigk(i)=4;piIntens(i)=4;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=427.39;piEi(i)=33.339;piEm(i)=36.2392;piGA(i)=64000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=4;piIntens(i)=23;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=427.6787;piEi(i)=2.1044;piEm(i)=5.0026;piGA(i)=2810000;piAcc{i}='C';pi_z(i)=0;pigk(i)=6;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=428.67;piEi(i)=33.339;piEm(i)=36.2306;piGA(i)=56000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=2;piIntens(i)=46;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=429.1006;piEi(i)=2.1044;piEm(i)=4.993;piGA(i)=494000;piAcc{i}='B';pi_z(i)=0;pigk(i)=2;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=432.4615;piEi(i)=2.1044;piEm(i)=4.9706;piGA(i)=456000;piAcc{i}='B';pi_z(i)=0;pigk(i)=4;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=434.1489;piEi(i)=2.1023;piEm(i)=4.9573;piGA(i)=652000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=2;piIntens(i)=4;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=434.4736;piEi(i)=2.1044;piEm(i)=4.9573;piGA(i)=1300000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=2;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=439.0029;piEi(i)=2.1023;piEm(i)=4.9257;piGA(i)=3930000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=4;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=439.334;piEi(i)=2.1044;piEm(i)=4.9257;piGA(i)=780000;piAcc{i}='B';pi_z(i)=0;pigk(i)=4;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=441.9885;piEi(i)=2.1023;piEm(i)=4.9067;piGA(i)=564000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=2;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=442.3246;piEi(i)=2.1044;piEm(i)=4.9067;piGA(i)=1120000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=2;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=443.23;piEi(i)=32.7002;piEm(i)=35.4967;piGA(i)=84000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=6;piIntens(i)=310;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=449.4177;piEi(i)=2.1023;piEm(i)=4.8603;piGA(i)=4920000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=4;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=449.7658;piEi(i)=2.1044;piEm(i)=4.8603;piGA(i)=976000;piAcc{i}='B';pi_z(i)=0;pigk(i)=4;piIntens(i)=11;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=454.1633;piEi(i)=2.1023;piEm(i)=4.8315;piGA(i)=752000;piAcc{i}='B';pi_z(i)=0;pigk(i)=2;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=454.5186;piEi(i)=2.1044;piEm(i)=4.8315;piGA(i)=1500000;piAcc{i}='B';pi_z(i)=0;pigk(i)=2;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=466.4811;piEi(i)=2.1023;piEm(i)=4.7594;piGA(i)=8320000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=4;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=466.856;piEi(i)=2.1044;piEm(i)=4.7594;piGA(i)=14900000;piAcc{i}='A';pi_z(i)=0;pigk(i)=6;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=474.7941;piEi(i)=2.1023;piEm(i)=4.7129;piGA(i)=1240000;piAcc{i}='B';pi_z(i)=0;pigk(i)=2;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=475.1822;piEi(i)=2.1044;piEm(i)=4.7129;piGA(i)=2460000;piAcc{i}='B';pi_z(i)=0;pigk(i)=2;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=497.8541;piEi(i)=2.1023;piEm(i)=4.592;piGA(i)=16400000;piAcc{i}='A';pi_z(i)=0;pigk(i)=4;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=498.2813;piEi(i)=2.1044;piEm(i)=4.592;piGA(i)=29300000;piAcc{i}='A';pi_z(i)=0;pigk(i)=6;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=507.12;piEi(i)=33.0525;piEm(i)=35.4967;piGA(i)=250000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=6;piIntens(i)=270;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=514.8838;piEi(i)=2.1023;piEm(i)=4.5096;piGA(i)=2280000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=2;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=515.3402;piEi(i)=2.1044;piEm(i)=4.5096;piGA(i)=4540000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=2;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=516.25;piEi(i)=33.0956;piEm(i)=35.4967;piGA(i)=90000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=6;piIntens(i)=83;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=525.64;piEi(i)=33.1388;piEm(i)=35.4967;piGA(i)=10000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=6;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=562.1;piEi(i)=33.2915;piEm(i)=35.4967;piGA(i)=84000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=6;piIntens(i)=42;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=568.2633;piEi(i)=2.1023;piEm(i)=4.2835;piGA(i)=40400000;piAcc{i}='A';pi_z(i)=0;pigk(i)=4;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=568.8193;piEi(i)=2.1044;piEm(i)=4.2835;piGA(i)=8080000;piAcc{i}='A';pi_z(i)=0;pigk(i)=4;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=568.8205;piEi(i)=2.1044;piEm(i)=4.2835;piGA(i)=72600000;piAcc{i}='A';pi_z(i)=0;pigk(i)=6;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=574.42;piEi(i)=33.339;piEm(i)=35.4967;piGA(i)=20000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=6;piIntens(i)=12;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=1;piquees(i)=NaI;pila(i)=588.9951;piEi(i)=0;piEm(i)=2.1044;piGA(i)=246000000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=4;piIntens(i)=80000;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=1;piquees(i)=NaI;pila(i)=589.5924;piEi(i)=0;piEm(i)=2.1023;piGA(i)=123000000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=2;piIntens(i)=40000;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=615.4225;piEi(i)=2.1023;piEm(i)=4.1164;piGA(i)=5000000;piAcc{i}='A';pi_z(i)=0;pigk(i)=2;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=616.0747;piEi(i)=2.1044;piEm(i)=4.1164;piGA(i)=9960000;piAcc{i}='A';pi_z(i)=0;pigk(i)=2;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=737.323;piEi(i)=3.1914;piEm(i)=4.8724;piGA(i)=217000;piAcc{i}='B';pi_z(i)=0;pigk(i)=4;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=737.349;piEi(i)=3.1914;piEm(i)=4.8724;piGA(i)=106000;piAcc{i}='B';pi_z(i)=0;pigk(i)=2;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=780.978;piEi(i)=3.1914;piEm(i)=4.7785;piGA(i)=396000;piAcc{i}='B';pi_z(i)=0;pigk(i)=4;piIntens(i)=4;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=781.024;piEi(i)=3.1914;piEm(i)=4.7784;piGA(i)=194000;piAcc{i}='B';pi_z(i)=0;pigk(i)=2;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=818.3256;piEi(i)=2.1023;piEm(i)=3.617;piGA(i)=172000000;piAcc{i}='A+';pi_z(i)=0;pigk(i)=4;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=819.4791;piEi(i)=2.1044;piEm(i)=3.617;piGA(i)=34300000;piAcc{i}='A';pi_z(i)=0;pigk(i)=4;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=819.4824;piEi(i)=2.1044;piEm(i)=3.617;piGA(i)=308000000;piAcc{i}='A+';pi_z(i)=0;pigk(i)=6;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=864.992;piEi(i)=3.1914;piEm(i)=4.6243;piGA(i)=900000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=4;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaI;pila(i)=865.089;piEi(i)=3.1914;piEm(i)=4.6242;piGA(i)=442000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=2;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>1

% NaII
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=231.5647;piEi(i)=32.9413;piEm(i)=38.2939;piGA(i)=10500000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=1;piIntens(i)=300;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=249.3149;piEi(i)=33.3224;piEm(i)=38.2939;piGA(i)=415000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=1;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=250.2839;piEi(i)=36.3547;piEm(i)=41.3069;piGA(i)=36000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=3;piIntens(i)=300;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=250.6301;piEi(i)=36.3547;piEm(i)=41.3001;piGA(i)=81000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=3;piIntens(i)=450;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=251.5455;piEi(i)=36.3547;piEm(i)=41.2821;piGA(i)=112000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=5;piIntens(i)=600;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=252.5647;piEi(i)=36.3547;piEm(i)=41.2622;piGA(i)=1390000;piAcc{i}='D';pi_z(i)=1;pigk(i)=5;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=253.1538;piEi(i)=36.3547;piEm(i)=41.2508;piGA(i)=84400000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=1;piIntens(i)=600;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=258.6308;piEi(i)=36.3547;piEm(i)=41.1471;piGA(i)=174000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=3;piIntens(i)=550;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=259.4958;piEi(i)=36.3547;piEm(i)=41.1311;piGA(i)=111000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=3;piIntens(i)=600;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=260.0325;piEi(i)=36.3547;piEm(i)=41.1213;piGA(i)=2400000;piAcc{i}='E';pi_z(i)=1;pigk(i)=5;piIntens(i)=45;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=261.1812;piEi(i)=36.3547;piEm(i)=41.1003;piGA(i)=1100000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=5;piIntens(i)=850;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=266.0997;piEi(i)=36.3547;piEm(i)=41.0126;piGA(i)=825000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=5;piIntens(i)=850;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=267.1826;piEi(i)=36.3547;piEm(i)=40.9937;piGA(i)=792000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=3;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=267.8085;piEi(i)=36.3547;piEm(i)=40.9829;piGA(i)=301000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=1;piIntens(i)=850;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=279.9211;piEi(i)=36.8542;piEm(i)=41.2821;piGA(i)=13200000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=5;piIntens(i)=80;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=280.8706;piEi(i)=36.8542;piEm(i)=41.2671;piGA(i)=100000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=7;piIntens(i)=650;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=280.952;piEi(i)=32.8464;piEm(i)=37.2581;piGA(i)=178000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=3;piIntens(i)=850;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=281.184;piEi(i)=36.8542;piEm(i)=41.2622;piGA(i)=5050000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=5;piIntens(i)=160;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=281.39;piEi(i)=36.9021;piEm(i)=41.3069;piGA(i)=21000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=3;piIntens(i)=250;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=281.8288;piEi(i)=36.9021;piEm(i)=41.3001;piGA(i)=36000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=3;piIntens(i)=350;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=282.9868;piEi(i)=36.9021;piEm(i)=41.2821;piGA(i)=168000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=5;piIntens(i)=600;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=283.9564;piEi(i)=36.9021;piEm(i)=41.2671;piGA(i)=360000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=7;piIntens(i)=800;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=284.1724;piEi(i)=32.8464;piEm(i)=37.2081;piGA(i)=446000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=5;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=284.2762;piEi(i)=36.9021;piEm(i)=41.2622;piGA(i)=2620000;piAcc{i}='D';pi_z(i)=1;pigk(i)=5;piIntens(i)=30;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=285.6508;piEi(i)=36.9678;piEm(i)=41.3069;piGA(i)=190000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=3;piIntens(i)=650;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=285.9488;piEi(i)=32.8464;piEm(i)=37.181;piGA(i)=65700000;piAcc{i}='B';pi_z(i)=1;pigk(i)=3;piIntens(i)=800;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=286.1019;piEi(i)=36.9678;piEm(i)=41.3001;piGA(i)=24000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=3;piIntens(i)=350;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=287.1275;piEi(i)=32.9413;piEm(i)=37.2581;piGA(i)=82500000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=3;piIntens(i)=750;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=287.2954;piEi(i)=36.9678;piEm(i)=41.2821;piGA(i)=132000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=5;piIntens(i)=650;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=288.1146;piEi(i)=32.9413;piEm(i)=37.2433;piGA(i)=250000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=1;piIntens(i)=900;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=288.6257;piEi(i)=36.9678;piEm(i)=41.2622;piGA(i)=535000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=5;piIntens(i)=850;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=289.3949;piEi(i)=36.9678;piEm(i)=41.2508;piGA(i)=148000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=1;piIntens(i)=700;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=290.1139;piEi(i)=36.8542;piEm(i)=41.1265;piGA(i)=770000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=7;piIntens(i)=900;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=290.4716;piEi(i)=36.8542;piEm(i)=41.1213;piGA(i)=50000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=5;piIntens(i)=800;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=290.4915;piEi(i)=32.9413;piEm(i)=37.2081;piGA(i)=365000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=5;piIntens(i)=1100;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=291.752;piEi(i)=32.8464;piEm(i)=37.0948;piGA(i)=396000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=5;piIntens(i)=1100;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=291.9049;piEi(i)=36.8542;piEm(i)=41.1003;piGA(i)=800000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=5;piIntens(i)=1100;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=291.985;piEi(i)=36.9021;piEm(i)=41.1471;piGA(i)=399000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=3;piIntens(i)=1200;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=292.0945;piEi(i)=33.0147;piEm(i)=37.2581;piGA(i)=200000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=3;piIntens(i)=1300;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=292.3485;piEi(i)=32.9413;piEm(i)=37.181;piGA(i)=42300000;piAcc{i}='B';pi_z(i)=1;pigk(i)=3;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=293.0882;piEi(i)=36.9021;piEm(i)=41.1311;piGA(i)=295000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=3;piIntens(i)=750;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=293.4079;piEi(i)=36.9021;piEm(i)=41.1265;piGA(i)=200000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=7;piIntens(i)=850;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=293.7735;piEi(i)=36.9021;piEm(i)=41.1213;piGA(i)=650000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=5;piIntens(i)=950;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=294.2657;piEi(i)=37.0948;piEm(i)=41.3069;piGA(i)=30000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=3;piIntens(i)=450;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=294.5702;piEi(i)=36.8542;piEm(i)=41.0619;piGA(i)=200000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=7;piIntens(i)=800;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=294.7449;piEi(i)=37.0948;piEm(i)=41.3001;piGA(i)=210000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=3;piIntens(i)=950;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=295.1235;piEi(i)=36.8542;piEm(i)=41.054;piGA(i)=3900000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=9;piIntens(i)=1200;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=295.2396;piEi(i)=36.9021;piEm(i)=41.1003;piGA(i)=90000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=5;piIntens(i)=1100;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=296.0116;piEi(i)=37.0948;piEm(i)=41.2821;piGA(i)=280000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=5;piIntens(i)=850;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=296.5742;piEi(i)=36.9678;piEm(i)=41.1471;piGA(i)=1400000;piAcc{i}='E';pi_z(i)=1;pigk(i)=3;piIntens(i)=450;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=297.0727;piEi(i)=37.0948;piEm(i)=41.2671;piGA(i)=72100000;piAcc{i}='B';pi_z(i)=1;pigk(i)=7;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=297.4235;piEi(i)=37.0948;piEm(i)=41.2622;piGA(i)=101000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=5;piIntens(i)=600;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=297.4988;piEi(i)=33.0147;piEm(i)=37.181;piGA(i)=194000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=3;piIntens(i)=750;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=297.7125;piEi(i)=36.9678;piEm(i)=41.1311;piGA(i)=360000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=3;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=297.9657;piEi(i)=36.9021;piEm(i)=41.0619;piGA(i)=1400000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=7;piIntens(i)=1100;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=298.0627;piEi(i)=36.8542;piEm(i)=41.0126;piGA(i)=1650000;piAcc{i}='D';pi_z(i)=1;pigk(i)=5;piIntens(i)=1100;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=298.4186;piEi(i)=32.9413;piEm(i)=37.0948;piGA(i)=87000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=5;piIntens(i)=1300;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=298.4186;piEi(i)=36.9678;piEm(i)=41.1213;piGA(i)=1200000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=5;piIntens(i)=1300;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=300.4149;piEi(i)=37.181;piEm(i)=41.3069;piGA(i)=51000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=3;piIntens(i)=550;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=300.7442;piEi(i)=32.8464;piEm(i)=36.9678;piGA(i)=50400000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=3;piIntens(i)=750;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=300.9137;piEi(i)=37.181;piEm(i)=41.3001;piGA(i)=90000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=3;piIntens(i)=750;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=301.5395;piEi(i)=36.9021;piEm(i)=41.0126;piGA(i)=75500000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=5;piIntens(i)=600;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=302.2348;piEi(i)=37.181;piEm(i)=41.2821;piGA(i)=3460000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=5;piIntens(i)=160;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=302.4;piEi(i)=37.2081;piEm(i)=41.3069;piGA(i)=6900000;piAcc{i}='E';pi_z(i)=1;pigk(i)=3;piIntens(i)=130;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=302.907;piEi(i)=37.2081;piEm(i)=41.3001;piGA(i)=300000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=3;piIntens(i)=400;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=302.932;piEi(i)=36.9021;piEm(i)=40.9937;piGA(i)=19000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=3;piIntens(i)=40;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=303.7076;piEi(i)=37.181;piEm(i)=41.2622;piGA(i)=1280000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=5;piIntens(i)=400;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=304.2461;piEi(i)=37.2081;piEm(i)=41.2821;piGA(i)=3740000;piAcc{i}='D';pi_z(i)=1;pigk(i)=5;piIntens(i)=350;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=304.56;piEi(i)=37.181;piEm(i)=41.2508;piGA(i)=69200000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=1;piIntens(i)=400;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=305.021;piEi(i)=37.2433;piEm(i)=41.3069;piGA(i)=390000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=3;piIntens(i)=350;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=305.3666;piEi(i)=37.2081;piEm(i)=41.2671;piGA(i)=2100000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=7;piIntens(i)=550;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=305.5347;piEi(i)=37.2433;piEm(i)=41.3001;piGA(i)=26000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=3;piIntens(i)=550;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=305.6161;piEi(i)=32.8464;piEm(i)=36.9021;piGA(i)=373000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=5;piIntens(i)=550;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=305.7375;piEi(i)=37.2081;piEm(i)=41.2622;piGA(i)=226000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=5;piIntens(i)=550;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=305.872;piEi(i)=37.0948;piEm(i)=41.1471;piGA(i)=65400000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=3;piIntens(i)=550;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=306.135;piEi(i)=37.2581;piEm(i)=41.3069;piGA(i)=300000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=3;piIntens(i)=800;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=306.4375;piEi(i)=36.9678;piEm(i)=41.0126;piGA(i)=38100000;piAcc{i}='C';pi_z(i)=1;pigk(i)=5;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=306.6535;piEi(i)=37.2581;piEm(i)=41.3001;piGA(i)=112000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=3;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=307.0829;piEi(i)=37.0948;piEm(i)=41.1311;piGA(i)=26000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=3;piIntens(i)=350;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=307.4334;piEi(i)=37.0948;piEm(i)=41.1265;piGA(i)=980000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=7;piIntens(i)=550;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=307.8318;piEi(i)=32.9413;piEm(i)=36.9678;piGA(i)=351000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=3;piIntens(i)=550;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=307.8318;piEi(i)=37.0948;piEm(i)=41.1213;piGA(i)=1800000;piAcc{i}='E';pi_z(i)=1;pigk(i)=5;piIntens(i)=550;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=307.8752;piEi(i)=36.9678;piEm(i)=40.9937;piGA(i)=10800000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=3;piIntens(i)=170;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=308.0254;piEi(i)=37.2581;piEm(i)=41.2821;piGA(i)=1400000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=5;piIntens(i)=550;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=308.706;piEi(i)=36.9678;piEm(i)=40.9829;piGA(i)=16600000;piAcc{i}='C';pi_z(i)=1;pigk(i)=1;piIntens(i)=450;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=309.2732;piEi(i)=32.8464;piEm(i)=36.8542;piGA(i)=1460000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=7;piIntens(i)=550;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=309.4449;piEi(i)=37.0948;piEm(i)=41.1003;piGA(i)=5500000;piAcc{i}='E';pi_z(i)=1;pigk(i)=5;piIntens(i)=650;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=309.5552;piEi(i)=37.2581;piEm(i)=41.2622;piGA(i)=1980000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=5;piIntens(i)=650;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=310.4403;piEi(i)=37.2581;piEm(i)=41.2508;piGA(i)=56300000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=1;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=312.4415;piEi(i)=37.0948;piEm(i)=41.0619;piGA(i)=500000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=7;piIntens(i)=1700;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=312.5212;piEi(i)=37.181;piEm(i)=41.1471;piGA(i)=29200000;piAcc{i}='C';pi_z(i)=1;pigk(i)=3;piIntens(i)=600;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=312.9377;piEi(i)=32.9413;piEm(i)=36.9021;piGA(i)=640000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=5;piIntens(i)=600;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=313.5483;piEi(i)=33.0147;piEm(i)=36.9678;piGA(i)=223000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=3;piIntens(i)=2500;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=313.7861;piEi(i)=37.181;piEm(i)=41.1311;piGA(i)=423000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=3;piIntens(i)=1700;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=314.5706;piEi(i)=37.181;piEm(i)=41.1213;piGA(i)=220000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=5;piIntens(i)=950;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=314.9283;piEi(i)=33.3224;piEm(i)=37.2581;piGA(i)=247000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=3;piIntens(i)=2000;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=315.9527;piEi(i)=37.2081;piEm(i)=41.1311;piGA(i)=20000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=3;piIntens(i)=70;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=316.1154;piEi(i)=33.3224;piEm(i)=37.2433;piGA(i)=4360000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=1;piIntens(i)=250;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=316.253;piEi(i)=37.181;piEm(i)=41.1003;piGA(i)=3600000;piAcc{i}='E';pi_z(i)=1;pigk(i)=5;piIntens(i)=90;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=316.3246;piEi(i)=37.2081;piEm(i)=41.1265;piGA(i)=43000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=7;piIntens(i)=350;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=316.3736;piEi(i)=37.0948;piEm(i)=41.0126;piGA(i)=525000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=5;piIntens(i)=2000;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=316.7484;piEi(i)=37.2081;piEm(i)=41.1213;piGA(i)=46000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=5;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=317.5086;piEi(i)=37.2433;piEm(i)=41.1471;piGA(i)=187000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=3;piIntens(i)=700;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=317.9064;piEi(i)=37.0948;piEm(i)=40.9937;piGA(i)=118000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=3;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=318.8127;piEi(i)=37.2433;piEm(i)=41.1311;piGA(i)=57000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=3;piIntens(i)=80;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=318.979;piEi(i)=33.3224;piEm(i)=37.2081;piGA(i)=365000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=5;piIntens(i)=1700;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=320.03;piEi(i)=37.2581;piEm(i)=41.1311;piGA(i)=4500000;piAcc{i}='E';pi_z(i)=1;pigk(i)=3;piIntens(i)=60;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=321.219;piEi(i)=33.3224;piEm(i)=37.181;piGA(i)=336000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=3;piIntens(i)=1600;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=321.6283;piEi(i)=37.2081;piEm(i)=41.0619;piGA(i)=98000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=7;piIntens(i)=450;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=322.5977;piEi(i)=37.2581;piEm(i)=41.1003;piGA(i)=90000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=5;piIntens(i)=450;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=323.4927;piEi(i)=37.181;piEm(i)=41.0126;piGA(i)=91500000;piAcc{i}='B';pi_z(i)=1;pigk(i)=5;piIntens(i)=700;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=325.0949;piEi(i)=37.181;piEm(i)=40.9937;piGA(i)=29000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=3;piIntens(i)=400;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=325.7964;piEi(i)=37.2081;piEm(i)=41.0126;piGA(i)=515000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=5;piIntens(i)=1500;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=326.021;piEi(i)=37.181;piEm(i)=40.9829;piGA(i)=46500000;piAcc{i}='B';pi_z(i)=1;pigk(i)=1;piIntens(i)=650;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=327.422;piEi(i)=37.2081;piEm(i)=40.9937;piGA(i)=129000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=3;piIntens(i)=950;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=328.5602;piEi(i)=33.3224;piEm(i)=37.0948;piGA(i)=550000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=5;piIntens(i)=1700;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=330.1349;piEi(i)=37.2581;piEm(i)=41.0126;piGA(i)=22700000;piAcc{i}='C';pi_z(i)=1;pigk(i)=5;piIntens(i)=1700;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=330.4957;piEi(i)=37.2433;piEm(i)=40.9937;piGA(i)=108000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=3;piIntens(i)=1500;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=331.8039;piEi(i)=37.2581;piEm(i)=40.9937;piGA(i)=124000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=3;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=332.7689;piEi(i)=37.2581;piEm(i)=40.9829;piGA(i)=94500000;piAcc{i}='B';pi_z(i)=1;pigk(i)=1;piIntens(i)=950;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=340.0093;piEi(i)=33.3224;piEm(i)=36.9678;piGA(i)=3720000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=3;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=346.2491;piEi(i)=33.3224;piEm(i)=36.9021;piGA(i)=18000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=5;piIntens(i)=450;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=353.3052;piEi(i)=32.8464;piEm(i)=36.3547;piGA(i)=264000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=3;piIntens(i)=1500;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=363.1272;piEi(i)=32.9413;piEm(i)=36.3547;piGA(i)=112000000;piAcc{i}='A';pi_z(i)=1;pigk(i)=3;piIntens(i)=1200;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=371.107;piEi(i)=33.0147;piEm(i)=36.3547;piGA(i)=30600000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=3;piIntens(i)=850;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=408.7603;piEi(i)=33.3224;piEm(i)=36.3547;piGA(i)=1140000;piAcc{i}='C';pi_z(i)=1;pigk(i)=3;piIntens(i)=130;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=411.3704;piEi(i)=38.2939;piEm(i)=41.3069;piGA(i)=110000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=3;piIntens(i)=300;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=412.3082;piEi(i)=38.2939;piEm(i)=41.3001;piGA(i)=81000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=3;piIntens(i)=250;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=434.4108;piEi(i)=38.2939;piEm(i)=41.1471;piGA(i)=130000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=3;piIntens(i)=250;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=436.86;piEi(i)=38.2939;piEm(i)=41.1311;piGA(i)=108000000;piAcc{i}='B';pi_z(i)=1;pigk(i)=3;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>1
i=i+1;piUse(i)=0;piquees(i)=NaII;pila(i)=459.0933;piEi(i)=38.2939;piEm(i)=40.9937;piGA(i)=6000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=3;piIntens(i)=160;piStark(i)=0;% auto imported from NIST ASD Intensity>1

%CrI
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=359.3502;piEi(i)=0;piEm(i)=3.4493;piGA(i)=1050000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=7;piIntens(i)=1450;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=360.5345;piEi(i)=0;piEm(i)=3.4379;piGA(i)=810000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=1240;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=374.3881;piEi(i)=2.5441;piEm(i)=5.8548;piGA(i)=989000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=13;piIntens(i)=400;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=388.3287;piEi(i)=0.98288;piEm(i)=4.1747;piGA(i)=27000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=7;piIntens(i)=910;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=388.5214;piEi(i)=0.96841;piEm(i)=4.1587;piGA(i)=20000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=5;piIntens(i)=810;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=388.6795;piEi(i)=1.0037;piEm(i)=4.1927;piGA(i)=20000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=9;piIntens(i)=740;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=389.4034;piEi(i)=0.96097;piEm(i)=4.144;piGA(i)=12000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=3;piIntens(i)=480;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=390.2909;piEi(i)=0.98288;piEm(i)=4.1587;piGA(i)=18000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=590;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=1;piquees(i)=CrI;pila(i)=390.8756;piEi(i)=1.0037;piEm(i)=4.1747;piGA(i)=43000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=7;piIntens(i)=1310;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=391.6239;piEi(i)=0.96841;piEm(i)=4.1334;piGA(i)=9700000;piAcc{i}='C';pi_z(i)=0;pigk(i)=1;piIntens(i)=420;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=391.9159;piEi(i)=1.03;piEm(i)=4.1927;piGA(i)=83000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=9;piIntens(i)=2030;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=392.1021;piEi(i)=0.98288;piEm(i)=4.144;piGA(i)=17000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=3;piIntens(i)=740;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=392.8637;piEi(i)=1.0037;piEm(i)=4.1587;piGA(i)=26000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=5;piIntens(i)=880;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=394.1488;piEi(i)=1.03;piEm(i)=4.1747;piGA(i)=20000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=7;piIntens(i)=720;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=1;piquees(i)=CrI;pila(i)=396.3684;piEi(i)=2.5441;piEm(i)=5.6712;piGA(i)=2000000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=15;piIntens(i)=620;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=396.9743;piEi(i)=2.5446;piEm(i)=5.667;piGA(i)=1600000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=13;piIntens(i)=570;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=398.3899;piEi(i)=2.5443;piEm(i)=5.6555;piGA(i)=945000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=9;piIntens(i)=470;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=399.1114;piEi(i)=2.5438;piEm(i)=5.6495;piGA(i)=749000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=7;piIntens(i)=420;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=412.6512;piEi(i)=2.5441;piEm(i)=5.5478;piGA(i)=87200000;piAcc{i}='B';pi_z(i)=0;pigk(i)=13;piIntens(i)=390;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_SAT;piquees(i)=CrI;pila(i)=425.4352;piEi(i)=0;piEm(i)=2.9135;piGA(i)=284000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=9;piIntens(i)=2480;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_SAT;piquees(i)=CrI;pila(i)=427.4812;piEi(i)=0;piEm(i)=2.8995;piGA(i)=215000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=7;piIntens(i)=2500;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_SAT;piquees(i)=CrI;pila(i)=428.9731;piEi(i)=0;piEm(i)=2.8895;piGA(i)=158000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=2380;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=433.7557;piEi(i)=0.96841;piEm(i)=3.826;piGA(i)=27400000;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=1900;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=433.9446;piEi(i)=0.98288;piEm(i)=3.8392;piGA(i)=48400000;piAcc{i}='B';pi_z(i)=0;pigk(i)=7;piIntens(i)=2600;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=433.971;piEi(i)=0.96097;piEm(i)=3.8171;piGA(i)=13200000;piAcc{i}='B';pi_z(i)=0;pigk(i)=3;piIntens(i)=1120;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=434.4502;piEi(i)=1.0037;piEm(i)=3.8567;piGA(i)=99000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=9;piIntens(i)=3100;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=435.1049;piEi(i)=0.96841;piEm(i)=3.8171;piGA(i)=12500000;piAcc{i}='B';pi_z(i)=0;pigk(i)=3;piIntens(i)=1080;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=435.1762;piEi(i)=1.03;piEm(i)=3.8783;piGA(i)=130000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=11;piIntens(i)=3500;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=435.9625;piEi(i)=0.98288;piEm(i)=3.826;piGA(i)=27000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=5;piIntens(i)=1420;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=437.1275;piEi(i)=1.0037;piEm(i)=3.8392;piGA(i)=29000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=7;piIntens(i)=1400;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=438.4975;piEi(i)=1.03;piEm(i)=3.8567;piGA(i)=24000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=9;piIntens(i)=1060;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=449.6852;piEi(i)=0.94143;piEm(i)=3.6978;piGA(i)=23000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=7;piIntens(i)=1300;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=452.6454;piEi(i)=2.5441;piEm(i)=5.2824;piGA(i)=228000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=13;piIntens(i)=960;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=453.0738;piEi(i)=2.5446;piEm(i)=5.2804;piGA(i)=174000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=11;piIntens(i)=770;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=453.5697;piEi(i)=2.5446;piEm(i)=5.2774;piGA(i)=134000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=9;piIntens(i)=600;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=454.0498;piEi(i)=2.5443;piEm(i)=5.2741;piGA(i)=105000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=7;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=454.0704;piEi(i)=3.1044;piEm(i)=5.8341;piGA(i)=345000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=11;piIntens(i)=460;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=454.4612;piEi(i)=2.5438;piEm(i)=5.2712;piGA(i)=84500000;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=440;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=454.5953;piEi(i)=0.94143;piEm(i)=3.668;piGA(i)=14000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=930;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=457.1671;piEi(i)=2.5441;piEm(i)=5.2554;piGA(i)=54000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=15;piIntens(i)=480;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=458.0048;piEi(i)=0.94143;piEm(i)=3.6477;piGA(i)=7200000;piAcc{i}='B';pi_z(i)=0;pigk(i)=3;piIntens(i)=560;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=459.1391;piEi(i)=0.96841;piEm(i)=3.668;piGA(i)=5500000;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=490;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=460.0749;piEi(i)=1.0037;piEm(i)=3.6978;piGA(i)=18000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=7;piIntens(i)=1190;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=461.3357;piEi(i)=0.96097;piEm(i)=3.6477;piGA(i)=6600000;piAcc{i}='B';pi_z(i)=0;pigk(i)=3;piIntens(i)=590;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=461.6124;piEi(i)=0.98288;piEm(i)=3.668;piGA(i)=20000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=1360;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=462.6173;piEi(i)=0.96841;piEm(i)=3.6477;piGA(i)=15000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=3;piIntens(i)=1100;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=464.6162;piEi(i)=1.03;piEm(i)=3.6978;piGA(i)=61000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=7;piIntens(i)=2400;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=465.2157;piEi(i)=1.0037;piEm(i)=3.668;piGA(i)=29000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=1750;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=473.7347;piEi(i)=3.0869;piEm(i)=5.7033;piGA(i)=237000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=7;piIntens(i)=360;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_SAT;piquees(i)=CrI;pila(i)=520.4498;piEi(i)=0.94143;piEm(i)=3.323;piGA(i)=153000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=3;piIntens(i)=5900;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_SAT;piquees(i)=CrI;pila(i)=520.6023;piEi(i)=0.94143;piEm(i)=3.3223;piGA(i)=257000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=7100;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_SAT;piquees(i)=CrI;pila(i)=520.8409;piEi(i)=0.94143;piEm(i)=3.3212;piGA(i)=354000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=7;piIntens(i)=7800;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=1;piquees(i)=CrI;pila(i)=524.7565;piEi(i)=0.96097;piEm(i)=3.323;piGA(i)=5700000;piAcc{i}='B';pi_z(i)=0;pigk(i)=3;piIntens(i)=1250;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=526.4153;piEi(i)=0.96841;piEm(i)=3.323;piGA(i)=12000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=3;piIntens(i)=2600;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=526.5714;piEi(i)=0.96841;piEm(i)=3.3223;piGA(i)=4200000;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=1050;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=529.669;piEi(i)=0.98288;piEm(i)=3.323;piGA(i)=9300000;piAcc{i}='B';pi_z(i)=0;pigk(i)=3;piIntens(i)=2100;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=529.7376;piEi(i)=2.8995;piEm(i)=5.2394;piGA(i)=349000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=9;piIntens(i)=460;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=529.8014;piEi(i)=2.8995;piEm(i)=5.2391;piGA(i)=210000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=7;piIntens(i)=340;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=529.8271;piEi(i)=0.98288;piEm(i)=3.3223;piGA(i)=16000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=3540;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=530.0745;piEi(i)=0.98288;piEm(i)=3.3212;piGA(i)=1800000;piAcc{i}='B';pi_z(i)=0;pigk(i)=7;piIntens(i)=530;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=532.8324;piEi(i)=2.9135;piEm(i)=5.2397;piGA(i)=680000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=11;piIntens(i)=930;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrI;pila(i)=534.5796;piEi(i)=1.0037;piEm(i)=3.3223;piGA(i)=24000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=5100;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=1;piquees(i)=CrI;pila(i)=534.8314;piEi(i)=1.0037;piEm(i)=3.3212;piGA(i)=12000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=7;piIntens(i)=3200;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=DISCARDED_SAT;piquees(i)=CrI;pila(i)=540.9783;piEi(i)=1.03;piEm(i)=3.3212;piGA(i)=43000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=7;piIntens(i)=8500;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=1;piquees(i)=CrI;pila(i)=633.0091;piEi(i)=0.94143;piEm(i)=2.8995;piGA(i)=200000;piAcc{i}='D';pi_z(i)=0;pigk(i)=7;piIntens(i)=360;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=1;piquees(i)=CrI;pila(i)=697.8398;piEi(i)=3.4635;piEm(i)=5.2397;piGA(i)=190000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=11;piIntens(i)=640;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=1;piquees(i)=CrI;pila(i)=735.5891;piEi(i)=2.8895;piEm(i)=4.5745;piGA(i)=64000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=7;piIntens(i)=1400;piStark(i)=0;% auto imported from NIST ASD Intensity>=300
i=i+1;piUse(i)=1;piquees(i)=CrI;pila(i)=740.018;piEi(i)=2.8995;piEm(i)=4.5745;piGA(i)=94500000;piAcc{i}='B';pi_z(i)=0;pigk(i)=7;piIntens(i)=1900;piStark(i)=0;% auto imported from NIST ASD Intensity>=300

%CrII
i=i+1;piUse(i)=1;piquees(i)=CrII;pila(i)=205.5599;piEi(i)=0;piEm(i)=6.0296;piGA(i)=976000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=8;piIntens(i)=3200;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=1;piquees(i)=CrII;pila(i)=206.1577;piEi(i)=0;piEm(i)=6.0121;piGA(i)=714000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=6;piIntens(i)=2500;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=1;piquees(i)=CrII;pila(i)=206.5504;piEi(i)=0;piEm(i)=6.0007;piGA(i)=480000000;piAcc{i}='B+';pi_z(i)=1;pigk(i)=4;piIntens(i)=1700;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=1;piquees(i)=CrII;pila(i)=265.3581;piEi(i)=1.4918;piEm(i)=6.1628;piGA(i)=210000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=840;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=1;piquees(i)=CrII;pila(i)=265.8588;piEi(i)=1.4831;piEm(i)=6.1452;piGA(i)=230000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=950;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=266.6014;piEi(i)=1.5061;piEm(i)=6.1553;piGA(i)=470000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=8;piIntens(i)=2500;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=266.8709;piEi(i)=1.4918;piEm(i)=6.1363;piGA(i)=280000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=2;piIntens(i)=1100;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_OVERLAP;piquees(i)=CrII;pila(i)=267.1807;piEi(i)=1.5061;piEm(i)=6.1452;piGA(i)=400000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=1700;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_OVERLAP;piquees(i)=CrII;pila(i)=267.2828;piEi(i)=1.5255;piEm(i)=6.1628;piGA(i)=330000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=1200;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=274.0095;piEi(i)=1.5061;piEm(i)=6.0296;piGA(i)=88000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=8;piIntens(i)=120;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=274.4976;piEi(i)=3.7576;piEm(i)=8.2731;piGA(i)=510000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=190;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=278.7617;piEi(i)=3.8267;piEm(i)=8.2731;piGA(i)=900000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=370;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=1;piquees(i)=CrII;pila(i)=282.2368;piEi(i)=3.7681;piEm(i)=8.1597;piGA(i)=3700000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=16;piIntens(i)=1600;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=1;piquees(i)=CrII;pila(i)=283.5632;piEi(i)=1.5494;piEm(i)=5.9204;piGA(i)=2400000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=12;piIntens(i)=10000;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=1;piquees(i)=CrII;pila(i)=284.0015;piEi(i)=3.7467;piEm(i)=8.111;piGA(i)=3200000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=12;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=1;piquees(i)=CrII;pila(i)=284.3246;piEi(i)=1.5255;piEm(i)=5.8849;piGA(i)=640000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=10;piIntens(i)=7400;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=284.9835;piEi(i)=1.5061;piEm(i)=5.8554;piGA(i)=740000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=8;piIntens(i)=5800;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=285.1353;piEi(i)=3.739;piEm(i)=8.0859;piGA(i)=2200000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=10;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=285.6762;piEi(i)=2.434;piEm(i)=6.7727;piGA(i)=260000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=810;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=285.7399;piEi(i)=2.4546;piEm(i)=6.7924;piGA(i)=220000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=8;piIntens(i)=470;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=286.0931;piEi(i)=1.4831;piEm(i)=5.8155;piGA(i)=280000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=1200;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=286.2569;piEi(i)=1.5255;piEm(i)=5.8554;piGA(i)=500000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=8;piIntens(i)=2400;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=286.674;piEi(i)=1.4918;piEm(i)=5.8155;piGA(i)=480000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=2100;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=286.7094;piEi(i)=2.434;piEm(i)=6.7571;piGA(i)=440000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=1100;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=286.7647;piEi(i)=1.4831;piEm(i)=5.8054;piGA(i)=220000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=2;piIntens(i)=1500;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=287.0432;piEi(i)=2.4546;piEm(i)=6.7727;piGA(i)=780000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=1800;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=287.3814;piEi(i)=2.434;piEm(i)=6.747;piGA(i)=180000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=2;piIntens(i)=770;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=287.8447;piEi(i)=1.5494;piEm(i)=5.8554;piGA(i)=59000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=8;piIntens(i)=180;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=288.0864;piEi(i)=2.4546;piEm(i)=6.7571;piGA(i)=320000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=950;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=289.8532;piEi(i)=3.8707;piEm(i)=8.1469;piGA(i)=1400000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=12;piIntens(i)=570;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=292.1812;piEi(i)=3.8644;piEm(i)=8.1066;piGA(i)=900000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=10;piIntens(i)=290;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=293.0845;piEi(i)=3.7136;piEm(i)=7.9426;piGA(i)=440000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=160;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=293.5134;piEi(i)=3.8267;piEm(i)=8.0496;piGA(i)=1400000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=8;piIntens(i)=520;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=295.3353;piEi(i)=3.7136;piEm(i)=7.9104;piGA(i)=360000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=2;piIntens(i)=160;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=296.6041;piEi(i)=3.8707;piEm(i)=8.0496;piGA(i)=430000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=8;piIntens(i)=140;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=297.1901;piEi(i)=3.7681;piEm(i)=7.9388;piGA(i)=2800000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=14;piIntens(i)=980;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=297.9736;piEi(i)=3.7565;piEm(i)=7.9162;piGA(i)=2200000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=12;piIntens(i)=860;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=298.532;piEi(i)=3.7467;piEm(i)=7.8986;piGA(i)=2200000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=10;piIntens(i)=730;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=298.919;piEi(i)=3.739;piEm(i)=7.8855;piGA(i)=1800000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=8;piIntens(i)=650;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=1;piquees(i)=CrII;pila(i)=311.8649;piEi(i)=2.4212;piEm(i)=6.3956;piGA(i)=680000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=2600;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=1;piquees(i)=CrII;pila(i)=312.0369;piEi(i)=2.434;piEm(i)=6.4062;piGA(i)=900000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=3900;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=312.2602;piEi(i)=4.1775;piEm(i)=8.1469;piGA(i)=530000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=12;piIntens(i)=230;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=1;piquees(i)=CrII;pila(i)=312.87;piEi(i)=2.434;piEm(i)=6.3956;piGA(i)=320000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=1100;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=313.6686;piEi(i)=2.4546;piEm(i)=6.4062;piGA(i)=380000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=1300;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=455.8644;piEi(i)=4.0734;piEm(i)=6.7924;piGA(i)=70000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=8;piIntens(i)=590;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=458.8198;piEi(i)=4.0712;piEm(i)=6.7727;piGA(i)=72000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=400;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=459.2052;piEi(i)=4.0735;piEm(i)=6.7727;piGA(i)=19000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=92;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=461.8807;piEi(i)=4.0735;piEm(i)=6.7571;piGA(i)=24000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=240;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=463.4073;piEi(i)=4.0722;piEm(i)=6.747;piGA(i)=18000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=2;piIntens(i)=170;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=1;piquees(i)=CrII;pila(i)=482.4131;piEi(i)=3.8707;piEm(i)=6.4401;piGA(i)=17000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=10;piIntens(i)=290;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=484.825;piEi(i)=3.8644;piEm(i)=6.421;piGA(i)=21000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=8;piIntens(i)=180;piStark(i)=0;% auto imported from NIST ASD Intensity>=90
i=i+1;piUse(i)=DISCARDED_NOTSEEN;piquees(i)=CrII;pila(i)=523.7322;piEi(i)=4.0734;piEm(i)=6.4401;piGA(i)=17000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=10;piIntens(i)=140;piStark(i)=0;% auto imported from NIST ASD Intensity>=90

%PbI
i=i+1;piUse(i)=1;piquees(i)=PbI;pila(i)=202.2016;piEi(i)=0;piEm(i)=6.1297;piGA(i)=18000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=3;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PbI;pila(i)=205.3284;piEi(i)=0;piEm(i)=6.0364;piGA(i)=30600000;piAcc{i}='C';pi_z(i)=0;pigk(i)=3;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PbI;pila(i)=217.0005;piEi(i)=0;piEm(i)=5.7118;piGA(i)=441000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=3;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PbI;pila(i)=240.194;piEi(i)=0.96947;piEm(i)=6.1297;piGA(i)=72000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=3;piIntens(i)=320;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PbI;pila(i)=244.6181;piEi(i)=0.96947;piEm(i)=6.0364;piGA(i)=55800000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=3;piIntens(i)=160;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PbI;pila(i)=247.6378;piEi(i)=0.96947;piEm(i)=5.9746;piGA(i)=130000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=5;piIntens(i)=130;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PbI;pila(i)=257.726;piEi(i)=1.3205;piEm(i)=6.1297;piGA(i)=150000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=3;piIntens(i)=80;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PbI;pila(i)=261.3655;piEi(i)=0.96947;piEm(i)=5.7118;piGA(i)=66000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=3;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PbI;pila(i)=261.4175;piEi(i)=0.96947;piEm(i)=5.7108;piGA(i)=990000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=5;piIntens(i)=900;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PbI;pila(i)=262.8262;piEi(i)=1.3205;piEm(i)=6.0364;piGA(i)=12000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=160;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PbI;pila(i)=265.7094;piEi(i)=0.96947;piEm(i)=5.6342;piGA(i)=490000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=5;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PbI;pila(i)=266.3154;piEi(i)=1.3205;piEm(i)=5.9746;piGA(i)=340000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=5;piIntens(i)=700;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PbI;pila(i)=280.1995;piEi(i)=1.3205;piEm(i)=5.744;piGA(i)=1130000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=7;piIntens(i)=25000;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PbI;pila(i)=282.3189;piEi(i)=1.3205;piEm(i)=5.7108;piGA(i)=140000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=5;piIntens(i)=14000;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PbI;pila(i)=283.3053;piEi(i)=0;piEm(i)=4.3751;piGA(i)=150000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=3;piIntens(i)=35000;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PbI;pila(i)=287.3311;piEi(i)=1.3205;piEm(i)=5.6342;piGA(i)=190000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=5;piIntens(i)=14000;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PbI;pila(i)=357.2729;piEi(i)=2.6604;piEm(i)=6.1297;piGA(i)=300000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=3;piIntens(i)=35000;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PbI;pila(i)=363.9568;piEi(i)=0.96947;piEm(i)=4.3751;piGA(i)=96000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=3;piIntens(i)=50000;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PbI;pila(i)=367.1491;piEi(i)=2.6604;piEm(i)=6.0364;piGA(i)=93000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=3;piIntens(i)=20000;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PbI;pila(i)=368.3462;piEi(i)=0.96947;piEm(i)=4.3345;piGA(i)=137000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=1;piIntens(i)=70000;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PbI;pila(i)=373.9935;piEi(i)=2.6604;piEm(i)=5.9746;piGA(i)=360000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=5;piIntens(i)=25000;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PbI;pila(i)=401.9632;piEi(i)=2.6604;piEm(i)=5.744;piGA(i)=24000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=7;piIntens(i)=15000;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PbI;pila(i)=405.7807;piEi(i)=1.3205;piEm(i)=4.3751;piGA(i)=270000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=3;piIntens(i)=95000;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PbI;pila(i)=406.2136;piEi(i)=2.6604;piEm(i)=5.7118;piGA(i)=280000000;piAcc{i}='B';pi_z(i)=0;pigk(i)=3;piIntens(i)=14000;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PbI;pila(i)=416.8033;piEi(i)=2.6604;piEm(i)=5.6342;piGA(i)=6000000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=5;piIntens(i)=10000;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PbI;pila(i)=500.5416;piEi(i)=3.6534;piEm(i)=6.1297;piGA(i)=81000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=3;piIntens(i)=1000;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PbI;pila(i)=520.1437;piEi(i)=3.6534;piEm(i)=6.0364;piGA(i)=42000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=3;piIntens(i)=2000;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PbI;pila(i)=722.8965;piEi(i)=2.6604;piEm(i)=4.3751;piGA(i)=2600000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=3;piIntens(i)=20000;piStark(i)=0;% auto imported from NIST ASD Intensity>=1

%PbII
i=i+1;piUse(i)=1;piquees(i)=PbII;pila(i)=182.205;piEi(i)=1.7458;piEm(i)=8.5505;piGA(i)=7080000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PbII;pila(i)=220.3534;piEi(i)=1.7458;piEm(i)=7.3707;piGA(i)=988000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=2;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1

%LiI
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=239.439;piEi(i)=0;piEm(i)=5.1765;piGA(i)=532800;piAcc{i}='AA';pi_z(i)=0;pigk(i)=2;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=239.439;piEi(i)=0;piEm(i)=5.1765;piGA(i)=1066000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=4;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=242.543;piEi(i)=0;piEm(i)=5.1103;piGA(i)=1530000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=4;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=242.543;piEi(i)=0;piEm(i)=5.1103;piGA(i)=764400;piAcc{i}='AA';pi_z(i)=0;pigk(i)=2;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=247.506;piEi(i)=0;piEm(i)=5.0078;piGA(i)=2294000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=4;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=247.506;piEi(i)=0;piEm(i)=5.0078;piGA(i)=1147000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=2;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=256.231;piEi(i)=0;piEm(i)=4.8373;piGA(i)=1800000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=2;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=256.231;piEi(i)=0;piEm(i)=4.8373;piGA(i)=3520000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=4;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=274.12;piEi(i)=0;piEm(i)=4.5216;piGA(i)=4988000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=4;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=274.12;piEi(i)=0;piEm(i)=4.5216;piGA(i)=2496000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=2;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=323.266;piEi(i)=0;piEm(i)=3.8343;piGA(i)=4008000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=4;piIntens(i)=17;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=323.266;piEi(i)=0;piEm(i)=3.8343;piGA(i)=2004000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=2;piIntens(i)=17;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=371.87;piEi(i)=1.8478;piEm(i)=5.179;piGA(i)=8044000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=4;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=371.87;piEi(i)=1.8479;piEm(i)=5.179;piGA(i)=14480000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=6;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=371.87;piEi(i)=1.8479;piEm(i)=5.179;piGA(i)=1609000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=4;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=379.472;piEi(i)=1.8478;piEm(i)=5.1139;piGA(i)=12160000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=4;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=379.472;piEi(i)=1.8479;piEm(i)=5.1139;piGA(i)=2433000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=4;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=379.472;piEi(i)=1.8479;piEm(i)=5.1139;piGA(i)=21890000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=6;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=DISCARDED_OVERLAP;piquees(i)=LiI;pila(i)=391.53;piEi(i)=1.8478;piEm(i)=5.0136;piGA(i)=19860000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=4;piIntens(i)=20;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=DISCARDED_OVERLAP;piquees(i)=LiI;pila(i)=391.535;piEi(i)=1.8479;piEm(i)=5.0136;piGA(i)=35750000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=6;piIntens(i)=20;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=391.535;piEi(i)=1.8479;piEm(i)=5.0136;piGA(i)=3970000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=4;piIntens(i)=20;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=398.548;piEi(i)=1.8478;piEm(i)=4.9578;piGA(i)=1720000;piAcc{i}='A';pi_z(i)=0;pigk(i)=2;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=398.554;piEi(i)=1.8479;piEm(i)=4.9578;piGA(i)=3460000;piAcc{i}='A';pi_z(i)=0;pigk(i)=2;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=413.256;piEi(i)=1.8478;piEm(i)=4.8472;piGA(i)=36200000;piAcc{i}='A';pi_z(i)=0;pigk(i)=4;piIntens(i)=40;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=413.262;piEi(i)=1.8479;piEm(i)=4.8472;piGA(i)=65400000;piAcc{i}='A';pi_z(i)=0;pigk(i)=6;piIntens(i)=40;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=413.262;piEi(i)=1.8479;piEm(i)=4.8472;piGA(i)=7240000;piAcc{i}='A';pi_z(i)=0;pigk(i)=4;piIntens(i)=40;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=DISCARDED_SAT;piquees(i)=LiI;pila(i)=427.307;piEi(i)=1.8478;piEm(i)=4.7485;piGA(i)=3160000;piAcc{i}='A';pi_z(i)=0;pigk(i)=2;piIntens(i)=20;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=DISCARDED_SAT;piquees(i)=LiI;pila(i)=427.313;piEi(i)=1.8479;piEm(i)=4.7485;piGA(i)=6340000;piAcc{i}='A';pi_z(i)=0;pigk(i)=2;piIntens(i)=20;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=460.283;piEi(i)=1.8478;piEm(i)=4.5407;piGA(i)=77400000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=4;piIntens(i)=13;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=460.289;piEi(i)=1.8479;piEm(i)=4.5407;piGA(i)=139300000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=6;piIntens(i)=13;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=460.289;piEi(i)=1.8479;piEm(i)=4.5407;piGA(i)=15480000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=4;piIntens(i)=13;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=497.166;piEi(i)=1.8478;piEm(i)=4.3409;piGA(i)=6920000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=2;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=497.175;piEi(i)=1.8479;piEm(i)=4.3409;piGA(i)=13840000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=2;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=610.354;piEi(i)=1.8478;piEm(i)=3.8786;piGA(i)=228550000;piAcc{i}='AAA';pi_z(i)=0;pigk(i)=4;piIntens(i)=320;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=610.365;piEi(i)=1.8479;piEm(i)=3.8786;piGA(i)=45708000;piAcc{i}='AAA';pi_z(i)=0;pigk(i)=4;piIntens(i)=320;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=670.776;piEi(i)=0;piEm(i)=1.8479;piGA(i)=147560000;piAcc{i}='AAA';pi_z(i)=0;pigk(i)=4;piIntens(i)=3600;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=670.791;piEi(i)=0;piEm(i)=1.8478;piGA(i)=73780000;piAcc{i}='AAA';pi_z(i)=0;pigk(i)=2;piIntens(i)=3600;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=812.623;piEi(i)=1.8478;piEm(i)=3.3731;piGA(i)=22312000;piAcc{i}='AAA';pi_z(i)=0;pigk(i)=2;piIntens(i)=48;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiI;pila(i)=812.645;piEi(i)=1.8479;piEm(i)=3.3731;piGA(i)=44618000;piAcc{i}='AAA';pi_z(i)=0;pigk(i)=2;piIntens(i)=48;piStark(i)=0;% auto imported from NIST ASD Intensity>=1

%LiII
i=i+1;piUse(i)=DISCARDED_FIT;piquees(i)=LiII;pila(i)=255.17;piEi(i)=69.6485;piEm(i)=74.5058;piGA(i)=8487200;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=1;piIntens(i)=24;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiII;pila(i)=265.729;piEi(i)=69.3692;piEm(i)=74.0337;piGA(i)=17415000;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=3;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiII;pila(i)=265.73;piEi(i)=69.3693;piEm(i)=74.0337;piGA(i)=29027000;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=3;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiII;pila(i)=272.829;piEi(i)=69.5854;piEm(i)=74.1283;piGA(i)=22019000;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=7;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiII;pila(i)=272.829;piEi(i)=69.5854;piEm(i)=74.1283;piGA(i)=311430000;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=9;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiII;pila(i)=272.829;piEi(i)=69.5854;piEm(i)=74.1283;piGA(i)=769000;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=5;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiII;pila(i)=272.832;piEi(i)=69.5854;piEm(i)=74.1283;piGA(i)=145330000;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=5;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiII;pila(i)=273.047;piEi(i)=69.5891;piEm(i)=74.1285;piGA(i)=200570000;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=7;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiII;pila(i)=273.055;piEi(i)=69.5891;piEm(i)=74.1283;piGA(i)=40570000;piAcc{i}='AA';pi_z(i)=1;pigk(i)=7;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiII;pila(i)=302.912;piEi(i)=69.3692;piEm(i)=73.4611;piGA(i)=69666000;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=3;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiII;pila(i)=302.912;piEi(i)=69.3693;piEm(i)=73.4612;piGA(i)=390120000;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=7;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiII;pila(i)=302.914;piEi(i)=69.3693;piEm(i)=73.4611;piGA(i)=69660000;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=5;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiII;pila(i)=315.531;piEi(i)=69.3692;piEm(i)=73.2975;piGA(i)=32127000;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=3;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiII;pila(i)=315.533;piEi(i)=69.3693;piEm(i)=73.2975;piGA(i)=53550000;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=3;piIntens(i)=4;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiII;pila(i)=319.626;piEi(i)=69.5853;piEm(i)=73.4631;piGA(i)=363320000;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=7;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiII;pila(i)=319.626;piEi(i)=69.5853;piEm(i)=73.4631;piGA(i)=56870000;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=5;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiII;pila(i)=319.633;piEi(i)=69.5854;piEm(i)=73.4631;piGA(i)=44480000;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=7;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiII;pila(i)=319.633;piEi(i)=69.5854;piEm(i)=73.4631;piGA(i)=658300000;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=9;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiII;pila(i)=319.633;piEi(i)=69.5854;piEm(i)=73.4631;piGA(i)=1625400;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=5;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiII;pila(i)=319.636;piEi(i)=69.5854;piEm(i)=73.4631;piGA(i)=307220000;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=5;piIntens(i)=4;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiII;pila(i)=319.933;piEi(i)=69.5891;piEm(i)=73.4633;piGA(i)=406390000;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=7;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiII;pila(i)=319.943;piEi(i)=69.5891;piEm(i)=73.4631;piGA(i)=103800000;piAcc{i}='AA';pi_z(i)=1;pigk(i)=7;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=DISCARDED_SAT;piquees(i)=LiII;pila(i)=432.542;piEi(i)=69.3692;piEm(i)=72.2348;piGA(i)=134530000;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=3;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=DISCARDED_OVERLAP;piquees(i)=LiII;pila(i)=432.542;piEi(i)=69.3693;piEm(i)=72.2349;piGA(i)=753340000;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=7;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=DISCARDED_OVERLAP;piquees(i)=LiII;pila(i)=432.547;piEi(i)=69.3693;piEm(i)=72.2349;piGA(i)=134500000;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=5;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=DISCARDED_SAT;piquees(i)=LiII;pila(i)=432.554;piEi(i)=69.3693;piEm(i)=72.2348;piGA(i)=8968800;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=3;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiII;pila(i)=467.165;piEi(i)=69.5854;piEm(i)=72.2385;piGA(i)=121280000;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=7;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiII;pila(i)=467.165;piEi(i)=69.5854;piEm(i)=72.2385;piGA(i)=1992000000;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=9;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiII;pila(i)=467.165;piEi(i)=69.5854;piEm(i)=72.2385;piGA(i)=4918300;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=5;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiII;pila(i)=467.17;piEi(i)=69.5854;piEm(i)=72.2385;piGA(i)=929600000;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=5;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiII;pila(i)=467.806;piEi(i)=69.5891;piEm(i)=72.2387;piGA(i)=1115200000;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=7;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiII;pila(i)=467.829;piEi(i)=69.5891;piEm(i)=72.2385;piGA(i)=432000000;piAcc{i}='AA';pi_z(i)=1;pigk(i)=7;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=DISCARDED_OVERLAP;piquees(i)=LiII;pila(i)=488.132;piEi(i)=69.3692;piEm(i)=71.9085;piGA(i)=71349000;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=3;piIntens(i)=4;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=DISCARDED_OVERLAP;piquees(i)=LiII;pila(i)=488.139;piEi(i)=69.3693;piEm(i)=71.9085;piGA(i)=118930000;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=3;piIntens(i)=4;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=DISCARDED_FIT;piquees(i)=LiII;pila(i)=488.149;piEi(i)=69.3694;piEm(i)=71.9085;piGA(i)=23788000;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=3;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiII;pila(i)=548.355;piEi(i)=59.0208;piEm(i)=61.2812;piGA(i)=22726000;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=1;piIntens(i)=600;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=LiII;pila(i)=548.565;piEi(i)=59.0208;piEm(i)=61.2806;piGA(i)=68160000;piAcc{i}='AAA';pi_z(i)=1;pigk(i)=3;piIntens(i)=600;piStark(i)=0;% auto imported from NIST ASD Intensity>=1


%PI
i=i+1;piUse(i)=1;piquees(i)=PI;pila(i)=185.8886;piEi(i)=1.4086;piEm(i)=8.0785;piGA(i)=139000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=6;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PI;pila(i)=185.9393;piEi(i)=1.4105;piEm(i)=8.0785;piGA(i)=1580000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=6;piIntens(i)=400;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PI;pila(i)=213.5465;piEi(i)=1.4086;piEm(i)=7.2127;piGA(i)=84400000;piAcc{i}='C';pi_z(i)=0;pigk(i)=4;piIntens(i)=400;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PI;pila(i)=213.6182;piEi(i)=1.4105;piEm(i)=7.2127;piGA(i)=1130000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=4;piIntens(i)=400;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PI;pila(i)=214.9145;piEi(i)=1.4086;piEm(i)=7.1758;piGA(i)=636000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=2;piIntens(i)=400;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PI;pila(i)=215.294;piEi(i)=2.3213;piEm(i)=8.0783;piGA(i)=194000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=4;piIntens(i)=280;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PI;pila(i)=215.408;piEi(i)=2.3245;piEm(i)=8.0785;piGA(i)=350000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=6;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PI;pila(i)=223.5732;piEi(i)=1.4105;piEm(i)=6.9544;piGA(i)=2500000;piAcc{i}='E';pi_z(i)=0;pigk(i)=4;piIntens(i)=180;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PI;pila(i)=253.3976;piEi(i)=2.3213;piEm(i)=7.2127;piGA(i)=80000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=4;piIntens(i)=750;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PI;pila(i)=253.5603;piEi(i)=2.3245;piEm(i)=7.2127;piGA(i)=380000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=4;piIntens(i)=950;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PI;pila(i)=255.3262;piEi(i)=2.3213;piEm(i)=7.1758;piGA(i)=140000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=2;piIntens(i)=750;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PI;pila(i)=255.4915;piEi(i)=2.3245;piEm(i)=7.1758;piGA(i)=60000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=2;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PI;pila(i)=507.9381;piEi(i)=6.9852;piEm(i)=9.4255;piGA(i)=12000000;piAcc{i}='E';pi_z(i)=0;pigk(i)=4;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PI;pila(i)=509.8221;piEi(i)=6.9544;piEm(i)=9.3856;piGA(i)=5800000;piAcc{i}='E';pi_z(i)=0;pigk(i)=2;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PI;pila(i)=510.0974;piEi(i)=6.9544;piEm(i)=9.3843;piGA(i)=1800000;piAcc{i}='E';pi_z(i)=0;pigk(i)=4;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PI;pila(i)=510.9628;piEi(i)=6.9852;piEm(i)=9.411;piGA(i)=20000000;piAcc{i}='E';pi_z(i)=0;pigk(i)=6;piIntens(i)=140;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PI;pila(i)=515.4844;piEi(i)=6.9544;piEm(i)=9.3589;piGA(i)=9000000;piAcc{i}='E';pi_z(i)=0;pigk(i)=6;piIntens(i)=140;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PI;pila(i)=529.3539;piEi(i)=7.1758;piEm(i)=9.5173;piGA(i)=12000000;piAcc{i}='E';pi_z(i)=0;pigk(i)=2;piIntens(i)=140;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PI;pila(i)=534.5851;piEi(i)=7.2127;piEm(i)=9.5313;piGA(i)=29000000;piAcc{i}='E';pi_z(i)=0;pigk(i)=4;piIntens(i)=180;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PI;pila(i)=545.8305;piEi(i)=7.1758;piEm(i)=9.4466;piGA(i)=15000000;piAcc{i}='E';pi_z(i)=0;pigk(i)=4;piIntens(i)=140;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PI;pila(i)=547.7672;piEi(i)=7.2127;piEm(i)=9.4755;piGA(i)=34000000;piAcc{i}='E';pi_z(i)=0;pigk(i)=6;piIntens(i)=180;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PI;pila(i)=671.7411;piEi(i)=7.9647;piEm(i)=9.8099;piGA(i)=20000000;piAcc{i}='E';pi_z(i)=0;pigk(i)=4;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PI;pila(i)=715.8367;piEi(i)=8.1053;piEm(i)=9.8368;piGA(i)=20000000;piAcc{i}='E';pi_z(i)=0;pigk(i)=4;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PI;pila(i)=716.5465;piEi(i)=8.1148;piEm(i)=9.8446;piGA(i)=30000000;piAcc{i}='E';pi_z(i)=0;pigk(i)=6;piIntens(i)=180;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PI;pila(i)=717.666;piEi(i)=8.1315;piEm(i)=9.8586;piGA(i)=38000000;piAcc{i}='E';pi_z(i)=0;pigk(i)=8;piIntens(i)=180;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PI;pila(i)=863.7578;piEi(i)=7.9647;piEm(i)=9.3997;piGA(i)=16000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=2;piIntens(i)=180;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PI;pila(i)=874.1529;piEi(i)=7.9647;piEm(i)=9.3826;piGA(i)=36000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=4;piIntens(i)=400;piStark(i)=0;% auto imported from NIST ASD Intensity>=1


%PII
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=438.535;piEi(i)=12.6012;piEm(i)=15.4276;piGA(i)=120000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=3;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=442.071;piEi(i)=11.0214;piEm(i)=13.8252;piGA(i)=160000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=1;piIntens(i)=400;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=447.526;piEi(i)=13.0865;piEm(i)=15.8561;piGA(i)=910000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=7;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=449.924;piEi(i)=13.3807;piEm(i)=16.1356;piGA(i)=980000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=7;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=453.081;piEi(i)=13.0558;piEm(i)=15.7915;piGA(i)=90000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=5;piIntens(i)=120;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=455.807;piEi(i)=13.1425;piEm(i)=15.8618;piGA(i)=290000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=3;piIntens(i)=120;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=458.804;piEi(i)=12.8124;piEm(i)=15.514;piGA(i)=1200000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=7;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=458.986;piEi(i)=12.7909;piEm(i)=15.4914;piGA(i)=800000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=5;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=460.208;piEi(i)=12.8532;piEm(i)=15.5465;piGA(i)=1700000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=9;piIntens(i)=600;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=462.67;piEi(i)=12.8124;piEm(i)=15.4914;piGA(i)=150000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=5;piIntens(i)=300;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=465.831;piEi(i)=12.8532;piEm(i)=15.514;piGA(i)=150000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=7;piIntens(i)=300;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=486.442;piEi(i)=12.8124;piEm(i)=15.3605;piGA(i)=55000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=5;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=492.72;piEi(i)=12.7909;piEm(i)=15.3065;piGA(i)=57000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=3;piIntens(i)=150;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=494.353;piEi(i)=12.8532;piEm(i)=15.3605;piGA(i)=320000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=5;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=495.439;piEi(i)=12.7909;piEm(i)=15.2927;piGA(i)=78000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=1;piIntens(i)=300;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=496.971;piEi(i)=12.8124;piEm(i)=15.3065;piGA(i)=170000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=3;piIntens(i)=300;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=519.141;piEi(i)=10.7549;piEm(i)=13.1425;piGA(i)=100000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=3;piIntens(i)=150;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=525.352;piEi(i)=11.0214;piEm(i)=13.3807;piGA(i)=500000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=5;piIntens(i)=300;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=529.613;piEi(i)=10.8021;piEm(i)=13.1425;piGA(i)=160000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=3;piIntens(i)=400;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=531.607;piEi(i)=10.7549;piEm(i)=13.0865;piGA(i)=120000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=5;piIntens(i)=250;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=534.475;piEi(i)=10.7367;piEm(i)=13.0558;piGA(i)=96000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=3;piIntens(i)=300;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=537.82;piEi(i)=13.0558;piEm(i)=15.3605;piGA(i)=55000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=5;piIntens(i)=250;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=538.688;piEi(i)=10.7549;piEm(i)=13.0558;piGA(i)=69000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=3;piIntens(i)=300;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=540.972;piEi(i)=10.7549;piEm(i)=13.0461;piGA(i)=93000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=1;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=542.591;piEi(i)=10.8021;piEm(i)=13.0865;piGA(i)=340000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=5;piIntens(i)=400;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=545.074;piEi(i)=13.0865;piEm(i)=15.3605;piGA(i)=160000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=5;piIntens(i)=400;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=548.355;piEi(i)=13.0461;piEm(i)=15.3065;piGA(i)=45000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=3;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=549.973;piEi(i)=10.8021;piEm(i)=13.0558;piGA(i)=110000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=3;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=550.719;piEi(i)=13.0558;piEm(i)=15.3065;piGA(i)=33000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=3;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=554.114;piEi(i)=13.0558;piEm(i)=15.2927;piGA(i)=45000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=1;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=558.327;piEi(i)=13.0865;piEm(i)=15.3065;piGA(i)=57000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=3;piIntens(i)=200;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=558.834;piEi(i)=13.1425;piEm(i)=15.3605;piGA(i)=75000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=5;piIntens(i)=250;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=572.771;piEi(i)=13.1425;piEm(i)=15.3065;piGA(i)=45000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=3;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=602.418;piEi(i)=10.7549;piEm(i)=12.8124;piGA(i)=260000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=5;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=603.404;piEi(i)=10.7367;piEm(i)=12.7909;piGA(i)=110000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=3;piIntens(i)=400;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=604.312;piEi(i)=10.8021;piEm(i)=12.8532;piGA(i)=480000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=7;piIntens(i)=500;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=605.55;piEi(i)=13.3807;piEm(i)=15.4276;piGA(i)=210000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=3;piIntens(i)=250;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=608.782;piEi(i)=10.7549;piEm(i)=12.7909;piGA(i)=81000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=3;piIntens(i)=350;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=616.559;piEi(i)=10.8021;piEm(i)=12.8124;piGA(i)=80000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=5;piIntens(i)=350;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=623.229;piEi(i)=10.8021;piEm(i)=12.7909;piGA(i)=5100000;piAcc{i}='E';pi_z(i)=1;pigk(i)=3;piIntens(i)=100;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=PII;pila(i)=784.563;piEi(i)=11.0214;piEm(i)=12.6012;piGA(i)=99000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=3;piIntens(i)=250;piStark(i)=0;% auto imported from NIST ASD Intensity>=1

%SI
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=180.7311;piEi(i)=0;piEm(i)=6.8601;piGA(i)=981000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=3;piIntens(i)=20000;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=182.0343;piEi(i)=0.049105;piEm(i)=6.8601;piGA(i)=513000000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=3;piIntens(i)=17500;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=182.6245;piEi(i)=0.071122;piEm(i)=6.8601;piGA(i)=169000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=3;piIntens(i)=15000;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=190.0286;piEi(i)=0;piEm(i)=6.5245;piGA(i)=354000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=5;piIntens(i)=20000;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=191.4698;piEi(i)=0.049105;piEm(i)=6.5245;piGA(i)=107000;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=10000;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=403.401;piEi(i)=6.8601;piEm(i)=9.9327;piGA(i)=5300000;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=415.037;piEi(i)=6.8601;piEm(i)=9.8466;piGA(i)=1440000;piAcc{i}='E';pi_z(i)=0;pigk(i)=1;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=415.2604;piEi(i)=6.8601;piEm(i)=9.845;piGA(i)=4440000;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=415.7699;piEi(i)=6.8601;piEm(i)=9.8413;piGA(i)=7950000;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=25;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=458.9261;piEi(i)=0.049105;piEm(i)=2.75;piGA(i)=0.298;piAcc{i}='D';pi_z(i)=0;pigk(i)=1;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=469.413;piEi(i)=6.5245;piEm(i)=9.165;piGA(i)=5860000;piAcc{i}='D';pi_z(i)=0;pigk(i)=7;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=469.545;piEi(i)=6.5245;piEm(i)=9.1643;piGA(i)=4070000;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=469.625;piEi(i)=6.5245;piEm(i)=9.1638;piGA(i)=2400000;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=527.81;piEi(i)=6.8601;piEm(i)=9.2085;piGA(i)=433000;piAcc{i}='E';pi_z(i)=0;pigk(i)=1;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=527.87;piEi(i)=6.8601;piEm(i)=9.2083;piGA(i)=1280000;piAcc{i}='E';pi_z(i)=0;pigk(i)=3;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=527.899;piEi(i)=6.8601;piEm(i)=9.2081;piGA(i)=2120000;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=538.102;piEi(i)=7.8699;piEm(i)=10.1734;piGA(i)=11100000;piAcc{i}='D';pi_z(i)=0;pigk(i)=9;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=544.441;piEi(i)=7.8677;piEm(i)=10.1443;piGA(i)=1350000;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=544.982;piEi(i)=7.8699;piEm(i)=10.1443;piGA(i)=1880000;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=550.701;piEi(i)=7.8699;piEm(i)=10.1207;piGA(i)=16000000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=9;piIntens(i)=4;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=560.524;piEi(i)=7.8663;piEm(i)=10.0776;piGA(i)=1220000;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=560.869;piEi(i)=7.8677;piEm(i)=10.0776;piGA(i)=2040000;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=561.439;piEi(i)=7.8699;piEm(i)=10.0776;piGA(i)=2840000;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=570.611;piEi(i)=7.8699;piEm(i)=10.0421;piGA(i)=24200000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=9;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=587.963;piEi(i)=7.8663;piEm(i)=9.9744;piGA(i)=1960000;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=588.349;piEi(i)=7.8677;piEm(i)=9.9744;piGA(i)=3260000;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=588.975;piEi(i)=7.8699;piEm(i)=9.9744;piGA(i)=4560000;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=595.911;piEi(i)=8.0452;piEm(i)=10.1252;piGA(i)=4000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=595.911;piEi(i)=8.0455;piEm(i)=10.1255;piGA(i)=1770000;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=596.119;piEi(i)=8.0457;piEm(i)=10.1249;piGA(i)=7420000;piAcc{i}='D';pi_z(i)=0;pigk(i)=7;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=604.193;piEi(i)=7.8663;piEm(i)=9.9178;piGA(i)=7550000;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=604.604;piEi(i)=7.8677;piEm(i)=9.9178;piGA(i)=20100000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=7;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=605.266;piEi(i)=7.8699;piEm(i)=9.9178;piGA(i)=38700000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=9;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=617.277;piEi(i)=8.0452;piEm(i)=10.0532;piGA(i)=1880000;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=617.361;piEi(i)=8.0452;piEm(i)=10.0529;piGA(i)=5650000;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=617.497;piEi(i)=8.0457;piEm(i)=10.0529;piGA(i)=1880000;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=617.582;piEi(i)=8.0457;piEm(i)=10.0527;piGA(i)=10500000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=7;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=639.517;piEi(i)=8.0452;piEm(i)=9.9834;piGA(i)=1570000;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=639.608;piEi(i)=8.0455;piEm(i)=9.9834;piGA(i)=525000;piAcc{i}='E';pi_z(i)=0;pigk(i)=3;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=639.664;piEi(i)=8.0457;piEm(i)=9.9834;piGA(i)=2610000;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=640.358;piEi(i)=7.8663;piEm(i)=9.8019;piGA(i)=3460000;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=640.813;piEi(i)=7.8677;piEm(i)=9.8019;piGA(i)=5750000;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=641.55;piEi(i)=7.8699;piEm(i)=9.8019;piGA(i)=8050000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=5;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=653.561;piEi(i)=8.0452;piEm(i)=9.9417;piGA(i)=2610000;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=653.641;piEi(i)=8.0452;piEm(i)=9.9415;piGA(i)=7800000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=5;piIntens(i)=4;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=653.667;piEi(i)=8.0455;piEm(i)=9.9417;piGA(i)=3480000;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=653.796;piEi(i)=8.0457;piEm(i)=9.9415;piGA(i)=2600000;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=653.857;piEi(i)=8.0457;piEm(i)=9.9413;piGA(i)=14600000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=7;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=674.358;piEi(i)=7.8663;piEm(i)=9.7044;piGA(i)=12600000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=5;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=674.879;piEi(i)=7.8677;piEm(i)=9.7043;piGA(i)=33700000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=7;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=675.716;piEi(i)=7.8699;piEm(i)=9.7043;piGA(i)=65000000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=9;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=699.279;piEi(i)=8.0452;piEm(i)=9.8177;piGA(i)=2800000;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=699.399;piEi(i)=8.0455;piEm(i)=9.8177;piGA(i)=933000;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=699.458;piEi(i)=8.0457;piEm(i)=9.8177;piGA(i)=4650000;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=4;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=716.143;piEi(i)=8.4158;piEm(i)=10.1466;piGA(i)=208000;piAcc{i}='E';pi_z(i)=0;pigk(i)=7;piIntens(i)=4;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=716.143;piEi(i)=8.4158;piEm(i)=10.1466;piGA(i)=22900000;piAcc{i}='D';pi_z(i)=0;pigk(i)=11;piIntens(i)=4;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=716.143;piEi(i)=8.4158;piEm(i)=10.1466;piGA(i)=3110000;piAcc{i}='E';pi_z(i)=0;pigk(i)=9;piIntens(i)=4;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=744.335;piEi(i)=8.4158;piEm(i)=10.081;piGA(i)=312000;piAcc{i}='E';pi_z(i)=0;pigk(i)=7;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=744.335;piEi(i)=8.4158;piEm(i)=10.081;piGA(i)=34300000;piAcc{i}='D';pi_z(i)=0;pigk(i)=11;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=744.335;piEi(i)=8.4158;piEm(i)=10.081;piGA(i)=4670000;piAcc{i}='E';pi_z(i)=0;pigk(i)=9;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=744.697;piEi(i)=8.4166;piEm(i)=10.081;piGA(i)=4350000;piAcc{i}='E';pi_z(i)=0;pigk(i)=3;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=767.961;piEi(i)=7.8663;piEm(i)=9.4803;piGA(i)=6000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=768.611;piEi(i)=7.8677;piEm(i)=9.4803;piGA(i)=10000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=769.672;piEi(i)=7.8699;piEm(i)=9.4803;piGA(i)=14000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=772.5046;piEi(i)=1.1454;piEm(i)=2.75;piGA(i)=1.38;piAcc{i}='B';pi_z(i)=0;pigk(i)=1;piIntens(i)=26;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=792.39;piEi(i)=8.4158;piEm(i)=9.98;piGA(i)=498000;piAcc{i}='E';pi_z(i)=0;pigk(i)=7;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=792.39;piEi(i)=8.4158;piEm(i)=9.98;piGA(i)=54800000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=11;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=792.39;piEi(i)=8.4158;piEm(i)=9.98;piGA(i)=7470000;piAcc{i}='D';pi_z(i)=0;pigk(i)=9;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=792.798;piEi(i)=8.4166;piEm(i)=9.98;piGA(i)=6960000;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=844.956;piEi(i)=8.0452;piEm(i)=9.5121;piGA(i)=5100000;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=845.134;piEi(i)=8.0455;piEm(i)=9.5121;piGA(i)=1700000;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=845.216;piEi(i)=8.0457;piEm(i)=9.5121;piGA(i)=8400000;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=861.715;piEi(i)=8.4082;piEm(i)=9.8466;piGA(i)=15500000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=1;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=862.663;piEi(i)=8.4082;piEm(i)=9.845;piGA(i)=11400000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=3;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=863.323;piEi(i)=8.4093;piEm(i)=9.845;piGA(i)=33900000;piAcc{i}='C';pi_z(i)=0;pigk(i)=3;piIntens(i)=4;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=864.852;piEi(i)=8.4082;piEm(i)=9.8413;piGA(i)=695000;piAcc{i}='D';pi_z(i)=0;pigk(i)=5;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=865.519;piEi(i)=8.4093;piEm(i)=9.8413;piGA(i)=10800000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=5;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=866.849;piEi(i)=8.4114;piEm(i)=9.8413;piGA(i)=60000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=5;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=867.022;piEi(i)=7.8663;piEm(i)=9.2959;piGA(i)=11000000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=1;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=867.065;piEi(i)=7.8663;piEm(i)=9.2958;piGA(i)=24700000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=3;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=867.136;piEi(i)=7.8663;piEm(i)=9.2957;piGA(i)=19200000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=5;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=867.9;piEi(i)=7.8677;piEm(i)=9.2958;piGA(i)=8250000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=3;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=867.965;piEi(i)=7.8677;piEm(i)=9.2957;piGA(i)=32000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=5;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=868.046;piEi(i)=7.8677;piEm(i)=9.2956;piGA(i)=51400000;piAcc{i}='C';pi_z(i)=0;pigk(i)=7;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=869.324;piEi(i)=7.8699;piEm(i)=9.2957;piGA(i)=3680000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=5;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=869.4;piEi(i)=7.8699;piEm(i)=9.2956;piGA(i)=25800000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=7;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=869.471;piEi(i)=7.8699;piEm(i)=9.2955;piGA(i)=99000000;piAcc{i}='C';pi_z(i)=0;pigk(i)=9;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=887.453;piEi(i)=8.4158;piEm(i)=9.8125;piGA(i)=95400000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=11;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=887.453;piEi(i)=8.4158;piEm(i)=9.8125;piGA(i)=13000000;piAcc{i}='D';pi_z(i)=0;pigk(i)=9;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=887.453;piEi(i)=8.4158;piEm(i)=9.8125;piGA(i)=868000;piAcc{i}='E';pi_z(i)=0;pigk(i)=7;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SI;pila(i)=887.962;piEi(i)=8.4166;piEm(i)=9.8125;piGA(i)=12100000;piAcc{i}='D';pi_z(i)=0;pigk(i)=3;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1


%SII
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=193.0819;piEi(i)=9.8438;piEm(i)=16.2651;piGA(i)=4190000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=193.6731;piEi(i)=9.8438;piEm(i)=16.2455;piGA(i)=102000000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=4;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=194.4379;piEi(i)=9.8886;piEm(i)=16.2651;piGA(i)=1780000;piAcc{i}='E';pi_z(i)=1;pigk(i)=6;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=195.0378;piEi(i)=9.8886;piEm(i)=16.2455;piGA(i)=102000000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=4;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=195.1379;piEi(i)=9.8438;piEm(i)=16.1974;piGA(i)=1820000;piAcc{i}='E';pi_z(i)=1;pigk(i)=4;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=195.8239;piEi(i)=9.9141;piEm(i)=16.2455;piGA(i)=62800000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=4;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=197.0878;piEi(i)=9.8438;piEm(i)=16.1346;piGA(i)=102000000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=6;piIntens(i)=11;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=198.1662;piEi(i)=9.8438;piEm(i)=16.1004;piGA(i)=77200000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=4;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=198.5025;piEi(i)=9.8886;piEm(i)=16.1346;piGA(i)=43900000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=6;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=199.596;piEi(i)=9.8886;piEm(i)=16.1004;piGA(i)=2820000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=199.8765;piEi(i)=9.8886;piEm(i)=16.0916;piGA(i)=40800000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=2;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=200.354;piEi(i)=9.9141;piEm(i)=16.1004;piGA(i)=24500000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=200.6367;piEi(i)=9.9141;piEm(i)=16.0916;piGA(i)=8180000;piAcc{i}='D';pi_z(i)=1;pigk(i)=2;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=218.5932;piEi(i)=12.1369;piEm(i)=17.8071;piGA(i)=11100000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=218.7264;piEi(i)=12.1404;piEm(i)=17.8071;piGA(i)=142000000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=4;piIntens(i)=11;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=219.2372;piEi(i)=12.1369;piEm(i)=17.7904;piGA(i)=78000000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=2;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=233.2493;piEi(i)=12.1369;piEm(i)=17.4508;piGA(i)=96800000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=4;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=233.4037;piEi(i)=12.1404;piEm(i)=17.4508;piGA(i)=5360000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=233.4746;piEi(i)=12.1369;piEm(i)=17.4457;piGA(i)=13300000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=233.627;piEi(i)=12.1404;piEm(i)=17.4457;piGA(i)=136000000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=6;piIntens(i)=12;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=235.7751;piEi(i)=12.1404;piEm(i)=17.3974;piGA(i)=36400000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=8;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=236.1151;piEi(i)=12.1369;piEm(i)=17.3863;piGA(i)=23200000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=6;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=236.2727;piEi(i)=12.1404;piEm(i)=17.3863;piGA(i)=4550000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=262.911;piEi(i)=13.0926;piEm(i)=17.8071;piGA(i)=4840000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=266.023;piEi(i)=13.1478;piEm(i)=17.8071;piGA(i)=628000;piAcc{i}='E';pi_z(i)=1;pigk(i)=4;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=266.9812;piEi(i)=13.1478;piEm(i)=17.7904;piGA(i)=2160000;piAcc{i}='D';pi_z(i)=1;pigk(i)=2;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=281.7577;piEi(i)=12.1404;piEm(i)=16.5395;piGA(i)=29800000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=4;piIntens(i)=11;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=284.7364;piEi(i)=13.0926;piEm(i)=17.4457;piGA(i)=19800000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=6;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=288.0493;piEi(i)=13.1478;piEm(i)=17.4508;piGA(i)=12200000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=4;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=300.4983;piEi(i)=12.1404;piEm(i)=16.2651;piGA(i)=1610000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=305.25;piEi(i)=12.1369;piEm(i)=16.1974;piGA(i)=1130000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=325.7868;piEi(i)=14.0025;piEm(i)=17.8071;piGA(i)=11200000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=4;piIntens(i)=12;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=327.2229;piEi(i)=14.0025;piEm(i)=17.7904;piGA(i)=27600000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=2;piIntens(i)=16;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=331.4469;piEi(i)=14.0674;piEm(i)=17.8071;piGA(i)=74400000;piAcc{i}='C';pi_z(i)=1;pigk(i)=4;piIntens(i)=18;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=332.933;piEi(i)=14.0674;piEm(i)=17.7904;piGA(i)=18000000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=2;piIntens(i)=14;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=354.6696;piEi(i)=16.1974;piEm(i)=19.6922;piGA(i)=10000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=4;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=359.4439;piEi(i)=14.0025;piEm(i)=17.4508;piGA(i)=79600000;piAcc{i}='C';pi_z(i)=1;pigk(i)=4;piIntens(i)=17;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=359.5977;piEi(i)=13.0926;piEm(i)=16.5395;piGA(i)=92400000;piAcc{i}='C';pi_z(i)=1;pigk(i)=4;piIntens(i)=19;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=361.303;piEi(i)=13.0926;piEm(i)=16.5232;piGA(i)=14300000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=2;piIntens(i)=16;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=365.4497;piEi(i)=13.1478;piEm(i)=16.5395;piGA(i)=17200000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=4;piIntens(i)=17;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=366.3458;piEi(i)=14.0674;piEm(i)=17.4508;piGA(i)=11200000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=4;piIntens(i)=14;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=366.9035;piEi(i)=14.0674;piEm(i)=17.4457;piGA(i)=144000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=6;piIntens(i)=21;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=367.2122;piEi(i)=13.1478;piEm(i)=16.5232;piGA(i)=37400000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=2;piIntens(i)=18;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=373.0636;piEi(i)=17.4457;piEm(i)=20.7681;piGA(i)=451000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=373.5401;piEi(i)=17.4457;piEm(i)=20.7639;piGA(i)=32100000;piAcc{i}='E';pi_z(i)=1;pigk(i)=4;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=373.6417;piEi(i)=17.4508;piEm(i)=20.7681;piGA(i)=32100000;piAcc{i}='E';pi_z(i)=1;pigk(i)=6;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=374.1157;piEi(i)=17.4508;piEm(i)=20.7639;piGA(i)=288000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=4;piIntens(i)=14;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=378.2556;piEi(i)=14.1688;piEm(i)=17.4457;piGA(i)=3110000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=378.3133;piEi(i)=15.5582;piEm(i)=18.8345;piGA(i)=60000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=18;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=379.2446;piEi(i)=16.0916;piEm(i)=19.3599;piGA(i)=30000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=2;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=380.2608;piEi(i)=16.1004;piEm(i)=19.3599;piGA(i)=150000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=2;piIntens(i)=14;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=380.9637;piEi(i)=16.0916;piEm(i)=19.3452;piGA(i)=150000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=4;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=381.9863;piEi(i)=16.1004;piEm(i)=19.3452;piGA(i)=48000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=4;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=383.9158;piEi(i)=14.1688;piEm(i)=17.3974;piGA(i)=6650000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=8;piIntens(i)=13;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=384.5208;piEi(i)=14.1628;piEm(i)=17.3863;piGA(i)=3000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=11;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=385.0906;piEi(i)=16.1004;piEm(i)=19.3191;piGA(i)=160000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=6;piIntens(i)=17;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=385.3076;piEi(i)=14.2339;piEm(i)=17.4508;piGA(i)=38800000;piAcc{i}='C';pi_z(i)=1;pigk(i)=4;piIntens(i)=16;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=385.923;piEi(i)=14.2339;piEm(i)=17.4457;piGA(i)=7620000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=6;piIntens(i)=12;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=386.0114;piEi(i)=15.5582;piEm(i)=18.7692;piGA(i)=32000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=2;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=386.0608;piEi(i)=16.1346;piEm(i)=19.3452;piGA(i)=160000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=4;piIntens(i)=18;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=389.2293;piEi(i)=16.1346;piEm(i)=19.3191;piGA(i)=380000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=18;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=390.6951;piEi(i)=13.0926;piEm(i)=16.2651;piGA(i)=6120000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=6;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=391.8183;piEi(i)=14.2339;piEm(i)=17.3974;piGA(i)=3680000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=8;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=392.346;piEi(i)=16.1974;piEm(i)=19.3566;piGA(i)=1200000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=6;piIntens(i)=20;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=393.1918;piEi(i)=14.2339;piEm(i)=17.3863;piGA(i)=66000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=6;piIntens(i)=17;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=393.2286;piEi(i)=14.2936;piEm(i)=17.4457;piGA(i)=51100000;piAcc{i}='C';pi_z(i)=1;pigk(i)=6;piIntens(i)=17;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=393.3267;piEi(i)=16.2651;piEm(i)=19.4164;piGA(i)=1600000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=8;piIntens(i)=21;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=393.9478;piEi(i)=15.8483;piEm(i)=18.9946;piGA(i)=60000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=4;piIntens(i)=11;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=394.6952;piEi(i)=15.8483;piEm(i)=18.9887;piGA(i)=62000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=2;piIntens(i)=14;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=395.0398;piEi(i)=15.867;piEm(i)=19.0047;piGA(i)=84000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=6;piIntens(i)=11;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=396.3107;piEi(i)=15.867;piEm(i)=18.9946;piGA(i)=96000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=4;piIntens(i)=16;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=397.0209;piEi(i)=15.8989;piEm(i)=19.0209;piGA(i)=70000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=8;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=397.0672;piEi(i)=15.867;piEm(i)=18.9887;piGA(i)=62000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=2;piIntens(i)=14;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=397.9829;piEi(i)=16.2455;piEm(i)=19.3599;piGA(i)=240000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=2;piIntens(i)=17;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=399.0913;piEi(i)=15.8989;piEm(i)=19.0047;piGA(i)=210000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=6;piIntens(i)=17;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=399.2156;piEi(i)=13.0926;piEm(i)=16.1974;piGA(i)=1040000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=399.3502;piEi(i)=14.2936;piEm(i)=17.3974;piGA(i)=92000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=8;piIntens(i)=19;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=399.8757;piEi(i)=16.2455;piEm(i)=19.3452;piGA(i)=480000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=4;piIntens(i)=18;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=400.3874;piEi(i)=15.8989;piEm(i)=18.9946;piGA(i)=84000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=4;piIntens(i)=17;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=400.7773;piEi(i)=14.2936;piEm(i)=17.3863;piGA(i)=6360000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=6;piIntens(i)=12;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=400.9361;piEi(i)=16.2651;piEm(i)=19.3566;piGA(i)=84000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=6;piIntens(i)=12;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=402.875;piEi(i)=15.9443;piEm(i)=19.0209;piGA(i)=410000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=8;piIntens(i)=21;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=403.2779;piEi(i)=16.2455;piEm(i)=19.3191;piGA(i)=720000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=19;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=405.0075;piEi(i)=15.9443;piEm(i)=19.0047;piGA(i)=66000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=6;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=406.4404;piEi(i)=13.1478;piEm(i)=16.1974;piGA(i)=3240000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=4;piIntens(i)=14;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=414.2256;piEi(i)=15.8483;piEm(i)=18.8406;piGA(i)=680000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=21;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=414.5067;piEi(i)=15.867;piEm(i)=18.8573;piGA(i)=1100000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=22;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=414.691;piEi(i)=17.3863;piEm(i)=20.3753;piGA(i)=20900000;piAcc{i}='E';pi_z(i)=1;pigk(i)=8;piIntens(i)=17;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=415.3064;piEi(i)=15.8989;piEm(i)=18.8834;piGA(i)=1600000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=8;piIntens(i)=23;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=416.2306;piEi(i)=17.3974;piEm(i)=20.3753;piGA(i)=557000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=8;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=416.2665;piEi(i)=15.9443;piEm(i)=18.9219;piGA(i)=2300000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=10;piIntens(i)=24;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=416.51;piEi(i)=17.3863;piEm(i)=20.3622;piGA(i)=505000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=14;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=416.837;piEi(i)=17.7904;piEm(i)=20.7639;piGA(i)=182000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=4;piIntens(i)=18;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=416.837;piEi(i)=15.867;piEm(i)=18.8406;piGA(i)=260000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=4;piIntens(i)=18;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=417.4002;piEi(i)=17.3863;piEm(i)=20.3559;piGA(i)=1680000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=8;piIntens(i)=19;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=417.4265;piEi(i)=17.3974;piEm(i)=20.3667;piGA(i)=2400000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=10;piIntens(i)=21;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=418.07;piEi(i)=17.3974;piEm(i)=20.3622;piGA(i)=20400000;piAcc{i}='E';pi_z(i)=1;pigk(i)=6;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=418.5917;piEi(i)=17.8071;piEm(i)=20.7681;piGA(i)=324000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=14;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=418.9676;piEi(i)=15.8989;piEm(i)=18.8573;piGA(i)=340000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=6;piIntens(i)=18;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=419.3493;piEi(i)=14.8513;piEm(i)=17.8071;piGA(i)=24400000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=4;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=421.3517;piEi(i)=15.8989;piEm(i)=18.8406;piGA(i)=19000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=4;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=421.7179;piEi(i)=15.9443;piEm(i)=18.8834;piGA(i)=260000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=8;piIntens(i)=17;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=421.7293;piEi(i)=14.8513;piEm(i)=17.7904;piGA(i)=12500000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=2;piIntens(i)=13;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=423.0952;piEi(i)=17.4457;piEm(i)=20.3753;piGA(i)=944000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=8;piIntens(i)=17;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=424.9873;piEi(i)=17.4457;piEm(i)=20.3622;piGA(i)=46700000;piAcc{i}='E';pi_z(i)=1;pigk(i)=6;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=425.501;piEi(i)=15.9443;piEm(i)=18.8573;piGA(i)=13000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=6;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=425.7379;piEi(i)=17.4508;piEm(i)=20.3622;piGA(i)=648000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=17;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=425.9146;piEi(i)=17.4457;piEm(i)=20.3559;piGA(i)=1200000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=8;piIntens(i)=16;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=426.7759;piEi(i)=16.1004;piEm(i)=19.0047;piGA(i)=720000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=6;piIntens(i)=21;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=426.9724;piEi(i)=16.0916;piEm(i)=18.9946;piGA(i)=280000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=4;piIntens(i)=18;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=427.85;piEi(i)=16.0916;piEm(i)=18.9887;piGA(i)=280000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=2;piIntens(i)=18;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=428.2595;piEi(i)=16.1004;piEm(i)=18.9946;piGA(i)=360000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=4;piIntens(i)=18;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=429.1432;piEi(i)=16.1004;piEm(i)=18.9887;piGA(i)=56000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=2;piIntens(i)=14;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=429.4398;piEi(i)=16.1346;piEm(i)=19.0209;piGA(i)=1400000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=8;piIntens(i)=22;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=431.8645;piEi(i)=16.1346;piEm(i)=19.0047;piGA(i)=290000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=6;piIntens(i)=18;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=433.3828;piEi(i)=16.1346;piEm(i)=18.9946;piGA(i)=33000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=4;piIntens(i)=13;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=434.2808;piEi(i)=15.867;piEm(i)=18.7212;piGA(i)=11000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=6;piIntens(i)=11;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=439.1818;piEi(i)=15.8989;piEm(i)=18.7212;piGA(i)=96000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=6;piIntens(i)=16;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=440.2841;piEi(i)=15.8483;piEm(i)=18.6635;piGA(i)=18000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=4;piIntens(i)=13;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=440.473;piEi(i)=17.7904;piEm(i)=20.6044;piGA(i)=71600000;piAcc{i}='E';pi_z(i)=1;pigk(i)=4;piIntens(i)=12;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=441.1313;piEi(i)=17.7904;piEm(i)=20.6002;piGA(i)=142000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=2;piIntens(i)=14;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=443.1007;piEi(i)=17.8071;piEm(i)=20.6044;piGA(i)=350000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=443.2372;piEi(i)=15.867;piEm(i)=18.6635;piGA(i)=120000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=4;piIntens(i)=18;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=443.7655;piEi(i)=17.8071;piEm(i)=20.6002;piGA(i)=69800000;piAcc{i}='E';pi_z(i)=1;pigk(i)=2;piIntens(i)=11;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=445.6388;piEi(i)=15.8483;piEm(i)=18.6297;piGA(i)=94000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=2;piIntens(i)=17;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=446.3579;piEi(i)=15.9443;piEm(i)=18.7212;piGA(i)=320000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=20;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=448.3429;piEi(i)=15.8989;piEm(i)=18.6635;piGA(i)=120000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=19;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=448.6636;piEi(i)=15.867;piEm(i)=18.6297;piGA(i)=130000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=2;piIntens(i)=16;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=452.4718;piEi(i)=15.0676;piEm(i)=17.8071;piGA(i)=58400000;piAcc{i}='C';pi_z(i)=1;pigk(i)=4;piIntens(i)=19;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=452.4947;piEi(i)=15.0678;piEm(i)=17.8071;piGA(i)=351000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=4;piIntens(i)=21;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=455.2406;piEi(i)=15.0676;piEm(i)=17.7904;piGA(i)=200000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=2;piIntens(i)=18;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=464.817;piEi(i)=17.3863;piEm(i)=20.053;piGA(i)=326000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=465.6777;piEi(i)=13.5838;piEm(i)=16.2455;piGA(i)=45600000;piAcc{i}='C';pi_z(i)=1;pigk(i)=4;piIntens(i)=19;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=466.8583;piEi(i)=17.3974;piEm(i)=20.0523;piGA(i)=460000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=17;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=468.1294;piEi(i)=13.6174;piEm(i)=16.2651;piGA(i)=2470000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=6;piIntens(i)=13;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=470.0224;piEi(i)=16.1974;piEm(i)=18.8345;piGA(i)=34000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=4;piIntens(i)=14;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=471.6267;piEi(i)=13.6174;piEm(i)=16.2455;piGA(i)=129000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=4;piIntens(i)=20;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=472.9444;piEi(i)=16.1004;piEm(i)=18.7212;piGA(i)=96000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=6;piIntens(i)=14;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=474.2389;piEi(i)=13.5838;piEm(i)=16.1974;piGA(i)=1640000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=12;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=475.3981;piEi(i)=17.4457;piEm(i)=20.053;piGA(i)=31000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=4;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=475.5091;piEi(i)=17.4457;piEm(i)=20.0523;piGA(i)=433000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=16;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=476.337;piEi(i)=17.4508;piEm(i)=20.053;piGA(i)=277000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=14;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=476.4451;piEi(i)=17.4508;piEm(i)=20.0523;piGA(i)=30800000;piAcc{i}='E';pi_z(i)=1;pigk(i)=6;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=477.9094;piEi(i)=13.6716;piEm(i)=16.2651;piGA(i)=14300000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=6;piIntens(i)=16;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=479.2012;piEi(i)=16.1346;piEm(i)=18.7212;piGA(i)=220000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=17;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=480.412;piEi(i)=13.6174;piEm(i)=16.1974;piGA(i)=2740000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=4;piIntens(i)=12;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=481.5549;piEi(i)=13.6716;piEm(i)=16.2455;piGA(i)=336000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=4;piIntens(i)=22;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=481.9575;piEi(i)=16.0916;piEm(i)=18.6635;piGA(i)=92000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=4;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=481.9575;piEi(i)=16.1974;piEm(i)=18.7692;piGA(i)=170000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=2;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=482.4066;piEi(i)=16.2651;piEm(i)=18.8345;piGA(i)=300000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=16;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=483.5848;piEi(i)=16.1004;piEm(i)=18.6635;piGA(i)=29000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=4;piIntens(i)=14;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=488.3672;piEi(i)=16.0916;piEm(i)=18.6297;piGA(i)=18000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=2;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=488.5648;piEi(i)=14.0025;piEm(i)=16.5395;piGA(i)=59200000;piAcc{i}='C';pi_z(i)=1;pigk(i)=4;piIntens(i)=17;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=490.0513;piEi(i)=16.1004;piEm(i)=18.6297;piGA(i)=90000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=2;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=490.1265;piEi(i)=16.1346;piEm(i)=18.6635;piGA(i)=96000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=4;piIntens(i)=14;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=490.244;piEi(i)=15.5582;piEm(i)=18.0865;piGA(i)=86000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=2;piIntens(i)=16;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=491.7212;piEi(i)=14.0025;piEm(i)=16.5232;piGA(i)=116000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=2;piIntens(i)=19;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=492.4115;piEi(i)=13.6174;piEm(i)=16.1346;piGA(i)=125000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=6;piIntens(i)=18;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=492.5347;piEi(i)=13.5838;piEm(i)=16.1004;piGA(i)=171000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=4;piIntens(i)=19;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=494.2466;piEi(i)=13.5838;piEm(i)=16.0916;piGA(i)=25200000;piAcc{i}='C';pi_z(i)=1;pigk(i)=2;piIntens(i)=16;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=499.1974;piEi(i)=13.6174;piEm(i)=16.1004;piGA(i)=107000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=4;piIntens(i)=20;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=499.3497;piEi(i)=15.5582;piEm(i)=18.0404;piGA(i)=183000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=4;piIntens(i)=17;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=500.6727;piEi(i)=16.2455;piEm(i)=18.7212;piGA(i)=100000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=500.9564;piEi(i)=13.6174;piEm(i)=16.0916;piGA(i)=155000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=2;piIntens(i)=21;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=501.1608;piEi(i)=16.9026;piEm(i)=19.3759;piGA(i)=315000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=16;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=501.4069;piEi(i)=14.0674;piEm(i)=16.5395;piGA(i)=294000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=4;piIntens(i)=21;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=502.7221;piEi(i)=13.0926;piEm(i)=15.5582;piGA(i)=57200000;piAcc{i}='C';pi_z(i)=1;pigk(i)=2;piIntens(i)=20;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=503.2447;piEi(i)=13.6716;piEm(i)=16.1346;piGA(i)=406000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=6;piIntens(i)=23;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=503.9382;piEi(i)=16.9026;piEm(i)=19.3622;piGA(i)=155000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=2;piIntens(i)=13;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=504.7292;piEi(i)=14.0674;piEm(i)=16.5232;piGA(i)=62000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=2;piIntens(i)=18;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=510.334;piEi(i)=13.6716;piEm(i)=16.1004;piGA(i)=89200000;piAcc{i}='C';pi_z(i)=1;pigk(i)=4;piIntens(i)=19;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=512.613;piEi(i)=16.2455;piEm(i)=18.6635;piGA(i)=72000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=4;piIntens(i)=13;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=514.2341;piEi(i)=13.1478;piEm(i)=15.5582;piGA(i)=25000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=2;piIntens(i)=18;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=519.8844;piEi(i)=16.2455;piEm(i)=18.6297;piGA(i)=36000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=2;piIntens(i)=11;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=520.1024;piEi(i)=15.0676;piEm(i)=17.4508;piGA(i)=302000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=4;piIntens(i)=20;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=520.1387;piEi(i)=15.0678;piEm(i)=17.4508;piGA(i)=47600000;piAcc{i}='C';pi_z(i)=1;pigk(i)=4;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=521.2623;piEi(i)=15.0678;piEm(i)=17.4457;piGA(i)=508000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=6;piIntens(i)=21;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=532.0732;piEi(i)=15.0678;piEm(i)=17.3974;piGA(i)=636000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=8;piIntens(i)=24;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=534.5721;piEi(i)=15.0676;piEm(i)=17.3863;piGA(i)=454000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=6;piIntens(i)=22;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=536.2703;piEi(i)=16.5232;piEm(i)=18.8345;piGA(i)=32000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=4;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=540.0712;piEi(i)=16.5395;piEm(i)=18.8345;piGA(i)=160000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=542.8667;piEi(i)=13.5838;piEm(i)=15.867;piGA(i)=151000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=4;piIntens(i)=23;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=543.2815;piEi(i)=13.6174;piEm(i)=15.8989;piGA(i)=362000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=6;piIntens(i)=25;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=545.3828;piEi(i)=13.6716;piEm(i)=15.9443;piGA(i)=620000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=8;piIntens(i)=27;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=547.362;piEi(i)=13.5838;piEm(i)=15.8483;piGA(i)=132000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=2;piIntens(i)=23;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=547.5011;piEi(i)=16.1974;piEm(i)=18.4614;piGA(i)=29400000;piAcc{i}='C';pi_z(i)=1;pigk(i)=4;piIntens(i)=11;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=547.8194;piEi(i)=17.7904;piEm(i)=20.053;piGA(i)=75600000;piAcc{i}='E';pi_z(i)=1;pigk(i)=4;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=547.931;piEi(i)=16.1974;piEm(i)=18.4596;piGA(i)=2780000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=6;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=550.9718;piEi(i)=13.6174;piEm(i)=15.867;piGA(i)=147000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=4;piIntens(i)=23;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=551.8732;piEi(i)=16.5232;piEm(i)=18.7692;piGA(i)=64000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=2;piIntens(i)=11;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=552.04;piEi(i)=17.8071;piEm(i)=20.0523;piGA(i)=133000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=12;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=552.6253;piEi(i)=13.7013;piEm(i)=15.9443;piGA(i)=29700000;piAcc{i}='C';pi_z(i)=1;pigk(i)=8;piIntens(i)=18;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=553.6723;piEi(i)=13.6602;piEm(i)=15.8989;piGA(i)=1940000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=6;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=555.6007;piEi(i)=13.6174;piEm(i)=15.8483;piGA(i)=20600000;piAcc{i}='C';pi_z(i)=1;pigk(i)=2;piIntens(i)=18;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=555.906;piEi(i)=16.5395;piEm(i)=18.7692;piGA(i)=32000000;piAcc{i}='E';pi_z(i)=1;pigk(i)=2;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=556.4976;piEi(i)=13.6716;piEm(i)=15.8989;piGA(i)=99000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=6;piIntens(i)=21;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=557.8889;piEi(i)=13.6771;piEm(i)=15.8989;piGA(i)=40100000;piAcc{i}='C';pi_z(i)=1;pigk(i)=6;piIntens(i)=18;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=560.6151;piEi(i)=13.7333;piEm(i)=15.9443;piGA(i)=282000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=8;piIntens(i)=23;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=561.6639;piEi(i)=13.6602;piEm(i)=15.867;piGA(i)=30300000;piAcc{i}='C';pi_z(i)=1;pigk(i)=4;piIntens(i)=18;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=563.9972;piEi(i)=14.0674;piEm(i)=16.2651;piGA(i)=380000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=6;piIntens(i)=23;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=564.0333;piEi(i)=13.7013;piEm(i)=15.8989;piGA(i)=193000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=6;piIntens(i)=21;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=564.3757;piEi(i)=16.2651;piEm(i)=18.4614;piGA(i)=2930000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=4;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=564.5672;piEi(i)=13.6716;piEm(i)=15.867;piGA(i)=9880000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=4;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=564.7033;piEi(i)=14.0025;piEm(i)=16.1974;piGA(i)=220000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=4;piIntens(i)=21;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=564.8354;piEi(i)=16.2651;piEm(i)=18.4596;piGA(i)=41400000;piAcc{i}='C';pi_z(i)=1;pigk(i)=6;piIntens(i)=12;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=565.9985;piEi(i)=13.6771;piEm(i)=15.867;piGA(i)=125000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=4;piIntens(i)=21;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=566.478;piEi(i)=13.6602;piEm(i)=15.8483;piGA(i)=77800000;piAcc{i}='C';pi_z(i)=1;pigk(i)=2;piIntens(i)=20;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=581.9272;piEi(i)=14.0674;piEm(i)=16.1974;piGA(i)=38000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=4;piIntens(i)=19;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=589.0935;piEi(i)=19.5348;piEm(i)=21.6389;piGA(i)=157000000;piAcc{i}='D';pi_z(i)=1;pigk(i)=10;piIntens(i)=4;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=589.591;piEi(i)=14.1628;piEm(i)=16.2651;piGA(i)=200000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=4;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=590.8312;piEi(i)=14.0025;piEm(i)=16.1004;piGA(i)=1870000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=4;piIntens(i)=11;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=591.2788;piEi(i)=14.1688;piEm(i)=16.2651;piGA(i)=618000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=593.2962;piEi(i)=14.0025;piEm(i)=16.0916;piGA(i)=344000;piAcc{i}='D';pi_z(i)=1;pigk(i)=2;piIntens(i)=4;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=599.6161;piEi(i)=14.0674;piEm(i)=16.1346;piGA(i)=9720000;piAcc{i}='C';pi_z(i)=1;pigk(i)=6;piIntens(i)=21;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=608.0838;piEi(i)=14.1591;piEm(i)=16.1974;piGA(i)=303000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=609.2122;piEi(i)=14.1628;piEm(i)=16.1974;piGA(i)=1210000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=4;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=609.7123;piEi(i)=14.0674;piEm(i)=16.1004;piGA(i)=257000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=610.2277;piEi(i)=14.2339;piEm(i)=16.2651;piGA(i)=7980000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=6;piIntens(i)=18;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=612.3383;piEi(i)=14.0674;piEm(i)=16.0916;piGA(i)=394000;piAcc{i}='D';pi_z(i)=1;pigk(i)=2;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=616.184;piEi(i)=14.2339;piEm(i)=16.2455;piGA(i)=464000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=627.4306;piEi(i)=14.1591;piEm(i)=16.1346;piGA(i)=3680000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=6;piIntens(i)=12;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=628.6351;piEi(i)=14.1628;piEm(i)=16.1346;piGA(i)=29900000;piAcc{i}='C';pi_z(i)=1;pigk(i)=6;piIntens(i)=26;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=628.6956;piEi(i)=14.2936;piEm(i)=16.2651;piGA(i)=118000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=6;piIntens(i)=33;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=630.5483;piEi(i)=14.1688;piEm(i)=16.1346;piGA(i)=121000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=6;piIntens(i)=33;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=631.2661;piEi(i)=14.2339;piEm(i)=16.1974;piGA(i)=81600000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=4;piIntens(i)=29;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=636.9342;piEi(i)=14.1543;piEm(i)=16.1004;piGA(i)=5440000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=4;piIntens(i)=17;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=638.4893;piEi(i)=14.1591;piEm(i)=16.1004;piGA(i)=32800000;piAcc{i}='C';pi_z(i)=1;pigk(i)=4;piIntens(i)=27;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=638.648;piEi(i)=13.6174;piEm(i)=15.5582;piGA(i)=640000;piAcc{i}='D';pi_z(i)=1;pigk(i)=2;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=639.5264;piEi(i)=16.5232;piEm(i)=18.4614;piGA(i)=15900000;piAcc{i}='C';pi_z(i)=1;pigk(i)=4;piIntens(i)=12;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=639.7359;piEi(i)=14.1628;piEm(i)=16.1004;piGA(i)=59600000;piAcc{i}='C';pi_z(i)=1;pigk(i)=4;piIntens(i)=29;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=639.799;piEi(i)=14.1543;piEm(i)=16.0916;piGA(i)=26400000;piAcc{i}='C';pi_z(i)=1;pigk(i)=2;piIntens(i)=27;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=641.3706;piEi(i)=14.1591;piEm(i)=16.0916;piGA(i)=25000000;piAcc{i}='C';pi_z(i)=1;pigk(i)=2;piIntens(i)=26;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=645.539;piEi(i)=16.5395;piEm(i)=18.4596;piGA(i)=19400000;piAcc{i}='C';pi_z(i)=1;pigk(i)=6;piIntens(i)=13;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=652.1428;piEi(i)=14.2339;piEm(i)=16.1346;piGA(i)=353000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=664.106;piEi(i)=14.2339;piEm(i)=16.1004;piGA(i)=379000;piAcc{i}='D';pi_z(i)=1;pigk(i)=4;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=673.2815;piEi(i)=14.2936;piEm(i)=16.1346;piGA(i)=587000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=687.9732;piEi(i)=15.5582;piEm(i)=17.3599;piGA(i)=7840000;piAcc{i}='C';pi_z(i)=1;pigk(i)=4;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=695.7934;piEi(i)=14.1628;piEm(i)=15.9443;piGA(i)=4560000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=8;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=696.2031;piEi(i)=15.5582;piEm(i)=17.3386;piGA(i)=4360000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=2;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=698.1398;piEi(i)=14.1688;piEm(i)=15.9443;piGA(i)=25700000;piAcc{i}='C';pi_z(i)=1;pigk(i)=8;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=712.4279;piEi(i)=14.1591;piEm(i)=15.8989;piGA(i)=4640000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=6;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=713.9807;piEi(i)=14.1628;piEm(i)=15.8989;piGA(i)=10100000;piAcc{i}='C';pi_z(i)=1;pigk(i)=6;piIntens(i)=12;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=716.4491;piEi(i)=14.1688;piEm(i)=15.8989;piGA(i)=5230000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=6;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=723.7007;piEi(i)=14.1543;piEm(i)=15.867;piGA(i)=2870000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=4;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=725.7107;piEi(i)=14.1591;piEm(i)=15.867;piGA(i)=4160000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=4;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=727.32;piEi(i)=14.1628;piEm(i)=15.867;piGA(i)=5160000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=4;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=731.7155;piEi(i)=14.1543;piEm(i)=15.8483;piGA(i)=2600000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=2;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=733.766;piEi(i)=14.1591;piEm(i)=15.8483;piGA(i)=3100000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=2;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=744.4609;piEi(i)=14.2339;piEm(i)=15.8989;piGA(i)=428000;piAcc{i}='D';pi_z(i)=1;pigk(i)=6;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=750.9066;piEi(i)=14.2936;piEm(i)=15.9443;piGA(i)=1420000;piAcc{i}='D+';pi_z(i)=1;pigk(i)=8;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=757.8909;piEi(i)=15.7619;piEm(i)=17.3974;piGA(i)=139000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=8;piIntens(i)=19;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=762.974;piEi(i)=15.7618;piEm(i)=17.3863;piGA(i)=105000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=6;piIntens(i)=17;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=792.8656;piEi(i)=16.5232;piEm(i)=18.0865;piGA(i)=24600000;piAcc{i}='C';pi_z(i)=1;pigk(i)=2;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=796.7371;piEi(i)=14.0025;piEm(i)=15.5582;piGA(i)=20600000;piAcc{i}='C';pi_z(i)=1;pigk(i)=2;piIntens(i)=17;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=801.2113;piEi(i)=16.5395;piEm(i)=18.0865;piGA(i)=11100000;piAcc{i}='C';pi_z(i)=1;pigk(i)=2;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=816.9638;piEi(i)=16.5232;piEm(i)=18.0404;piGA(i)=10800000;piAcc{i}='C';pi_z(i)=1;pigk(i)=4;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=825.8254;piEi(i)=16.5395;piEm(i)=18.0404;piGA(i)=48000000;piAcc{i}='C+';pi_z(i)=1;pigk(i)=4;piIntens(i)=13;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=831.4594;piEi(i)=14.0674;piEm(i)=15.5582;piGA(i)=31800000;piAcc{i}='C';pi_z(i)=1;pigk(i)=2;piIntens(i)=18;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=842.23;piEi(i)=15.0678;piEm(i)=16.5395;piGA(i)=7040000;piAcc{i}='C';pi_z(i)=1;pigk(i)=4;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=SII;pila(i)=851.5475;piEi(i)=15.0676;piEm(i)=16.5232;piGA(i)=4200000;piAcc{i}='C';pi_z(i)=1;pigk(i)=2;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=1

%KI
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=404.4136;piEi(i)=0;piEm(i)=3.0649;piGA(i)=4600000;piAcc{i}='A';pi_z(i)=0;pigk(i)=4;piIntens(i)=18;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=404.7208;piEi(i)=0;piEm(i)=3.0626;piGA(i)=2140000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=2;piIntens(i)=17;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=464.1876;piEi(i)=0;piEm(i)=2.6702;piGA(i)=616;piAcc{i}='AAA';pi_z(i)=0;pigk(i)=4;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=464.2373;piEi(i)=0;piEm(i)=2.67;piGA(i)=924;piAcc{i}='AAA';pi_z(i)=0;pigk(i)=6;piIntens(i)=11;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=474.0914;piEi(i)=1.61;piEm(i)=4.2244;piGA(i)=160000;piAcc{i}='E';pi_z(i)=0;pigk(i)=2;piIntens(i)=4;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=474.4345;piEi(i)=1.61;piEm(i)=4.2225;piGA(i)=390000;piAcc{i}='C';pi_z(i)=0;pigk(i)=4;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=475.3934;piEi(i)=1.6171;piEm(i)=4.2244;piGA(i)=320000;piAcc{i}='D+';pi_z(i)=0;pigk(i)=2;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=475.7389;piEi(i)=1.6171;piEm(i)=4.2225;piGA(i)=720000;piAcc{i}='C';pi_z(i)=0;pigk(i)=6;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=478.6491;piEi(i)=1.61;piEm(i)=4.1995;piGA(i)=206000;piAcc{i}='C';pi_z(i)=0;pigk(i)=2;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=479.1049;piEi(i)=1.61;piEm(i)=4.1971;piGA(i)=520000;piAcc{i}='C';pi_z(i)=0;pigk(i)=4;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=479.9754;piEi(i)=1.6171;piEm(i)=4.1995;piGA(i)=414000;piAcc{i}='C';pi_z(i)=0;pigk(i)=2;piIntens(i)=6;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=480.4348;piEi(i)=1.6171;piEm(i)=4.1971;piGA(i)=960000;piAcc{i}='C';pi_z(i)=0;pigk(i)=6;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=484.9865;piEi(i)=1.61;piEm(i)=4.1657;piGA(i)=374200;piAcc{i}='A+';pi_z(i)=0;pigk(i)=2;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=485.609;piEi(i)=1.61;piEm(i)=4.1624;piGA(i)=840000;piAcc{i}='A';pi_z(i)=0;pigk(i)=4;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=486.3483;piEi(i)=1.6171;piEm(i)=4.1657;piGA(i)=739600;piAcc{i}='AA';pi_z(i)=0;pigk(i)=2;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=486.9757;piEi(i)=1.6171;piEm(i)=4.1624;piGA(i)=1570000;piAcc{i}='A';pi_z(i)=0;pigk(i)=6;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=494.2002;piEi(i)=1.61;piEm(i)=4.118;piGA(i)=538000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=2;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=495.0815;piEi(i)=1.61;piEm(i)=4.1136;piGA(i)=1080000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=4;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=495.6146;piEi(i)=1.6171;piEm(i)=4.118;piGA(i)=1064000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=2;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=496.5031;piEi(i)=1.6171;piEm(i)=4.1136;piGA(i)=2020000;piAcc{i}='A';pi_z(i)=0;pigk(i)=6;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=508.4226;piEi(i)=1.61;piEm(i)=4.0479;piGA(i)=814800;piAcc{i}='AA';pi_z(i)=0;pigk(i)=2;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=509.7171;piEi(i)=1.61;piEm(i)=4.0417;piGA(i)=1360000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=4;piIntens(i)=11;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=509.92;piEi(i)=1.6171;piEm(i)=4.0479;piGA(i)=1613000;piAcc{i}='A+';pi_z(i)=0;pigk(i)=2;piIntens(i)=11;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=511.2249;piEi(i)=1.6171;piEm(i)=4.0417;piGA(i)=2530000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=6;piIntens(i)=12;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=532.3276;piEi(i)=1.61;piEm(i)=3.9384;piGA(i)=1320000;piAcc{i}='A+';pi_z(i)=0;pigk(i)=2;piIntens(i)=12;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=533.9688;piEi(i)=1.6171;piEm(i)=3.9384;piGA(i)=2622000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=2;piIntens(i)=13;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=534.297;piEi(i)=1.61;piEm(i)=3.9298;piGA(i)=1540000;piAcc{i}='A';pi_z(i)=0;pigk(i)=4;piIntens(i)=12;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=535.9574;piEi(i)=1.6171;piEm(i)=3.9298;piGA(i)=2920000;piAcc{i}='A';pi_z(i)=0;pigk(i)=6;piIntens(i)=14;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=KI;pila(i)=578.2384;piEi(i)=1.61;piEm(i)=3.7535;piGA(i)=2372000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=2;piIntens(i)=16;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=KI;pila(i)=580.1752;piEi(i)=1.6171;piEm(i)=3.7535;piGA(i)=4696000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=2;piIntens(i)=17;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=581.2148;piEi(i)=1.61;piEm(i)=3.7426;piGA(i)=1140000;piAcc{i}='A';pi_z(i)=0;pigk(i)=4;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=583.1887;piEi(i)=1.6171;piEm(i)=3.7425;piGA(i)=2230000;piAcc{i}='A';pi_z(i)=0;pigk(i)=6;piIntens(i)=17;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=691.1084;piEi(i)=1.61;piEm(i)=3.4035;piGA(i)=5000000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=2;piIntens(i)=19;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=693.6284;piEi(i)=1.61;piEm(i)=3.3969;piGA(i)=76000;piAcc{i}='C';pi_z(i)=0;pigk(i)=4;piIntens(i)=12;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=693.8767;piEi(i)=1.6171;piEm(i)=3.4035;piGA(i)=9912000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=2;piIntens(i)=20;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=696.418;piEi(i)=1.6171;piEm(i)=3.3969;piGA(i)=9600;piAcc{i}='D+';pi_z(i)=0;pigk(i)=4;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=696.4672;piEi(i)=1.6171;piEm(i)=3.3968;piGA(i)=82200;piAcc{i}='D+';pi_z(i)=0;pigk(i)=6;piIntens(i)=12;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=KI;pila(i)=766.4899;piEi(i)=0;piEm(i)=1.6171;piGA(i)=151200000;piAcc{i}='AAA';pi_z(i)=0;pigk(i)=4;piIntens(i)=25;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=1;piquees(i)=KI;pila(i)=769.8965;piEi(i)=0;piEm(i)=1.61;piGA(i)=74680000;piAcc{i}='AAA';pi_z(i)=0;pigk(i)=2;piIntens(i)=24;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=825.018;piEi(i)=2.67;piEm(i)=4.1724;piGA(i)=380000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=6;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=825.018;piEi(i)=2.67;piEm(i)=4.1724;piGA(i)=7700000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=8;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=825.174;piEi(i)=2.6702;piEm(i)=4.1724;piGA(i)=5300000;piAcc{i}='C+';pi_z(i)=0;pigk(i)=6;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=839.022;piEi(i)=2.607;piEm(i)=4.0843;piGA(i)=108000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=4;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=841.754;piEi(i)=2.67;piEm(i)=4.1425;piGA(i)=192000;piAcc{i}='A';pi_z(i)=0;pigk(i)=4;piIntens(i)=2;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=842;piEi(i)=2.6702;piEm(i)=4.1423;piGA(i)=105000;piAcc{i}='A';pi_z(i)=0;pigk(i)=2;piIntens(i)=1;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=850.345;piEi(i)=2.67;piEm(i)=4.1276;piGA(i)=528000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=6;piIntens(i)=11;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=850.345;piEi(i)=2.67;piEm(i)=4.1276;piGA(i)=10600000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=8;piIntens(i)=11;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=850.511;piEi(i)=2.6702;piEm(i)=4.1276;piGA(i)=7380000;piAcc{i}='B+';pi_z(i)=0;pigk(i)=6;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=876.396;piEi(i)=2.67;piEm(i)=4.0843;piGA(i)=285000;piAcc{i}='A';pi_z(i)=0;pigk(i)=4;piIntens(i)=4;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=876.705;piEi(i)=2.6702;piEm(i)=4.0841;piGA(i)=156000;piAcc{i}='A';pi_z(i)=0;pigk(i)=2;piIntens(i)=3;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=890.219;piEi(i)=2.67;piEm(i)=4.0623;piGA(i)=821400;piAcc{i}='AA';pi_z(i)=0;pigk(i)=6;piIntens(i)=13;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=890.219;piEi(i)=2.67;piEm(i)=4.0623;piGA(i)=16420000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=8;piIntens(i)=13;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=890.402;piEi(i)=2.6702;piEm(i)=4.0623;piGA(i)=11480000;piAcc{i}='AA';pi_z(i)=0;pigk(i)=6;piIntens(i)=12;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=892.331;piEi(i)=2.607;piEm(i)=3.996;piGA(i)=209000;piAcc{i}='A';pi_z(i)=0;pigk(i)=4;piIntens(i)=5;piStark(i)=0;% auto imported from NIST ASD Intensity>=1
i=i+1;piUse(i)=0;piquees(i)=KI;pila(i)=892.544;piEi(i)=2.607;piEm(i)=3.9957;piGA(i)=95400;piAcc{i}='B+';pi_z(i)=0;pigk(i)=2;piIntens(i)=4;piStark(i)=0;% auto imported from NIST ASD Intensity>=1

%KII
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=199.3007;piEi(i)=22.2365;piEm(i)=28.4575;piGA(i)=61500000;piAcc{i}='';pi_z(i)=1;pigk(i)=5;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=199.3714;piEi(i)=22.2365;piEm(i)=28.4552;piGA(i)=29100000;piAcc{i}='';pi_z(i)=1;pigk(i)=7;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=199.4285;piEi(i)=22.2365;piEm(i)=28.4534;piGA(i)=5000000000;piAcc{i}='';pi_z(i)=1;pigk(i)=7;piIntens(i)=25;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=1;piquees(i)=KII;pila(i)=203.5408;piEi(i)=22.3658;piEm(i)=28.4552;piGA(i)=8400000000;piAcc{i}='';pi_z(i)=1;pigk(i)=7;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=203.6014;piEi(i)=22.3658;piEm(i)=28.4534;piGA(i)=2720000;piAcc{i}='';pi_z(i)=1;pigk(i)=7;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=1;piquees(i)=KII;pila(i)=203.7005;piEi(i)=22.3728;piEm(i)=28.4575;piGA(i)=3370000000;piAcc{i}='';pi_z(i)=1;pigk(i)=5;piIntens(i)=45;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=204.4832;piEi(i)=22.3939;piEm(i)=28.4552;piGA(i)=524000000;piAcc{i}='';pi_z(i)=1;pigk(i)=7;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=1;piquees(i)=KII;pila(i)=204.5283;piEi(i)=22.3939;piEm(i)=28.4539;piGA(i)=16200000000;piAcc{i}='';pi_z(i)=1;pigk(i)=9;piIntens(i)=40;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=204.543;piEi(i)=22.3939;piEm(i)=28.4534;piGA(i)=545000000;piAcc{i}='';pi_z(i)=1;pigk(i)=7;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=1;piquees(i)=KII;pila(i)=207.6798;piEi(i)=22.2365;piEm(i)=28.2045;piGA(i)=6810000000;piAcc{i}='';pi_z(i)=1;pigk(i)=7;piIntens(i)=60;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=1;piquees(i)=KII;pila(i)=207.8694;piEi(i)=22.2422;piEm(i)=28.2049;piGA(i)=16600000000;piAcc{i}='';pi_z(i)=1;pigk(i)=9;piIntens(i)=70;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=208.1885;piEi(i)=22.2365;piEm(i)=28.1899;piGA(i)=1200000000;piAcc{i}='';pi_z(i)=1;pigk(i)=5;piIntens(i)=25;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=208.2891;piEi(i)=22.2365;piEm(i)=28.1871;piGA(i)=88200000;piAcc{i}='';pi_z(i)=1;pigk(i)=7;piIntens(i)=25;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=208.3942;piEi(i)=22.2422;piEm(i)=28.1899;piGA(i)=19000000;piAcc{i}='';pi_z(i)=1;pigk(i)=5;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=1;piquees(i)=KII;pila(i)=208.4933;piEi(i)=22.2422;piEm(i)=28.1871;piGA(i)=2580000000;piAcc{i}='';pi_z(i)=1;pigk(i)=7;piIntens(i)=60;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=1;piquees(i)=KII;pila(i)=208.9855;piEi(i)=22.2422;piEm(i)=28.173;piGA(i)=5140000000;piAcc{i}='';pi_z(i)=1;pigk(i)=9;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=212.2827;piEi(i)=22.3658;piEm(i)=28.2045;piGA(i)=6560000;piAcc{i}='';pi_z(i)=1;pigk(i)=7;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=212.8138;piEi(i)=22.3658;piEm(i)=28.1899;piGA(i)=83000000;piAcc{i}='';pi_z(i)=1;pigk(i)=5;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=1;piquees(i)=KII;pila(i)=212.919;piEi(i)=22.3658;piEm(i)=28.1871;piGA(i)=3230000000;piAcc{i}='';pi_z(i)=1;pigk(i)=7;piIntens(i)=40;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=1;piquees(i)=KII;pila(i)=213.0687;piEi(i)=22.3728;piEm(i)=28.1899;piGA(i)=2000000000;piAcc{i}='';pi_z(i)=1;pigk(i)=5;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=213.2947;piEi(i)=22.3939;piEm(i)=28.2049;piGA(i)=461000000;piAcc{i}='';pi_z(i)=1;pigk(i)=9;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=213.3061;piEi(i)=22.3939;piEm(i)=28.2045;piGA(i)=763000000;piAcc{i}='';pi_z(i)=1;pigk(i)=7;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=213.9246;piEi(i)=22.3658;piEm(i)=28.1597;piGA(i)=820000000;piAcc{i}='';pi_z(i)=1;pigk(i)=5;piIntens(i)=20;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=213.9494;piEi(i)=22.3939;piEm(i)=28.1871;piGA(i)=279000000;piAcc{i}='';pi_z(i)=1;pigk(i)=7;piIntens(i)=10;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=214.0277;piEi(i)=22.3658;piEm(i)=28.1569;piGA(i)=48600000;piAcc{i}='';pi_z(i)=1;pigk(i)=3;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=214.286;piEi(i)=22.3728;piEm(i)=28.1569;piGA(i)=261000000;piAcc{i}='';pi_z(i)=1;pigk(i)=3;piIntens(i)=15;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=1;piquees(i)=KII;pila(i)=214.4699;piEi(i)=22.3939;piEm(i)=28.173;piGA(i)=6210000000;piAcc{i}='';pi_z(i)=1;pigk(i)=9;piIntens(i)=50;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=344.005;piEi(i)=23.5732;piEm(i)=27.1764;piGA(i)=5600000000;piAcc{i}='';pi_z(i)=1;pigk(i)=5;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=353.075;piEi(i)=20.6381;piEm(i)=24.1487;piGA(i)=226000000;piAcc{i}='';pi_z(i)=1;pigk(i)=1;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=381.75;piEi(i)=23.1086;piEm(i)=26.3555;piGA(i)=2860000000;piAcc{i}='';pi_z(i)=1;pigk(i)=5;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=389.792;piEi(i)=20.1478;piEm(i)=23.3277;piGA(i)=1820000000;piAcc{i}='';pi_z(i)=1;pigk(i)=5;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=400.124;piEi(i)=20.4754;piEm(i)=23.5732;piGA(i)=450000000;piAcc{i}='';pi_z(i)=1;pigk(i)=3;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=413.472;piEi(i)=20.1478;piEm(i)=23.1455;piGA(i)=1160000000;piAcc{i}='';pi_z(i)=1;pigk(i)=5;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=414.919;piEi(i)=20.263;piEm(i)=23.2504;piGA(i)=504000000;piAcc{i}='';pi_z(i)=1;pigk(i)=3;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=414.919;piEi(i)=20.4754;piEm(i)=23.4627;piGA(i)=132000000;piAcc{i}='';pi_z(i)=1;pigk(i)=3;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=418.624;piEi(i)=20.1478;piEm(i)=23.1086;piGA(i)=7210000000;piAcc{i}='';pi_z(i)=1;pigk(i)=7;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=422.297;piEi(i)=20.6381;piEm(i)=23.5732;piGA(i)=690000000;piAcc{i}='';pi_z(i)=1;pigk(i)=3;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=422.567;piEi(i)=20.3944;piEm(i)=23.3277;piGA(i)=471000000;piAcc{i}='';pi_z(i)=1;pigk(i)=5;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=426.34;piEi(i)=20.2382;piEm(i)=23.1455;piGA(i)=1960000000;piAcc{i}='';pi_z(i)=1;pigk(i)=5;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=430.5;piEi(i)=20.4485;piEm(i)=23.3277;piGA(i)=433000000;piAcc{i}='';pi_z(i)=1;pigk(i)=5;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=430.91;piEi(i)=20.6381;piEm(i)=23.5145;piGA(i)=2100000000;piAcc{i}='';pi_z(i)=1;pigk(i)=5;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=438.816;piEi(i)=20.6381;piEm(i)=23.4627;piGA(i)=540000000;piAcc{i}='';pi_z(i)=1;pigk(i)=3;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=460.845;piEi(i)=20.6381;piEm(i)=23.3277;piGA(i)=1050000000;piAcc{i}='';pi_z(i)=1;pigk(i)=5;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=482.923;piEi(i)=20.1478;piEm(i)=22.7144;piGA(i)=756000000;piAcc{i}='';pi_z(i)=1;pigk(i)=3;piIntens(i)=9;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=500.56;piEi(i)=20.2382;piEm(i)=22.7144;piGA(i)=333000000;piAcc{i}='';pi_z(i)=1;pigk(i)=3;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=505.627;piEi(i)=20.263;piEm(i)=22.7144;piGA(i)=98400000;piAcc{i}='';pi_z(i)=1;pigk(i)=3;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=612.027;piEi(i)=21.0834;piEm(i)=23.1086;piGA(i)=1180000000;piAcc{i}='';pi_z(i)=1;pigk(i)=7;piIntens(i)=8;piStark(i)=0;% auto imported from NIST ASD Intensity>=7
i=i+1;piUse(i)=0;piquees(i)=KII;pila(i)=630.729;piEi(i)=21.1804;piEm(i)=23.1455;piGA(i)=446000000;piAcc{i}='';pi_z(i)=1;pigk(i)=5;piIntens(i)=7;piStark(i)=0;% auto imported from NIST ASD Intensity>=7


%partitions functions, interpolated using NIST data from
%https://physics.nist.gov/PhysRefData/ASD/levels_form.html Te=4000..20000K
poly_partfunc=zeros(Nspecies,4,1); % 3 degree polynomial interpolation of partition functions, from 4000K to 20000K, from x3 to x0
poly_partfunc(CaI,:) = [+1.51811E-11, -3.61057E-08, -1.37503E-03, +7.85876E+00];
poly_partfunc(CaII,:)= [+1.21705E-13, +5.11919E-09, +1.88296E-04, +1.04049E+00];
poly_partfunc(MgI,:) = [+5.84800E-12, -1.02634E-07, +6.38554E-04, -3.37430E-01];
poly_partfunc(MgII,:)= [+2.33535E-13, -4.25505E-09, +3.23152E-05, +1.90703E+00];
poly_partfunc(SrI,:) = [+6.11127E-12, +1.50741E-07, -0.0024826489,+9.8401229316];  
poly_partfunc(SrII,:)= [+3.54626E-13, +2.27577E-09, +1.68447E-04, + 1.13143];
poly_partfunc(ZnI,:) = [+2.83044E-12, -6.62522E-08, +5.34237E-04, -4.38897E-01];
poly_partfunc(ZnII,:)= [+1.64423E-13, -3.58172E-09, +2.67447E-05, +1.93217E+00];
poly_partfunc(CuI,:) = [+6.56177E-12, -1.25898E-07, +1.13081E-03, -1.09017E+00];
poly_partfunc(CuII,:)= [-2.95249E-13, +2.58956E-08, -2.00221E-04, +1.40651E+00];
poly_partfunc(AlI,:) = [+3.77444E-12, +1.10894E-08, -6.48764E-04, +8.65612E+00];
poly_partfunc(AlII,:)= [+1.00996E-13, +6.24378E-10, -1.95496E-05, +1.07319E+00];
poly_partfunc(SnI,:) = [+6.71496E-12, -1.40628E-07, +1.55177E-03, +1.85903E-01];
poly_partfunc(SnII,:)= [+7.55230E-13, -2.91627E-08, +5.03192E-04, +1.31003E+00];
poly_partfunc(VI,:) =  [-2.73579E-11, +2.10201E-06, -1.37134E-02, +6.88887E+01];
poly_partfunc(VII,:)=  [-1.46240E-12, +2.31560E-07, +4.38807E-03, +1.53628E+01];
poly_partfunc(FeI,:) = [+1.70038E-11, +4.28415E-07, -3.27306E-03, +3.24825E+01];
poly_partfunc(FeII,:)= [+2.43755E-12, +1.36340E-07, +2.17327E-03, +2.90773E+01];
poly_partfunc(NiI,:) = [+6.14267E-12, +1.01750E-07, -6.24182E-04, +3.15010E+01];
poly_partfunc(NiII,:)= [+1.45490E-12, -2.71607E-08, +1.90850E-03, +1.56002E+00];
poly_partfunc(MnI,:) = [+1.02761E-11, +1.49377E-07, -2.35897E-03, +1.36964E+01];
poly_partfunc(MnII,:)= [+2.04381E-12, +1.65890E-07, -1.52921E-03, +1.12160E+01];
poly_partfunc(TiI,:) =  [-6.8318487E-12, +1.2923545E-06, -7.2678445E-03, +3.3766807E+01]; % added 21ene2022
poly_partfunc(TiII,:)=  [ 2.7919359E-12, -5.8981040E-08, +6.0438156E-03, +2.6336505E+01];
poly_partfunc(CI,:) =  [+3.66793E-12, -1.03972E-07, +1.1629E-03, +5.31929 ];
poly_partfunc(CII,:)=  [+1.07323E-13, -4.65368E-10, -1.87951E-06, +5.94667];
poly_partfunc(SiI,:) =  [ 1.2620236E-11, -2.7212758E-07, +2.2246547E-03, +3.6509525E+00];
poly_partfunc(SiII,:)=  [ 4.4224743E-13, -1.1615315E-08, +1.3607100E-04, +5.2274777E+00];
poly_partfunc(NaI,:) =  [ 4.0324423E-12, +1.5457108E-07, -2.1692928E-03, +8.2625905E+00];
poly_partfunc(NaII,:)=  [0,0,0,1]; % always gives 1.00 for this Te range
poly_partfunc(CrI,:) =  [ 1.4497818E-11, +4.1817703E-07, -4.0406862E-03, +1.7842384E+01 ]; % added 21ene2022
poly_partfunc(CrII,:)=  [ 6.5292185E-13, +2.7758110E-07, -1.9815772E-03, +9.9075613E+00 ];
poly_partfunc(PbI,:) =  [ 3.3904738E-12, -5.2796352E-08, +5.8356041E-04, -4.2370251E-01 ]; % added 29ene2022
poly_partfunc(PbII,:)=  [-1.1355724E-14, +3.5643545E-09, +3.5590539E-05, +1.8200442E+00 ];
poly_partfunc(LiI,:) =  [ 1.6125805E-12, +5.4307946E-08, -7.1122779E-04, +4.0026884E+00 ];
poly_partfunc(LiII,:)=  [0,0,0,1]; % always gives 1.00 for this Te range
poly_partfunc(PI,:) =   [ 2.8457486E-12, -5.8930754E-08, +7.5250732E-04, +1.8447535E+00 ];
poly_partfunc(PII,:)=   [ 4.9540277E-13, -2.2260299E-08, +5.3236208E-04, +6.4531907E+00 ];
poly_partfunc(SI,:) =   [ 4.1370631E-12, -1.0932747E-07, +1.1448367E-03, +5.4362653E+00 ];
poly_partfunc(SII,:)=   [-8.2644194E-13, +3.4566173E-08, -1.3776583E-04, +4.0854995E+00 ];
poly_partfunc(KI,:)=  [0,0,0,1] % OJO!!! pending 
poly_partfunc(KII,:)=  [0,0,0,1]; % OJO!!! pending


%poly_partfunc(I,:) =  [];
%poly_partfunc(II,:)=  [];


%Einfinite for saha-bolztmann plot from http://www.webelements.com/calcium/atoms.html
% better yet: https://physics.nist.gov/cgi-bin/ASD/ie.pl?spectra=H-DS+i&units=1&at_num_out=on&el_name_out=on&shells_out=on&level_out=on&e_out=0&unc_out=on&biblio=on
Einfinite = zeros(Nspecies,1);
Einfinite(MgI)=7.65;% magnesium
Einfinite(MgII)=7.65; 
Einfinite(CaI)=6.11;% calcium
Einfinite(CaII)=6.11;
Einfinite(ZnI)= 9.394;%zinc
Einfinite(ZnII)= 9.394;
Einfinite(CuI)=7.726;%copper
Einfinite(CuII)=7.726;
Einfinite(AlI)=5.986; %aluminium
Einfinite(AlII)=5.986;
Einfinite(SnI)=7.35; % Tin
Einfinite(SnII)=7.35; %
Einfinite(VI) = 6.746187; % Vanadium
Einfinite(VII) = 6.746187;
Einfinite(FeI) =  7.9025; % Iron
Einfinite(FeII) = 7.9025; 
Einfinite(NiI) =  7.639878; % Nickel
Einfinite(NiII) = 7.639878; 
Einfinite(MnI) =  7.4340379; % Manganese
Einfinite(MnII) = 7.4340379; 
Einfinite(TiI) = 6.828120 ; % Titanium
Einfinite(TiII) = 6.828120 ; 
Einfinite(CI) = 11.2602880 ; % Carbon
Einfinite(CII) = 11.2602880 ; 
Einfinite(SiI) =  8.15168; % Silicon
Einfinite(SiII) =  8.15168; 
Einfinite(NaI) =  5.13907696; % Sodium
Einfinite(NaII) =  5.13907696; 
Einfinite(CrI) =  6.76651; % Chromium
Einfinite(CrII) =  6.76651; 
Einfinite(PbI) =  7.4166799;    % Lead
Einfinite(PbII) = 7.4166799; 
Einfinite(LiI) =  5.391714996; % Lithium
Einfinite(LiII) = 5.391714996; 
Einfinite(PI) =  10.486686 ; % Phosphorus
Einfinite(PII) = 10.486686 ; 
Einfinite(SI) =  10.36001; % Sulfur
Einfinite(SII) = 10.36001; 
Einfinite(KI) =  4.34066373; % Potassium
Einfinite(KII) = 4.34066373; 


processingTimeStr = datestr(now,'ddmmyyyy_HHMMSS'); % for plot titles and backup file
% discard lines from species not included in 'composition'
for s=1:Nspecies
    if ~any(composition(:)==s) && s~=Halfa % Halfa is always used for Ne estimation
        indexes = find(piquees==s);
        piUse(indexes)=0; % mark as not to be used
        %disp(['discarding ' strjoin(speciesStr(s))]);
    end
end
% discard resonant lines 
if (REMOVE_RESONANT_LINES)
    piUse(piResonant(:)==1)=0;
end
% discard  lines with lower energy level < 0.2
if (REMOVE_LOWER_LEVEL_ZERO)
    disp(['  Warning!! removal of lines with zero Ei, be sure ALL the lines has the value declared, otherwise it is zero by default!']);
    piUse(piEi(:)<0.2)=0;
end

% *new* v31 remove lines outside the wavelength range of the measurement
%removeOutofRange = find(pila<lambdas(1) || pila>lambdas(end)); 
piUse(pila<lambdas(1))=0;
piUse(pila>lambdas(end))=0;


if (DO_USE_HR2000)
  ValSaturation = 16000;   % expected maximum value without saturation
  ValMinHeightAllPeaks = 1000; % if no peak is above this value, the spectrum is considered not-valid. noise values are typ. <1000
  ValMinHeightRelative = 300; % altura RELATIVA mínima de un pico para que sea válido
end
if (DO_USE_PIMAX3)
  ValSaturation = 65000;   % expected maximum value without saturation
  ValMinHeightAllPeaks = 5000; % if no peak is above this value, the spectrum is considered not-valid. noise values are typ. <1000
  ValMinHeightSinglePeak = 1200; % new v20 19mar2020: if DISCARD_ALSO_WEAK_PEAKS ==1 and the raw height of any single peak is below this value, the entire spectrum is marked as not valid  
  ValMinHeightRelative = 200; % altura RELATIVA mínima de un pico para que sea válido
end
if (DO_USE_AVANTES)
  ValSaturation = 65000;   % expected maximum value without saturation
  ValMinHeightAllPeaks = 2000; % if no peak is above this value, the spectrum is considered not-valid. noise values are typ. <1000
  ValMinHeightSinglePeak = 1800; % new v20 19mar2020: if DISCARD_ALSO_WEAK_PEAKS ==1 and the raw height of any single peak is below this value, the entire spectrum is marked as not valid
  ValMinHeightRelative = 100; % altura RELATIVA mínima de un pico para que sea válido
end
ValSaturationCorrected = ValSaturation*ones(Npixeles,1); % si no hay corrección de irradiancia, se queda así 

if strcmp(param1Name,'deltaT') == 1 || Nparam2>1   mode2D = 1; else     mode2D = 0; end

if (DO_USE_HR2000)  % spectra from HR2000 is in another variable
 Npixeles=2048;
 spectra = hr2000_spectra;
 lambdas=hr2000_lambdas;
 ancho = lambdas(2048)-lambdas(1);
 central = ceil(lambdas(1) + ancho/2);
 nm2pixels=2048/ancho;   
 spectrometer_name=['hr2000']; 
 getSpectrometerFWHM = @(lambda) 1.0; % FWHM measured
end

if (DO_USE_PIMAX3)  % spectra from HR2000 is in another variable
   
    if exist('REMOTE_PIMAX','var')  % spectra from PIMAX3 is from remote machine
      Npixeles=1024;
      %spectra = pimax3_spectra;
      %lambdas=pimax3_lambdas;
      spectra = spectra_remote_pimax;
      lambdas=lambdas_remote_pimax;
      
    end
   
   ancho = lambdas(1024)-lambdas(1);
   central = ceil(lambdas(1) + ancho/2);
   nm2pixels=1024/ancho;   
   if (ancho > 250) % grating 150lpp
      spectrometer_name=['pimax3 150lpp@' num2str(central) 'nm']; 
      getSpectrometerFWHM = @(lambda) 0.9; % FWHM measured for this grating: peak at 435 nm with grating 150lpp @ 400nm, otras anchuras de otros picos son 0.86nm, 0.94nm
   else
      if (ancho > 30) % graging 1200lpp
        spectrometer_name=['pimax3 1200lpp@' num2str(central) 'nm'];
        getSpectrometerFWHM = @(lambda) 0.133; % FWHM measured for this grating
      else
        spectrometer_name=['pimax3 1800lpp@' num2str(central) 'nm'];
        getSpectrometerFWHM = @(lambda) 0.1; % FWHM measured for this grating
      end
   end

end

 % instrumental width FWHM (measured with the HgAr calibration lamp)
 % Avantes:  178.5-255.3	0.097;  251.3-316.9	0.065 ; 312.4-365.6	0.0661;
 % 360.7-403.5	0.053 ; 398.8-492.4	0.085 ; 488.9-564.9	0.0819 ;
 % 560.2-680.2	0.072; 681.7-889.3	0.142

if (DO_USE_AVANTES)  % spectra from Avantes is already the main spectra() variable 
 ancho = lambdas(Npixeles)-lambdas(1);
 central = ceil(lambdas(1) + ancho/2);
 nm2pixels=Npixeles/ancho;   % this value is not per channel and it is an aproximation
 spectrometer_name=['Avantes'];
 getSpectrometerFWHM = @AvantesFWHM; % use this function name to get the value, should have one function per spectrometer
 % these are the wavelength windows for each channel: h5 = 178.63 to 251.32
 % h6 = 251.34 to 312.34 %h7 = 312.35 to 360.73 %h8 = 360.74 to 398.74
 %h1 = 398.75 to 488.81 % h2 = 488.85 to 560.17 %h3 = 560.17 to 680.17
 %h4 = 681.57 to 889.26nm.
end

 %% spectra stitching for multiwindows measurements  *new* 12mar2017
 % this is a measurement configuration in wich the ACTON spectrometer is shifted at different wavelength windows for every spatial points, to get more wide wl range with high resolution, seldon used nowadays
 if (MULTI_WINDOW==1)
   NpixelesEachWindow = Npixeles;
   Npixeles = Nwindows*NpixelesEachWindow;
   spectra = zeros(Npixeles,Npulses, Nparam1, Nparam2,'single'); % nueva variable con los espectros pegados
   lambdas = zeros(Npixeles,1);
   lastLambda = 0.0;
   lastIndex = 0;
   for nWindow =1:Nwindows % se ejecuta una sola vez en el modo no MULTI_WINDOW
     ix = find(MW_lambdas(:,nWindow)>lastLambda); % primera lambda mayor que la última
     lambdas(lastIndex+1:lastIndex+1+NpixelesEachWindow-ix(1)) = MW_lambdas(ix(1):NpixelesEachWindow,nWindow);
     spectra(lastIndex+1:lastIndex+1+NpixelesEachWindow-ix(1),:,:,:) = MW_spectra(ix(1):NpixelesEachWindow,:,:,:,nWindow);
     lastIndex = lastIndex+1+NpixelesEachWindow-ix(1);
     lastLambda = MW_lambdas(NpixelesEachWindow,nWindow);
   end
   lambdas = lambdas(1:lastIndex);
   spectra = spectra(1:lastIndex,:,:,:);
   Npixeles = lastIndex;
   spectrometer_name=['multiwindow@' num2str(central) 'nm'];
   getSpectrometerFWHM = @(lambda) 0.133; % FWHM measured for the 1200lpp grating used in the multiwindow configuration
 end

%pixex=ceil(AvantesFWHMpixeles(lampara_FWHM)/2); % número de píxeles hacia
%los lados que ocupa el ancho FWHM, para integrar, en el Avantes es
%variable ; esto ya no se puede hacer porque es variable. La anchura
%instrumental sale siempre de 2 pixeles, es muy pequeña.

FEATURES='';
FEATURES = [ FEATURES 'CF,'];
FEATURES = [ FEATURES 'REMOVE_BACKGROUND=' num2str(REMOVE_BACKGROUND) ','];
FEATURES = [ FEATURES 'REMOVE_BASELINE=' num2str(REMOVE_BASELINE) ','];
if (DO_USE_HR2000~=0)
      FEATURES = [ FEATURES 'HR2000,'];
end
FEATURES = [ FEATURES spectrometer_name ','];

% fix the spectral response of the setup, should be done for CFLIBS, but in case there is no calibration data, it can be skipped
if (IRRADIANCE_CORRECTION==1 ) %%% Cambié la condicion para poder usar carpetas antiguas
   %24august2019 polynomials have large error around 250nm (emission max),
   %there is a new DH2000.MAT file with dh2000_irradiance_both, onlyUV,
   %onlyIR, split and lambdas
   poly_deuterio = fliplr([ -318.1404847, 4.735948769, -0.02636499, 6.98226E-05, -8.81643E-08, 4.2219E-11 ]); % el primero es p0, al revés que polyfit y polyval 
   poly_halog = fliplr([ 1.275454122, -0.002887867, - 2.17019E-05, 6.94333E-08, -3.7258E-11 ]);
   poly_emision_combinada = [ -8.08165E-09, 1.89917E-05, - 1.26612E-02, 2.71727 ]; % p0 is the last value, 6jun2018 este polinomio no modela bien en el borde izquierdo (200nm)
   load ('dh2000.mat'); % 24august2019 contains the irradiance values from calibration sheet. values below  200nm are extrapolated

   if (strcmp(spectrometer_name,'pimax3 150lpp@390nm')) % august2019, G=10, gate=20ms
       load('respuesta_espectrometro_pimax_390nm_azul_agosto2019.mat');
       irradiance_theoretical = timeseries(dh2000_irradiance_onlyUV,dh2000_lambdas);
       emision2= resample(irradiance_theoretical,lambdas);
       respuesta_espectrometro_raw = measured_irradiance_dh2000spectrum_noBackground ./ emision2.Data ;
       respuesta_espectrometro = smooth(respuesta_espectrometro_raw,100,'lowess');
       dividir_respuesta_espectrometro  = respuesta_espectrometro ./ max(respuesta_espectrometro); % this is the vector to divide to
   elseif (strcmp(spectrometer_name,'multiwindow@290nm')) % medidas multiwindow 1200lpp 6 ventana
      load('respuesta_espectrometro_1200lpp_6ventanas_backgroundquitado_mar2017.mat');
      i = find(ganancias_respuesta_espectrometro==gainIntensifier);
      if (i==0)
       error('There is not an spectral correction file for the gain apparently used for the measurements');
      end
      dividir_respuesta_espectrometro = respuesta_espectrometro(:,i); % hay que dividir entre este vector
      disp('Warning!!! spectral response correction for Avantes is not correct below 200nm (not enough light)');
   elseif (strcmp(spectrometer_name,'Avantes'))
       % 24ago2019 new calibration with SPLIT spectrum: irradiance captured
       % with only deuterium, only halogen, and then stitched, we should
       % use the var dh2000_irradiance_split (not both on at once)
       %load('respuesta_espectrometro_avantes_roja_1mmSR_con_lentes_split_22ene2021'); %updated 22ene2021
       load(FILE_IRRADIANCE_CORRECTION);
       irradiance_theoretical = timeseries(dh2000_irradiance_split,dh2000_lambdas);
       irradiance_theoretical = resample(irradiance_theoretical,lambdas);
       irradiance_measured = timeseries(measured_irradiance_dh2000spectrum_noBackground,measured_irradiance_lambdas);
       irradiance_measured = resample(irradiance_measured,lambdas);
       respuesta_espectrometro_raw = irradiance_measured.Data ./ irradiance_theoretical.Data ;
       % smothing create artifacts in the stitches of the channels, I think
       % is better with no smoothing, it is already done in a per-channel basis
       %respuesta_espectrometro =
       %smooth(respuesta_espectrometro_raw,100,'lowess'); % already done
       respuesta_espectrometro = respuesta_espectrometro_raw;
       dividir_respuesta_espectrometro  = respuesta_espectrometro ./ max(respuesta_espectrometro); % this is the vector to divide to
   else    
     error 'There is no spectral correction file for this particular spectrometer/spectral window configuration'
   end
   % al corregir en irradiancia el valor de saturación ya no es aplicable,
   % voy a hacer una matriz de valores de saturación "corregidos"
   %25ago2019 there are values in "dividir_..." less than 0, subtitute to
   %0.005 (max is 1)
   dividir_respuesta_espectrometro(dividir_respuesta_espectrometro<0.005) = 0.005;
   which_lambdas_have_too_low_sensitivity = dividir_respuesta_espectrometro<0.005;
   ValSaturationCorrected = ValSaturation ./ dividir_respuesta_espectrometro;  
end

PNbarras=strrep(PN,'\','/'); % gira un poco las barras :)

%cálculo de los polinomios lambda<->pixel, permite usar decimales de pixel y recalibrar el espectro
pixeles = (1:size(lambdas))';

% SPLIT_PARAM2 is a storage method for the measurement matrix used with older 32bits Matlab versions to deal with the max matrices size, this can be safelyl removed 
if (SPLIT_PARAM2==1)
   spectra = zeros(Npixeles,Npulses, Nparam1, Nparam2,'single');
   for param2IndexReal= 1:Nparam2
      param2 = param2From + (param2IndexReal-1)*param2Step; 
      fn_split = strcat('spectra_idx2=',sprintf('%04i',param2IndexReal),'_', param2Name,'=',sprintf('%0.2f',param2));
      fn_split = strrep(fn_split,'.',','); %replaces dots with commas, just in case 
      if (exist(strcat(PN,'\',fn_split,'.mat'), 'file')==2)
        tmp_spectra = load(strcat(PN,'\',fn_split),'spectra'); % ead the partial spectra for this param2 iteration
        spectra(:,:,:,param2IndexReal) = tmp_spectra.spectra;
%      else if(param2IndexReal==4)
%          spectra(:,:,:,param2IndexReal) = backup_spectra;   
%          end
      end
      
   end
end

% if REARRANGE>0 , a one dimensional measurement (i.e. many laser shots in a depth profiling is split in different "spatial" points, this can help to obtain sequences of concentrations in depth as the CFLIBS is performed to every "spatial" point from the averaged shots , otherwise, only one mean spectrum will be processed
if (REARRANGE > 0)
  ra_factor = Npulses / REARRANGE; % factor en el que se incrementa dimensión 1 y se reduce Npulses
  ra_spectra = zeros(Npixeles,REARRANGE, Nparam1 * ra_factor, Nparam2,'single');
  k=1;
  for j=1:Nparam1
   for i=1:ra_factor
    ra_spectra(:,:,k,:) = spectra(:,1+(i-1)*REARRANGE:i*REARRANGE,j,:);
    k=k+1;
   end
  end
  Npulses = REARRANGE;
  Nparam1 = Nparam1*ra_factor;
  param1Name = [ param1Name '_rearranged!'];
  param1Step = param1Step / ra_factor;
  spectra = ra_spectra;
  spectra_is_valid = ones(REARRANGE, Nparam1 * ra_factor, Nparam2,'int8');
end

if (REARRANGE > 0)
     ejeParam1 = param1From:param1Step:Nparam1*param1Step+param1From-1; % he centralizado aquí la definición del eje horizontal en v04 para cuadrarlo con lo de REARRANGE
else
     ejeParam1 = param1From:param1Step:param1To; % 27jun2021 was as above, changed to the REAL one ?¿? 1setp2019 gave error, I don't know if changing this have colateral damages
end
if size(ejeParam1,2) ~= Nparam1 % Nparam1 has been manually changde to limite the amount of points processed, if so, we should reduce ejeParam1 accordingly
    ejeParam1 = ejeParam1(1:Nparam1);
end
%ejeParam1 = param1From:param1Step:param1To;
ejeParam2 = param2From:param2Step:param2To;
if size(ejeParam2,2) ~= Nparam2 % Nparam1 has been manually changde to limite the amount of points processed, if so, we should reduce ejeParam1 accordingly
    ejeParam2 = ejeParam2(1:Nparam2);
end


% specific for CF-LIBS
 kB_eVK = 8.6173324E-5;
 kB_JK = 1.38064852E-23;
 h_Js = 6.62607E-34;
 h_eVs = 4.135667E-15;
 me_MeVc2 = 0.511E6/9E16;
 me_gr = 9.1093836E-31 * 1E3;
 REASON_NOT_VALID_MIN_HEIGHT = 1; % reasons why a peak has been marked as not valid somewhere
 REASON_NOT_VALID_MAX_HEIGHT = 2;
 REASON_NOT_VALID_MIN_WIDTH = 4;
 REASON_NOT_VALID_MAX_WIDTH = 8; % reasons why a peak has been marked as not valid somewhere
 REASON_NOT_VALID_FIT_ERROR = 16; % fitting with too much error or complex values 
 str_reasons = {'min\_height','max\_height','min\_width','max\_width','fit\_error'};

 peaks_isvalid=zeros(CFNlines,Npulses,Nparam1,Nparam2); % if a peak model is valid or not
 peaks_heights=zeros(CFNlines,Npulses,Nparam1,Nparam2,'single'); % all the calculated peaks height
 peaks_fwhm=zeros(CFNlines,Npulses,Nparam1,Nparam2,'single'); % all the calculated FWHM of peaks
 peaks_area=zeros(CFNlines,Npulses,Nparam1,Nparam2,'single'); % all the calculated integrated intensity of peaks
 peaks_stark=zeros(CFNlines,Npulses,Nparam1,Nparam2,'single'); % all the stark broadenings
 peaks_central=zeros(CFNlines,Npulses,Nparam1,Nparam2,'single'); % all the fitted central lambdas
 peaks_selfabscoeff=zeros(CFNlines,Npulses,Nparam1,Nparam2,'single'); % selfabsorption coefficients (Sun2009IRSAC or PRaher2010)
 peaks_Ne_fromStark=zeros(CFNlines,Npulses,Nparam1,Nparam2,'single'); % all the Ne from stark broadening

 % calculado para el espectro promedio en Npulses
 peaks_heights_frommean=zeros(CFNlines,Nparam1,Nparam2,'single'); % all the calculated peaks height
 peaks_rawHeights_frommean=zeros(CFNlines,Nparam1,Nparam2,'single'); % from raw hegiht of peaks at the maximum 
 peaks_heights_frommean_SAcorrected=zeros(CFNlines,Nparam1,Nparam2,'single'); % all the calculated peaks height, after SA correction
 peaks_fwhm_frommean=zeros(CFNlines,Nparam1,Nparam2,'single'); % all the calculated FWHM of peaks
 peaks_fwhmSpectrometer_frommean=zeros(CFNlines,Nparam1,Nparam2,'single'); % the instrumental fwhm evaluated at every lambda, for debugging purposes
 peaks_intensity_frommean=zeros(CFNlines,Nparam1,Nparam2,'single'); % the intensity, depending on LINE_INTENSITY, it could be the height, area...  used for BP, SBP, ratios ...
 peaks_twohalfareas_frommean=zeros(CFNlines,Nparam1,Nparam2,'single'); % all the calculated integrated instensity of peaks, two times the right half area (to overcom asymmetry problem)
 peaks_area_frommean=zeros(CFNlines,Nparam1,Nparam2,'single'); % all the calculated integrated instensity of peaks
 peaks_stark_frommean=zeros(CFNlines,Nparam1,Nparam2,'single'); % all the stark broadenings of mean spectra
 peaks_central_frommean=zeros(CFNlines,Nparam1,Nparam2,'single'); % all the fitted central lambdas
 peaks_fit_error_frommean=zeros(CFNlines,Nparam1,Nparam2,'single'); % the error (relative squared sum of residuals) of the fitting
 peaks_fit_pixcentral0=zeros(CFNlines,1); % the central pixel 
 peaks_fit_pixleftbkg10=zeros(CFNlines,1); % the pixel to the near left used for background substraction (area of the line)
 peaks_fit_pixrightbkg10=zeros(CFNlines,1); % the pixel to the near right used for for background substraction (area of the line)
 peaks_fit_pixleftbkg20=zeros(CFNlines,1); % the pixel to the far left used for background substraction (area of the line)
 peaks_fit_pixrightbkg20=zeros(CFNlines,1); % the pixel to the far right used for for background substraction (area of the line)
 peaks_fit_pixleft0=zeros(CFNlines,1); % the pixel to the left used for peak fitting
 peaks_fit_pixright0=zeros(CFNlines,1); % the pixel to the right used for peak fitting
 peaks_fit_lastLorentzParams=zeros(CFNlines,3); % new v28 seed values for next fitting, currently not used
 peaks_fit_FitZeroLorentzParams=zeros(CFNlines,3); % new v30.6 loparams of the first fit, could be the seed for all fittings
 peaks_Ne_fromStark_frommean=zeros(CFNlines,Nparam1,Nparam2,'single'); % all the Ne from stark broadening
 peaks_Ne_fromStarkOtherPeaks_frommean=zeros(Nparam1,Nparam2,'single'); % the calc of Ne from peaks other than Halfa (i.e.,median, mean...)
 peaks_Ne_frommean=zeros(Nparam1,Nparam2,'single'); % could be from Halfa, other peaks' stark, or anything
 peaks_Ne_fromLineRatio_frommean=zeros(CFNlines,Nparam1,Nparam2,'single'); % all the Ne from ????
 peaks_selfabscoeff_frommean=zeros(CFNlines,Nparam1,Nparam2,'single'); % selfabsorption coefficients (Sun2009IRSAC or Praher2010) <1, DIVIDE
 
 % new v30 results from fitting of the spectrum used in the first fitting step "fitting-zero"
 peaks_heights_frommean0=zeros(CFNlines,1,'single'); % all the calculated peaks height for the fitting-zero step
 peaks_rawHeights_frommean0=zeros(CFNlines,1,'single'); % raw heights 
 peaks_fwhm_frommean0=zeros(CFNlines,1,'single'); % all the calculated FWHM of peaks
 peaks_fwhmSpectrometer_frommean0=zeros(CFNlines,1,'single'); % the instrumental fwhm evaluated at every lambda, for debugging purposes
 peaks_intensity_frommean0=zeros(CFNlines,1,'single'); % the intensity, depending on LINE_INTENSITY, it could be the height, area...  used for BP, SBP, ratios ...
 peaks_twohalfareas_frommean0=zeros(CFNlines,1,'single'); % all the calculated integrated instensity of peaks, two times the right half area (to overcom asymmetry problem)
 peaks_area_frommean0=zeros(CFNlines,1,'single'); % all the calculated integrated instensity of peaks
 peaks_stark_frommean0=zeros(CFNlines,1,'single'); % all the stark broadenings of mean spectra
 peaks_central_frommean0=zeros(CFNlines,1,'single'); % all the fitted central lambdas
 peaks_fit_error_frommean0=zeros(CFNlines,1,'single'); % the error (relative squared sum of residuals) of the fitting
 
 % results from individual spectra, 
 slope_BP=zeros(Nspecies,Npulses,Nparam1,Nparam2,'single'); % bolztmann plot slope
 intercept_BP=zeros(Nspecies,Npulses,Nparam1,Nparam2,'single'); % intercept qs of bolztmann plot 
 NumPeaks_BP=zeros(Nspecies,Npulses,Nparam1,Nparam2); %number of peaks used in each BP
 Te_BP=zeros(Nspecies,Npulses,Nparam1,Nparam2,'single'); % calculated Te with boltzmann-plot 
 Te_SahaBP=zeros(Nspecies,Npulses,Nparam1,Nparam2,'single'); % calculated Te with saha-boltzmann-plot 
 %results from mean spectrum
 peaks_isvalid_frommean=zeros(CFNlines,Nparam1,Nparam2); % if a peak model is valid or not
 peaks_isvalid_frommean_reason=zeros(CFNlines,Nparam1,Nparam2); % reason why is not valid, from constants NOT
 slope_BP_frommean=zeros(Nspecies,Nparam1,Nparam2,'single'); % bolztmann plot slope
 slope_single_BP_frommean=zeros(Nparam1,Nparam2,'single'); % singles slopes from BP of all the species at once
 intercept_single_BP_frommean=zeros(Nspecies,Nparam1,Nparam2,'single'); % bolztmann plot slope for each species BUT with common slope
 intercept_BP_frommean=zeros(Nspecies,Nparam1,Nparam2,'single'); % intercept qs of bolztmann plot 
 Te_BP_frommean=zeros(Nspecies,Nparam1,Nparam2,'single'); % calculated Te with boltzmann-plot 
 NumberOfLines_BP_frommean=zeros(Nspecies,Nparam1,Nparam2); % number of points in each BP
 Te_single_BP_meanTe_frommean=zeros(Nparam1,Nparam2,'single'); % calculated Te with a single boltzmann-plot of all the species
 Te_single_BP_frommean=zeros(Nparam1,Nparam2,'single'); % single Te from the mean Te's of all species' boltzmann-plots
 NumPeaks_BP_frommean=zeros(Nspecies,Nparam1,Nparam2); %number of peaks used in each BP
 slope_SahaBP_frommean=zeros(Nspecies,Nparam1,Nparam2,'single'); % bolztmann plot slope
 slope_single_SahaBP_frommean=zeros(Nparam1,Nparam2,'single'); % saha-bolztmann plot slope with single Te
 intercept_SahaBP_frommean=zeros(Nspecies,Nparam1,Nparam2,'single'); % intercept qs of saha bolztmann plot 
 intercept_single_SahaBP_frommean=zeros(Nspecies,Nparam1,Nparam2,'single'); % intercept qs of saha bolztmann plot  single Te
 Te_SahaBP_frommean=zeros(Nspecies,Nparam1,Nparam2,'single'); % calculated Te with saha-boltzmann-plot 
 Te_single_SahaBP_frommean=zeros(Nparam1,Nparam2,'single'); % calculated Te with saha-boltzmann-plot single Te
 NumPeaks_SahaBP_frommean=zeros(Nspecies,Nparam1,Nparam2); %number of peaks used in each SahaBP
 peaks_area_frommean_fitted_for_reference_line=zeros(Nspecies,Nparam1,Nparam2,'single'); % fitted values of IRSAC reference lines, after first BP
 
%concentrations and ratios
concentration=zeros(Nspecies,Nparam1,Nparam2); %
concentration_z1=zeros(Nspecies,Nparam1,Nparam2); % with z=1 substitution
concentration_weight  =zeros(Nspecies,Nparam1,Nparam2); % in weight
concentration_weight_z1  =zeros(Nspecies,Nparam1,Nparam2); % in weight
concentration_error = zeros(Nparam1,Nparam2); % in weight
ratio_AB_CFLibs_molar = zeros(Nparam1,Nparam2); % ratio from CF calculations (mmols/mol)
ratio_AB_CFLibs_molar_z1 = zeros(Nparam1,Nparam2);
ratio_AB_CFLibs_weight = zeros(Nparam1,Nparam2);
ratio_AB_CFLibs_weight_z1 = zeros(Nparam1,Nparam2);
opts = optimset('Display','off');
   
integrated_intensity=zeros(Nparam1,Nparam2); % to discard outlier (fill spectra) based on intensity
mean_spectra_only_valids=zeros(Npixeles,Nparam1,Nparam2);   % mean spectra using only valid spectra
discarded_integrated_intensity=zeros(Nparam1,Nparam2); % if 1, this spatial points has been discarded due to intensity below threshold
mean_spectra_is_valid=zeros(Nparam1,Nparam2); % v27 number of valid spectra in each spatial points, used to discard full spatial points based on intensity outliers
resin_intensity=zeros(Nparam1,Nparam2); %v27 store the raw intensity value of emission line at wavelength RESIN_LAMBDA_MONITORING 

spectra_original = spectra; % before changing spectra with background removal and irradiance correction, save the original one just in case to verify things

%% CF-Step 1   calc firstLaserpulse for each spatial point, to remove background with more precision
%antes de preprocesar voy a calcular el valor de ncleaningshots con precisión porque el ruido crece linealmente hasta el disparo 6, para no fallar porque creo que quitar el ruido aditivo es importante
%Ncleaningshots = NpulsesClean ; % más o menos el laser empieza a disparar 2 pulsos antes de lo especificado, por si acaso
%modificado v13: esto es importante en los espectros de la PIMAX3, pero el primero llega a valores de 11000.
% in our measurments, the qswitch is off for the first N laser shot in every spatial point, this way, we get noise spectra that are averaged and substracted later on 
 disp(['CF-Step 1: automatic detection of firstLaserPulse for every spatial point...']);    
 maxspectravalues=zeros(Npulses,Nparam1,Nparam2);
 firstLaserpulse=zeros(Nparam1,Nparam2);
 for idx2= 1:Nparam2
  for idx1= 1:Nparam1
    for npulse=1:Npulses
      maxspectravalues(npulse,idx1,idx2)=max(spectra(:,npulse,idx1,idx2));
    end
    f = find(maxspectravalues(:,idx1,idx2)>ValMinHeightAllPeaks,1);  % no intensity above this value means noise spectrum
    if (~isempty(f))
        firstLaserpulse(idx1,idx2) = f;
    else
        firstLaserpulse(idx1,idx2) = 1; % actually there is no spectra
    end
  end
 end
 
%% CF-Step 2   remove background with the electronic (additive) noise of the first spectra, METHOD #1
% preprocesado para quitar el background AQUI, el método 1 usa los primeros pulsos sin láser (NpulsesClean)
% la amplitud del ruido va creciendo asintóticamente, con Npulsesclean=7
% (5) no se estabiliza todavía
% v12 14dic2017 el ruido crece linealmente, no es estable hasta el 6, y no se garantiza que empiece a disparar exactamente en NpulsesClean+1
% v25 2jul2021 if there are no noise spectra, nothing is substracted
if (REMOVE_BACKGROUND== 1) 
 if (DO_USE_PIMAX3==1)
    first_noise = 6;
 else
    first_noise = 1; % only our pimax3 has this effect of high-noise at the first pulses, then ok
 end
 disp(['CF-Step 2: Substracting background using electronic noise from first spectra starting with ' num2str(first_noise) '...']);    
 
 % calculamos un background medio con todos los espectros de ruido válidos
 specback = zeros (size(lambdas,1),1);
 num_specbacks = 0;
 for idx2= 1:Nparam2
  for idx1= 1:Nparam1
   n_espectros = firstLaserpulse(idx1,idx2) - first_noise;
   if (n_espectros > 0) % at least one noise spctrum is ok
     tmp_mean_noise =   sum(spectra(:,first_noise:firstLaserpulse(idx1,idx2)-1,idx1,idx2),2);
      if max(tmp_mean_noise) > 3000 * n_espectros
          disp('   Warning! background with peaks, something is wrong with the estimation of the first few spectra with no LIBS emission');
      end
     specback = specback + tmp_mean_noise;
     num_specbacks = num_specbacks + n_espectros;
   else
       if spectra(1,1,idx1,idx2)>0 % could be tonnes of empty spectra in spatial points not measured,they should not give warnings
         disp(['   Warning! no noise spectra to substract background in point (',num2str(idx1),',',num2str(idx2),')']);
       end
   end
  end
 end
 specback = specback / num_specbacks;
 Ncleaningshots = mode(firstLaserpulse(find(firstLaserpulse>0))); %% warning! this single value is the MOST frequent, it could be different in every spatial point due to timming issues in the q-switch controller
 for idx2= 1:Nparam2
  for idx1= 1:Nparam1
      specback = nanmeanLocal(spectra(:,first_noise:firstLaserpulse(idx1,idx2)-1,idx1,idx2),2); % electronic noise averaged
      for npulse=firstLaserpulse(idx1,idx2):Npulses
        if (spectra_is_valid(npulse,idx1,idx2)) % en principio no está descartado
          if firstLaserpulse(idx1,idx2) - first_noise > 0 % there are background (noise) spectra to substract; no substract otherwise
              spectra(:,npulse,idx1,idx2)  = spectra(:,npulse,idx1,idx2) - specback;
          end
        end   
      end
  end
 end
 disp(['   Removed background substracting ' num2str(num_specbacks) ' noise spectra']);
 end

 %% Divides each spectrum by its total intensity. Warning! this change the valSaturation value and makes it different for each spectrum 
 disp(['CF-Step 3: Normalization of spectra... ']);    
 if (DO_NORMALIZE==1)
  disp('   Total area normalization applied');
  SUMATOTAL=(sum(spectra,1));
  meanIntegratedIntensity = nanmeanLocal(nanmeanLocal(SUMATOTAL(1,10:end,:),2),3); % quick and dirty average of valid spectra
  spectra=spectra./ SUMATOTAL .* meanIntegratedIntensity; % this way de overal vertical scale is not changed so much, yet it is normalized
 elseif(DO_NORMALIZE>1)
  disp('   WARNING! normalization method not yet implemented');  
 else
  disp('   no normalization applied.');     
 end

%% CF-Step 3   Irradiance correction 
% irradiance correction, the actual correction is perfomed now because substraction of additive noise should be performed with the raw spectra 

if (IRRADIANCE_CORRECTION == 1) 
 disp('CF-Step 4: Irradiance correction...');    
 for idx2= 1:Nparam2
  for idx1= 1:Nparam1
   for npulse=firstLaserpulse(idx1,idx2):Npulses
    %irradiance response correction using DH2000 data 
    spectra(:,npulse,idx1,idx2) = spectra(:,npulse,idx1,idx2) ./ dividir_respuesta_espectrometro;
   end
  end
 end
end

% wavelength sorted, too close lines discarded, regardless of being used  
if ( REMOVE_OVERLAPPED_LINES )
  disp('CF-Step 5: Removing overlapped emission lines and those in poor sensitivity wavelengths...');    
else
  disp('CF-Step 5: NOT removing overlapped emission lines...');        
end
 whichLambdas=[];whichPeaks=[];
  for s=composition
    whichLambdas = vertcat(whichLambdas,  pila(piquees==s));
    whichPeaks = vertcat(whichPeaks,  find(piquees==s));
  end
  ordered = sortrows([whichLambdas whichPeaks]);
  for i=1:size(ordered,1)-1
      if (abs(ordered(i,1)-ordered(i+1,1)) < 3*getSpectrometerFWHM(pila(ordered(i,2))) && piUse(ordered(i,2))==1 && piUse(ordered(i+1,2))==1 ) % three times the FHWM is the threshold, it is about 0.2.0.3nm apart for the Avantes. Risk of overlapping or misclasification
         if (REMOVE_OVERLAPPED_LINES==0)
           disp(['  Warning!! two overlapped lines IN USE: ', strjoin(speciesStr(piquees(ordered(i,2)))), '@',num2str(pila(ordered(i,2))), ' and ' ,  strjoin(speciesStr(piquees(ordered(i+1,2)))), '@',num2str(pila(ordered(i+1,2))), ' not discarded (REMOVE_OVERLAPPED=0)']);
         else 
           disp(['  Warning!! two overlapped lines IN USE: ', strjoin(speciesStr(piquees(ordered(i,2)))), '@',num2str(pila(ordered(i,2))), ' and ' ,  strjoin(speciesStr(piquees(ordered(i+1,2)))), '@',num2str(pila(ordered(i+1,2))) , ' DISCARDED!!']);
           piUse(ordered(i,2)) =0;
           piUse(ordered(i+1,2)) =0;
         end
      end
  end
  
% also for peaks in lambdas with sensitivity very low ("dividir_..." < 0.005) a warning is shown
if (IRRADIANCE_CORRECTION>0) % only with irradiance correction the sensitivy of any lambda is known
 for i=1:size(ordered,1)
      px = lambda2pixel(lambdas,pila(ordered(i,2)));
      if (which_lambdas_have_too_low_sensitivity(px)==1)
         disp(['  Warning!! peak ', strjoin(speciesStr(piquees(ordered(i,2)))), '@',num2str(pila(ordered(i,2))), ' is at an channel edge with poor sensitivity - irradiance correction could not be Ok']);
      end
 end
end

if LAMBDA_RECALIBRATE % the lambdas vector is shifted to recalibrate
    % 02jul2021 data from measurement of HgAr & Neon lamps
    shift8 = -0.1511539 + 0.000282025*myLambda8 - 0.000000038*myLambda8.^2;    
    lambda_correction = cat(1,repmat(0.108,1921,1),repmat(0.037,1867,1),repmat(0.035,1786,1),repmat(0.0205,1755,1),repmat(-0.022,1927,1),repmat(0.04,1859,1),repmat(0.1726,2048,1),shift8);
    lambdas = lambdas + lambda_correction;
end

% pila() is substituted by pilaobs() for shifted peaks. if GLOBAL_LAMBDA_SHIFT is not zero, the emission WL is shifted with its value. this can compensate a global WL shift
pila_theoretical = pila; % store the "original/theoretical" values
for p=1:CFNlines
     if(pilaobs(p)~=0)
      pila(p) = pilaobs(p); % if PiObs is declared, THIS is the real WL
     %else
     %  if GLOBAL_LAMBDA_SHIFT ~= 0.0
     %      pila(p) = pila(p) + GLOBAL_LAMBDA_SHIFT; % positive GLS moves spectrum to the LEFT
     %  end    
     end
end


%% CF-Step 6   Mark as non-valid for weak or saturated spectra and mean spectrum
% this code mark individual spectra or lines as not valid, before averaging each spatial point, this is important to remove peaks with a few of them saturated that produce an apparently ok averaged peak
% new v16! the mean is calculate from FIRST_SHOT_FOR_AVERAGING to LAST_SHOT_FOR_AVERAGING
% new v16! we indeed know ('composition') which lines are we going to use.
% for spectra with peaks always saturated, you didn't get any.
whichLambdas=pila(piUse>0); % only peaks in composition, other peaks has been set to piUse(i)=0
whichPeaks = find(piUse>0);
doNotUse = zeros(size(piUse));
doNotUse(:)=1; % let's start with all peaks Ok
pixels2look_orig = lambda2pixel(lambdas,whichLambdas'); % transpose, if not, non-singleton error  
discardedSpectraSat=zeros(Nparam1,Nparam2);
discardedSpectraAllLow=zeros(Nparam1,Nparam2);
discardedSpectraSinglePeakLow=zeros(Nparam1,Nparam2);
totalValidSpectra=zeros(Nparam1,Nparam2);
totalSaturatedPeaks=zeros(Nparam1,Nparam2,size(whichPeaks,1)); % count of accumulated discarded peaks due to at least one saturated
totalAllLowPeaks=zeros(Nparam1,Nparam2,size(whichPeaks,1)); % stores the npulses of spectra that has all peaks below a threshold 
totalSinglePeakLow=zeros(Nparam1,Nparam2,size(whichPeaks,1)); % stores the npulses of spectra that has at least one peak below a threshold

% creates strings to name emission lines
lineName = {};
for i=1:size(whichPeaks)
     lineName{i} = [ '#' num2str(whichPeaks(i)) ' ', strjoin(speciesStr(piquees(whichPeaks(i)))), '@',num2str(pila_theoretical(whichPeaks(i)))];
end

if (DISCARD_NONVALID_SPECTRA > 0) 
      fprintf('CF-Step 6: Marking as non-valid weak or saturated spectra (only CF PEAKS in composition checked):\n');
      if (FIRST_SHOT_FOR_AVERAGING>1 || LAST_SHOT_FOR_AVERAGING < Npulses)
         disp(['  Warning!! averaging spectrum only for ', num2str(FIRST_SHOT_FOR_AVERAGING), ':' ,num2str(min(LAST_SHOT_FOR_AVERAGING,Npulses)),' pulses (out of ' ,num2str(Npulses), ' pulses).']);
      end
 for idx2= 1:Nparam2  
  for idx1= 1:Nparam1
      which_spectrum_has_saturated_peaks = {}; 
      %pixels2look are "tuned" looking for higher neighbour pixels, some pixels are on the peak wings well below the max
      tmp_mean_spectra = nanmeanLocal(spectra(:,spectra_is_valid(:,idx1,idx2)==1,idx1,idx2),2);  
      pixels2look = pixels2look_orig;
      for i=1:size(pixels2look_orig,2)
        [maxl,maxi] = max(tmp_mean_spectra(pixels2look_orig(i)-2:pixels2look_orig(i)+2));
        pixels2look(i) = pixels2look_orig(i) + maxi - 3; % the pixel around central with max value
      end
      for npulse=1:Npulses
        if (spectra_is_valid(npulse,idx1,idx2)) % not previously marked, should be all valid
          peaksSat =  spectra_original(pixels2look,npulse,idx1,idx2) > ValSaturation; % lines in composition that are saturated
          numPeaksSat = sum(peaksSat==1);
          allpeaksLow =  spectra_original(pixels2look,npulse,idx1,idx2) < ValMinHeightAllPeaks;
          numPeaksNotLow = sum(allpeaksLow==0);
          singlepeakLow =  spectra_original(pixels2look,npulse,idx1,idx2) < ValMinHeightSinglePeak; % added 19mar2020 v20 
          numPeaksLow = sum(singlepeakLow==1); % number of peaks below the thresdhold
          if (numPeaksSat > 0) % at least one peak in the ORIGINAL non-processed spectrum is saturated
              % for each emission line in composition, for each spectrum with a saturated peak, add one
              totalSaturatedPeaks(idx1,idx2,peaksSat) = totalSaturatedPeaks(idx1,idx2,peaksSat) + 1; % I think the following was wrong, reshape(peaksSat,[1 1 size(peaksSat,1)]);
              discardedSpectraSat(idx1,idx2) = discardedSpectraSat(idx1,idx2)  +1 ; % not really discarded, only marked, this allow to discard a line and get valid spectra for the others, otherwise, a single line in composition mostly saturated will invalidate all spectra
              which_spectrum_has_saturated_peaks {discardedSpectraSat(idx1,idx2)} = npulse; 
          end
          if (numPeaksNotLow == 0) % ALL of the peaks in the ORIGINAL non-processed spectrum are low
              totalAllLowPeaks(idx1,idx2,:) = totalAllLowPeaks(idx1,idx2,:) + reshape(allpeaksLow,[1 1 size(allpeaksLow,1)]);
              discardedSpectraAllLow(idx1,idx2) = discardedSpectraAllLow(idx1,idx2) +1 ;
              spectra_is_valid(npulse,idx1,idx2)=0; 
          end
          if (numPeaksLow > 0 && DISCARD_ALSO_WEAK_PEAKS && spectra_is_valid(npulse,idx1,idx2)~=0) % we want to discard the entire spectrum because at least one peak is too low, ONLY COUNTS SPECTRA NOT DISCARDED AS NOISE
              totalSinglePeakLow(idx1,idx2,:) = totalSinglePeakLow(idx1,idx2,:) + reshape(singlepeakLow,[1 1 size(singlepeakLow,1)]);
              discardedSpectraSinglePeakLow(idx1,idx2) = discardedSpectraSinglePeakLow(idx1,idx2) +1 ;
              spectra_is_valid(npulse,idx1,idx2)=0; 
          end
          if (spectra_is_valid(npulse,idx1,idx2)~=0) % everything's ok
              totalValidSpectra(idx1,idx2) = totalValidSpectra(idx1,idx2) + 1;
          end
          if (spectra_is_valid(npulse,idx1,idx2) ==0) % se ha descartado ahora
              %disp(['  Not valid spectrum(' , num2str(npulse),',',num2str(idx1),',',num2str(idx2),')'  ]);
              %fprintf([num2str(npulse) '-' num2str(idx1) '-' num2str(idx2) ' ']);
          end
        end   
      end % npulse
      % all the Npulses evaluated, are most of them discarded (LOW)?
      if sum(spectra_is_valid(:,idx1,idx2)) < Npulses/5 && spectra(1,1,idx1,idx2) ~= 0 % 80% of spectra in this spatial points have been discarded, do not rise warning if the spectrum is actually empty
          disp(['  Warning!! only ' , num2str(sum(spectra_is_valid(:,idx1,idx2))) ,' valid spectra in spatial point (' , num2str(idx1),',',num2str(idx2),')'  ]);
      end
      
      % new v20 19mar2020: if AVERAGE_ONLY_FIRST > 0 only the N first valid spectra are marked as valid
      if AVERAGE_ONLY_FIRST > 0 
        for n=1:Npulses
          if spectra_is_valid(n,idx1,idx2) 
            for  i=n+AVERAGE_ONLY_FIRST:Npulses
              spectra_is_valid(i,idx1,idx2)=0; % mark as nonvalid everything else
            end
            break
          end
        end
      end
      
      % now we have information to discard completely specific emission lines and yet use the others
      for i=1:size(totalSaturatedPeaks,3)
          if (totalSaturatedPeaks(idx1,idx2,i)>0) % at least one peak of this emission line was saturated
              if  DISCARD_LINE_ABOVE_SAT_PERCENTAGE~= 0 && (discardedSpectraSat(idx1,idx2) >= (totalValidSpectra(idx1,idx2) * DISCARD_LINE_ABOVE_SAT_PERCENTAGE/100)) % the number of spectra with saturated peaks is more than 50%, it is better to avoid using this peak... 
                disp(['  Completely discarding line #' num2str(whichPeaks(i)) ' of ', strjoin(speciesStr(piquees(whichPeaks(i)))), '@',num2str(pila_theoretical(whichPeaks(i))), ' (',num2str(idx1),',',num2str(idx2),') with ' , num2str(totalSaturatedPeaks(idx1,idx2,i)), ' saturated spectra out of ', num2str(totalValidSpectra(idx1,idx2))]);
                doNotUse(whichPeaks(i))=0; 
              else % ... otherwise, it is better to unvalid only the saturated spectra
                str_spectra = '';
                str_comma = '';
                for n=1:totalSaturatedPeaks(idx1,idx2,i)  
                    spectra_is_valid(which_spectrum_has_saturated_peaks{n},idx1,idx2)=0;
                    %OJO!!!!    totalValidSpectra(idx1,idx2) = totalValidSpectra(idx1,idx2) - 1; % was not marked as invalid before
                    str_spectra = strcat(str_spectra,strcat(str_comma,num2str(which_spectrum_has_saturated_peaks{n})));
                    str_comma = ',';
                end
                disp(['  Discarding several spectra (', str_spectra, ') of spatial point (' ,num2str(idx1),',',num2str(idx2),') because ' strjoin(speciesStr(piquees(whichPeaks(i)))), '@',num2str(pila_theoretical(whichPeaks(i))), ' (',num2str(idx1),',',num2str(idx2),') has ' , num2str(totalSaturatedPeaks(idx1,idx2,i)), ' saturated spectra out of ', num2str(totalValidSpectra(idx1,idx2))]);
              end
              %disp('not discarding actually');
              
          end
      end
      piUse = piUse & doNotUse;
      spectra_is_valid(1:FIRST_SHOT_FOR_AVERAGING-1,idx1,idx2)  = 0;
      spectra_is_valid(LAST_SHOT_FOR_AVERAGING+1:Npulses,idx1,idx2)  = 0;
      mean_spectra_only_valids(:,idx1,idx2) = nanmeanLocal(spectra(:,spectra_is_valid(:,idx1,idx2)==1,idx1,idx2),2);  %mother of all averages
      % v27 mean_spectra_is_valid mark the valid averaged spectra, so they can be discarded further on
      mean_spectra_is_valid(idx1,idx2) = sum(spectra_is_valid(:,idx1,idx2)==1) ;
       
    % 17mar2020 debugging information
    if (all(DEBUG_DISCARDING==[idx1,idx2])) % shows statistics of spectra and peaks for this particular spatial point
     f=figure(10);
     f.Name='DEBUG_DISCARDING: statistics for peaks discarding';
     bar([ squeeze(totalAllLowPeaks(idx1,idx2,:)) squeeze(totalSinglePeakLow(idx1,idx2,:)) squeeze(totalSaturatedPeaks(idx1,idx2,:)) ] ,'stacked');
     title({['(idx1=', num2str(idx1) , ') Number of times a peak is < ValMinHeightAllPeaks (blue)'],'< ValMinHeightSinglePeak (red) , saturated (yellow)'});
     set(gca,'xtick',[1:size(whichPeaks)],'xticklabel',lineName)
     xtickangle(90);
     if (size(find(spectra_is_valid(:,idx1,idx2)==1),1)>0)
       f=figure(11);
       f.Name='DEBUG_DISCARDING: surviving valid spectra, shouldn''t be any noise spectra ';
       plot(lambdas,spectra_original(:,spectra_is_valid(:,idx1,idx2)==1,idx1,idx2));
       title(['Valid spectra (',num2str(size(find(spectra_is_valid(:,idx1,idx2)==1),1)),') to average for idx1=' num2str(idx1)]);
     end
     if (size(find(spectra_is_valid(:,idx1,idx2)==0),1)>0)
       f=figure(12);
       f.Name='DEBUG_DISCARDING: discarded noise spectra, should be noise';
       plot(lambdas,spectra_original(:,spectra_is_valid(:,idx1,idx2)==0,idx1,idx2));
       title(['NON valid discarded spectra (', num2str(size(find(spectra_is_valid(:,idx1,idx2)==0),1)),') for idx1=' num2str(idx1)]);
     end
     f=figure(13);
     f.Name='DEBUG_DISCARDING: raw height value of peaks for every pulse';
     imagesc(1:Npulses,1:size(whichPeaks),spectra_original(pixels2look,:,idx1,idx2));
     set(gca,'ytick',[1:size(whichPeaks)],'yticklabel',lineName)
     xlabel('number of pulse');
     title( ['Raw height value of peaks for every pulse (idx1=' , num2str(idx1) ,')']);
     colormap(pink);
     caxis( [ 1000 50000]);
   end

  end % idx1
 end % idx2
 
 if (DEBUG_DISCARDING>0) % shows plot of number of valid spectra for all idx1, idx2=0
     f=figure(14);
     f.Name='DEBUG_DISCARDING: evolution of the number of valid spectra in each point';
     clf;
     hold on;
     plot(ejeParam1,discardedSpectraSat(:,1),'LineWidth',2,'Color','r');    
     plot(ejeParam1,discardedSpectraAllLow(:,1),'LineWidth',2,'Color','b');    
     plot(ejeParam1,discardedSpectraSinglePeakLow(:,1),'LineWidth',2,'Color','k');    
     plot(ejeParam1,totalValidSpectra(:,1),'LineWidth',2,'Color','g');    
     title({'Number of spectra with:','at least one saturated peak from composition (red)','all peaks zero (blue)','single peak below threshold (black)','valid spectra (green)'});   
     xlabel(param1Name);
     ylabel('number of spectra out of ');
     hold off;
 end
end

%% CF-Step 7   substract spectra if ALTERNATE_DELAY_WHICH_ONE!=0
% ALTERNATE_DELAY_WHICH_ONE=1 every alternate shot is at different delay. 
% after this step, each spatial point has individual difference spectra
% every two shots, and mean_only_valids() has the MEAN difference spectrum
if ALTERNATE_DELAY_WHICH_ONE>0 && DO_USE_AVANTES==1
 fprintf('CF-Step 7: subtracting MEAN spectra for ALTERNATE_DELAY_WHICH_ONE=');
 if ALTERNATE_DELAY_WHICH_ONE==1
      fprintf('1 (Substract hotter-colder)\n');
 elseif ALTERNATE_DELAY_WHICH_ONE==2
      fprintf('2 (only hotter)\n');     
 elseif ALTERNATE_DELAY_WHICH_ONE==3
      fprintf('3 (only colder)\n');     
 else
      fprintf('??? unknown\n');     
 end
 for idx2= 1:Nparam2  
  for idx1= 1:Nparam1
      hotter_spectra = zeros(size(lambdas,1),1);
      colder_spectra = zeros(size(lambdas,1),1);
      npfirst = max(firstLaserpulse(idx1,idx2),FIRST_SHOT_FOR_AVERAGING);
%      hotter_intensity = sum(spectra(:,npfirst,idx1,idx2),1);
%      colder_intensity = sum(spectra(:,npfirst+1,idx1,idx2),1);
%      if (hotter_intensity > colder_intensity)
%        ; % the first pulse is the hotter (shorter delay) 
%      else
%        npfirst = npfirst + 1; % start always with hotter spectra (shorter delay, larger & hotter spectrum)
%      end
      num_spectra = 0;
      for npulse=npfirst:2:min(LAST_SHOT_FOR_AVERAGING,Npulses)-1
          if (spectra_is_valid(npulse,idx1,idx2)==1 && spectra_is_valid(npulse+1,idx1,idx2)==1)
            diff_spectrum = spectra(:,npulse,idx1,idx2)-spectra(:,npulse+1,idx1,idx2);
            hotter_spectra = hotter_spectra + spectra(:,npulse,idx1,idx2);
            colder_spectra = colder_spectra + spectra(:,npulse+1,idx1,idx2);
            num_spectra = num_spectra+1;
          else
            disp(['  Spectrum (' , num2str(npulse),' or ', num2str(npulse+1),',',num2str(idx1),',',num2str(idx2),') is not valid within AlternateDelay averaging and differencing range, not used'  ]);
          end
      end
      % calc difference of MEAN hotter and colder spectra. It is safer to
      % get the substract right with the mean spectra, not with the two
      % first
      hotter_intensity = sum(hotter_spectra,1);
      colder_intensity = sum(colder_spectra,1);
      if (ALTERNATE_DELAY_WHICH_ONE==1)
        if (hotter_intensity > colder_intensity)
         mean_spectra_only_valids(:,idx1,idx2) = (hotter_spectra - colder_spectra) ./ num_spectra;
        else
         mean_spectra_only_valids(:,idx1,idx2) = (colder_spectra - hotter_spectra) ./ num_spectra; 
         spectra_is_valid(npfirst,idx1,idx2)=0; % this cannot be substracted
         npfirst = npfirst+1; % the hotter one is the next one
        end
      elseif (ALTERNATE_DELAY_WHICH_ONE==2)
           mean_spectra_only_valids(:,idx1,idx2) = hotter_spectra ./ num_spectra;
      elseif (ALTERNATE_DELAY_WHICH_ONE==3)
           mean_spectra_only_valids(:,idx1,idx2) = colder_spectra ./ num_spectra;
      end
      if (0)
          figure;
          subplot(3,1,1);   plot(lambdas,mean_spectra_only_valids(:,idx1,idx2));title('short delay spectrum - hotter');
          subplot(3,1,2);   plot(lambdas,mean_spectra_only_valids(:,idx1+1,idx2));title('long delay spectrum - colder');
          subplot(3,1,3);   plot(lambdas,mean_spectra_only_valids(:,idx1,idx2)- mean_spectra_only_valids(:,idx1+1,idx2));title('subtracted spectrum');
      end
      % now that we know which spectrum is the hotter and the colder, let's
      % substract per-pair. needed to calculate intensity
      if (ALTERNATE_DELAY_WHICH_ONE==1)
       for npulse=npfirst:2:min(LAST_SHOT_FOR_AVERAGING,Npulses)-1
         diff_spectrum = spectra(:,npulse,idx1,idx2)-spectra(:,npulse+1,idx1,idx2);
         spectra(:,npulse,idx1,idx2) = diff_spectrum;
         spectra(:,npulse+1,idx1,idx2) = diff_spectrum;
       end
       elseif (ALTERNATE_DELAY_WHICH_ONE==2)
        for npulse=npfirst:2:min(LAST_SHOT_FOR_AVERAGING,Npulses)-1
         spectra(:,npulse+1,idx1,idx2) = spectra(:,npulse,idx1,idx2); % duplicates hotter
        end
       elseif (ALTERNATE_DELAY_WHICH_ONE==3)
        for npulse=npfirst:2:min(LAST_SHOT_FOR_AVERAGING,Npulses)-1
         spectra(:,npulse,idx1,idx2) = spectra(:,npulse+1,idx1,idx2); % duplicates colder
        end
      end
   end
 end
 
 
end



%% CF-Step 8   remove baseline (emission background) with different algorithms

if (REMOVE_BASELINE== 1)  % method Yu2009
    disp(['CF-Step 8: Removing baseline (emission background) with Yu2009 method...']);
    for idx2= 1:Nparam2
        for idx1= 1:Nparam1
            tmp_spectra = remove_background_Yu2009(lambdas, mean_spectra_only_valids(:,idx1,idx2),0); % last argument could be 1 to plot the corrected spectrum
            mean_spectra_only_valids(:,idx1,idx2) = tmp_spectra;
        end
    end
end
if (REMOVE_BASELINE== 2)  % method airPLS
    disp(['CF-Step 8: Removing baseline (emission background) with airPLS method...']);
    for idx2= 1:Nparam2
        for idx1= 1:Nparam1
            [tmp_spectra airPLSfittedVector] = airPLS(mean_spectra_only_valids(:,idx1,idx2)',10e7, 2, 0.1, 0.5, 50); %
            mean_spectra_only_valids(:,idx1,idx2) = tmp_spectra;
            
        end
    end
end



 %% CF-Step 9   if DISCARD_SPECTRA_INTENSITY_OUTLIERS>0 the integrated intensity of all valid spectra is used to discard outliers. an histogram of intensities is shown if DEBUG_STABILITY=1 

 disp(['CF-Step 9: Removing outlier spatial points based on integrated intensity...']);
 for idx2= 1:Nparam2
     for idx1= 1:Nparam1
         this_intensity=sum(mean_spectra_only_valids(:,idx1,idx2),1);
         integrated_intensity(idx1,idx2) = this_intensity;
     end
 end
 integrated_intensity(isnan(integrated_intensity))=0; % replace NaN with zero
 
 mean_intensity_all_spectra =  sum(sum(integrated_intensity,1),2) / sum(sum(integrated_intensity~=0,1),2); % mean without zero values
 removed_spectra_integrated_intensity = 0;
 for idx2= 1:Nparam2
     for idx1= 1:Nparam1
         if  integrated_intensity(idx1,idx2) < DISCARD_SPECTRA_INTENSITY_THRESHOLD * mean_intensity_all_spectra && integrated_intensity(idx1,idx2) > 0 
             discarded_integrated_intensity(idx1,idx2)=1; % only marked, not actually discarded, only those discarded due to low (but non zero) intensity
             removed_spectra_integrated_intensity = removed_spectra_integrated_intensity + 1;
         end
     end
 end
 
if (DISCARD_SPECTRA_INTENSITY_OUTLIERS )  
    mean_spectra_is_valid(discarded_integrated_intensity==1) = 0; 
    disp([ ' number of spatial points discarded: ' num2str(removed_spectra_integrated_intensity)]); 
else
    disp(' not discarding.');
end 
% we also calculate here the raw intensity of the emission line at wavelength RESIN_LAMBDA_MONITORING , it is intended to detect silicon from epoxy resin, signaling a bad measurement outside the edge of the limpet
if RESIN_LAMBDA_MONITORING  > 0
    for idx2= 1:Nparam2
        for idx1= 1:Nparam1
            resin_intensity(idx1,idx2) = mean_spectra_only_valids(lambda2pixel(lambdas,RESIN_LAMBDA_MONITORING),idx1,idx2);
        end
        
    end
end

if DEBUG_STABILITY
    
   %new v31 intensity for original raw spectra to detect flatness / horizontality issues 
   f=figure(51);
   f.Name = 'Integrated spectral intensity from raw spectra';
   if Nparam2 > 1
       spec=squeeze(mean(mean(spectra_original,1),2));
       imagesc(ejeParam1,ejeParam2,spec(1:Nparam1,1:Nparam2)'); % for a correct figure, matrix should be traspose and AFTER that, change YDir parameter
   else
       plot(ejeParam1,squeeze(mean(mean(spectra_original,1),2)));
   end
   set(gca,'YDir','normal')    % this is needed to put (0,0) in the proper place
   view(0,90); 
   colormap('jet'); % with jet colormap the outliers are clearly shown    
    
   f=figure(33);
   f.Name = 'Number of valid spectra in each spatial point';
   if Nparam2 > 1
       mesh(ejeParam1,ejeParam2,mean_spectra_is_valid','FaceColor','flat'); % for a correct figure, matrix should be traspose and AFTER that, change YDir parameter
   else
       plot(ejeParam1,mean_spectra_is_valid);
   end
   set(gca,'YDir','normal')    
   view(0,90); 
   colormap('jet'); % with jet colormap the outliers are clearly shown
   
   f=figure(34);
   f.Name='Integrated spectral intensity in each spatial point - points below threshold are shown in red';
   ax34a=axes;
   rel_integrated_intensity = integrated_intensity./mean_intensity_all_spectra;
   rel_integrated_intensity(rel_integrated_intensity == 0) = NaN;
   if Nparam2 > 1 
       m34a=mesh(ejeParam1,ejeParam2,(rel_integrated_intensity+discarded_integrated_intensity*3)','FaceColor','flat'); % for a correct figure, matrix should be traspose and AFTER that, change YDir parameter
       pbaspect([abs(ejeParam1(end)) abs(ejeParam2(end)) 1]) % this is the real aspect ratio
   else
       higherRII = rel_integrated_intensity;
       lowerRII = rel_integrated_intensity; 
       higherRII(higherRII<DISCARD_SPECTRA_INTENSITY_THRESHOLD)=NaN; % this is a trick to plot two colors
       %lowerRII(lowerRII>DISCARD_SPECTRA_INTENSITY_THRESHOLD)=NaN;
       hold on;
       plot(ejeParam1,lowerRII,'r-');
       plot(ejeParam1,higherRII,'b-');
       %plot(ejeParam1([1,25]),[DISCARD_SPECTRA_INTENSITY_THRESHOLD,DISCARD_SPECTRA_INTENSITY_THRESHOLD],'r-')
       hold off;
   end
   set(gca,'YDir','normal')
   view(0,90); 
   colormap(ax34a,'jet');
   
   if RESIN_LAMBDA_MONITORING  > 0
       f=figure(35);
       f.Name=['Resin wavelength monitoring @' num2str(RESIN_LAMBDA_MONITORING) ' min=' num2str(min(min(resin_intensity))) ' max=' num2str(max(max(resin_intensity))) ];
       if Nparam2 > 1
         mesh(ejeParam1,ejeParam2,resin_intensity','FaceColor','flat'); % for a correct figure, matrix should be traspose and AFTER that, change YDir parameter
       else
         plot(ejeParam1,resin_intensity);
       end
       set(gca,'YDir','normal')
       view(0,90);
       colormap('jet');
   end
   
   %histograms of valid spectra and intensity values
   f=figure(36);
   f.Name='Histogram of valid spectra in each spatial points';
   histogram(mean_spectra_is_valid(mean_spectra_is_valid>0));
   set(gca,'Xtick',0:Npulses)

   %histograms of intensity values
   f=figure(37);
   f.Name='Histogram of intensities in each spatial points (1=mean)';
   histogram(rel_integrated_intensity(rel_integrated_intensity>0));
   
end


%%%% new v30 fit excursion parameters are obtained in a first step, using ANY spatial point or an average of any of them
disp(['CF-Step 10: fitting zero: calc of peak excursions and seed fitting parameters...']);

if WHICH_SPECTRA_FOR_FITTING_ZERO == 0 % average of ALL spectra
    howmany = 0;
    for idx2= 1:Nparam2
        for idx1= 1:Nparam1
            if mean_spectra_is_valid(idx1,idx2) > 0 % v27 if there is at least one valid spectrum
              if howmany==0
                  which_spectrum = mean_spectra_only_valids(:,idx1,idx2);
                  howmany=1;
              else
                  which_spectrum = which_spectrum + mean_spectra_only_valids(:,idx1,idx2);
                  howmany = howmany +1;
              end
            end
        end
    end
    which_spectrum = which_spectrum ./ howmany;
    disp(['    Using an average of ' num2str(howmany) ' spectra.']);
 else
    which_spectrum = mean_spectra_only_valids(:,WHICH_SPECTRA_FOR_FITTING_ZERO,1); % this spatial point is used
    disp(['    Using one spectrum from idx1=' num2str(WHICH_SPECTRA_FOR_FITTING_ZERO) ',idx2=1']);
 end


for p=1:CFNlines
    if (piUse(p)==1 && pila(p)>= lambdas(1) && pila(p)<=lambdas(end)  ) % marked to be used, AND in composition, P==1 (Halways fitted)
        % v22: if WHICH_SPECTRA_FOR_FITTING_ZERO=1, the first calc for pixleftbkg1, pixrightbkg1 is used ; v24: extended to bkg2
        if (piquees(p)==Halfa)
            widthCriteriaForDiscard=40; % for discarding, Halfa peak stark broadening is much larger. 18ene2022: upper bound for FWHM peak fitting is too low for normal peaks and Halfa, changed from 20 to 40
            HalfaLargerWidthCorrection=7; % factor to use a larger wavelength range for (much wider) Halfa line
            fit_excursion=25; % FWHM times, how far the peak is considered to extend, max, tested with Halfa 28feb2020, UPDATE: 9ene2021 for PD.541 experiments was too large, changed from 30 to 20; 20abril2021 for pastillonCF was too small, changed to 25
        else
            widthCriteriaForDiscard=10; % 18ene2022: upper bound for FWHM peak fitting is too low for normal peaks and Halfa, changed from 5 to 10
            HalfaLargerWidthCorrection=1; % for "normal" peaks
            fit_excursion=4; %N times instrumental FWHM v24 changed from 8 to 15, was too small for some peaks %v30.6 testing lower values more suitable for averaged spectrum %v31 changed from 2 to 3, CHANGED TO 4
        end
        % FIT-Step1 first calc an estimated center, and the extend of the peak. Central pixel is searched up to 2 pixels left and right to compensate for miscalibration. piobs() could be used to compensate larger shifts
        pixcentral=lambda2pixel(lambdas,pila(p));
        [maxl,maxi] = max(which_spectrum(pixcentral-2:pixcentral+2));
        pixcentral = pixcentral + maxi - 3; % the pixel around central with max value
        heightcentral = which_spectrum(pixcentral);
        
        % new! v24 30jun2021 the max excursion is performed over the spectrally-filtered spectrum (savitzky golay), but fitting  should be done with the original averaged one
        filtered_spectrum = which_spectrum;
        if (SAVITZKY_GOLAY_PEAK_EXTENSION_ORDER > 0)
            filtered_spectrum = sgolayfilt(filtered_spectrum,SAVITZKY_GOLAY_PEAK_EXTENSION_ORDER,5); % best result for me is with order 1 frame 5
        end
        
        pixleft=lambda2pixel(lambdas,lambdas(pixcentral) - 0.5*getSpectrometerFWHM(lambdas(pixcentral))*HalfaLargerWidthCorrection); % starting search point is FWHM/2
        max_excursion = pixleft - abs(lambda2pixel(lambdas,lambdas(pixcentral)+fit_excursion*getSpectrometerFWHM(lambdas(pixcentral)))-lambda2pixel(lambdas,lambdas(pixcentral))); % number of pixels max for peak extend
        while(pixleft>1 && pixleft>max_excursion && filtered_spectrum(pixleft)>heightcentral/40) % stop if we are too far or intensity is <2.5%
            if(filtered_spectrum(pixleft)<filtered_spectrum(pixleft-1)) %once it starts to increase again...
                break;
            end
            pixleft=pixleft-1;
        end
        pixright=lambda2pixel(lambdas,lambdas(pixcentral)+ 0.5*getSpectrometerFWHM(lambdas(pixcentral))*HalfaLargerWidthCorrection); % starting search point is FWHM/2
        max_excursion = pixright + abs(lambda2pixel(lambdas,lambdas(pixcentral)+fit_excursion*getSpectrometerFWHM(lambdas(pixcentral)))-lambda2pixel(lambdas,lambdas(pixcentral))); % number of pixels max for peak extend
        while(pixright<Npixeles-1 && pixright<max_excursion && filtered_spectrum(pixright)>heightcentral/40) % stop if we are too far or intensity is <5%
            if(filtered_spectrum(pixright)<filtered_spectrum(pixright+1)) %once it starts to increase again...
                break;
            end
            pixright=pixright+1;
        end
        % FIT-Step2 we have a [pixleft,pixright] window for peak FITTING, now we search a background zone , stop when intensity builds up; it is repited twice, after first iteration, peak extend is reevaluated if a point of the peak is below the baseline
        for bf=1:2
            pixleftbkg1=pixleft;
            pixleftbkg2=pixleft;
            max_excursion = pixleftbkg1 - abs(lambda2pixel(lambdas,lambdas(pixcentral)+fit_excursion*getSpectrometerFWHM(lambdas(pixcentral)))-lambda2pixel(lambdas,lambdas(pixcentral))); % max pixel to the left of background
            while(pixleftbkg2>1 && pixleftbkg2>max_excursion && (filtered_spectrum(pixleftbkg2) - filtered_spectrum(pixleftbkg1)) < heightcentral/10) % stop when intensity builds up
                pixleftbkg2=pixleftbkg2-1;
            end
            pixrightbkg1=pixright;
            pixrightbkg2=pixright;
            max_excursion = pixrightbkg1 + abs(lambda2pixel(lambdas,lambdas(pixcentral)+fit_excursion*getSpectrometerFWHM(lambdas(pixcentral)))-lambda2pixel(lambdas,lambdas(pixcentral))); % max pixel to the right of background
            while(pixrightbkg2<Npixeles-1 && pixrightbkg2<max_excursion && (filtered_spectrum(pixrightbkg2) - filtered_spectrum(pixrightbkg1)) < heightcentral/10) % stop when intensity builds up
                pixrightbkg2=pixrightbkg2+1;
            end
            %FIT-Step3 linear fit of the baseline with background points (over pixels space)
            % pBkg = fit([lambdas(pixleftbkg2:pixleftbkg1); lambdas(pixrightbkg1:pixrightbkg2)], [mean_spectra_only_valids(pixleftbkg2:pixleftbkg1,idx1,idx2); mean_spectra_only_valids(pixrightbkg1:pixrightbkg2,idx1,idx2)],'poly2' );
            % linear with two points
            % pBkg = fit([lambdas(pixleftbkg2:pixleftbkg1); lambdas(pixrightbkg1:pixrightbkg2)], [mean_spectra_only_valids(pixleftbkg2:pixleftbkg1,idx1,idx2); mean_spectra_only_valids(pixrightbkg1:pixrightbkg2,idx1,idx2)],'poly2' );
            % v30.6 from now on, with individual spectrum, not the filtered one
            pBkgPx = fit([pixleftbkg1; pixrightbkg1], [which_spectrum(pixleftbkg1); which_spectrum(pixrightbkg1)],'poly1' ); % before v25 was the formula used, only take into account two points
            % WARNING!! the same baseline fit should be done AGAIN later on if WHICH_SPECTRA_FOR_FITTING_ZERO==1
            % pBkgPx = fit([pixleftbkg2:pixleftbkg1  pixrightbkg1:pixrightbkg2]', [mean_spectra_only_valids(pixleftbkg2:pixleftbkg1,idx1,idx2)'  mean_spectra_only_valids(pixrightbkg1:pixrightbkg2,idx1,idx2)']','poly1' ); %v25 I believe now that background baseline should be get this way, but the baselines are worse
            % the baseline over lambda is not really needed
            % pBkgLa = fit([lambdas(pixleftbkg1); lambdas(pixrightbkg1)], [mean_spectra_only_valids(pixleftbkg1,idx1,idx2); mean_spectra_only_valids(pixrightbkg1,idx1,idx2)],'poly1' ); % baseline in lambda space, needed to interpolate at the central wavelenth
            
            %FIT-Step4 corrects peak extend IF peak wings points are UNDER the baseline
            %DEBUG:  plot(pixleft:pixright,mean_spectra_only_valids(pixleft:pixright,idx1,idx2),pixleft:pixright,feval(pBkg,pixleft:pixright)); title([strjoin(speciesStr(piquees(p))),'@' num2str(pila(p))]);
            baselineOk=true;
            for i=pixcentral:-1:pixleft
                if(which_spectrum(i) < feval(pBkgPx,i)*0.99) % if the wing of the peak is below the interpolated baseline
                    pixleft=i;
                    baselineOk=false;
                    break; % look no further
                end
            end
            for i=pixcentral:1:pixright
                if(which_spectrum(i) < feval(pBkgPx,i)*0.99) % if the wing of the peak is below the interpolated baseline
                    pixright=i;
                    baselineOk=false;
                    break; % look no further
                end
            end
            if baselineOk
                break; % no need to reevaluate
            end
        end % for 1:2 reevaluate if peak extend is reduced
        
        % we have got the excursion parameters for this line fro FIT
        peaks_fit_pixcentral0(p)=pixcentral;
        peaks_fit_pixright0(p)=pixright;
        peaks_fit_pixleft0(p)=pixleft;
        peaks_fit_pixrightbkg10(p)=pixrightbkg1;
        peaks_fit_pixleftbkg10(p)=pixleftbkg1;
        peaks_fit_pixrightbkg20(p)=pixrightbkg2;
        peaks_fit_pixleftbkg20(p)=pixleftbkg2; % "far" background points are not currently used for fitting the baseline
        
        % lorentzian fitting
        peak_lambdas = lambdas(pixleft:pixright);
        if (size(peak_lambdas,1)>4) % 28feb2020 if the area has no peak and just a smooth valley, pixleft=pixright=pixcentral
            peak_intensities =  which_spectrum(pixleft:pixright); % the peak
            peak_intwobaseline = which_spectrum(pixleft:pixright) - feval(pBkgPx,pixleft:pixright); % the peak minus interpolated baseline
            
            %v26 deconvolution should be done here
            if DO_DECONVOLUTION
                pause(0.1);
            end
            
            ws = warning('off','all');  % Turn off warning messages of lorentzfit
            boundp3lb = (getSpectrometerFWHM(pila(p))/2)^2;
            boundp3hb = (widthCriteriaForDiscard*getSpectrometerFWHM(pila(p))/2)^2; % new v28 upper limit is widthCriteriaForDiscard times instrumental broadening, different for Halfa
            bounds = [-Inf -Inf boundp3lb  ;  +Inf +Inf boundp3hb ];
            [yprime1,loparams,resnorm1,residual1]=lorentzfit(double(peak_lambdas),double(peak_intwobaseline),[],bounds,'3',opts);warning(ws)  % Turn it back on.
            %end
            %[FitResults,FitError] = peakfit([peak_lambdas peak_intwobaseline],lambdas(pixcentral),2.0,1,2,0,99,0,0,0,0); % peak fitting by the Tom O'haver, 11th parameter is plot
            % store fitting error (relative, %)
            
            
            peaks_fit_error_frommean0(p) = 100*norm(residual1) / sqrt(size(peak_intensities,1)) / max(peak_intensities); % in percentage, same metric as peakfit() from Tom O'Haver
            %peaks_fit_error_frommean(p,idx1,idx2) = FitError(1);
            if (peaks_fit_error_frommean0(p)>20) % the fitting error is too large
                disp(['      Warning!! fitting error of line #' num2str(p) ' of ', strjoin(speciesStr(piquees(p))), '@',num2str(pila_theoretical(p)), ' (fit excursion) is ' , num2str(peaks_fit_error_frommean0(p)), '%']);
            end
               
            %new v30.6 first fitting parameters could be the seed for 
            peaks_fit_FitZeroLorentzParams(p,:) = loparams;            
            
            % store height
            peaks_heights_frommean0(p)=loparams(1)/loparams(3); % +loparams(4); % total height
            peaks_rawHeights_frommean0(p) = heightcentral; %*new* v30.7 raw raw super-raw height, just to see minimum-possible sequence variability
            
            %peaks_heights_frommean(p,idx1,idx2)=FitResults(3);
            % store central lambda
            peaks_central_frommean0(p)=loparams(2);
            %peaks_central_frommean(p,idx1,idx2)=FitResults(2);
            error_lambda_central = peaks_central_frommean0(p)-pila(p);
            if (abs(error_lambda_central) > 2.0*getSpectrometerFWHM(pila(p))) % the error in lambda_central is too large
                disp(['      Warning!! central wavelength error for fitting of line #' num2str(p) ' of ', strjoin(speciesStr(piquees(p))), '@',num2str(pila_theoretical(p)), ' (fit excursion) is ' , num2str(error_lambda_central), 'nm']);
            end
            % store total fwhm width and calculate Stark width
            % 14dic2018 there are two possible methods: cuadratic and linear,according to LIBS-tutorial-partII only cuadratic is valid
            %peaks_stark_frommean(selectedPeaks,idx1,idx2) = -(getSpectrometerFWHM(lampara_FWHM,pila(selectedPeaks)).^2 - peaks_fwhm_frommean(selectedPeaks,idx1,idx2).^2)./peaks_fwhm_frommean(selectedPeaks,idx1,idx2);
            peaks_fwhm_frommean0(p)=2*sqrt(loparams(3));
            %peaks_fwhm_frommean(p,idx1,idx2)=FitResults(4);
            % 14dic2018 we should test different approaches: linear subs, cuadratic, torres2007 formula...
            % instrumental deconvolution should be done here
            %xxxxxx OJO!! esta fórmula de stark no puede estar bien
            peaks_fwhmSpectrometer_frommean0(p) = getSpectrometerFWHM(pila(p));
            peaks_stark_frommean0(p) = -(getSpectrometerFWHM(pila(p)).^2 - peaks_fwhm_frommean0(p).^2)./peaks_fwhm_frommean0(p);
            %disp("ojo!");
            %peaks_stark_frommean(p,idx1,idx2) = sqrt(peaks_fwhm_frommean(p,idx1,idx2).^2 - getSpectrometerFWHM(pila(p)).^2 );
            if ( peaks_stark_frommean0(p) < 0 || ~isreal(peaks_stark_frommean0(p)) )
                peaks_stark_frommean0(p) = 0; % we can get negative values, remove them
                disp(['      Warning!! stark width is less than zero for fitting of line #' num2str(p) ' of ', strjoin(speciesStr(piquees(p))), '@',num2str(pila_theoretical(p)), ' (fit excursion)']);
            end
            % calculate and store AREA of the peak
            % new v21 5ago2020 yo can choose wich method to use with the variable AREA_METHOD =
            oversampled_lambdas = lambdas(pixleft):0.001:lambdas(pixright);
            oversampled_lorentzPeak = loparams(1)./((oversampled_lambdas - loparams(2)).^2 + loparams(3)); % oversampled lorentzian shape
            if AREA_METHOD==0 % analytical formula of modeled lorentzian peak
                peaks_area_frommean0(p)= pi*peaks_heights_frommean0(p)*peaks_fwhm_frommean0(p)/2; % area of the lorentzian function, according to Demtröder, ec. 3.10d, p. 64
            elseif AREA_METHOD==1 % trapezoidal integration of the oversampled modeled lorentzian peak
                peaks_area_frommean0(p)= trapz(oversampled_lambdas,oversampled_lorentzPeak);
            elseif AREA_METHOD==2 % two halves area from modelled lorentzian peak
                %the area of the right half could be a better estimation for heavily asymmetric peaks (some channels of our spectrometer have this problem)
                %5ago2020: last thought is that, as coma aberration does not change the total area (energy conservation), either sides of the modeled peak are wrong
                idx_central = find(oversampled_lorentzPeak== max(oversampled_lorentzPeak));
                half_osl = oversampled_lambdas(idx_central:end);
                half_osi = oversampled_lorentzPeak(idx_central:end);
                peaks_twohalfareas_frommean0(p)= 2*trapz(half_osl,half_osi);
                peaks_area_frommean0(p)= peaks_twohalfareas_frommean0(p);
            elseif AREA_METHOD==3 % trapezoidal integration of the NOT oversampled baseline-corrected SPECTRA
                peaks_area_frommean0(p)= trapz(peak_lambdas,peak_intwobaseline );
            else
                error('AREA_METHOD not yet implemented');
            end
            
            %27nov2018 sometimes the fitting produces complex numbers, when there is not clear peaks
            if (~isreal(peaks_fwhm_frommean0(p)))
                %figure(29);    plot(trozo_lambdas,trozo_pico,trozo_lambdas,yprime1)
                %disp('imaginario!');
                peaks_fwhm_frommean0(p) = 0;
            end
        else % no enough points for fitting
            peaks_heights_frommean0(p)=0; % will be rendered invalid
        end
        
        if DEBUG_FITTING_ZERO==1
            f=figure(16);clf;hold on;
            f.Name='DEBUG_FITTING_ZERO: peak fitting';
            plot(lambdas(pixleftbkg2:pixrightbkg2),which_spectrum(pixleftbkg2:pixrightbkg2),'b'); title([strjoin(speciesStr(piquees(p))),'@' num2str(pila_theoretical(p))]); % the original peak
            plot(lambdas(pixleft),which_spectrum(pixleft),'r*'); % extend of peak for fitting
            plot(lambdas(pixright),which_spectrum(pixright),'r*');
            plot(lambdas(pixleftbkg2),which_spectrum(pixleftbkg2),'g+'); % baseline extend
            plot(lambdas(pixrightbkg2),which_spectrum(pixrightbkg2),'g+');
            plot(lambdas(pixleftbkg2:pixrightbkg2),feval(pBkgPx,pixleftbkg2:pixrightbkg2),'r--'); % interpolated baseline
            if(size(peak_lambdas,1)>4) % fitting is not performed for less than 5 points, next line would give am error
                plot(peak_lambdas,yprime1,'g');  % the fitting
                plot(oversampled_lambdas,oversampled_lorentzPeak,'k'); % the oversampled lorentzian peak
                plot(peak_lambdas,peak_intwobaseline,'m.');  % the peaks minus baseline
                disp(['      ',strjoin(speciesStr(piquees(p))), sprintf('@%3.2f',pila_theoretical(p)),'> height=', sprintf('%5.0f',peaks_heights_frommean0(p)), '   measured width=', sprintf('%1.4f',peaks_fwhm_frommean0(p)),'   stark width=', sprintf('%1.4f',peaks_stark_frommean0(p)),'   area=',sprintf('%5.1f',peaks_area_frommean0(p)),'   area(2xhalf)=',sprintf('%5.1f',peaks_twohalfareas_frommean0(p)),'   error=',sprintf('%2.2f',peaks_fit_error_frommean0(p)),'%'  ]);
                hold off;
                f=figure(17);clf;hold on;
                f.Name='DEBUG_FITTING_ZERO: alternate peak fitting with peakfit';
                peakfit([peak_lambdas peak_intwobaseline],lambdas(pixcentral),2.0,1,2,0,99,0,0,0,1); % peak fitting by the Tom O'haver
            end
            pause;
        end
    end % if piusar (we want to use that peak)
end % p peaks


if DEBUG_FITTING_ZERO>0
    figure(15);  % filtered spectrum with emission lines
    %plot(lambdas,mean_spectra_only_valids(:,1,1),'k'); 
    plot(lambdas,which_spectrum .* dividir_respuesta_espectrometro,'k'); % without irrandiance correction
    labelcolors = {'b','g','r','m','c','k','b','g','r','m','c','k','b','g','r','m','c','k','b','b','g','r','m','c','k','b','g','r','m','c','k','b','g','r','m','c','k','b'};
    %labelcolorsDim = {[0.5 0.5 1],[0.5 1 0.5],[1 0.5 0.5],[1 0.5 1],'c','y','b','g','r','m','c','y'};
    cidx=1;
    for s = composition % I couldn't parallelize it, gives "Passing multiple values to ConstantLine is not supported." in R2020a
        for idx = find(piquees==s)'
            %idxs = find(piquees==s);
            %p_lambdas = pila(idxs);
            %p_label = speciesStr(s);
            if piUse(idx) % lines with piuse=0 are dashed
                xline(pila(idx),'-',strcat(speciesStr(s),'@',num2str(pila_theoretical(idx))),'LabelHorizontalAlignment','center','Color',labelcolors{cidx});
            else
                xline(pila(idx),'--',strcat(speciesStr(s),'@',num2str(pila_theoretical(idx))),'LabelHorizontalAlignment','center','Color',labelcolors{cidx});
            end
            %disp(pila(idx));
        end
        cidx = cidx+1; % to change colors for each specie
    end
    hold on;
    %ylim([0 max(mean_spectra_only_valids(:,1,1))*1.2]); % the saturation values are very high at lower wavelengths
    ylim([0 65535]);
    %plot(lambdas,ValSaturationCorrected,':','LineWidth',2,'Color',[0.7 0.7 0.7]);
    title('spectrum used for fitting-zero  and selected emission lines');
    xlabel('Lambda (nm)');
    %ylabel('Irradiance corrected spectrum - grey line = saturation value');
    ylabel('Spectrum used for fitting zero - not irradiance corrected');
    hold off;
end

%% CF-Step 11   Peak fitting loop - uses only the MEAN spectrum at every spatial point. new v30 two-step process
% 27nov2018 rewriten using the real MEAN spectrum (only for spectra_is_valid)
% new v24 plot of spectra WITH emission lines, v25 plot only after firstFitAchieved
% new v30 two-step process
% after step 10, the values we need are:  pixright;pixleft;pixrightbkg1;=pixleftbkg1;pixrightbkg2;pixleftbkg2;

disp(['CF-Step 11: Peak fitting...']);
for idx2= 1:Nparam2
    for idx1= 1:Nparam1
        if mean_spectra_is_valid(idx1,idx2) > 0 % v27 if there is at least one valid spectrum
        %if (~isnan(mean_spectra_only_valids(1,idx1,idx2))) % mean spectrum from non-data gives NaN
          disp(['   Doing peak fitting for (', num2str(idx1),',',num2str(idx2),')']);
          for p=1:CFNlines
           if (piUse(p)==1 && pila(p)>= lambdas(1) && pila(p)<=lambdas(end)  ) % marked to be used, AND in composition, P==1 (Halways fitted)

             % v30: everything about peak excursion is already calculated  
             pixcentral = peaks_fit_pixcentral0(p);
             pixright = peaks_fit_pixright0(p);
             pixleft = peaks_fit_pixleft0(p);
             pixrightbkg1 = peaks_fit_pixrightbkg10(p);
             pixleftbkg1 = peaks_fit_pixleftbkg10(p);
             pixrightbkg2 = peaks_fit_pixrightbkg20(p);
             pixleftbkg2 = peaks_fit_pixleftbkg20(p);
             pBkgPx = fit([pixleftbkg1; pixrightbkg1], [mean_spectra_only_valids(pixleftbkg1,idx1,idx2); mean_spectra_only_valids(pixrightbkg1,idx1,idx2)],'poly1' ); % before v25 was the formula used, only take into account two points
             %v26 with 2D grid scanning, the first fit could not be (1,1)
        
       
             % lorentzian fitting
             peak_lambdas = lambdas(pixleft:pixright);
             if (size(peak_lambdas,1)>4) % 28feb2020 if the area has no peak and just a smooth valley, pixleft=pixright=pixcentral
               peak_intensities =  mean_spectra_only_valids(pixleft:pixright,idx1,idx2); % the peak
               peak_intwobaseline = mean_spectra_only_valids(pixleft:pixright,idx1,idx2) - feval(pBkgPx,pixleft:pixright); % the peak minus interpolated baseline
               
               %v26 deconvolution should be done here
               if DO_DECONVOLUTION
                   pause(0.1);
               end

               ws = warning('off','all');  % Turn off warning messages of lorentzfit
               boundp3lb = (getSpectrometerFWHM(pila(p))/2)^2;
               boundp3hb = (widthCriteriaForDiscard*getSpectrometerFWHM(pila(p))/2)^2; % new v28 upper limit is widthCriteriaForDiscard times instrumental broadening, different for Halfa
               bounds = [-Inf -Inf boundp3lb  ;  +Inf +Inf boundp3hb ];
               
               % v30.6 P0 = FitZeroLorentzParams
               %[yprime1,loparams,resnorm1,residual1]=lorentzfit(double(peak_lambdas),double(peak_intwobaseline),[],bounds,'3',opts);warning(ws)  % Turn it back on.
               [yprime1,loparams,resnorm1,residual1]=lorentzfit(double(peak_lambdas),double(peak_intwobaseline),peaks_fit_FitZeroLorentzParams(p,:),bounds,'3',opts);warning(ws)  % Turn it back on.
                %[FitResults,FitError] = peakfit([peak_lambdas peak_intwobaseline],lambdas(pixcentral),2.0,1,2,0,99,0,0,0,0); % peak fitting by the Tom O'haver, 11th parameter is plot
               peaks_fit_error_frommean(p,idx1,idx2) = 100*norm(residual1) / sqrt(size(peak_intensities,1)) / max(peak_intensities); % in percentage, same metric as peakfit() from Tom O'Haver
               %peaks_fit_error_frommean(p,idx1,idx2) = FitError(1);
               if (peaks_fit_error_frommean(p,idx1,idx2)>20) % the fitting error is too large
                   disp(['      Warning!! fitting error of line #' num2str(p) ' of ', strjoin(speciesStr(piquees(p))), '@',num2str(pila_theoretical(p)), ' (',num2str(idx1),',',num2str(idx2),') is ' , num2str(peaks_fit_error_frommean(p,idx1,idx2)), '%']);
               end
               
               %new v28 uses last params as seed 
               peaks_fit_lastLorentzParams(p,:) = loparams;
               
               % store height
               peaks_heights_frommean(p,idx1,idx2)=loparams(1)/loparams(3); % +loparams(4); % total height
               peaks_rawHeights_frommean(p,idx1,idx2) = mean_spectra_only_valids(peaks_fit_pixcentral0(p),idx1,idx2); %*new* v30.7 raw height to check sequence variability
               %peaks_heights_frommean(p,idx1,idx2)=FitResults(3);
               % store central lambda
               peaks_central_frommean(p,idx1,idx2)=loparams(2);
               %peaks_central_frommean(p,idx1,idx2)=FitResults(2);
               error_lambda_central = peaks_central_frommean(p,idx1,idx2)-pila(p);
               if (abs(error_lambda_central) > 2.0*getSpectrometerFWHM(pila(p))) % the error in lambda_central is too large               
                   disp(['      Warning!! central wavelength error for fitting of line #' num2str(p) ' of ', strjoin(speciesStr(piquees(p))), '@',num2str(pila_theoretical(p)), ' (',num2str(idx1),',',num2str(idx2),') is ' , num2str(error_lambda_central), 'nm']);
               end
               % store total fwhm width and calculate Stark width
               % 14dic2018 there are two possible methods: cuadratic and linear,according to LIBS-tutorial-partII only cuadratic is valid
               %peaks_stark_frommean(selectedPeaks,idx1,idx2) = -(getSpectrometerFWHM(lampara_FWHM,pila(selectedPeaks)).^2 - peaks_fwhm_frommean(selectedPeaks,idx1,idx2).^2)./peaks_fwhm_frommean(selectedPeaks,idx1,idx2);
               peaks_fwhm_frommean(p,idx1,idx2)=2*sqrt(loparams(3)); 
               %peaks_fwhm_frommean(p,idx1,idx2)=FitResults(4); 
              % 14dic2018 we should test different approaches: linear subs, cuadratic, torres2007 formula...
              % instrumental deconvolution should be done here
              %xxxxxx OJO!! esta fórmula de stark no puede estar bien
              peaks_fwhmSpectrometer_frommean(p,idx1,idx2) = getSpectrometerFWHM(pila(p));
              peaks_stark_frommean(p,idx1,idx2) = -(getSpectrometerFWHM(pila(p)).^2 - peaks_fwhm_frommean(p,idx1,idx2).^2)./peaks_fwhm_frommean(p,idx1,idx2);
              %disp("ojo!");
              %peaks_stark_frommean(p,idx1,idx2) = sqrt(peaks_fwhm_frommean(p,idx1,idx2).^2 - getSpectrometerFWHM(pila(p)).^2 ); 
              if ( peaks_stark_frommean(p,idx1,idx2) < 0 || ~isreal(peaks_stark_frommean(p,idx1,idx2)) )                    
                  peaks_stark_frommean(p,idx1,idx2) = 0; % we can get negative values, remove them
                  disp(['      Warning!! stark width is less than zero for fitting of line #' num2str(p) ' of ', strjoin(speciesStr(piquees(p))), '@',num2str(pila_theoretical(p)), ' (',num2str(idx1),',',num2str(idx2),')']);
              end
              % calculate and store AREA of the peak
              % new v21 5ago2020 yo can choose wich method to use with the variable AREA_METHOD =
              oversampled_lambdas = lambdas(pixleft):0.001:lambdas(pixright);
              oversampled_lorentzPeak = loparams(1)./((oversampled_lambdas - loparams(2)).^2 + loparams(3)); % oversampled lorentzian shape
              if AREA_METHOD==0 % analytical formula of modeled lorentzian peak
                peaks_area_frommean(p,idx1,idx2)= pi*peaks_heights_frommean(p,idx1,idx2)*peaks_fwhm_frommean(p,idx1,idx2)/2; % area of the lorentzian function, according to Demtröder, ec. 3.10d, p. 64
              elseif AREA_METHOD==1 % trapezoidal integration of the oversampled modeled lorentzian peak
                peaks_area_frommean(p,idx1,idx2)= trapz(oversampled_lambdas,oversampled_lorentzPeak);
              elseif AREA_METHOD==2 % two halves area from modelled lorentzian peak  
                %the area of the right half could be a better estimation for heavily asymmetric peaks (some channels of our spectrometer have this problem)
                %5ago2020: last thought is that, as coma aberration does not change the total area (energy conservation), either sides of the modeled peak are wrong
                idx_central = find(oversampled_lorentzPeak== max(oversampled_lorentzPeak));
                half_osl = oversampled_lambdas(idx_central:end);
                half_osi = oversampled_lorentzPeak(idx_central:end);
                peaks_twohalfareas_frommean(p,idx1,idx2)= 2*trapz(half_osl,half_osi);
                peaks_area_frommean(p,idx1,idx2)= peaks_twohalfareas_frommean(p,idx1,idx2);
              elseif AREA_METHOD==3 % trapezoidal integration of the NOT oversampled baseline-corrected SPECTRA
                peaks_area_frommean(p,idx1,idx2)= trapz(peak_lambdas,peak_intwobaseline ); 
              else
                error('AREA_METHOD not yet implemented');
              end
             
              %27nov2018 sometimes the fitting produces complex numbers, when there is not clear peaks
              if (~isreal(peaks_fwhm_frommean(p,idx1,idx2)))
                   %figure(29);    plot(trozo_lambdas,trozo_pico,trozo_lambdas,yprime1)
                   %disp('imaginario!');
                   peaks_fwhm_frommean(p,idx1,idx2) = 0;
              end
             else % no enough points for fitting
                  peaks_heights_frommean(p,idx1,idx2)=0; % will be rendered invalid
             end
             
             % criteria for discard: height < minimum height, saturated,width < instrumental fwhm/1.5 (to include a margin of error, witdh> instrumental fwhm*WidthCriteria (to include Halfa peak width)
             cond(1) = peaks_heights_frommean(p,idx1,idx2) < ValMinHeightRelative;
             cond(2) = peaks_heights_frommean(p,idx1,idx2) > ValSaturationCorrected(lambda2pixel(lambdas,peaks_central_frommean(p,idx1,idx2))) ;
             cond(3) = peaks_fwhm_frommean(p,idx1,idx2) < getSpectrometerFWHM(pila(p))/3;  % relaxed v24 due to asymmetry of peaks fitting of width is not very good
             cond(4) = peaks_fwhm_frommean(p,idx1,idx2) > getSpectrometerFWHM(peaks_central_frommean(p,idx1,idx2))*widthCriteriaForDiscard ;
             cond(5) =  ~isreal(peaks_fwhm_frommean(p,idx1,idx2)) ;
             if any(cond) % if something is wrong with the peak
                 reason = find(cond); % the indexes of true conditions are the reasons
                 peaks_isvalid_frommean_reason(p,idx1,idx2) =  reason(1); % only the first (height) is retained if there are more.
                 disp(['      Discarding line #', num2str(p) , ' of ', strjoin(speciesStr(piquees(p))), '@',num2str(pila_theoretical(p)), ' (', num2str(idx1),',',num2str(idx2),') ', '> height=', sprintf('%5.0f',peaks_heights_frommean(p,idx1,idx2)), '   width=', sprintf('%1.2f',peaks_fwhm_frommean(p,idx1,idx2)), ', reason: ' ,char(string(str_reasons(reason(1))))]);
                 peaks_isvalid_frommean(p,idx1,idx2)=0; % tag as not valid
             else   
                 peaks_isvalid_frommean(p,idx1,idx2)=1; % valid
             end
                             
             if( all(DEBUG_PEAKS==[idx1 idx2]) || (all(DEBUG_PEAKS<0) && all(DEBUG_PEAKS==-p))) % && peaks_isvalid_frommean(p,idx1,idx2)==1) 
               %if p==44    
                    figure(16);clf;hold on;
                    plot(lambdas(pixleftbkg2:pixrightbkg2),mean_spectra_only_valids(pixleftbkg2:pixrightbkg2,idx1,idx2),'b'); title([strjoin(speciesStr(piquees(p))),'@' num2str(pila_theoretical(p))]); % the original peak
                    plot(lambdas(pixleft),mean_spectra_only_valids(pixleft,idx1,idx2),'r*'); % extend of peak for fitting
                    plot(lambdas(pixright),mean_spectra_only_valids(pixright,idx1,idx2),'r*');
                    plot(lambdas(pixleftbkg2),mean_spectra_only_valids(pixleftbkg2,idx1,idx2),'g+'); % baseline extend
                    plot(lambdas(pixrightbkg2),mean_spectra_only_valids(pixrightbkg2,idx1,idx2),'g+');
                    plot(lambdas(pixleftbkg2:pixrightbkg2),feval(pBkgPx,pixleftbkg2:pixrightbkg2),'r--'); % interpolated baseline
                    if(size(peak_lambdas,1)>4) % fitting is not performed for less than 5 points, next line would give am error
                      plot(peak_lambdas,yprime1,'g');  % the fitting
                      plot(oversampled_lambdas,oversampled_lorentzPeak,'k'); % the oversampled lorentzian peak
                      plot(peak_lambdas,peak_intwobaseline,'m.');  % the peaks minus baseline
                      disp(['      ',strjoin(speciesStr(piquees(p))), sprintf('@%3.2f',pila_theoretical(p)),'> height=', sprintf('%5.0f',peaks_heights_frommean(p,idx1,idx2)), '   measured width=', sprintf('%1.4f',peaks_fwhm_frommean(p,idx1,idx2)),'   stark width=', sprintf('%1.4f',peaks_stark_frommean(p,idx1,idx2)),'   area=',sprintf('%5.1f',peaks_area_frommean(p,idx1,idx2)),'   area(2xhalf)=',sprintf('%5.1f',peaks_twohalfareas_frommean(p,idx1,idx2)),'   error=',sprintf('%2.2f',peaks_fit_error_frommean(p,idx1,idx2)),'%'  ]); 
                      hold off;
                      figure(17);clf;hold on;
                      peakfit([peak_lambdas peak_intwobaseline],lambdas(pixcentral),2.0,1,2,0,99,0,0,0,1); % peak fitting by the Tom O'haver
                    end
                    %if idx1==37 || idx1==45 || idx1==48 % ojo!! xxxxx
                       pause; 
                    %end
             end
            end % if piusar (we want to use that peak)
          end % p peaks
        else
          if spectra(1,1,idx1,idx2) ~= 0 % warning only if spectra is not empty with zeros, i.e., not measured  
            disp(['    No valid mean spectrum for (', num2str(idx1),',',num2str(idx2),')']);
          end
        end %all CF calcs for a spatial points 

    end %idx1
end %idx2 of the mean spectra loop

%%% new v30 now we have information of all peaks fitting, we could detect errors, select best lines ...
% v30.6 check fitting error distribution to detect sever fitting errors
which_peaks=find(piUse==1);
for i=1:size(which_peaks,1)
    [his, edges] =histcounts(nonzeros(peaks_fit_error_frommean(which_peaks(i),:,1)),20);
    dispersion(i) = (max(edges)-min(edges))/2/mean(edges);
    if dispersion(i)>0.5
        disp(['  Warning! too much dispersion of fitting error for ' strjoin(speciesStr(piquees(which_peaks(i)))) , '@' , num2str(pila_theoretical(which_peaks(i))) ]);
        if DEBUG_FITTING_ZERO==1
            figure(99+i);
            histogram(nonzeros(peaks_fit_error_frommean(which_peaks(i),:,1)),20);
            title(['fit error histogram for ', strjoin(speciesStr(piquees(which_peaks(i)))) , '@' , num2str(pila_theoretical(which_peaks(i))) ]);
        end
    end
end


disp(['CF-Step 12: Boltzmann plots...']);
for idx2= 1:Nparam2
    for idx1= 1:Nparam1
        if mean_spectra_is_valid(idx1,idx2) > 0 % v27 if there is at least one valid spectrum
            %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
            %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
            disp(['   Calculating Te from Boltzmann-plot for point (', num2str(idx1),',',num2str(idx2),')']);
            % Calculate Te using Boltzmann-plot fron the MEAN spectrum
            % if self-absorption correction, Te is iterated as correction
            % depends on Te
            if(all(DEBUG_BP==[idx1 idx2])) % clear all figures
                for s=composition
                    figure(41+s);clf;
                end
                figure(40);clf;
            end
            % decides the line intensity to use from calcs: height, area ...
            if (LINE_INTENSITY==0) % height
                peaks_intensity_frommean = peaks_heights_frommean;
            elseif (LINE_INTENSITY==1) % area
                peaks_intensity_frommean = peaks_area_frommean;
            elseif (LINE_INTENSITY==2) % raw height *new* v30.7
                peaks_intensity_frommean = peaks_rawHeights_frommean;
            elseif (LINE_INTENSITY==3) % twice the half right area, from v21, this is done with AREA_METHOD=2
                error('LINE_INTENSITY value deprecated, use AREA_METHOD instead'); % %peaks_intensity_frommean = peaks_twohalfareas_frommean;
            else
                error('LINE_INTENSITY value not implemented.');
            end
            new_B_plot=1;BP_iteration = 1;
            peaks_selfabscoeff_frommean(:,idx1,idx2) = 1; % by default, coefficient should be 1 if the specie has no reference line
            lastTe = 0;
            while(1) % Te iteration with self-absorption correction
                cellcount=1; x_allspecies={}; y_allspecies={}; s_allspecies={};
                for s=composition
                    selectedPeaks_specie= find(piquees==s);%<<<<<<< specie to be used
                    selectedPeaks_douse = find(piUse==1);
                    selectedPeaks_valid = find(peaks_isvalid_frommean(:,idx1,idx2)==1);
                    selectedPeaks = intersect(intersect(selectedPeaks_specie,selectedPeaks_douse),selectedPeaks_valid);
                    %pi_lngAI = log(pila(selectedPeaks).*peaks__frommean(selectedPeaks,idx1,idx2)./piGA(selectedPeaks)); % for boltzmann plot
                    pi_lngAI = log(peaks_intensity_frommean(selectedPeaks,idx1,idx2) ./ peaks_selfabscoeff_frommean(selectedPeaks,idx1,idx2) ./ piGA(selectedPeaks)); % for boltzmann plot, area instead of height, lambda removed
                    % WITH LAMBDA
                    %pi_lngAI = log(pila(selectedPeaks).*peaks_intensity_frommean(selectedPeaks,idx1,idx2) ./ peaks_selfabscoeff_frommean(selectedPeaks,idx1,idx2) ./ piGA(selectedPeaks)); % for boltzmann plot, area instead of height, lambda removed
                    x = piEm(selectedPeaks); % valores de Ek para el eje horizontal
                    if (size(selectedPeaks,1) > 1 && (max(x)-min(x) > 0.1 )) % only if there is at least two peaks AND an enough range of Ek
                        NumPeaks_BP_frommean(s,idx1,idx2)=size(selectedPeaks,1);
                        y = pi_lngAI;
                        p = polyfit(x,y,1); % linear regression
                        yfit = polyval(p,x); % to get R^2
                        yresid = y - yfit; SSresid = sum(yresid.^2); SStotal = (length(y)-1) * var(y);
                        r2 = 1 - SSresid/SStotal;
                        slope_BP_frommean(s,idx1,idx2) = p(1);
                        intercept_BP_frommean(s,idx1,idx2) = p(2);
                        if not(isreal(slope_BP_frommean(s,idx1,idx2))) %xxxxxx
                            disp('ups');
                        end
                        Te_BP_frommean(s,idx1,idx2)= - 1 / (8.617E-5 * slope_BP_frommean(s,idx1,idx2));
                        NumberOfLines_BP_frommean(s,idx1,idx2) = size(x,1); % store the number of points of the BP
                        disp([ '              ' , strjoin(speciesStr(s)), ' Te=' sprintf('%5.0f',Te_BP_frommean(s,idx1,idx2)),'K']);
                        % store x,y in a cell for "single-BP" Te estimation ONLY if Te for this specie is reasonable: 2000K-30000K
                        % AND it is in the whichSpeciesForSingleBPTe list
                        if (ismember(s,whichSpeciesForSingleBPTe) && Te_BP_frommean(s,idx1,idx2) > 2000 && Te_BP_frommean(s,idx1,idx2)<40000)
                            s_allspecies{cellcount} = s; % store which species is each x,y in order to store the intercept later on
                            x_allspecies{cellcount} = x;
                            y_allspecies{cellcount} = y;cellcount=cellcount+1;
                        end
                        if(all(DEBUG_BP==[idx1 idx2]))  % optional plot for debugging
                            figure(41+s);which_subplot=1; %BP_iteration; % clf removed
                            if which_subplot>9 which_subplot=1; end
                            subplot(1,1,which_subplot);clf;hold on;plot(x,y,'*');plot(x,yfit,'--g');title(['BP ',' #',num2str(BP_iteration),' ',strjoin(speciesStr(s)),' Te=' sprintf('%5.0f',Te_BP_frommean(s,idx1,idx2)) 'K R^2=' sprintf('%1.2f',r2)]);hold off;
                        end
                    end %size(selpicos)
                end %species Bolztmann-plot from the mean spectra
                % now a common BP for all the species, so we get a single Te value, stored in single_slope_BP_frommean(idx1,idx2)
                mdl_cell = {mdl1,mdl2,mdl3,mdl4,mdl5,mdl6,mdl7,mdl8,mdl9,mdl10}; % these are first order linear function for up to 10 point clouds
                beta0 = [-1, 0.5 , 0.5, 0.5 , 0.5, 0.5, 0.5, 0.5, 0.5, 0.5, 0.5];  %first value is a single slope, the others, different intercepts
                % function nlinmultifit from https://es.mathworks.com/matlabcentral/fileexchange/40613-multiple-curve-fitting-with-common-parameters-using-nlinfit
                try
                    [beta,r,J,Sigma,mse,errorparam,robustw] = nlinmultifit(x_allspecies, y_allspecies, mdl_cell(1:length(x_allspecies)), beta0(1:1+length(x_allspecies))); % if error, probably the number of species is more than 10
                catch
                    beta(1:length(x_allspecies)+1) = -1E20 ; % 0K slope, if fail, sometimes the number of parameteres is not ok (fixed v25 4jul2021)
                    disp([ '               > Warning! no fit for single-Te BP']);
                end
                slope_single_BP_frommean(idx1,idx2) = beta(1);
                for i=1:length(x_allspecies)
                    intercept_single_BP_frommean(s_allspecies{i},idx1,idx2) = beta(i+1); % this is the intercept of each species BUT with common slope (Te) fitting
                end
                Te_single_BP_frommean(idx1,idx2)= - 1 / (8.617E-5 * slope_single_BP_frommean(idx1,idx2));
                Te_single_BP_meanTe_frommean(idx1,idx2) = nanmeanLocal(nonzeros(Te_BP_frommean(whichSpeciesForSingleBPTe,idx1,idx2)));
                disp([ '              mean      Te=' sprintf('%5.0f', Te_single_BP_meanTe_frommean(idx1,idx2)),'K']); % leaving zeros out
                disp([ '              Single-BP Te=' sprintf('%5.0f',Te_single_BP_frommean(idx1,idx2)),'K']);
                if(all(DEBUG_BP==[idx1 idx2]))  % optional plot for debugging
                    figure(40);
                    r2=zeros(length(x_allspecies),1);
                    for i=1:length(x_allspecies)
                        p = [beta(1) beta(i+1)];
                        x=x_allspecies{i};
                        y=y_allspecies{i};
                        yfit = polyval(p,x); % to get R^2
                        yresid = y - yfit; SSresid = sum(yresid.^2); SStotal = (length(y)-1) * var(y);
                        r2(i) = 1 - SSresid/SStotal;
                        if(r2(i)<0)
                            disp(['            Warning!! ' strjoin(speciesStr(s_allspecies{i})) ' in single-Te BP (mean spectra) has a negative r^2']); % meaning the fitting is soooo bad
                            %stop % the fitting is very bad, something is wrong,
                            %but ... life must go on
                        end
                        hold on; plot(x,y,'*');plot(x,yfit,'--g');
                    end
                    title(['BP ',' #',num2str(BP_iteration),' all species Te=' sprintf('%5.0f',Te_single_BP_frommean(idx1,idx2)) 'K, mean R^2=' sprintf('%1.2f',mean(r2))]);hold off;
                end
                if(all(DEBUG_BP==[idx1 idx2]))
                    pause;
                end
                % now there is a Te estimation, if self-absorption correction
                % is enabled, it should be iterated
                if (CORRECT_SELFABSORPTION>0)
                    if (CORRECT_SELFABSORPTION==2)             % self-absorption correction from sun2009 IRSAC
                        disp(['           Selfabsorption correction using Sun2009 IRSAC for iteration #',num2str(BP_iteration)]);
                        for s=composition
                            selectedPeaks_valid=find(peaks_isvalid_frommean(:,idx1,idx2)==1 & piquees(:)==s); % only valid peaks
                            if (BP_iteration==1 && IRSAC_reference(s)>0 ) % the first time, we need to calculate the "fitted value of the reference line", which is the intensity from the BP at the Em value
                                %some BP has no points, left intensity as is,
                                %otherwise SAcoeff goes to zero
                                if (slope_BP_frommean(s,idx1,idx2)==0 && intercept_BP_frommean(s,idx1,idx2)==0) % there is no BP
                                    peaks_intensity_frommean_fitted_for_reference_line(s,idx1,idx2) =  peaks_intensity_frommean(IRSAC_reference(s),idx1,idx2);
                                else
                                    peaks_intensity_frommean_fitted_for_reference_line(s,idx1,idx2) = exp(slope_BP_frommean(s,idx1,idx2) * piEm(IRSAC_reference(s)) + intercept_BP_frommean(s,idx1,idx2))*piGA(IRSAC_reference(s));
                                end
                            end
                            % a single value of Te is used from the simultaneous
                            % fitting of all species in the BP
                            if (IRSAC_reference(s)==0 || Te_BP_frommean(s,idx1,idx2)==0 ) % there is no reliable reference line, for example, Al in nordic gold; OR there is no BP for this specie
                                peaks_selfabscoeff_frommean(selectedPeaks_valid,idx1,idx2) = 1;
                            else
                                peaks_selfabscoeff_frommean(selectedPeaks_valid,idx1,idx2) =  peaks_intensity_frommean(selectedPeaks_valid,idx1,idx2) ./ peaks_intensity_frommean_fitted_for_reference_line(s,idx1,idx2) .* piGA(IRSAC_reference(s)) ./ piGA(selectedPeaks_valid) .* exp(-(piEm(IRSAC_reference(s))-piEm(selectedPeaks_valid)) ./ (kB_eVK .* Te_BP_frommean(s,idx1,idx2) ));
                            end
                            if(1)
                                for n=1:size(selectedPeaks_valid,1)
                                    if (peaks_selfabscoeff_frommean(selectedPeaks_valid(n),idx1,idx2) > 1)
                                        disp([ '               ', strjoin(speciesStr(piquees(selectedPeaks_valid(n)))) , '@' , num2str(pila_theoretical(selectedPeaks_valid(n))) , ' SAcoeff=', num2str(peaks_selfabscoeff_frommean(selectedPeaks_valid(n),idx1,idx2)) ' >> 1.0']);
                                        peaks_selfabscoeff_frommean(selectedPeaks_valid(n),idx1,idx2)=1.0;
                                    else
                                        disp([ '               ', strjoin(speciesStr(piquees(selectedPeaks_valid(n)))) , '@' , num2str(pila_theoretical(selectedPeaks_valid(n))) , ' SAcoeff=', num2str(peaks_selfabscoeff_frommean(selectedPeaks_valid(n),idx1,idx2)) ]);
                                    end
                                end
                            end
                        end
                    end
                    %Te = Te_single_BP_frommean(idx1,idx2);
                    Te = nanmeanLocal(nonzeros(Te_BP_frommean(whichSpeciesForSingleBPTe,idx1,idx2))); % Te from mean of each Te, so rsd<5% can be performed
                    if (abs(Te-lastTe)/Te < 0.1 ) % 10% of difference
                        % ok, Te has converged, but, according to sun2009, the
                        % RSD of temperatures should be within 5%, otherwise, the
                        % highest Te should be substitud by mean Te and iterate
                        % again
                        actual_temps = Te_BP_frommean(whichSpeciesForSingleBPTe,idx1,idx2);
                        TeRsd = std(actual_temps) / nanmeanLocal(actual_temps);
                        if (TeRsd > 0.05) % more than 5% (sun2009)
                            [Temax,cualTemax] = max(nonzeros(Te_BP_frommean(whichSpeciesForSingleBPTe,idx1,idx2)));
                            disp([ '               rsd of Te>5% substituing Te=', num2str(Te_BP_frommean(whichSpeciesForSingleBPTe(cualTemax),idx1,idx2)),'K of ', strjoin(speciesStr(whichSpeciesForSingleBPTe(cualTemax))), ' with mean value Te=',num2str(nanmeanLocal(actual_temps)),'K']);
                            Te_BP_frommean(whichSpeciesForSingleBPTe(cualTemax),idx1,idx2) = nanmeanLocal(actual_temps);
                            % the next step will be calc BPs again, so we perform the
                            % SA correction now, the code is duplicated but ...
                            % I miss the GOTO instruction...
                            % CODE DUPLICATED FROM ABOVE, should be refactored
                            if (CORRECT_SELFABSORPTION==2)             % self-absorption correction from sun2009 IRSAC
                                disp(['           Selfabsorption correction using Sun2009 IRSAC for iteration #',num2str(BP_iteration)]);
                                for s=composition
                                    selectedPeaks_valid=find(peaks_isvalid_frommean(:,idx1,idx2)==1 & piquees(:)==s); % only valid peaks
                                    if (BP_iteration==1 && IRSAC_reference(s)>0 ) % the first time, we need to calculate the "fitted value of the reference line", which is the intensity from the BP at the Em value
                                        peaks_intensity_frommean_fitted_for_reference_line(s,idx1,idx2) = exp(slope_BP_frommean(s,idx1,idx2) * piEm(IRSAC_reference(s)) + intercept_BP_frommean(s,idx1,idx2))*piGA(IRSAC_reference(s));
                                    end
                                    % a single value of Te is used from the simultaneous
                                    % fitting of all species in the BP
                                    if (IRSAC_reference(s)==0 ||  Te_BP_frommean(s,idx1,idx2)==0) % there is no reliable reference line, for example, Al in nordic gold; or there is no BP for this specie
                                        peaks_selfabscoeff_frommean(selectedPeaks_valid,idx1,idx2) = 1;
                                    else
                                        peaks_selfabscoeff_frommean(selectedPeaks_valid,idx1,idx2) =  peaks_intensity_frommean(selectedPeaks_valid,idx1,idx2) ./ peaks_intensity_frommean_fitted_for_reference_line(s,idx1,idx2) .* piGA(IRSAC_reference(s)) ./ piGA(selectedPeaks_valid) .* exp(-(piEm(IRSAC_reference(s))-piEm(selectedPeaks_valid)) ./ (kB_eVK .* Te_BP_frommean(s,idx1,idx2) ));
                                    end
                                    if(1)
                                        for n=1:size(selectedPeaks_valid,1)
                                            if (peaks_selfabscoeff_frommean(selectedPeaks_valid(n),idx1,idx2) > 1)
                                                disp([ '               ', strjoin(speciesStr(piquees(selectedPeaks_valid(n)))) , '@' , num2str(pila_theoretical(selectedPeaks_valid(n))) , ' SAcoeff=', num2str(peaks_selfabscoeff_frommean(selectedPeaks_valid(n),idx1,idx2)) ' >> 1.0']);
                                                peaks_selfabscoeff_frommean(selectedPeaks_valid(n),idx1,idx2)=1.0;
                                            else
                                                disp([ '               ', strjoin(speciesStr(piquees(selectedPeaks_valid(n)))) , '@' , num2str(pila_theoretical(selectedPeaks_valid(n))) , ' SAcoeff=', num2str(peaks_selfabscoeff_frommean(selectedPeaks_valid(n),idx1,idx2)) ]);
                                            end
                                        end
                                    end
                                end % for s=composition
                            end
                        else % if TeRSD > 0.5%
                            break; % we are done
                        end
                    end % if Te-LastTe <
                    lastTe = Te;
                else
                    break; % No SA correction, no iterations
                end  % if(CORRECT_...
                BP_iteration = BP_iteration +1;
            end % while(1)
            % at this point, we have:
            % -Te_BP_frommean: Te for each specie
            % -Te_single_BP_frommean: single Te for all species
            % -intercept_BP_frommean: intercept of the BP of each specie
            % -intercept_single_BP_frommean: intercept of EACH specie from the
            %      single (common) BP
        end %if mean spectra
    end %idx1 of the mean spectra loop
end %idx2 of the mean spectra loop


disp(['CF-Step 13: Ne0 (mean/median, by-point..., from Halfa, from Stark) ...']);
for idx2= 1:Nparam2
    for idx1= 1:Nparam1
        if mean_spectra_is_valid(idx1,idx2) > 0 % v27 if there is at least one valid spectrum
            % initial value of Te0 to create the SahaBP and to calculate Ne from STark
            if getTe0From==Te0_FROM_SINGLE_TE_BP % use the Te from Te_single_BP_frommean()
                Te =  Te_single_BP_frommean(idx1,idx2); % the one from the single BP
            elseif getTe0From==Te0_FROM_MEAN_TE % the mean Te from all species' Te
                Te = Te_single_BP_meanTe_frommean(idx1,idx2);
            else % use the Te from the chosen specie
                Te =  Te_BP_frommean(whichSpecieIsUsed,idx1,idx2); % the chosen one
            end
            
            %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
            % Ne from stark width using the mean spectra of every peak
            % we know now a reliable Te
            selectedPeaks=intersect(find(piStark~=0),find(piUse~=0)); % peaks with stark parameters AND piusar=1 (some with large selfabsorption and piusar=0 produced large Ne values
            selectedPeaks=intersect(selectedPeaks,find(peaks_isvalid_frommean(:,idx1,idx2)==1));  % only valid peaks should be used to calculate Ne
            peaks_Ne_fromStark_frommean(selectedPeaks,idx1,idx2)=peaks_stark_frommean(selectedPeaks,idx1,idx2)./2.*piStark(selectedPeaks); %linear Ne-Stark broadening relationship
            % different formula for Halfa, % from Pardini 2013 & El Sherbini 2006
            %if(peaks_isvalid_frommean(1,idx1,idx2))
            %1sept2019 this is tricky, the formula below should be used
            %regardless if the peak is valid or not, but fitting could be
            %wrong enough to give an error
            a = sqrt(4033.8-24.45*(log(Te))^2 ); % n31  gives imaginary part for Te=0
            if isreal(a)
              b = 1.029E8+174576.3*Te;
              alfa = 1 /(a+b/sqrt(NeStarkNe0));
              peaks_Ne_fromStark_frommean(1,idx1,idx2) = 8.02E12 *(peaks_stark_frommean(1,idx1,idx2)*10/alfa)^(3/2); % p=1 is Halfa
            else
              peaks_Ne_fromStark_frommean(1,idx1,idx2)=0;
            end
            %disp(['             Ne_Halfa=', num2str(peaks_Ne_fromStark_frommean(1,idx1,idx2))]);
            %end
            %if ~isreal(alfa) || ~isreal(a) || ~isreal(peaks_Ne_fromStark_frommean(1,idx1,idx2))
                %error('imaginario!')
            %end

            idx_nz = find(peaks_Ne_fromStark_frommean(:,idx1,idx2)>0);
            idx_nz = idx_nz(idx_nz~=1);% Halfa (always idx=1) should not be here   v28 bug corrected
            % we get an alternative Ne value from the MEAN/MEDIAN of start width
            % of peaks with stark parameters, removing outliers
            %temp_Ne =  median(peaks_Ne_fromStark_frommean(idx_nz,idx1,idx2),1);
            idx_nosolarge = find(peaks_Ne_fromStark_frommean(:,idx1,idx2)<NeStarkNe0*7); % *new* v30 the "good" value is N0 from previous measurements of same sample
            idx_nososmall = find(peaks_Ne_fromStark_frommean(:,idx1,idx2)>NeStarkNe0/7);
            idx_nz_noOutliers = intersect(idx_nosolarge,idx_nososmall); % the range is x7 and /7 to be considered not an outlier
            idx_nz_noOutliers = idx_nz_noOutliers(idx_nz_noOutliers~=1);% Halfa (always idx=1) should not be here new v28 sometimes, Halfa was not valid and the first element (not being 1) was removed
            peaks_Ne_fromStarkOtherPeaks_frommean(idx1,idx2) = mean(peaks_Ne_fromStark_frommean(idx_nz_noOutliers,idx1,idx2),1); % *new* v30 with a few peaks, means is better than median
            disp(['   (', num2str(idx1),',',num2str(idx2),')    Ne from Stark broadening: Ne_Halfa=' , sprintf('%1.2e',peaks_Ne_fromStark_frommean(1,idx1,idx2)),'     Ne_others_mean_no_outliers=', sprintf('%1.2e',peaks_Ne_fromStarkOtherPeaks_frommean(idx1,idx2)), '(',num2str(size(idx_nz_noOutliers,1)), ' peaks)']);
            if isnan(peaks_Ne_fromStarkOtherPeaks_frommean(idx1,idx2)) % if there is no peaks , entering this NaN in the below formula gives also NaN, but it shouldn't
                peaks_Ne_fromStarkOtherPeaks_frommean(idx1,idx2)=0;
            end
            peaks_Ne_frommean(idx1,idx2) = (100-NeFromHalfaPercentage)/100*peaks_Ne_fromStarkOtherPeaks_frommean(idx1,idx2) + (NeFromHalfaPercentage)/100*peaks_Ne_fromStark_frommean(1,idx1,idx2);
            if (peaks_stark_frommean(1,idx1,idx2)==0 && NeFromHalfaPercentage > 0 )
                error ('Ne is based on Halfa stark broadening but peak is not valid');
            end
            
            if (all(DEBUG_NE_HISTOGRAM==[idx1,idx2]))
                f=figure(18);
                f.Name = 'DEBUG_NE_HISTOGRAM';
                title('g');
                subplot(2,1,1);
                histogram(peaks_Ne_fromStark_frommean(idx_nz,idx1,idx2),50);
                title(['Ne histogram all']);
                subplot(2,1,2);
                histogram(peaks_Ne_fromStark_frommean(idx_nz_noOutliers,idx1,idx2),50);
                title(['Ne histogram no outliers, NeHalfa=' , sprintf('%1.2e',peaks_Ne_fromStark_frommean(1,idx1,idx2))  ]);                
            end
            
            
        end
    end

end

% now we have Ne calculated, we can choose to use each one, a fixed value, a mean value...

if FIXED_Ne
    if FIXED_Ne == -1 % calc the mean value
        single_Ne=mean(peaks_Ne_frommean(peaks_Ne_frommean~=0));
    else
        single_Ne=FIXED_Ne;
    end
    disp(['   Warning! Ne fixed to ' num2str(single_Ne) ]);
    for idx2= 1:Nparam2
        for idx1= 1:Nparam1
            if mean_spectra_is_valid(idx1,idx2) > 0 % v27 if there is at least one valid spectrum
                    peaks_Ne_frommean(idx1,idx2) = single_Ne;
            end
        end
    end
end
      
disp(['CF-Step 14: Saha-Boltzmann plots...']);
for idx2= 1:Nparam2
    for idx1= 1:Nparam1
        if mean_spectra_is_valid(idx1,idx2) > 0 % v27 if there is at least one valid spectrum
          %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
          % SAHA-bolztman plot of elements. code imported from normalization algorithm
          new_SH_plot=1; % allow to insert multiples plots in one
          Ne = peaks_Ne_frommean(idx1,idx2); % and Ne already selected from Starks measurements (Halfa or whatever)
            % initial value of Te0 to create the SahaBP 
          if getTe0From==Te0_FROM_SINGLE_TE_BP % use the Te from Te_single_BP_frommean()
                Te =  Te_single_BP_frommean(idx1,idx2); % the one from the single BP
          elseif getTe0From==Te0_FROM_MEAN_TE % the mean Te from all species' Te
                Te = Te_single_BP_meanTe_frommean(idx1,idx2);
          else % use the Te from the chosen specie
                Te =  Te_BP_frommean(whichSpecieIsUsed,idx1,idx2); % the chosen one
          end
          if (Ne==0 || isnan(Ne) || Te > 50000 || Te < 2000 || isnan(Te)) % sanity check 
             disp(['Cannot perform SahaBP: Te0='  num2str(Te),' Ne0=' , num2str(Ne), '  (' , num2str(idx1),',',num2str(idx2),')'  ]);
             continue;
          end
            
          if getTe0From==Te0_FROM_MEAN_TE
                disp(['    (', num2str(idx1),',',num2str(idx2),')  Doing Saha-Boltzmann plot using Te0 from meanTe Te0=', num2str(Te) ,'K and Ne0=' ,num2str(Ne) ]);
          elseif getTe0From==Te0_FROM_SINGLE_TE_BP
                disp(['    (', num2str(idx1),',',num2str(idx2),')  Doing Saha-Boltzmann plot using Te0 from singleBP Te0=',num2str(Te) ,' and Ne0=',num2str(Ne) ]);
          else
                disp(['    (', num2str(idx1),',',num2str(idx2),')  Doing Saha-Boltzmann plot using Te0 from BP of ', strjoin(speciesStr(whichSpecieIsUsed)), ' Te0=', num2str(Te), ' and Ne0=',num2str(Ne)  ]);
          end
          
          SahaBP_iteration=1;
          while(1) % iterative process to converge to a new Te & Ne
              % new V16 the for s=composition loop is INSIDE the while(1), as
              % in the BP
              Ne = peaks_Ne_frommean(idx1,idx2); % reload UPDATED Ne 
              cellcount=1; x_allspecies={}; y_allspecies={}; s_allspecies={}; % to accumlate data for simultaneous fitting of all the SahaBP
              for s = composition(mod(composition,2)==0) % we will use each specie AND the next index, CaI+CaII , MgI+MgII... 'composition' should have neutral, ion, neutral, ion...
                  selectedPeaks_specie = find(piquees==s);%<<<<<<< specie to be used
                  selectedPeaks_specie_ion = find(piquees==s+1);%the ion II
                  selectedPeaks_douse = find(piUse==1);
                  selectedPeaks_valid = find(peaks_isvalid_frommean(:,idx1,idx2)==1);
                  selectedPeaks = intersect(intersect([selectedPeaks_specie ; selectedPeaks_specie_ion],selectedPeaks_douse),selectedPeaks_valid);
                  selectedPeaks_z0 = intersect(intersect(selectedPeaks_specie,selectedPeaks_douse),selectedPeaks_valid);
                  selectedPeaks_z1 = intersect(intersect(selectedPeaks_specie_ion,selectedPeaks_douse),selectedPeaks_valid);
                  %pi_lngAI_z0 = log(pila(selectedPeaks_z0).* (selectedPeaks_z0,idx1,idx2)./ peaks_selfabscoeff_frommean(selectedPeaks_z0,idx1,idx2) ./piGA(selectedPeaks_z0)); % for boltzmann plot
                  %pi_lngAI_z1 = log(pila(selectedPeaks_z1).* peaks_area_frommean(selectedPeaks_z1,idx1,idx2)./ peaks_selfabscoeff_frommean(selectedPeaks_z1,idx1,idx2) ./piGA(selectedPeaks_z1)) - log(2*(2*3.1415927*0.511E6/9E16*8.6173324E-5/(4.135668E-15)^2)^1.5*Te^1.5 / (Ne*1E6)); %eq. 2 from Aguilera2007
                  pi_lngAI_z0 = log( peaks_intensity_frommean(selectedPeaks_z0,idx1,idx2)./ peaks_selfabscoeff_frommean(selectedPeaks_z0,idx1,idx2) ./piGA(selectedPeaks_z0)); % for boltzmann plot
                  pi_lngAI_z1 = log( peaks_intensity_frommean(selectedPeaks_z1,idx1,idx2)./ peaks_selfabscoeff_frommean(selectedPeaks_z1,idx1,idx2) ./piGA(selectedPeaks_z1)) - log(2*(2*3.1415927*0.511E6/9E16*8.6173324E-5/(4.135668E-15)^2)^1.5*Te^1.5 / (Ne*1E6)); %eq. 2 from Aguilera2007
                  pi_Em_corr = piEm(selectedPeaks_z1)+ pi_z(selectedPeaks_z1)*Einfinite(s+1); % corrected Em for ion species (II)
                  x = [ piEm(selectedPeaks_z0) ; pi_Em_corr ] ; % Ek values for X axis
                  y = [ pi_lngAI_z0 ; pi_lngAI_z1]; % y axis
                  if (size(selectedPeaks,1) > 1 && (max(x)-min(x) > 0.1 )) % only if there is at least two peaks AND an enough range of Ek
                      % if not set, Te is calculated again for every specie
                      p = polyfit(x,y,1); % linear regression
                      yfit = polyval(p,x); % to get R^2
                      yresid = y - yfit; SSresid = sum(yresid.^2); SStotal = (length(y)-1) * var(y);
                      r2 = 1 - SSresid/SStotal;
                      slope_SahaBP_frommean(s,idx1,idx2) = p(1);
                      intercept_SahaBP_frommean(s,idx1,idx2) = p(2);
                      Te_SahaBP_frommean(s,idx1,idx2)= - 1 / (8.617E-5 * slope_SahaBP_frommean(s,idx1,idx2));
                      % OJO!! check those two lines
                      %slope_SahaBP_frommean(s,idx1,idx2)= - 1 / (8.617E-5 * Te_SahaBP_frommean(whichSpecieForTe0,idx1,idx2));  % slope from the first specie, which should be whichSpecieForTe
                      %intercept_SahaBP_frommean(s,idx1,idx2) = +(mean(y) - slope_SahaBP_frommean(s,idx1,idx2)*mean(x)); % linear fit with fixed slope https://lists.gnu.org/archive/html/help-octave/2010-05/msg00308.html
                      yfit = polyval([slope_SahaBP_frommean(s,idx1,idx2) intercept_SahaBP_frommean(s,idx1,idx2)],x); % this is only to get R^2
                      yresid = y - yfit; SSresid = sum(yresid.^2); SStotal = (length(y)-1) * var(y);
                      r2 = 1 - SSresid/SStotal;
                      % store x,y in a cell for "single-sahaBP" Te estimation ONLY if Te for this specie is reasonable: 2000K-30000K
                      % AND it is in the whichSpeciesForSingleSahaBPTe list
                      if (ismember(s,whichSpeciesForSingleSahaBPTe) && Te_SahaBP_frommean(s,idx1,idx2) > 2000 && Te_SahaBP_frommean(s,idx1,idx2)<30000)
                          s_allspecies{cellcount} = s; % store which species is each x,y in order to store the intercept later on
                          x_allspecies{cellcount} = x;
                          y_allspecies{cellcount} = y;cellcount=cellcount+1;
                      end
                      disp([ '              Saha-Boltzmann of ' ,strjoin(speciesStr(s)), '+' ,strjoin(speciesStr(s+1)),' newTe=', sprintf('%5.0f',Te_SahaBP_frommean(s,idx1,idx2)) , '  Ne=', sprintf('%1.2e',Ne)  ]);
                      if(all(DEBUG_SBP==[idx1 idx2]))
                          figure(34);
                          if (new_SH_plot==1)
                              clf;which_subplot=1;
                          end
                          subplot(2,2,which_subplot);hold on;plot(x,y,'*');plot(x,yfit,'--g');title(['SahaBP ' , strjoin(speciesStr(s)),'+',strjoin(speciesStr(s+1)),' Te=' sprintf('%5.0f',Te_SahaBP_frommean(s,idx1,idx2)) 'K R^2=' sprintf('%1.2f',r2)]);hold off;pause;
                          which_subplot = which_subplot +1;
                          if which_subplot>4 which_subplot=1; end
                          if (new_SH_plot==1) new_SH_plot=0; end
                      end
                  else
                      disp([ '               > Not enough peaks or Ek-Ei range for ' ,strjoin(speciesStr(s)), '+' ,strjoin(speciesStr(s+1))]);
                      %break;% there are not enough number of peaks
                  end % if there are peaks for the SahaBP
              end % for s=coomposition loop
              
              % all the species has been processed, let's do a singleSahaBP
              mdl_cell = {mdl1,mdl2,mdl3,mdl4,mdl5,mdl6,mdl7,mdl8,mdl9,mdl10};
              beta0 = [-1, 0.5 , 0.5, 0.5 , 0.5, 0.5, 0.5, 0.5, 0.5, 0.5, 0.5];
              % function nlinmultifit from https://es.mathworks.com/matlabcentral/fileexchange/40613-multiple-curve-fitting-with-common-parameters-using-nlinfit
              try
                  [beta,r,J,Sigma,mse,errorparam,robustw] = nlinmultifit(x_allspecies, y_allspecies, mdl_cell(1:length(x_allspecies)), beta0(1:1+length(x_allspecies))); % if error, probably the number of species is more than 10
              catch
                  beta(:) = -1E20; % 0K slope
                  disp([ '               > Warning! no fit for single-Te SahaBP']);
              end
              slope_single_SahaBP_frommean(idx1,idx2) = beta(1);
              try %v26 got a weird error with not enough size of beta for a no-fit point
                  for i=1:length(x_allspecies)
                      intercept_single_SahaBP_frommean(s_allspecies{i},idx1,idx2) = beta(i+1); % this is the intercept of each species BUT with common slope (Te) fitting
                  end
              catch
              end
              Te_single_SahaBP_frommean(idx1,idx2)= - 1 / (8.617E-5 * slope_single_SahaBP_frommean(idx1,idx2));
              disp([ '              All species Te=' sprintf('%5.0f',Te_single_SahaBP_frommean(idx1,idx2)),'K']);
              if(all(DEBUG_SBP==[idx1 idx2]))  % optional plot for debugging
                  figure(19);
                  r2=zeros(length(x_allspecies),1);
                  for i=1:length(x_allspecies)
                      p = [beta(1) beta(i+1)];
                      x=x_allspecies{i};
                      y=y_allspecies{i};
                      yfit = polyval(p,x); % to get R^2
                      yresid = y - yfit; SSresid = sum(yresid.^2); SStotal = (length(y)-1) * var(y);
                      r2(i) = 1 - SSresid/SStotal;
                      if(r2(i)<0)
                          disp(['  Warning!! ' strjoin(speciesStr(s_allspecies{i})) ' in single-Te SahaBP (mean spectra) has a negative r^2']); % meaning the fitting is soooo bad
                          %stop % the fitting is very bad, something is wrong,
                          %but ... life must go on
                      end
                      hold on; plot(x,y,'*');plot(x,yfit,'--g');
                  end
                  title(['SahaBP ',' #',num2str(SahaBP_iteration),' all species Te=' sprintf('%5.0f',Te_single_SahaBP_frommean(idx1,idx2)) 'K, mean R^2=' sprintf('%1.2f',mean(r2))]);hold off;
              end
              if(all(DEBUG_SBP==[idx1 idx2]))
                  pause;
              end
              %update Te
              lastTe=Te;
              if (getTe0From==Te0_FROM_SINGLE_TE_BP) % we iterate the single Te
                  Te =  Te_single_SahaBP_frommean(idx1,idx2); % the one from the single SahaBP Te
              else % we trust in this specie for the Te iteration
                  Te =  Te_SahaBP_frommean(whichSpecieIsUsed,idx1,idx2); % the chosen one
              end

              if (abs(Te-lastTe)/Te < 0.05 ) % if Te changes less than 5%, let finish
                  break;
              end
              if (Te < 273 ) % v27 if Te is almost zero there is no point in continuing, 273 is a random low number
                  break;
              end
              SahaBP_iteration = SahaBP_iteration +1;
              % *new* v30 recalculation of Ne, duplicated code from step 13
              % it is a bit tricky. 
              %     if fixed_Ne > 0: it is fixed, and that's it.
              %     if fixed_Ne == -1:  we want an on-the-fly estable value, could update based on updated NeStarkNe0 and Te but only for Halfa through the inverse "mean" stark
              %     if fixed_ne = 0: just update the value
              if FIXED_Ne == -1
                disp('      Warning!! update of Ne not yet implemented for fixed_Ne=-1');
              elseif FIXED_Ne == 0 %if fixed_ne = 0: just update the value
                a = sqrt(4033.8-24.45*(log(Te))^2 );
                b = 1.029E8+174576.3*Te;
                alfa = 1 /(a+b/sqrt(peaks_Ne_frommean(idx1,idx2)));
                peaks_Ne_fromStark_frommean(1,idx1,idx2) = 8.02E12 *(peaks_stark_frommean(1,idx1,idx2)*10/alfa)^(3/2); % p=1 is Halfa
                peaks_Ne_frommean(idx1,idx2) = (100-NeFromHalfaPercentage)/100*peaks_Ne_fromStarkOtherPeaks_frommean(idx1,idx2) + (NeFromHalfaPercentage)/100*peaks_Ne_fromStark_frommean(1,idx1,idx2);
              end
           end  %while(1)
        else
          disp(['           No valid mean spectrum for (', num2str(idx1),',',num2str(idx2),')']);
        end %all CF calcs for a spatial points 
     
    end %idx1
end %idx2 of the mean spectra loop

  
  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  % calculate concentrations
  % Te and intercepts could be from:
  %    Intercept of individual BP of each species, at
  %         intercept_BP_frommean() and Te_BP_frommean()
  %    single Te after selfabsorption correction with single slope fitting,
  %         at intercept_single_BP_frommean() and  Te_single_BP_frommean()
  %    Te for every element from SahaBP, at  
  %         intercept_SahaBP_frommean() and Te_SahaBP_frommean()
  % Ne can be from:
  %    H-alpha line   peaks_Ne_fromStark_frommean(1,idx1,idx2)
  %    a specific line peaks_Ne_fromStark_frommean(i,idx1,idx2)
  partition_func = zeros(max(composition),1);
  CsF = zeros(max(composition),1);
  disp(['CF-Step 15: Concentrations...']);
  for idx2= 1:Nparam2
      for idx1= 1:Nparam1
          if mean_spectra_is_valid(idx1,idx2) > 0
              if(getConcentrationsFrom==SAHA_BP)           Te = Te_SahaBP_frommean(whichSpecieIsUsed,idx1,idx2); end % Te from Saha-Boltzmann plot <:<:<:<:<:<:<
              if(getConcentrationsFrom==SINGLE_TE_SAHA_BP) Te = Te_single_SahaBP_frommean(idx1,idx2); end % Te from Saha-Boltzmann plot <:<:<:<:<:<:<
              if(getConcentrationsFrom==EACH_BP)           Te = Te_BP_frommean(whichSpecieIsUsed,idx1,idx2);  end % Te from individual BP, with SA correction Te is the same for all species
              if(getConcentrationsFrom==SINGLE_TE_BP)      Te = Te_single_BP_frommean(idx1,idx2); end % Te from commen BP, with SA correction Te is a single one
              Ne = peaks_Ne_frommean(idx1,idx2); % and Ne from peak 1 of H_alfa or median(other peaks)
              for s=composition
                  partition_func(s) = polyval(poly_partfunc(s,:),Te);
                  if (getConcentrationsFrom== SAHA_BP)           intercept = intercept_SahaBP_frommean(s,idx1,idx2); end
                  if (getConcentrationsFrom== SINGLE_TE_SAHA_BP) intercept = intercept_single_SahaBP_frommean(s,idx1,idx2); end
                  if (getConcentrationsFrom== EACH_BP)           intercept = intercept_BP_frommean(s,idx1,idx2); end
                  if (getConcentrationsFrom== SINGLE_TE_BP)      intercept = intercept_single_BP_frommean(s,idx1,idx2); end
                  if (intercept==0) % actually, there is no intercept
                      disp(['  Warning!! No intercept for ' strjoin(speciesStr(s)) ]);
                      intercept = -1E20; % should give 0%
                  end
                  CsF(s) = partition_func(s) * exp (intercept); % intercept from SahaBP (it seems its for neutrals only)
              end
              F=sum(CsF);
              concentration(composition,idx1,idx2) = CsF(composition) ./ F;
              disp(['concentrations for (', num2str(idx1),',',num2str(idx2),')'])
              for s = composition(mod(composition,2)==0) % these are the neutrals z=0
                  disp(['  ',strjoin(speciesStr(s)),'+',strjoin(speciesStr(s+1)),'=', num2str(concentration(s,idx1,idx2)+concentration(s+1,idx1,idx2))]);
              end
              
              %% "by hand" substitution of unreliable values using the Saha eq. for ions (z=1)
              for s = composition(mod(composition,2)==0) % these are the neutrals z=0
                  CsF(s+1) = CsF(s)*2*partition_func(s+1)/partition_func(s)*(2*3.1415927*me_MeVc2*kB_eVK/h_eVs^2*Te)^1.5*exp(-Einfinite(s)/kB_eVK/Te)/(Ne*1E6); %MeV
              end
              F=sum(CsF);
              concentration_z1(composition,idx1,idx2) = CsF(composition) ./ F;
              disp(['concentrations (z=1 substitution) for (', num2str(idx1),',',num2str(idx2),')'])
              for s = composition(mod(composition,2)==0) % these are the neutrals z=0
                  disp(['  ',strjoin(speciesStr(s)),'+',strjoin(speciesStr(s+1)),'=', num2str(concentration_z1(s,idx1,idx2)+concentration_z1(s+1,idx1,idx2))]);
              end

              %% composition in weight (no z1 substitution) 
              for s = composition % neutrals and ions
                  concentration_weight(s,idx1,idx2) = concentration(s,idx1,idx2) * atomicWeights(s);
              end
              FC = sum(concentration_weight(:,idx1,idx2));
              concentration_weight(composition,idx1,idx2) = concentration_weight(composition,idx1,idx2) ./ FC;
              disp(['concentrations in weight for (', num2str(idx1),',',num2str(idx2),')'])
              for s = composition(mod(composition,2)==0) % these are the neutrals z=0
                  disp(['  ',strjoin(speciesStr(s)),'+',strjoin(speciesStr(s+1)),'=', num2str(concentration_weight(s,idx1,idx2)+concentration_weight(s+1,idx1,idx2))]);
              end              

              %% composition in weight from composition_z1
              for s = composition % neutrals and ions
                  concentration_weight_z1(s,idx1,idx2) = concentration_z1(s,idx1,idx2) * atomicWeights(s);
              end
              FC = sum(concentration_weight_z1(:,idx1,idx2));
              concentration_weight_z1(composition,idx1,idx2) = concentration_weight_z1(composition,idx1,idx2) ./ FC;
              disp(['concentrations in weight (z=1 substitution) for (', num2str(idx1),',',num2str(idx2),')'])
              for s = composition(mod(composition,2)==0) % these are the neutrals z=0
                  disp(['  ',strjoin(speciesStr(s)),'+',strjoin(speciesStr(s+1)),'=', num2str(concentration_weight_z1(s,idx1,idx2)+concentration_weight_z1(s+1,idx1,idx2))]);
              end
              
              % error , cuadratic difference between real composition and weight
              % composition with z=1 substitution
              err=0; idx=1;
              for s = composition(mod(composition,2)==0) % these are the neutrals z=0
                  err = err + (concentration_weight(s,idx1,idx2)+concentration_weight(s+1,idx1,idx2) - expectedWeightConcentrations(idx))^2;
                  idx = idx+1;
              end
              concentration_error(idx1,idx2) = sqrt(err); % error in composition (real-calculated)
              disp(['   Error: ',num2str(sqrt(err)*100),'%']);
              
              %C_Ca = (CsF(CaI) + CsF(CaII)) / F;
              %C_Mg = (CsF(MgI) + CsF(MgII)) / F;
              ratio_AB_CFLibs_molar(idx1,idx2) = (concentration(elementA,idx1,idx2)+concentration(elementA+1,idx1,idx2)) / (concentration(elementB,idx1,idx2)+concentration(elementB+1,idx1,idx2)) * 1000; % milimols/mol
              ratio_AB_CFLibs_molar_z1(idx1,idx2) = (concentration_z1(elementA,idx1,idx2)+concentration_z1(elementA+1,idx1,idx2)) / (concentration_z1(elementB,idx1,idx2)+concentration_z1(elementB+1,idx1,idx2)) * 1000; % milimols/mol
              
              ratio_AB_CFLibs_weight(idx1,idx2) = (concentration_weight(elementA,idx1,idx2)+concentration_weight(elementA+1,idx1,idx2)) / (concentration_weight(elementB,idx1,idx2)+concentration_weight(elementB,idx1,idx2)) * 100; % weight
              ratio_AB_CFLibs_weight_z1(idx1,idx2) = (concentration_weight_z1(elementA,idx1,idx2)+concentration_weight_z1(elementA+1,idx1,idx2)) / (concentration_weight_z1(elementB,idx1,idx2)+concentration_weight_z1(elementB,idx1,idx2)) * 100; % weight
              
              %C_Sr = (CsF(SrI) + CsF(SrII)) / F;
              %ratio_SrCa_CFLibs(idx1,idx2) = C_Sr / C_Ca * 1000; % milimols/mol
              %C_Cu = (CsF(CuI) + CsF(CuII)) / F;
              %C_Zn = (CsF(ZnI) + CsF(ZnII)) / F;
              %ratio_CuZn_CFLibs(idx1,idx2) = C_Zn / C_Cu * 1000; % milimols/mol
          end % valid mean spectrum
      end %idx1
  end %idx2


% plot with the evolution of valid peaks discarded by the peak fitting algorithm
if (DEBUG_STABILITY)
       f=figure(30); % peaks that are valid in each spatial points, could be used again to restrict BP for only those peaks, in all spatial points
       f.Name='DEBUG_STABILITY: in which points each peak is valid';
       common_peaks_isvalid_frommean = peaks_isvalid_frommean(:,1,1);  % the ones from the first point 
       any_peaks_isvalid_frommean = peaks_isvalid_frommean(:,1,1);
       for idx2= 1:Nparam2
           for idx1= 2:Nparam1
               common_peaks_isvalid_frommean = and(common_peaks_isvalid_frommean,peaks_isvalid_frommean(:,idx1,idx2));
               any_peaks_isvalid_frommean = any_peaks_isvalid_frommean + peaks_isvalid_frommean(:,idx1,idx2);
           end
       end
       
       all_peaks_idx = find(any_peaks_isvalid_frommean); % all emission lines that appear now and then
       pivfm_only = peaks_isvalid_frommean(all_peaks_idx,:,:);
       imagesc(pivfm_only(:,:,1)); % if Nparam2>1, only one idx2 is shown
       colormap(pink);
       
       %ylabel(num2str(all_peaks_idx));
       xlabel('Nparam1');
       title('color = peak is valid in each spatial point');
       %caxis([0 1]);
       str_lines={};
       for i=1:size(all_peaks_idx,1)
           m=mode(nonzeros(peaks_isvalid_frommean_reason(all_peaks_idx(i),:,:)));
           if isnan(m)
               str_lines{i} = strcat(string(speciesStr(piquees(all_peaks_idx(i)))),'@',string(num2str(pila_theoretical(all_peaks_idx(i)))),' (valid)');    %strcat(speciesStr(piquees(all_peaks_idx))','@',num2str(pila(all_peaks_idx)),' (valid)' )) ;
           else
               str_lines{i} = strcat(string(speciesStr(piquees(all_peaks_idx(i)))),'@',string(num2str(pila_theoretical(all_peaks_idx(i)))),' (', string(str_reasons(m)),')');  % string(strcat(speciesStr(piquees(all_peaks_idx))','@',num2str(pila(all_peaks_idx)),' (',str_reasons(m) ,')' )) ;
           end
       end
       yticks(1:size(all_peaks_idx,1));
       yticklabels(str_lines);
       set(gca, 'YTick', 1:size(all_peaks_idx));
       %set(gca, 'YTick', 1:size(all_peaks_idx), 'YTickLabel', strcat(speciesStr(piquees(all_peaks_idx))','@',num2str(pila(all_peaks_idx)),' (',str_lines',')' )  ); % the number in parentesis is the most frequent reason for discarding the line (str_reason)
       
       %figure(26);
       %imagesc(common_peaks_isvalid_frommean(which_peaks_start));
       %ylabel(num2str(which_peaks_start));
       %title(num2str(which_peaks_start))
       % var 'common_peaks_isvalid_frommean' has the mask of peaks ALWAYS valid in all the Nparam iterations
       
       disp('Common peaks that are valid in all spatial points: ');
       for p=1:CFNlines
           if common_peaks_isvalid_frommean(p)
               disp(['#' num2str(p) ' of '  strjoin(speciesStr(piquees(p)))  ' @' num2str(pila(p))]);
           end
       end
       disp('Peaks that are valid in SOME spatial points: ');
       str_result = 'none';
       for p=1:CFNlines
           if not(common_peaks_isvalid_frommean(p)) && any_peaks_isvalid_frommean(p)
               disp(['#' num2str(p) ' of '  strjoin(speciesStr(piquees(p)))  ' @' num2str(pila(p)) '  ' num2str(any_peaks_isvalid_frommean(p)) ' times']);
               str_result = '';
           end
       end
       disp(str_result);
       
       %display de evolution of Ne
       f=figure(31);
       f.Name = 'Ne from Halfa -blue-  all other peaks -green- and mix -red';
       plot(ejeParam1,peaks_Ne_fromStark_frommean(1,:,1),'b',ejeParam1,peaks_Ne_fromStarkOtherPeaks_frommean, 'g',ejeParam1,peaks_Ne_frommean,'r');
       rsd_Ne_peaks = nanstdLocal(peaks_Ne_fromStarkOtherPeaks_frommean(:,1))/nanmeanLocal(peaks_Ne_fromStarkOtherPeaks_frommean(:,1));
       rsd_Ne_Halfa = nanstdLocal(peaks_Ne_fromStark_frommean(1,:,1))/nanmeanLocal(peaks_Ne_fromStark_frommean(1,:,1));
       title(['Ne H-alfa(blue,rsd=' num2str(100*rsd_Ne_Halfa) '%) and Ne-mean-nooutliers(green,rsd=' num2str(100*rsd_Ne_peaks) '%) (' num2str(100-NeFromHalfaPercentage) '%)' ]);
       
       
       %display de number of peaks involved in BP & SahaBP in each spatial point, this gives also information
       f=figure(32);
       f.Name='Number of peaks involved in each BP & SahaBP, should be always the same';
       hold on;
       for s = composition
           plot(ejeParam1,NumPeaks_BP_frommean(s,:,1),'DisplayName',char(speciesStr(s)));
       end
       legend show;
       hold off;
       title('Number of points of each specie in the Boltzmann-plots');
       
       
       %statistics about the stability of the results point-by-point
       % number of valid peaks in each spatial point for every specie peak
       %figure(27);surf(1:Nparam1,1:CFNlines,squeeze(peaks_isvalid_frommean(:,:,1),2));title('for each emission line, number of valid peaks in each spatial point');
       % number of points used for the SahaBP
       %figure(28);surf(1:Nparam1,1:Nspecies,NumPeaks_SahaBP_frommean);title('for each specie, number of points used in SahaBP_frommean');
       
       %new v28 peak fitting error for all peaks, fitting issues are revealed here
       figure(38);clf;
       f=figure(38);
       f.Name='Fitting error (%) for all peaks in each spatial points, fitting issues are revealed here';
       which_peaks=find(piUse==1);
       hold on;
       for i=1:size(which_peaks,1)
           %this could give an error for 2D sequences, should be another chart
           fe = mean(nonzeros(peaks_fit_error_frommean(which_peaks(i),:,1)));
           festd = std(nonzeros(peaks_fit_error_frommean(which_peaks(i),:,1)));
           plot(nonzeros(peaks_fit_error_frommean(which_peaks(i),:,1)),'DisplayName',strcat(strjoin(speciesStr(piquees(whichPeaks(i)))), '@',num2str(pila_theoretical(whichPeaks(i))),' error=',num2str(fe,2),'% std=' , num2str(festd,2)));
       end
       hold off;
       legend;
       
       
       
       %new v28 peak fitting error for all peaks, fitting issues are revealed here
       f=figure(39);clf;
       f.Name='FWHM for all peaks in each spatial points, fitting issues or saturation is revealed here';
       which_peaks=find(piUse==1);
       hold on;
       for i=1:size(which_peaks,1)
           %this could give an error for 2D sequences, should be another chart
           plot(nonzeros(peaks_fwhm_frommean(which_peaks(i),:,1)),'DisplayName',strcat(strjoin(speciesStr(piquees(whichPeaks(i)))), '@',num2str(pila_theoretical(whichPeaks(i)))));
       end
       hold off;
       legend;

       f=figure(50);clf;
       f.Name='Stark for all peaks in each spatial points, fitting issues or saturation is revealed here';
       which_peaks=find(piUse==1);
       hold on;
       for i=1:size(which_peaks,1)
           %this could give an error for 2D sequences, should be another kind of chart?
           plot(nonzeros(peaks_stark_frommean(which_peaks(i),:,1)),'DisplayName',strcat(strjoin(speciesStr(piquees(whichPeaks(i)))), '@',num2str(pila_theoretical(whichPeaks(i)))));
       end
       hold off;
       legend;       
end

% new v21 8ene2021 the variable "ratio_to_export"  will have the choosen ratio values (from WHICH_RATIO_TO_EXPORT)
%  'lir_from_mean' = line intensity ratio from mean spectrum; 'mean_lir' = mean of ratios from individual spectra; 'molar_cf' = molar concentration from cf libs; 'molar_cf_z1' with z1 substitution ; 'weight_cf_z1' weight concentration (not molar)

if (strcmp(WHICH_RATIO_TO_EXPORT,'lir_from_mean') || strcmp(WHICH_RATIO_TO_EXPORT , 'mean_lir')) 
    disp('WARNING!!, ratio_to_export not available for CalibrationFree, changing to molar_cf_z1');
    WHICH_RATIO_TO_EXPORT = 'molar_cf_z1';
end
if strcmp(WHICH_RATIO_TO_EXPORT , 'lir_from_mean')
    ratio_to_export = ratio_MgCa_del_espectro_promedio; % not yet implemented
elseif strcmp(WHICH_RATIO_TO_EXPORT , 'mean_lir')
    ratio_to_export = ratio_MgCa_del_promedio_de_ratios;  % not yet implemented
elseif strcmp(WHICH_RATIO_TO_EXPORT , 'molar_cf')
    ratio_to_export = ratio_AB_CFLibs_molar;
elseif strcmp(WHICH_RATIO_TO_EXPORT , 'molar_cf_z1')
    ratio_to_export = ratio_AB_CFLibs_molar_z1;
elseif strcmp(WHICH_RATIO_TO_EXPORT , 'weight_cf_z1')
    ratio_to_export = ratio_AB_CFLibs_weight_z1;
else
    disp('¡No ratio specified!');
    ratio_to_export = NaN;
end

FEATURES = [FEATURES 'which ratio to export=' WHICH_RATIO_TO_EXPORT];


%v22 RSD of the ratio sequence to export (ratio_to_export)
%if ~isnan(ratio_to_export)
 rsd_of_seq = nanstdLocal(ratio_to_export)/nanmeanLocal(ratio_to_export);
 %disp(['RSD of sequence ratio_to_export:  ' num2str(rsd_of_seq*100) '%']);
 ratio_to_export(ratio_to_export==0)=NaN;
 % *new* v30.7 automatic points-with-resin  removal
 if AUTO_RESIN_REMOVAL > 0
     min_resin = min(min(nonzeros(resin_intensity)));
     for idx2= 1:Nparam2
         for idx1= 1:Nparam1
             if resin_intensity(idx1,idx2) > AUTO_RESIN_REMOVAL*min_resin  % if this point has N times the minimum value, we guess it is a "resin" point
                 ratio_to_export(idx1,idx2) = NaN;
             end
         end
     end
     
 end
 
 
 f=figure(24);
 if (Nparam2 > 1) % 2D data
     f.Name='Ratio 2D map';
     imagesc(ejeParam1,ejeParam2,ratio_to_export'); % could be imagesc (false colors) or mesh (3D mesh)
     set(gca,'YDir','normal')
     caxis([10 30]);
     xlabel(param1Name);
     ylabel(param2Name);
     zlabel(WHICH_RATIO_TO_EXPORT);
     pbaspect([abs(ejeParam1(end)) abs(ejeParam2(end)) 1]) % this is the real aspect ratio
 else
    f.Name='Ratio sequence';
    plot(ejeParam1,ratio_to_export)
    xlabel (param1Name); 
    ylabel (WHICH_RATIO_TO_EXPORT);
 end
 title(['Ratio of two elements, using ' WHICH_RATIO_TO_EXPORT '  ' processingTimeStr ],'Interpreter','none');
%end

%% SSA smoothing of the ratio_to_export sequence
hay_ssa=0;
if (DO_SSA==1)
    if (mode2D==1) % let suppose that the sequence is in the idx1 axis, averaging across the other dimension
        xnan = nanmeanLocal (ratio_to_export ,1);
    else
        xnan = ratio_to_export(:,1);
    end
    x=xnan(~isnan(xnan));
    sn_ssa = 0; senal_ssa=0;
    
    if (size(x,1) >  16 )  % es posible que no haya espectros válidos suficientes,
        disp('Doing FFT & SSA to smooth sequence...');
        fs = 1 / deltaR;
        if (size(x,1) < 32)
            NFFT=16; % para que no se pare con secuencias pequeñas, aunque el resultado no será comparable
        else
            NFFT=32;
        end
        
        xfft = x(1:NFFT) - mean(x(1:NFFT)); % para que no tenga continua
        L=length(xfft);
        X=fft(xfft,NFFT);
        Px=X.*conj(X)/(NFFT*L); %Power of each freq components
        fVals=fs*(0:NFFT/2-1)/NFFT;
        f=figure(20);
        f.Name='Sequence power spectral density';
        plot(fVals,Px(1:NFFT/2),'b','LineSmoothing','on','LineWidth',1);
        title('One Sided Power Spectral Density');
        xlabel('Frequency (Hz)')
        ylabel('PSD');
        
        % SSA
        xssa = x - mean(x);
        M=8; % embedding dimension
        [E,V,A,R]=ssa_matlab(xssa, M);
        senal_ssa = sum(R(:,1:SSA_SMOOTH),2) +mean(x);
        ruido_ssa = sum(R(:,SSA_SMOOTH+1:8),2);
        rsd_of_noise_seq = nanstdLocal(ruido_ssa)/nanmeanLocal(ruido_ssa+mean(x));
        disp(['RSD of NOISE SSA component:  ' num2str(rsd_of_noise_seq*100) '%']);  
        
        f=figure(21);
        f.Name=['SSA: original, smoothed and high-frequency noise (rsd=' , num2str(rsd_of_noise_seq*100), '%)sequence'];
        eje = ejeParam1(1:length(xssa));
        plot(eje,x,eje,senal_ssa,eje,ruido_ssa);
        title('SSA original,signal,noise');
        %figure(22);
        %plot(eje,ruido_ssa);
        %title('SSA noise');
        
        % vamos a probar un estimador
        % para la FFT, dejarla fija siempre a 16, esto deja el 2º componente en
        % 0.3125 mm-1 , es decir, 3 mm por ciclo; el 3º en 0.625 mm-1, 1.6 mm por ciclo, sigue siendo
        % un valor razonable para un cambio brusco. voy a dejar 2 primeras
        % frecuencias como señal, del 3 al 8 como ruido.; cambio a 32 para mirar un
        % parte significativa de más secuencias, 1:3 y 4:15
        % para el SSA, voy a empezar haciendo el sum(rms) de los componentes 1:2 de
        % 6 como señal, y el resto como ruido, o quizá 8 dimensiones para que sea
        % comparable a la FFT???, si venga, 8 dimensiones,
        %
        sn_fft = sum(Px(1:3)) / sum(Px(4:NFFT/2-1)); % 32 -> 16, 16->8 etc.
        sum_senal_ssa = sum(senal_ssa .^ 2);
        sum_ruido_ssa = sum(ruido_ssa .^ 2);
        sn_ssa = sum_senal_ssa / sum_ruido_ssa;
        if (size(senal_ssa) > 1 )
            hay_ssa = 1;
        else
            hay_ssa = 0;
        end
    else
        hay_ssa = 0;
    end % no se hace FFT of SSA si hay pocos puntos
    %v27 RSd of noise componente of SSA could be a better estimation of sequence variability
end

%% EXCEL export (requieres excel installed in the same computer)
%columnas en la excel empezando en C:   muestra, path, fecha, arq/moderna
%lamina/sección	isotopos previos	número de medida superpuesta	puntos
%deltaR ventana lineas lente/fibra ganancia t_retraso t_captura Npulses, integrado background RSD minimo	RSD medio	S/N FFT
%S/N FFT RSD de los espectros integrados , rsd_secuencia, experiment.txt
%
%
%exportación a Excel
% columna1 : eje param1
% columna2 : ratio Mg/Ca
% columna3 : RSD del ratio (%)
% columna4 : intensidad media de la línea de magnesio en cada punto
% columna5 :  "" de calcio
% columna6 : ratio resina (v09)

if (DO_EXCEL==1)
    disp('Writing Excel file...');
    ahoraDatePath = strcat(datestr(now,'ddmmyyyy-HHMMSS'),SUBEXPERIMENT_NAME);
    last_valid = size(ratio_to_export,1);
    for i=size(ratio_to_export):-1:1 % this combersome code is just to remove NaNs after the last valid points, BUT no scattered NaNs
        if isnan(ratio_to_export(i,1)) || ratio_to_export(i,1)==0
            last_valid=i-1;
        else
            break;
        end
    end
    ratio_valids = ratio_to_export(1:last_valid,:);
    ratio_valid_distances = ejeParam1(1:last_valid)'; 
    
    %calc of averages following the "Asier" method
    Ntoavg = 4; % number of averaged points
    ratio_averaged = [];
    ratio_averaged_distance = [];
    for i=size(ratio_valids,1):-Ntoavg:1
        ratio_averaged = vertcat(nanmeanLocal(ratio_valids(i:-1:max(i-Ntoavg+1,1))),ratio_averaged);
        ratio_averaged_distance = vertcat(ejeParam1(i),ratio_averaged_distance);
    end
    rav4 = ratio_averaged;rad4 = ratio_averaged_distance;
    
    Ntoavg = 2; % number of averaged points
    ratio_averaged = [];
    ratio_averaged_distance = [];
    for i=size(ratio_valids,1):-Ntoavg:1
        ratio_averaged = vertcat(mean(ratio_valids(i:-1:max(i-Ntoavg+1,1))),ratio_averaged);
        ratio_averaged_distance = vertcat(ejeParam1(i),ratio_averaged_distance);
    end
    rav2 = ratio_averaged;rad2 = ratio_averaged_distance;
    
    %save header to excel
    xlsFileName = strcat(PN, '\ratio_', ahoraDatePath, '.xlsx');
    xlswrite(xlsFileName,[{'Folder:'} {PN}] , 'Hoja1', 'A1');
    xlswrite(xlsFileName,[{'Processing:'} {FEATURES} ], 'Hoja1', 'A2');
    xlswrite(xlsFileName,[{'Description:'} {EXPERIMENT_DESCRIPTION} ], 'Hoja1', 'A3');
    if (DO_SSA==1)
        xlswrite(xlsFileName,[{'SN_SSA:'} {sn_ssa} ], 'Hoja1', 'A4');
        xlswrite(xlsFileName,[{'RSD_sequence:'} {rsd_of_noise_seq} ], 'Hoja1', 'A5');
    end
    
    if (mode2D==1)
        cadena = cell(size(ejeParam1));
        for idx1= 1:Nparam1+1
            if (idx1==Nparam1+1)
                cadena(idx1)= { 'mean' };
            else
                cadena(idx1)= { strcat(param1Name,'=', num2str(ejeParam1(idx1))) };
            end
        end
        xlswrite(xlsFileName, cadena , 'Hoja1', 'C10');
        for idx1= 1:Nparam1+1
            celda = strcat('C',num2str(idx1+10));
            if (idx1==Nparam1+1)
                xlswrite(xlsFileName,[ejeParam2' nanmeanLocal(ratio_to_export,1)'  ], 'Hoja1',celda);
            else
                xlswrite(xlsFileName,[ejeParam2' ratio_to_export(idx1,:)' ], 'Hoja1',celda);
            end
        end
    else   % no 2D mode
        xlswrite(xlsFileName,[ {param1Name} {['ratio-' WHICH_RATIO_TO_EXPORT]} {'ratio SSA'} {'distances 2ma'} {'ratio 2ma'}  {'ratio 4ma'} {'ratio 4ma'}] , 'Hoja1', 'C10');
        xlswrite(xlsFileName,[ratio_valid_distances ratio_valids(:,1)  ], 'Hoja1','C11');
        xlswrite(xlsFileName,[rad2, rav2   ], 'Hoja1','F11');
        xlswrite(xlsFileName,[rad4, rav4   ], 'Hoja1','H11');
        if (DO_SSA==1)
            xlswrite(xlsFileName,senal_ssa , 'Hoja1','E11');
        end
    end
    
    if(1) % on 15nov2021 stopped to work somehow, undefined function 'Chart'
    %crea el gráfico
    %http://www.mathworks.com/matlabcentral/newsreader/view_thread/298622
    % esto está sacado de http://stackoverflow.com/questions/18165593/plot-excel-bar-chart-from-matlab
    e = actxserver('excel.application');
    eWs = e.Workbooks.Open(xlsFileName); % Open workbook
    eS = eWs.ActiveSheet;
    e.Visible = 0;
    
    %añade el gráfico
    eCO = eS.ChartObjects.Add(500, 30, 400, 250);
    eC = eCO.Chart;
    eC.SeriesCollection.NewSeries;
    howManyData = length(ratio_to_export(ratio_to_export>0)); % número real de datos
    datosRatio = ratio_to_export(ratio_to_export>0);
    
    if (hay_ssa==1)
        datosSuave = senal_ssa ;
        datosSuave = datosSuave(datosSuave>0);
        RangoArriba = round(((max(max([datosRatio datosSuave]))+0.05)*100))/100;
        RangoAbajo = round(((min(min([datosRatio datosSuave]))-0.05)*100))/100;
    else
        RangoArriba = round(((max(max(datosRatio ))+0.05)*100))/100;
        RangoAbajo = round(((min(min(datosRatio ))-0.05)*100))/100;
    end
    
    %eC.SeriesCollection.NewSeries;
    eC.SeriesCollection(1).Values = eS.Range(['D11:D' num2str(howManyData+10)]);
    eC.SeriesCollection(1).XValue = eS.Range(['C11:C' num2str(howManyData+10)]);
    eC.SeriesCollection(1).Name  = '=Hoja1!D10';
    eC.SeriesCollection.NewSeries;
    eC.SeriesCollection(2).Values = eS.Range(['E11:E'  num2str(howManyData+10)]);
    eC.SeriesCollection(2).XValue = eS.Range(['C11:C'  num2str(howManyData+10)]);
    eC.SeriesCollection(2).Name  = '=Hoja1!E10';
    
    eCO.Chart.ChartType = 74; %scatter with lines http://it.toolbox.com/wiki/index.php/EXCEL_Chart_Type_Enumeration
    
    %ejes
    ChartAxes = invoke(eCO.Chart,'Axes',1);
    set(ChartAxes,'HasTitle',1);
    set(ChartAxes.AxisTitle,'Caption',param1Name');
    ChartAxes = invoke(eCO.Chart,'Axes',2);
    set(ChartAxes,'HasTitle',2);
    set(ChartAxes.AxisTitle,'Caption','ratio');
    eCO.Chart.Axes(2).MinimumScale = RangoAbajo;
    eCO.Chart.Axes(2).MaximumScale = RangoArriba;
    eCO.Chart.HasTitle = true;
    eCO.Chart.ChartTitle.Text = ['Ratio '  WHICH_RATIO_TO_EXPORT  ' '  EXPERIMENT_NAME];
    eWs.Save;
    eWs.Close(false);
    e.Quit;
    delete(e);
    end
end % DO_EXCEL

%makes a copy of this script, matched to the XLS with now() timestamp
disp('saving a copy of this script with a timestamp just in case someone want to reproduce this exact processing ...');
copyfile([ mfilename('fullpath') '.m'] ,[ PN '\\' mfilename '_' processingTimeStr '.m']); %copy the current program to the experiment folder, easier to repeat
disp([  [ PN '\\' mfilename '_' processingTimeStr '.m']]);

disp('done!'); % end , fin,  it's over , finish , the end
diary off;

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%% LOCAL FUNCTIONS TO REDUCE EXTERNAL DEPENDENCIES, 
%
%TBC