$SET DEF CRAY $!wavelength-sorted linelist with energy level indices $ASSIGN POOLQ:GF1900Z.LIN FOR001 $!energy levels with E1 A-sums. predicted energies are labelled with minus $ASSIGN 1900:GF1900Z.GAM FOR008 $!or energy levels with E1+M+Q A-sums $ASSIGN 1900:Gammasum1900Z.GAM FOR008 $! $!wavelength-sorted line list for lines with good wavelengths $! no predicted energies 160 columns $ASSIGN 1900:GF1900Z.POS FOR011 $! $!wavelength-sorted line list with all the lines $! 80 columns, no broadening, no lande, no hyperfine, no isotopes $ASSIGN K1B:GF1900Z.80COL FOR012 $! $!wavelength-sorted line list with all the lines (160 col) $ASSIGN K1B:GF1900Z.LINES FOR013 $! $!wavelength-sorted lines with upper levels below the ionization limit $ASSIGN K1B:GF1900Z.LOW FOR014 $! $!wavelength-sorted lines with all the lines including wavenumber, $!flog, femisslog, alog, and galog but no damping or splitting data. $ASSIGN K1B:GF1900Z.AgAfgf FOR015 $! $!wavelength-sorted lines with upper levels below the ionization limit $!branching fractions $ASSIGN K1B:GF1900Z.BF FOR016 $! $RUN CRAY:EXPAND3007