PAGE 1 of 2

                                        ID#:            C00410FM38000
UNIT=                                   TDMC#           CCC-410
VOL=SER=                                CODE PKG NAME:  THIDA2
                                        COMPUTER:       FACOM-M380
                                        PACKAGED:       09/04/81
                                        MOST RECENT UPDATE: 05/05/87

**************************************************************************
                                                   LOGICAL     DCB
DESCRIPTION                                MODE    RECORDS  PARAMETERS

**************************************************************************

1.  LIB. CONVERT SOURCE  (FORTRAN 77)      EBCDIC     15  FB  6400    80
2.  JCL (GICX40)                              |       17   |   |       |
3.  DATA                                      |   181440   |   |       |
4.  LIB.CONVERT SOURCE (GROUPIN) (FORTRAN 77) |       15   |   |       |
5.  JCL (GROUPIN)                             |       17   |   |       |
6.  DATA                                          129600   |   |       |

        *** ONE-DIMENSIONAL CALCULATIONS***

7.  ANISN SOURCE            (FORTRAN 77)      |     4140   |   |       |
8.  SAMPLE INPUT                              |       35   |   |       |
9.  JCL                                       |       53   |   |       |
10. SAMPLE OUTPUT                             |      812   | 19043   137
11. LIB OUTPUT (@TXS42)                       |        5   U 19068
    (42-G MICRO X-SEC)
12. LIB OUTPUT (@TANIFLN)                     |        1   U 19068
    (NEUTRON FLUX)
13. ACT4 SOURCE             (FORTRAN 77)      |     5114   FB 6400     80
14. SAMPLE INPUT                              |       19   |   |       |
15. LIB DATA (CHAIN-LIB)                      |     2380   |   |       |
16. LIB DATA (CROSS-LIB)                      |     2437   |   |       |
17. LIB DATA (GAMMA-LIB)                      |     1511   |   |       |
18. JCL                                       |       34   |   |       |
19. SAMPLE OUTPUT                             |        9   |  5480     137
20. LIB OUTPUT (@GS1)                         |      118   |  6400     80
    (GAMMA-RAY SOURCE)
21. ANISN SOURCE            (FORTRAN 77)      |     4144   |   |       |
22. SAMPLE INPUT                              |       35   |   |       |
23. JCL                                       |       42   |   |       |
24. SAMPLE OUTPUT                             |      992   |  5480     137
25. LIB OUTPUT (@TXS54)                       |        8   U 19068
    (54-G MICRO X-SEC)
26. LIB OUTPUT (@GF1)        (FORTRAN 77)    HEX       1   |  3212
27. APPLE SOURCE                           EBCDIC   5608   FB 6400     80
28. SAMPLE INPUT                              |       29   |   |       |
29. LIB DATA (GFLXDOSE)                       |       13   |   |       |
30. JCL                                       |       35   |   |       |
31. SAMPLE OUTPUT                             |      180   |  5480     137

         ***TWO-DIMENSIONAL CALCULATIONS***

32. MIXTURE-EDIT SOURCE      (FORTRAN 77)     |       50   |  6400     80
33. (GICX40) SAMPLE INPUT                     |        1   |   |       |
34. JCL                                       |       16   |   |       |
35. SAMPLE OUTPUT                             |        6   |  5480     137
36. LIB OUTPUT                               HEX     210   U  6212
37. DOT-3.5 SOURCE           (FORTRAN 77)  EBCDIC   7517   FB 6400     80



                     PAGE 2 OF 2                              CCC410/THIDA2


38. SAMPLE INPUT                              |       75   |   |       |
39. JCL                                       |       62   |   |       |
40. SAMPLE OUTPUT                             |     2173   |  5480     137
41. LIB OUT (@TDOTFLN)                       HEX      22   U 19068
    (NEUTRON FLUX)                            |
42. ACT4 SAMPLE INPUT                      EBCDIC     19   FB 6400     80
43. JCL                                       |       32   |   |       |
44. SAMPLE OUTPUT                             |        9   |  5480     137
45. LIB OUTPUT (@SOUR)                       HEX       2   U 19068
    (GAMMA-RAY SOURCE)      (FORTRAN 77)      |
46. MIXTURE-EDIT SOURCE                    EBCDIC     50   FB 6400     80
47. (GROUPIN) SAMPLE INPUT                    |        1   |   |       |
48. JCL                                       |       16   |   |       |
49. SAMPLE OUTPUT                             |        6   |  5480     137
50. LIB OUTPUT                               HEX     111   U 19068
    (@GICX2)                                  |
51. DOT-3.5 SOURCE          (FORTRAN 77)   EBCDIC   7390   FB 6400     80
52. SAMPLE INPUT                              |       51   |   |       |
53. JCL                                       |       58   |   |       |
54. SAMPLE OUTPUT                             |     2741   |  5480     137
55. LIB OUT (@TDOTFLG)                       HEX      28   U 19068
    (GAMMA-RAY FLUX)                          |
56. APPLE SAMPLE INPUT                     EBCDIC     34   FB 6400     80
57. JCL                                       |       33   |   |       |
58. SAMPLE OUTPUT                           EBCDIC   224   FB 5480     137

        ***THREE-DIMENSIONAL CALCULATIONS***

59. MORSE-I SOURCE           (FORTRAN 77)   EBCDIC  9972   |  6400     80
60. SAMPLE INPUT                              |       97   |   |       |
61. JCL                                       |       23   |   |       |
62. SAMPLE OUTPUT                             |     1232   |  5480     137
63. LIB OUT (@TMORFLN)                       HEX       1   U  3332
    (NEUTRON FLUX)                            |
64. ACT4 SAMPLE INPUT                       EBCDIC    20   FB 6400     80
65. JCL                                       |       37   |   |       |
66. SAMPLE OUTPUT            (FORTRAN 77)     |        9   |  5480     137
67. LIB OUTPUT (@TMORFLG)                    HEX       1   U  1952
(GAMMA-RAY SOURCE)                            |
68. MORSE-I SOURCE           (FORTRAN 77)   EBCDIC 10116   FB 6400     80
69. SAMPLE INPUT                              |       89   |   |       |
70. JCL                                       |       24   |   |       |
71. SAMPLE OUTPUT                             |     2049   |  5480     137
72. TOPIC SOURCE             (FORTRAN 77)     |     2592   |  6400     80
73. SAMPLE INPUT                              |       97   |   |       |
74. JCL                                       |       17   |   |       |
75. SAMPLE OUTPUT                             |      170   |  5480     137
                                                   -------
                                       TOTAL      386342


Enclosed is the output edit which lists the first 30 records of each file
and the total number of records for each file.
 
This package was put together by the contributor and was not retested by RSIC.