$setK $ASSIGN ATLAS9:MOLECULES.DAT FOR002 $ASSIGN ATLAS12:AT4300G15K17C.DAT FOR003 $ASSIGN ATLAS12:AT4300G15K17D.NEW FOR007 $ASSIGN K4C:LINESARCTURUS.DAT FOR012 $ASSIGN K:AT4300G15K17D.13 FOR013 $ASSIGN ATLAS12:BNLTELINES.DAT FOR019 $RUN ATLAS12:ATLAS12.EXE READ MOLECULES MOLECULES ON READ PUNCH ABUNDANCE TABLE 1H 0.911000 2He 0.089000 3Li-10.880-0.500 4Be-10.890-0.500 5B -9.440-0.500 6C -3.480-0.500 7N -3.990-0.200 8O -3.110-0.100 9F -7.480-0.500 10Ne -3.950-0.100 11Na -5.710-0.200 12Mg -4.460-0.100 13Al -5.570-0.200 14Si -4.490-0.100 15P -6.590-0.500 16S -4.830-0.500 17Cl -6.540-0.500 18Ar -5.480-0.100 19K -6.820-0.500 20Ca -5.680-0.200 21Sc -8.940-0.300 22Ti -7.050-0.200 23V -8.040-0.500 24Cr -6.370-0.500 25Mn -6.650-0.500 26Fe -4.370-0.500 27Co -7.120-0.500 28Ni -5.790-0.500 29Cu -7.830-0.500 30Zn -7.440-0.500 31Ga -9.160-0.500 32Ge -8.630-0.500 33As -9.670-0.500 34Se -8.690-0.500 35Br -9.410-0.500 36Kr -8.810-0.500 37Rb -9.440-0.500 38Sr -9.140-0.500 39Y -9.800-0.500 40Zr -9.540-0.500 41Nb-10.620-0.500 42Mo-10.120-0.500 43Tc-20.000-0.500 44Ru-10.200-0.500 45Rh-10.920-0.500 46Pd-10.350-0.500 47Ag-11.100-0.500 48Cd-10.180-0.500 49In-10.580-0.500 50Sn-10.040-0.500 51Sb-11.040-0.500 52Te -9.800-0.500 53I -10.530-0.500 54Xe -9.810-0.500 55Cs-10.920-0.500 56Ba -9.910-0.500 57La-10.820-0.500 58Ce-10.490-0.500 59Pr-11.330-0.500 60Nd-10.540-0.500 61Pm-20.000-0.500 62Sm-11.040-0.500 63Eu-11.530-0.500 64Gd-10.920-0.500 65Tb-11.940-0.500 66Dy-10.940-0.500 67Ho-11.780-0.500 68Er-11.110-0.500 69Tm-12.040-0.500 70Yb-10.960-0.500 71Lu-11.280-0.500 72Hf-11.160-0.500 73Ta-11.910-0.500 74W -10.930-0.500 75Re-11.770-0.500 76Os-10.590-0.500 77Ir-10.690-0.500 78Pt-10.240-0.500 79Au-11.030-0.500 80Hg-10.950-0.500 81Tl-11.140-0.500 82Pb-10.190-0.500 83Bi-11.330-0.500 84Po-20.000-0.500 85At-20.000-0.500 86Rn-20.000-0.500 87Fr-20.000-0.500 88Ra-20.000-0.500 89Ac-20.000-0.500 90Th-11.920-0.500 91Pa-20.000-0.500 92U -12.510-0.500 93NP-20.000-0.500 94Pu-20.000-0.500 95Am-20.000-0.500 96Cm-20.000-0.500 97Bk-20.000-0.500 98Cf-20.000-0.500 99Es-20.000-0.500 TITLE ATLAS12 ARCTURUS MODARC72A ITERATIONS 15 PRINT 1 1 1 1 1 1 1 1 1 1 1 1 1 1 2 PUNCH 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 ITERATIONS 30 PRINT 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 2 PUNCH 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 CONVECTION OVER 1.25 0. BEGIN END CONVECTION ON 1. ITERATIONS 1 PRINT 2 PUNCH 0