THIS XRAY MESSAGE FILE WILL CONTAIN CERTAIN MESSAGES CONCERNING THE DATA00000010
      FROM THE APOLLO 15 AND 16 XRAY EXPERIMENT                         00000020
         EACH LUNAR DATA SET CONSISTS OF A CLEANED SET OF XRAY SPECTRA  00000030
      FOR AN 8 SECOND PERIOD AND THE ASSOCIATED GET, ORBIT NUMBER,      00000040
      ALTITUDE IN KILOMETERS, SELENOGRAPHIC LONGITUDE AND LATITUDE, AND 00000050
      THE SPACECRAFT LOOK ANGLES FOR ROLL, PITCH, AND YAW.  BOTH THE    00000060
      APOLLO 15 AND 16 LUNAR DATA TAPES HAVE THE SAME FORMAT AND TAPE   00000070
      PARAMETERS. THEY ARE NON LABLED 9 TRACK 1600 BPI TAPES WITH RECFM=00000080
      VBS, LRECL=900, DENSITY=3, AND BLKSIZE=27004.  EACH TAPE HAS TWO  00000090
      FILES.  FILE 1 CONTAINS THE NORMAL XRAY DATA (I.E. .75 TO 3.0 KEV)00000100
      AND ASSOCIATED CALIBRATION DATA.  FILE 2 CONTAINS THE ATTENUATION 00000110
      DATA (I.E. DETECTOR 1 FROM 1.5 TO 6.0 KEV ONLY) AND ITS           00000120
      CALIBRATION DATA.                                                 00000130
         TAPE MJB001 CONTAINS THE APOLLO 15 DATA.  FILE 1 CONTAINS 2684300000140
      DATA SETS BETWEEN GET 85 HR. 10 MIN. AND 220 HR. 49 MIN.  FILE 2  00000150
      CONTAINS 7086 DATA SETS BETWEEN 90 HR. 35 MIN. AND 215 HR. 7 MIN. 00000160
         TAPE MJB003 CONTAINS THE APOLLO 16 DATA. FILE 1 CONTAINS 24577 00000170
      DATA SETS FROM 80 HR. 4 MIN. TO 191 HR. 56 MIN.  FILE 2 CONTAINS  00000180
      6965 DATA SETS FROM 85 HR. 51 MIN. TO 193 HR. 31 MIN.             00000190
         THE FOLLOWING IS A SAMPLE INPUT RUN FOR THE XRAY PROGRAM WITH  00000200
      THE FIELDS EXPLAINED.  THE FIRST DATA CARD FORMAT IS              00000210
      (F6.0,3(1X,I1),4F6.0,4F5.0) AND THE SECOND DATA CARD FORMAT IS    00000220
      (2F8.0).                                                          00000230
      THE NEXT LINE IS A SAMPLE DATA CARD WITH THE DIFFERENT FIELDS     00000240
         LISTED UNDERNEATH.  SEE XRY FOR COORDINATE SPECIFICATIONS.     00000250
  24.0 1 7R6+180.0-180.0 +30.0 -30.0 201. 115. 147.  24.                00000260
   1   2 3 4  5     6      7     8    9    10   11   12                 00000270
 400000. 500000.                                                        00000280
    13     14                                                           00000290
      THE FIELDS ARE DEFINED AS FOLLOWS:                                00000300
      (1) IS THE ACCUMULATION TIME FOR SPECTRA IN SECONDS (I.E. N*8.0)  00000310
      (2) IS THE BEGINNING CHANNEL TO BE USED IN THE SUMMATIONS         00000320
      (3) IS THE LAST CHANNEL TO BE USED IN THE SUMMATIONS              00000330
      (4) DEFINES CORRECTIONS FOR ROLL, PITCH, AND YAW: =0 NO CORRECTION00000340
         =1 CORRECTION WILL BE PERFORMED, =8 RATIOS WILL BE OUTPUT TO   00000350
         UNIT 8 AND CORRECTIONS WILL BE MADE.                           00000360
       (5) IS THE EASTERN LONGITUDE LIMIT.                              00000370
       (6) IS THE WESTERN LONG. LIMIT                                   00000380
       (7) IS THE NORTHERN LATITUDE LIMIT.                              00000390
       (8) IS THE SOUTHERN LAT. LIMIT                                   00000400
       (9) IS THE TOTAL BACKGROUND DET. 1 FOR CHANNELS 1 TO 7.  THE     00000410
         BACKGROUNDS DIFFER FOR APOLLO 15 AND 16 AND WERE CALCULATED    00000420
         FROM THE DARKSIDE AVERAGES.  THE BACKGROUNDS LISTED ARE FOR    00000430
         THE APOLLO 15 MISSION.  THE BACKGROUNDS FOR THE APOLLO 16      00000440
         MISSION ARE RESPECTIVELY 820. 420. 335. 64.  THESE MUST        00000450
         REPLACE 9 THROUGH 12 WHEN RUNNING APOLLO 16 DATA.              00000460
           BACKGROUNDS FOR OTHER GROUPS OF CHANNELS MUST BE             00000470
           CALCULATED SEPARATELY.                                       00000480
      (10) IS THE TOTAL BACKGROUND DET. 2 FOR CHAN 1 TO 7               00000490
      (11) IS THE TOTAL BACKGROUND DET. 3 FOR CHAN 1 TO 7               00000500
      (12) IS THE TIME OF COUNTING USED FOR ITEMS 9 THROUGH 11          00000510
      (13) IS THE BEGINNING GET TIME IN SEC. FOR EACH PASS              00000520
      (14) IS THE END GET TIME IN SEC. FOR EACH PASS                    00000530
         NOTE: ITEMS 13 AND 14 OVERRIDE THE DELTA LONG/LAT              00000540
         THE PROGRAMS REQUIRED TO CONVERT THE RAW XRAY DATA FROM THE    00000550
         DATA TAPE INTO RATIOS ARE:                                     00000560
         (1) MAIN  THIS READS THE INPUT PARAMETERS AND CALLS ALL OF     00000570
                   THE SUBROUTINES REQUIRED TO RUN.                     00000580
         (2) XRY   THIS SUBROUTINE READS THE RAW DATA FROM THE INPUT    00000590
                   TAPE AND ACCUMULATES THE DATA INTO SPECTRA. IT CALLS 00000600
                   SUBROUTINE XINTGN.                                   00000610
         (3)XINTGN THIS SUBROUTINE INTERPOLATES THE G AND N DATA        00000620
                   WHICH WAS READ BY XRY AND CORRECTS IT TO THE         00000630
                   PROPER GET.  THIS PROGRAM CALLS SUBROUTINE SPLINE.   00000640
         (4)SPLINE THIS SUBROUTINE DEVELOPS A SMOOTH CURVE TO INTERPO-  00000650
                      LATE BETWEEN POINTS.                              00000660
         (5)NEWCOR  THIS SUBROUTINE CORRECTS THE LATITUDE AND           00000670
                   LONGITUDE FOR ROLL, PITCH, AND YAW.                  00000680
         (6)ELRATE THIS SUBROUTINE (CALLED FROM MAIN) PRODUCES THE      00000690
                   ELEMENTAL RATIOS BY SUBTRACTING THE BACKGROUNDS AND  00000700
                   CALLING SUBROUTINE FF.                               00000710
         (7) FF    THIS SUBROUTINE CONTAINS THE FILTER FACTORS, BUILDS  00000720
                   THE LEAST SQUARE MATRIX, AND CALLS THE IBM INVERSION 00000730
                   SUBROUTINE.                                          00000740
         (8)SUMRY  THIS SUBROUTINE CALLED FROM THE MAIN PROGRAM OUTPUTS 00000750
                   1)GET OF SPECTRA ACCUMULATION AS HOURS HR(1,I),      00000760
                   MINUTES HR(2,I), AND SECONDS HR(3,I), 2)RATIOS AND   00000770
                   THEIR ERRORS FOR EACH SPECTRUM RAT(J,I) AND ERR(J,I) 00000780
                   WHERE J=1(AL/SI),2(MG/SI),3(AL/MG),  3)LONGITUDE AND 00000790
                   LATITUDE ANS(I,3) AND ANS(I,4),  4)DATA LINE NUMBER  00000800
                   IN EACH RUN OF UP TO 500(OUT(I),  5)DATA QUALITY PARA00000810
                   METER(NQUAL), AND 6)NUMBER OF 8 SECOND ACCUMULATION  00000820
                   INTERVALS IN EACH SPECTRUM NC(I).                    00000830
