$SETWIDTH $ASSIGN ATLAS9:MOLECULES.DAT FOR002 $RUN WIDTH9 VTUR up to 3 constant values of microturbulent velocity 2 1.0 2.0 0.0 PROF print line profiles AVER begin summing abundances for average LINE 2.00 512.7683 SUN 512.7683 -6.060 3.0 415.932 2.0 19912.486 26.00 512.7683 151 HT LINE 5.9 SUN 524.7052 -4.970 2.0 704.003 3.0 19757.020 26.00 524.7052 151 HT LINE 6.8 SUN 522.5522 -4.770 1.0 888.132 1.0 20019.648 26.00 522.5522 151 HT LINE 6.2 SUN 525.0206 -4.980 0.0 978.076 1.0 20019.648 26.00 525.0206 151 HT LINE 11.4 SUN 516.8900 -4.010 3.0 415.932 3.0 19757.020 26.00 516.8900 151 HT AVER end summation of abundances and compute average CURV compute up to 9 points of a curve of growth, no abund 5 -1.0 .5 LINE 11.4 SUN 516.8900 -4.010 3.0 415.932 3.0 19757.020 26.00 516.8900 151 HT END end of width input. atlas input follows READ PUNCH GRIDP00:ASUN.DAT READ MOLECULES MOLECULES ON VTURB 0.E5 the vturb in the model is root-mean-square added to vtur VTURB 0.E5 in width. set one or the other to 0. SURFACE FLUX SURFACE INTENSITY 1 1. BEGIN END end of atlas input. ready for more width input STOP no more width input. stop