NESC0277 HAMMER.

HAMMER, 1-D MultiGroup Neutron Transport Infinite System Cell Calculation for Few-Group Diffusion Calculation

NAME OR DESIGNATION OF PROGRAM, COMPUTER, DESCRIPTION OF PROBLEM OR FUNCTION, 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 UNDER WHICH PROGRAM IS EXECUTED, OTHER PROGRAMMING OR OPERATING INFORMATION OR RESTRICTIONS, NAME AND ESTABLISHMENT OF AUTHOR, MATERIAL, CATEGORIES

[ top ]

1. NAME OR DESIGNATION OF PROGRAM: HAMMER

[ top ]

2. COMPUTERS

To submit a request, click below on the link of the version you wish to order. Rules for end-users are available here.

Program name	Package id	Status	Status date
HAMMER	NESC0277/01	Tested	01-MAY-1977

Machines used:

Package ID	Orig. computer	Test computer
NESC0277/01	IBM 370 series	IBM 370 series

[ top ]

3. DESCRIPTION OF PROBLEM OR FUNCTION

HAMMER   performs    infinite
lattice,  one-dimensional cell  multigroup calculations,  followed
(optionally)  by one-dimensional,  few-group, multiregion  reactor
calculations with neutron balance edits.

[ top ]

4. METHOD OF SOLUTION

Infinite lattice parameters are calculated by
means of multigroup transport theory, composite reactor parameters
by few-group diffusion theory.

[ top ]

5. RESTRICTIONS ON THE COMPLEXITY OF THE PROBLEM

   Cell calculations - maxima of
         30 thermal groups
         54 epithermal groups
         20 space points
         20 regions
         18 isotopes
         10 mixtures
          3 thermal upscattering mixtures
        200 resonances per group
        no overlap or interference
        single level only
   Reactor calculations - maxima of
         40 regions
         40 mixtures
        250 space points
          4 groups

[ top ]

6. TYPICAL RUNNING TIME

LITHE requires 1 minute, HELP 9 minutes,
and HAMMER 2 minutes on the IBM360/65.

[ top ]

7. UNUSUAL FEATURES OF THE PROGRAM

HAMMER  combines  THERMOS  (NESC
Abstract  184),  MUFT, ZUT,  TUZ,  FOG  (NESC Abstract  28),  plus
thermal Fourier  transform, epithermal  integral transport  space-
dependent group  fluxes, and neutron  balance edits from  a single
set of input data as well as a library of cell results, compatible
reactor/exponential   assembly  criticality   searches  from   the
library.

[ top ]

8. RELATED AND AUXILIARY PROGRAMS

LITHE prepares a  thermal library
for  the  HAMMER  version  of   THERMOS  and  includes  epithermal
scattering sources.  HELP  prepares an epithermal library  for the
HAMMER  versions  of  MUFT, ZUT,  TUZ,  and  cell  space-dependent
calculations.  It  accepts slightly  modified MUFT  libraries plus
resonance parameters, either probability matrix or inelastic cross
sections.

[ top ]

9. STATUS

Package ID	Status date	Status
NESC0277/01	01-MAY-1977	Tested at NEADB

[ top ]

10. REFERENCES

J. E. Suich and H. C. Honeck, The HAMMER System,
DP-1064, January 1967.
C. E. Bailey, HAMMER/LITHE/HELP Notes, DP Note, March
8, 1971.

[ top ]

11. MACHINE REQUIREMENTS: 512K bytes and 10 sequential data sets

[ top ]

12. PROGRAMMING LANGUAGE(S) USED

Package ID	Computer language
NESC0277/01	FORTRAN-IV

[ top ]

13. OPERATING SYSTEM UNDER WHICH PROGRAM IS EXECUTED: OS/360.

[ top ]

14. OTHER PROGRAMMING OR OPERATING INFORMATION OR RESTRICTIONS:

[ top ]

15. NAME AND ESTABLISHMENT OF AUTHOR

                 H. C. Honeck
                 Savannah River Laboratory
                 E. I. duPont de Nemours and Co., Inc.
                 Aiken, South Carolina  29801

[ top ]

16. MATERIAL AVAILABLE

NESC0277/01

File name	File description	Records
NESC0277_01.001	INFORMATION	2
NESC0277_01.002	LITHE SOURCE - FORTRAN IV EBCDIC	440
NESC0277_01.003	LITHE SAMPLE PROBLEM DATA	3911
NESC0277_01.004	LITHE SAMPLE PROBLEM OUTPUT	3479
NESC0277_01.005	LITHE JOB CONTROL	2
NESC0277_01.006	HELP SOURCE - FORTRAN IV EBCDIC	628
NESC0277_01.007	HELP SUBROUTINE 'EFTM'	226
NESC0277_01.008	HELP SAMPLE PROBLEM INPUT	6182
NESC0277_01.009	HELP SAMPLE PROBLEM OUTPUT	8684
NESC0277_01.010	HELP JOB CONTROL	3
NESC0277_01.011	HAMMER SUBROUTINE EFTM - ASSEMBLER	226
NESC0277_01.012	HAMMER SUBROUTINE ERRX - ASSEMBLER	99
NESC0277_01.013	HAMMER SUBROUTINE OPEN - ASSEMBLER	308
NESC0277_01.014	HAMMER SUBROUTINE SETBTF - ASSEMBLER	8
NESC0277_01.015	HAMMER SUBROUTINE TIME - ASSEMBLER	346
NESC0277_01.016	HAMMER SUBROUTINE XLOC - ASSEMBLER	7
NESC0277_01.017	HAMMER SOURCE - F4 OPT=0 FOR F COMPILER	253
NESC0277_01.018	HAMMER SOURCE - F4 OPT=2 FOR F COMPILER	11920
NESC0277_01.019	DUMMY ROUTINES THOR AND HERESY	8
NESC0277_01.020	HAMMER SAMPLE PROBLEM DATA	9
NESC0277_01.021	HAMMER SAMPLE PROBLEM OUTPUT	1228
NESC0277_01.022	HAMMER OVERLAY CARDS	109
NESC0277_01.023	HAMMER JOB CONTROL	7