NEA-0467 RADHEAT.

RADHEAT, Transport, Heat Generator, Radiation Damage Cross-Sections in Reactor and Shield

NAME OR DESIGNATION OF PROGRAM, COMPUTER, NATURE OF PHYSICAL PROBLEM SOLVED, METHOD OF SOLUTION, RESTRICTIONS ON THE COMPLEXITY OF THE PROBLEM, TYPICAL RUNNING TIME, UNUSUAL FEATURES OF THE PROGRAM, RELATED AND AUXILIARY PROGRAMS, STATUS, REFERENCES, MACHINE REQUIREMENTS, LANGUAGE, OPERATING SYSTEM OR MONITOR UNDER WHICH PROGRAM IS EXECUTED, ANY OTHER PROGRAMMING OR OPERATING INFORMATION OR RESTRICTIONS, NAME AND ESTABLISHMENT OF AUTHOR, MATERIAL, CATEGORIES

[ top ]

1. NAME OR DESIGNATION OF PROGRAM: RADHEAT.

[ top ]

2. COMPUTERS

To submit a request, click below on the link of the version you wish to order. Only liaison officers are authorised to submit online requests. Rules for requesters are available here.

Program name	Package id	Status	Status date
RADHEAT-V3	NEA-0467/01	Tested	01-DEC-1976
RADHEAT-V4	NEA-0467/02	Arrived	24-JAN-2002

Machines used:

Package ID	Orig. computer	Test computer
NEA-0467/01	IBM 370 series	IBM 370 series
NEA-0467/02	FACOM M-380

[ top ]

3. NATURE OF PHYSICAL PROBLEM SOLVED

Multi-group cross sections for neutron and photon are generated by using the evaluated nuclear data, ENDF/B, JENDL and DLC-15 for transport, heat generation, and radiation damage calculations in nuclear reactors and shields. The secondary gamma-ray production cross section by the induced reaction and the Bremsstrahlung effect is also generated. The radiation transport problems for shielding designs and safety analyses of fusion and fission reactors are solved.

[ top ]

4. METHOD OF SOLUTION

A point-wise processing technique and the Bondarenko-type resonance self-shielding factors are adopted to generate multi-group cross sections. One- and two-dimensional Sn transport methods and three-dimensional Monte Carlo method are used for shielding calculation.

[ top ]

5. RESTRICTIONS ON THE COMPLEXITY OF THE PROBLEM

The maximum number of neutron and photon fine-groups is 200 and 50, respectively. The maximum number of angular meshes in the macroscopic cross section is 64. The energy ranges from 2.61E-5 eV to 16.74 MeV for neutrons and from 1 KeV to 20 MeV for photons are available.

[ top ]

6. TYPICAL RUNNING TIME

(a) FAIR-CROSS: At step 1, an iron run with 100 neutron groups takes about 3 minutes. At step 2, a preparation of the macroscopic cross section of water takes about 2 minutes. At step 3, the generation of P5 cross sections takes about 5 secs. for one material.
(b) TWOWAY: A uranium run with 20 photon groups takes about 1 minute.
(c) FDEM: The production of few-group cross sections of one material takes about 10 seconds.
(d) BREM: The production of Bremsstrahlung data of one material takes about 20 seconds.
(e) DIAC: A problem of coupled neutron and photon (100n+20g) groups with 32 angular meshes and 50 spatial intervals takes 30 seconds for one material.
(f) ESPRIT: A problem of coupled neutron and photon (12n+5g) groups with 48 angular meshes and 50x50 spatial intervals takes 2 minutes for one material.
(g) MCACE: The time estimation strongly depends on the particular problem.
(h) VISUAL: The production of a graph takes less than 1 second. (i) POOL: The operation with a command takes about less than 1 second.

[ top ]

7. UNUSUAL FEATURES OF THE PROGRAM

The angular distribution of the group cross section is expressed by the form of Direct Angular Representation instead of finite Legendre expansion.

[ top ]

8. RELATED AND AUXILIARY PROGRAMS

RADHAT-V4 can produce also the cross sections compatible with the ANISN, DOT, MORSE codes by using the FAIR-CROSS step 3.

[ top ]

9. STATUS

Package ID	Status date	Status
NEA-0467/01	01-DEC-1976	Tested at NEADB
NEA-0467/02	24-JAN-2002	Masterfiled Arrived

[ top ]

10. REFERENCES

- JSD1000: Multi-Group Cross Section Sets for Shielding Materials
JAERI-M84-038 (1984).

NEA-0467/02, included references:

- N. Yamano et al:
  RADHEAT-V4 - A Code System to Generate Multigroup Constants and
  Analyze Radiation Transport for Shielding Safety Evaluation
  JAERI 1316 (March 1989).

[ top ]

11. MACHINE REQUIREMENTS

Requires about 1 Mbytes of core storage in addition to the usual complement of tape and the large-size direct access devices.

[ top ]

12. PROGRAMMING LANGUAGE(S) USED

Package ID	Computer language
NEA-0467/01	FORTRAN-IV
NEA-0467/02	FORTRAN+ASSEMBLER

[ top ]

13. OPERATING SYSTEM OR MONITOR UNDER WHICH PROGRAM IS EXECUTED: FACOM MST.

[ top ]

14. ANY OTHER PROGRAMMING OR OPERATING INFORMATION OR RESTRICTIONS

The program is approximately 76000 source cards. Overlay structure is employed.

[ top ]

15. NAME AND ESTABLISHMENT OF AUTHOR

          N. Yamano et al.
          J.A.E.R.I.
          Tokai Research Establishment
          Tokai-Mura, Ibaraki-Ken, 319-11, Japan

[ top ]

16. MATERIAL AVAILABLE

NEA-0467/02

test-case data   mag tapeInformation File                           DATTP
source program   mag tapeFCSTEP1.FORT77 Source Program              SRCTP
source program   mag tapeFCSTEP2.FORT77 Source Program              SRCTP
source program   mag tapeTWOWAY.FORT77 Source Program               SRCTP
source program   mag tapeDIAC.FORT77 Source Program                 SRCTP
source program   mag tapeFDEM.FORT77 Source Program                 SRCTP
source program   mag tapeESPRIT.FORT77 Source Program               SRCTP
source program   mag tapeMCACE.FORT77 Source Program                SRCTP
source program   mag tapeBREM.FORT77 Source Program                 SRCTP
source program   mag tapeVISUALN.FORT77 Source Program              SRCTP
source program   mag tapeVISYALT.FORT77 Source Program              SRCTP
source program   mag tapeDPOOL2.ASM Source Program                  SRCTP
source program   mag tapeDPOOL2.FORT77 Source Program               SRCTP
source program   mag tapePOOLC2.FORT77 Source Program               SRCTP
source program   mag tapePOOL2.FORT77 Source Program                SRCTP
test-case data   mag tapeRAD1.CNTL JCL                              DATTP
test-case data   mag tapeRAD2.CNTL JCL                              DATTP
test-case data   mag tapeRAD3.CNTL JCL                              DATTP
test-case data   mag tapeRAD4.CNTL JCL                              DATTP
test-case data   mag tapeRAD5.CNTL JCL                              DATTP
test-case data   mag tapeRAD6.CNTL JCL                              DATTP
test-case data   mag tapeRAD7A.CNTL JCL                             DATTP
test-case data   mag tapeRAD7B.CNTL JCL                             DATTP
test-case data   mag tapeRAD7C.CNTL JCL                             DATTP
test-case data   mag tapeRAD8.CNTL JCL                              DATTP
test-case data   mag tapeRAD9A.CNTL JCL                             DATTP
test-case data   mag tapeRAD9B.CNTL JCL                             DATTP
test-case data   mag tapeRAD9C.CNTL JCL                             DATTP
test-case data   mag tapeRAD9D.CNTL JCL                             DATTP
test-case output mag tapeRAD1.OUTLIST Test-Case Output              OUTTP
test-case output mag tapeRAD2.OUTLIST Test-Case Output              OUTTP
test-case output mag tapeRAD3.OUTLIST Test-Case Output              OUTTP
test-case output mag tapeRAD4.OUTLIST Test-Case Output              OUTTP
test-case output mag tapeRAD5.OUTLIST Test-Case Output              OUTTP
test-case output mag tapeRAD6.OUTLIST Test-Case Output              OUTTP
test-case output mag tapeRAD7.OUTLIST Test-Case Output              OUTTP
test-case output mag tapeRAD8.OUTLIST Test-Case Output              OUTTP
test-case output mag tapeRAD9.OUTLIST Test-Case Output              OUTTP
test-case output mag tapeTSSMAC.CLIST                               OUTTP
test-case data   mag tapeRADPOOL1.CNTL Test-Case Input              DATTP
test-case data   mag tapeRADPOOL2.CNTL Test-Case Input              DATTP
test-case data   mag tapeRADPOOL3.CNTL Test-Case Input              DATTP
test-case data   mag tapeLMPOOL.CNTL Test-Case Input                DATTP
report                   JAERI 1316 (March 1989)                    REPPT

NEA-0467/01

File name	File description	Records
NEA0467_01.001	INFORMATION	32
NEA0467_01.002	LIBRARY DATA FOR SAMPLE PROBLEM (ENDF/B-4)	10167
NEA0467_01.003	LIBRARY DATA FOR SAMPLE PROBLEM (JAERI-FAST	5658
NEA0467_01.004	LIBRARY DATA FOR SAMPLE PROBLEM (POPOP-4)	95
NEA0467_01.005	'MACS' SOURCE PROGRAM EBCDIC	20464
NEA0467_01.006	'MACS' OVERLAY CARDS	51
NEA0467_01.007	'MACS' DD CARDS + SAMPLE INPUT DATA (STEP 1)	57
NEA0467_01.008	'TAPEMAKER' SOURCE PROGRAM EBCDIC	786
NEA0467_01.009	'TAPEMAKER' DD CARDS + SAMPLE INPUT DATA	18
NEA0467_01.010	'MACS' DD CARDS + SAMPLE INPUT DATA (STEP 2)	46
NEA0467_01.011	'ANISN-JR' SOURCE PROGRAM EBCDIC	4719
NEA0467_01.012	'ANISN-JR' OVERLAY CARDS	12
NEA0467_01.013	'ANISN-JR' DD CARDS + SAMPLE INPUT DATA	45
NEA0467_01.014	'CONVERT' SOURCE PROGRAM EBCDIC	23
NEA0467_01.015	'CONVERT' DD CARDS	5
NEA0467_01.016	'MACS' (STEP 1) SAMPLE PRINTED OUTPUT	1730
NEA0467_01.017	'TAPEMAKER' SAMPLE PRINTED OUTPUT	29
NEA0467_01.018	'MACS' (STEP 2) SAMPLE PRINTED OUTPUT	1760
NEA0467_01.019	'ANISN-JR' SAMPLE PRINTED OUTPUT	1885

[ top ]

17. CATEGORIES

J. Gamma Heating and Shield Design

Keywords: cross sections, discrete ordinate method, few-group, gamma radiation, heat transfer, multigroup, one-dimensional, radiation heat, self-shielding, transport theory.