NEA-1155 TPTRIA.

1. NAME OR DESIGNATION OF PROGRAM:  TPTRIA.

3. DESCRIPTION OF PROGRAM OR FUNCTION

Reactivity, mean generation time and effective delayed neutron fraction can be calculated by exact or first order perturbation theory. Criticality factor corrected for the isotope dependence of the prompt fission spectrum  and the difference between the delayed neutron spectrum and the prompt fission spectra can also be calculated.

4. METHOD OF SOLUTION

Direct and adjoint angular fluxes for unperturbed and perturbed cases are taken from the discrete ordinate code, and the reactivity etc. are calculated by the perturbation theory.

5. RESTRICTIONS ON THE COMPLEXITY OF THE PROBLEM

Only two-dimensional regular triangular geometry is considered. There is no restriction for the number of energy groups. The size of a problem is restricted by the available maximum region of the computer memory. At present only down-scattering and a Sn approximation up to N=8 is allowed.

6. TYPICAL RUNNING TIME

Sample 1:  First order perturbation with S2, 4 energy groups
           3 probe samples for a mesh grid consisting of 30 x 15
           triangles: 0.11 sec on a SIEMENS 7890 computer
Sample 2:  Exact perturbation calculation with S2, 4 energy groups
for a mesh grid consisting of 30 x 15 triangles: 0.5 sec            on a SIEMENS 7890 computer

NEA-DB ran the test case included in this package on an IBM 3083 computer. The following CPU times were required: 9.48 seconds (DIAMANT2); 2.18 seconds (TPTRIA).

7. UNUSUAL FEATURES OF THE PROGRAM

Anistropic scattering is allowed;  however, this option is not yet tested.

8. RELATED AND AUXILIARY PROGRAMS

The present code reads the direct and adjoint angular flux and related data from the interface files created by the discrete ordinates transport code DIAMANT2. Group cross sections, fission spectra and delayed neutron data are read from an extended SIGMN-file.

10. REFERENCES:

- K. Kobayashi, G. Buckel and K. Kuefner:
  TPTRIA - A Computer Program for the Reactivity and Kinetic
  Parameters for Two-Dimensional Triangular Geometry by Transport
  Perturbation Theory.
  KfK 4116  (October 1986)

11. MACHINE REQUIREMENTS

TPTRIA requires 130 K bytes plus dynamically  allocated space for working arrays roughly in the range of 3 times the product consisting of the number of triangles times the number of Sn directions times the number of energy groups, and uses 3 disk  files.

Main storage requirements to run the test case on an IBM 3084 are: 1516K bytes (DIAMANT2); 576K bytes (TPTRIA).

13. OPERATING SYSTEM UNDER WHICH PROGRAM IS EXECUTED

IBM OS-MVS and compatible systems
NEA 1151/01: MVS/XA with compiler VS FORTRAN 2.1.1 and assembler ASM H V 02 10.19

14. OTHER PROGRAMMING OR OPERATING INFORMATION OR RESTRICTIONS

This
code was designed to run under control of the modular code system KAPROS with the codes DIAMANT2 and GRUCAL. However, a stand-alone code could easily be prepared, if the read and write statements are  rewritten and all necessary data are provided.

15. NAME AND ESTABLISHMENT OF AUTHORS

     K. Kobayashi*, G. Buckel and K. Kuefner
     Institut fuer Neutronenphysik und Reaktortechnik
     Kernforschungszentrum Karlsruhe, Postfach 36 40
     D-7500 Karlsruhe 1
     F.R. of Germany
     (*On leave from Kyoto University, Dept. of Nuclear
     Engineering, Yoshida, Kyoto, Japan)

File name	File description	Records
NEA1155_01.001	Information file	151
NEA1155_01.002	DIAMANT2 Fortran-77 source	7828
NEA1155_01.003	TPTRIA Fortran-77 source	2503
NEA1155_01.004	XTAREA Assembler source	63
NEA1155_01.005	Converter to produce a binary data file	9
NEA1155_01.006	Sample input of DIAMANT2	282
NEA1155_01.007	Character image data library	8335
NEA1155_01.008	Sample JCL used at NEA Data Bank	69
NEA1155_01.009	JCL macro definitions	38
NEA1155_01.010	Sample output	5969