TABLE p ===ZVERS_010 .-+  H *We, 11 Feb 1998 09:18:03 4^ 2 CDESCRIPTOR.DIRECTORY2 {ITBLENGTHR.DIRECTORY2 ITBLOFFSTR.DIRECTORY2  ITBLCONTRR.DIRECTORY2 @CTSELTABLR.DIRECTORY2 )CTLABL001R.DIRECTORY2 )CTLABL002R.DIRECTORY2 )CTLABL003R.DIRECTORY2 )CTLABL004R.DIRECTORY2 CHISTORYR.DIRECTORY2 +`CCOEFCSTR.DIRECTORY2 +hICOEFISTR.DIRECTORY2 +DCOEFDSTR.DIRECTORY2 +RCOEFRSTR.DIRECTORY2 sDCOEFDSTR.DIRECTORY2 RCOEFRSTR.DIRECTORY  @- )WAVE ANGSTROM F16.4 ===ON )ION A16 ===NTE)INTENSITY I6 ===OMM)COMMENTS A16 ===REACREA/TABL green1000 1 100 NULL NULL TRAN CREA/COLU green1000 :lambda "angstroem" f10.4 CREA/COLU green1000 :x "pixel" f10.4 REGR/POLY green1000 :x :lambda 1 OUTPUT SAVE/REGR green1000 coef OUTPUT COMPUT/REGR green1000 :fit = coef R*4 COMP/TABL green1000 :diff = :x-:fit REGR/POLY green1000 :x :lambda 2 OUTPUT SAVE/REGR green1000 coef OUTPUT COMPUT/REGR green1000 :fit = coef R*4 COMP/TABL green1000 :diff = :x-:fit REGR/POLY green1000 :x :lambda 2 OUTPUT SAVE/REGR green1000 coef OUTPUT COMPUT/REGR green1000 :fit = coef R*4 COMP/TABL green1000 :diff = :x-:fit REGR/POLY green1000 :x :lambda 1 OUTPUT SAVE/REGR green1000 coef OUTPUT COMPUT/REGR green1000 :fit = coef R*4 COMP/TABL green1000 :diff = :x-:fit REGR/POLY green1000 :x :lambda 1 OUTPUT SAVE/REGR green1000 coef OUTPUT COMPUT/REGR green1000 :fit = coef R*4 COMP/TABL green1000 :diff = :x-:fit REGR/POLY green1000 :x :lambda 2 OUTPUT SAVE/REGR green1000 coef OUTPUT COMPUT/REGR green1000 :fit = coef R*4 COMP/TABL green1000 :diff = :x-:fit REGR/POLY green1000 :x :lambda 4 OUTPUT SAVE/REGR green1000 coef OUTPUT COMPUT/REGR green1000 :fit = coef R*4 COMP/TABL green1000 :diff = :x-:fit REGR/POLY green1000 :x :lambda 1 OUTPUT SAVE/REGR green1000 coef OUTPUT COMPUT/REGR green1000 :fit = coef R*4 COMP/TABL green1000 :diff = :x-:fit REGR/POLY green1000 :x :lambda 2 OUTPUT SAVE/REGR green1000 coef OUTPUT COMPUT/REGR green1000 :fit = coef R*4 COMP/TABL green1000 :diff = :x-:fit REGR/POLY green1000 :x :lambda 4 OUTPUT SAVE/REGR green1000 coef OUTPUT COMPUT/REGR green1000 :fit = coef R*4 COMP/TABL green1000 :diff = :x-:fit REGR/POLY green1000 :x :lambda 4 OUTPUT SAVE/REGR green1000 coef OUTPUT COMPUT/REGR green1000 :fit = coef R*4 COMP/TABL green1000 :diff = :x-:fit NAME/COLU green1000 :lambda :WAVE CREA/COLU gr1000 :ION C*4 A3 MERG/TABL lines_g250 lines_b1000 lines_r1000 lines_g1000 mosca SORT/TABL mosca :wave SORT/TABL mosca :wav+E84Esɔ*t)GcE2E7=