ID#: C00178I036000 RSIC# CCC-178A TRANSMITTED ON 1 DS/HD DISKETTE CODE PKG NAME: HETC COMPUTER: IBM 360 PACKAGED: 5/1/72 PAGE 1 OF 3 MOST RECENT UPDATE: 8/13/80 DOWNLOADED TO DISKETTE: 04/93 ************************************************************************ DESCRIPTION MODE File size bytes ************************************************************************ 1. README.RSI - RSIC information ASCII 624 2. HETC.EXE - compressed file BINARY 1,051,964 which contains the following files when de-compressed. To decompress, place diskette in drive and type HETC. ************************************************************************ LOGICAL DCB DESCRIPTION MODE RECORDS PARAMETERS ************************************************************************ F01 CROSS SECTIONS (CORRESPONDS TO O5R ASCII 27059 FB 3200 80 MASTER CROSS SECTION TAPE) F02 INTRANUCLEAR-CASCADE AND EVAP DATA | 8375 | | | F03 COPY PROGRAM FORTRAN IV SOURCE(1) | 89 | | | F04 COPY PROGRAM DD CARDS AND INPUT DATA | 7 | | | F05 PUNCROSS FORTRAN IV SOURCE | 145 | | | F06 PUNCROSS DD CARDS AN DINPUT DATA | 11 | | | FOR SAMPLE PROBLEM F07 HET FORTRAN IV SOURCE (OPT=2) | 13513 | | | F08 HET FORTRAN IV SOURCE (OPT=2) | 237 | | | F09 SUBROUTINES SORS FOR HET SAMPLE PROB. | 25 | | | F10 LOC-FLRAN-ICOMPL-IOR-LAND (FOR HET) | 104 | | | ASSEMBLER LANGUAGE F11 ORNL TAPE BUFFERING PACKAGE | 896 | | | ASSEMBLER LANGUAGE F12 HET DD CARDS AND INPUT DATA FOR THE | 81 | | | SAMPLE PROBLEM F13 NMTA DD CARDS AND INPUT DATA FOR THE | 62 | | | HET SAMPLE PROBLEM ANALYSIS F14 EHET (EDIT CODE) FORTRAN IV SOURCE | 504 | | | F15 EHET DD CARDS AND INPUT DATA FOR | 4 | | | SAMPLE PROBLEM F16 XSECT FORTRAN IV SOURCE(2) | 1921 | | | F17 XSECT DD CARDS AND INPUT DATA FOR | 21 | | | SAMPLE PROBLEM F18 O5R FORTRAN IV SOURCE (OPT=2) | 2818 | | | F19 O5R FORTRAN IV SOURCE (OPT=2) | 492 | | | F20 LOC-FLRN (FOR O5R) ASSEMBLER LANGUAGE | 504 | | | F21 O5R DD CARDS AND IPUT DATA FOR | 50 | | | SAMPLE PROBLEM F22 O5RA FORTRAN IV SOURCE(3) | 274 | | | F23 O5RA DD CARDS AND INPUT DATA FOR | 12 | | | SAMPLE PROBLEM F24 PUNCROSS OUTPUT | 386 | 2660 133 F25 HET OUTPUT | 135 | | | ***************************************************************************** PAGE 2 0F 3 CCC-178/HETC ***************************************************************************** ASCII FB 3200 80 F26 NMTA OUTPUT | 3395 | | | F27 EHET OUTPUT | 726 | | | F28 XSECT OUTPUT | 114 | | | F29 O5R OUTPUT | 151 | | | F30 O5RA OUTPUT | 422 | | | ****** SUBTOTAL 62533 FILES 31-64 ARE CALOR F31 DMC (MODIFIED ROUTINES) ASCII 482 FB 3200 80 FROM HET: DKLOS, MFPD2, CASCAD F32 SORS, SOURCE PROGRAM FOR HETC | 27 | | | F33 CYLINDRICAL GEOMETRY FOR HETC | 464 | | | AND ELPHO F34 JCL FOR HET(4) | 15 | | | F35 DD CARDS FOR HET(4) | 9 | | | F36 HET SAMPLE DATA | 336 | | | F37 CURVES | 516 | | | F38 JCL FOR CURVES | 3 | | | F39 DD CARDS FOR CURVES | 9 | | | F40 CURVES SAMPLE DATA | 39 | | | F41 SPECT | 1216 | | | F42 JCL FOR SPECT | 4 | | | F43 DD CARDS FOR SPECT(5) | 10 | | | F44 SPECT SAMPLE DATA | 2 | | | F45 BREM | 160 | | | F46 JCL FOR BREM | 5 | | | F47 DD CARDS FOR BREM | 4 | | | F48 BREM SAMPLE DATA | 10 | | | F49 ELPHO (HIGH ENERGY ELECTRON | 2160 | | | TRANSPORT CODE) F50 JCL FOR ELPHO | 7 | | | F51 DD CARDS FOR ELPHO | 12 | | | F52 ELPHO SAMPLE DATA | 311 | | | F53 GENERAL GEOM | 1045 | | | F54 FINAL ANALYSIS | 56 | | | F55 JCL FOR FINAL ANALYSIS | 4 | | | F56 DD CARDS FOR FINAL ANALYSIS | 10 | | | F57 HET OUTPUT | 404 | 2660 133 F58 CURVES OUTPUT | 11103 | | | F59 SPECT OUTPUT | 92 | | | F60 BREM OUTPUT | 59 | | | F61 ELPHO OUTPUT | 3005 | | | F62 FINAL ANALYSIS OUTPUT | 107 | | | F63 RANDOM NUMBER GENERATOR | 32 | 3200 80 F64 GEOM ROUTINES | 511 | | | ******* SUBTOTAL 22229 GRAND TOTAL 84762 ***************************************************************************** PAGE 3 OF 3 CCC-178/HETC ***************************************************************************** 1 CAN BE USED TO CREATE A BINARY NBERTP TAPE FOR HET FROM THE DATA CONTAINED IN FILE 2. 2 MODIFIED TO READ BCD CROSS SECTIONS. 3 THIS FILE CONTAINS THE MAIN PROGRAM AND SOME OF THE SUBROUTINES NEEDED FOR THE O5R SAMPLE-PROBLEM ANALYSIS. THE OTHER SUBROUTINE NEEDED MAY BE OBTAINED FROM THE PROGRAM NMTA. 4 USER ASSUMED TO HAVE HET OPERATIONAL. 5 THREE SPECT RUNS NECESSARY: RUN (1) LINEAR, OMIT LOG 8, THE TABLE CREATED WITH CURVE RUN; RUN (2) NONLINEAR USE LOG 8, FILE 1; RUN (3) CERENKOV USE LOG 8, FILE 2. EXAMPLE GIVEN OF RUN (3). TO: NMTC AND HETC USERS. SUBJECT: ERROR ON O5R/NMTC MASTER CROSS SECTION TAPE. IN PREPARING THE SYSTEM DATA TAPE (CODE 6) FOR USING O5R WITH HETC OR NMTC, THE CROSS SECTIONS FOR OXYGEN WHICH SHOULD BE REQUESTED (CARDS D OF CODE 6 INPUT) FROM THE O5R/NMTC MASTER CROSS SECTION TAPE ARE 1, 2, 9, 71 (NOT 1, 2, 19, 71). THE 20 (AND CONSEQUENTLY 19) CROSS SECTIONS FOR OXYGEN ON THE O5R/NMTC MASTER CROSS SECTION TAPE DISTRIBUTED WITH THE HETC AND NMTC CODE PACKAGES ARE IN ERROR. T. W. Armstrong ****************************************************************************