last modified: 27-NOV-2001 | catalog | categories | new | search |

NESC0830 HAUSER5.

HAUSER-5, Capture and Fission Cross-Sections Using Hauser-Feshbach with Woods-Saxon Potential

top ]
1. NAME OR DESIGNATION OF PROGRAM:  HAUSER5.
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
HAUSER-5 NESC0830/03 Tested 01-SEP-1980
HAUSER-5 NESC0830/04 Tested 04-MAY-1981
HAUSER-5 NESC0830/05 Arrived 27-NOV-2001
HAUSER-5 NESC0830/06 Tested 19-FEB-1988
HAUSER-5 NESC0830/07 Arrived 27-NOV-2001

Machines used:

Package ID Orig. computer Test computer
NESC0830/03 IBM 370/168 IBM 370/168
NESC0830/04 UNIVAC 1110 UNIVAC 1110
NESC0830/05 CDC 7600
NESC0830/06 IBM 370 series DEC VAX 11/780
NESC0830/07 UNIVAC 1100
top ]
3. DESCRIPTION OF PROBLEM OR FUNCTION

HAUSER5 calculates angle- integrated and, if desired, angle-differential reaction cross sections which can include capture and fission channels. Cross sections for discrete particle channels can be calculated, as well as the total for each reaction pair. Tertiary reactions can be calculated as though the reaction occurs as two sequential binary reactions. There is no restriction on the spins of the particles.
top ]
4. METHOD OF SOLUTION

HAUSER5 is based on three models of nuclear reactions - the statistical (or Hauser-Feshbach) model, the preequilibrium model (exciton formulation), and a statistical model  for direct reactions. Transmission coefficients are interpolated from a table of previously-calculated transmission coefficients which can be supplied as input data or calculated by solving the Schroedinger equation with a spherical potential. The real spherical potential is taken to be the Woods-Saxon shape and the derivative can be Woods-Saxon or Gaussian shape. The fission transmission coefficients are based on the Hill-Wheeler equation.
top ]
5. RESTRICTIONS ON THE COMPLEXITY OF THE PROBLEM

HAUSER5 can accurately predict nuclear cross sections over most energy ranges less than about 60 MeV. Presently, the only statistical direct reaction included is the (n,ALPHA) pickup reaction. The Coulomb function may need to be replaced if heavy ions far below the Coulomb barrier are used. A maximum of six reaction pairs can be calculated. Residual nucleii can be described by 100 discrete levels and by the  constant temperature level formula and/or the Fermi-gas level description. The maximum number of orbital angular momentum and energies for transmission functions and compound nuclear fractions is 32. The angular distribution expressed at equally-spaced angles from 0 to 90 degrees can be calculated for up to 20 discrete states. The program does not follow gamma ray cascades down a nucleus.
top ]
6. TYPICAL RUNNING TIME

About 30 seconds for calculating cross sections from 14.8 MeV neutrons on CU(63). The sample problem was executed by NESC in less than 94 CP seconds on a UNIVAC1100/44, 23 CPU seconds on a IBM4331, and 2 CP seconds on a CDC CYBER170/875.
NESC0830/06
NEA-DB ran the test case included in this package on a  VAX-11/780 computer in 17 CPU seconds (HAUSER-5); 9 CPU seconds (TISO).
top ]
7. UNUSUAL FEATURES OF THE PROGRAM

HAUSER5 provides a single fast code covering unresolved resonance regions to beyond 50 MeV.
top ]
8. RELATED AND AUXILIARY PROGRAMS

An auxiliary program, TISO, is included in the package. TISO calculates gamma ray transmission coefficients to separate states in the final nucleus, allowing isomeric production to be calculated. HAUSER5 relies very heavily on the earlier STATIS code for the statistical model calculation and the PRECO-B code for the pre-equilibrium section. HAUSER5 was preceded by HAUSER1-HAUSER4 programs and has been tested against the related HELENE, TNG, and GNASH (NESC Abstract 757) codes.
top ]
9. STATUS
Package ID Status date Status
NESC0830/03 01-SEP-1980 Tested at NEADB
NESC0830/04 04-MAY-1981 Tested at NEADB
NESC0830/05 27-NOV-2001 Masterfiled Arrived
NESC0830/06 19-FEB-1988 Tested at NEADB
NESC0830/07 27-NOV-2001 Masterfiled Arrived
top ]
10. REFERENCES

- Frederick M. Mann,
  HAUSER-4, A Computer Code to Calculate Nuclear Cross Sections,
  HEDL-TME 76-80, September 1976.
- R.G. Stokstad,
  STATIS - Yale Internal Report #72, Wright Nuclear Structure
  Laboratory, 1972.
- C. Kalbach,
  PRECO-B, program for Calculating Pre-Equilibrium Energy Spectra,
  Triangle Universities Nuclear Laboratory and North California
  State Chemistry Department informal report, 1977.
- D.L. Hill and J.A. Wheeler,
  Nuclear Constitution and the Interpretation of Fission Phenomena,
  Physical Review, Vol. 89, No.5, pp. 1102-1145, March 1, 1953.
- M. Blann,
  Pre-Equilibrium Decay,
  Annual Review of Nuclear Science, Vol. 25, pp. 123-166, 1975.
- P.H. Cowell and A.C.D. Crommelin,
  Appendix to Greenwich Observations for 1909, in J. Fox and E.T.
  Goodwin, Proceedings of the Cambridge Philosophical Society, Vol.
  45, No. 1, 373-383, January 1949.
NESC0830/03, included references:
- F. M. Mann:
  HAUSER*5 A Computer Code to Calculate Nuclear Cross Sections
  HEDL-TM 78-83 (July 1979).
- A. Prince, G. Reffo, E. Sartori:
  "Report on the International Nuclear Model Code Intercomparison,
  Spherical Optical and Statistical Model Study",
  NEANDC-152"A"/INDC(NEA)4 (October 1983).
- H. Gruppelaar and P. Nagel:
  "International Nuclear Model and Code Comparison on
  Pre-Equilibrium Effects"
  NEANDC-204"U"/INDC(NEA)6 (September 1985).
- B. Goel:
  Letter (August 31, 1979).
- NEA Data Bank:
  Note to HAUSER-5 Users
  (May, 16, 1983).
NESC0830/04, included references:
- F. M. Mann:
  HAUSER*5 A Computer Code to Calculate Nuclear Cross Sections
  HEDL-TM 78-83 (Juy 1979).
- A. Prince, G. Reffo, E. Sartori:
  "Report on the International Nuclear Model Code Intercomparison,
  Spherical Optical and Statistical Model Study",
  NEANDC-152"A"/INDC(NEA)4 (October 1983).
- H. Gruppelaar and P. Nagel:
  "International Nuclear Model and Code Comparison on
  Pre-Equilibrium Effects"
  NEANDC-204"U"/INDC(NEA)6 (September 1985).
- NEA Data Bank:
  Note to HAUSER-5 Users
  (May, 16, 1983).
NESC0830/05, included references:
- L. Eyberger:
  HAUSER-5 CDC Version Tape Description.
  NESC Note 85-60 (December 20, 1984).
- F.M. Mann:
  HAUSER*5, A Computer Code to Calculate Nuclear Cross-Sections
  HEDL-TME 78-83 (July 1979).
- H. Gruppelaar and P. Nagel:
  "International Nuclear Model and Code Comparison on
   Pre-Equilibrium Effects"
  NEANDC-204"U"/INDC(NEA)6 (September 1985).
- A. Prince, G. Reffo, E. Sartori:
  "Report on the International Nuclear Model Code Intercomparison,
   Spherical Optical and Statistical Model Study"
  NEANDC-152"A"/INDC(NEA)4 (October 1983).
NESC0830/06, included references:
- L. Eyberger:
  HAUSER-5 IBM Version Tape Description.
  NESC Note 85-59  (December 19, 1984)
- F.M. Mann:
  HAUSER*5, A Computer Code to Calculate Nuclear Cross-Sections.
  HEDL-TME 78-83   (July 1979)
- H. Gruppelaar and P. Nagel:
  "International Nuclear Model and Code Comparison on
   Pre-Equilibrium Effects"
  NEANDC-204"U"/INDC(NEA)6 (September 1985).
- A. Prince, G. Reffo, E. Sartori:
  "Report on the International Nuclear Model Code Intercomparison
   Spherical Optical and Statistical Model Study"
  NEANDC-152"A"/INDC(NEA)4 (October 1983).
NESC0830/07, included references:
- L. Eyberger:
  HAUSER-5 UNIVAC Version Tape Description and Sample Problem Output
  NESC Note 85-61  (December 19, 1984)
- L. Eyberger:
  Edition C Changes to HAUSER-5 UNIVAC Version.
  NESC Note 85-62  (April 23, 1985)
- F.M. Mann:
  HAUSER*5, A Computer Code to Calculate Nuclear Cross-Sections.
  HEDL-TME 78-83   (July 1979)
- H. Gruppelaar and P. Nagel:
  "International Nuclear Model and Code Comparison on
   Pre-Equilibrium Effects"
  NEANDC-204"U"/INDC(NEA)6 (September 1985).
- A. Prince, G. Reffo, E. Sartori:
  "Report on the International Nuclear Model Code Intercomparison
   Spherical Optical and Statistical Model Study"
  NEANDC-152"A"/INDC(NEA)4 (October 1983).
top ]
11. MACHINE REQUIREMENTS

HAUSER5 requires an input device (logical unit 5) to read card images, output devices for printed copy (units  6, 8, 10, and 11), and output devices for punched cards (units 7 and 9). The auxiliary program, TISO, requires punch units 7 and 8. HAUSER5 uses 58K words of memory on a UNIVAX1100/44, with overlays,  620K bytes on a IBM4331, and 223,000 (octal) words on a CDC CYBER170/875. TISO requires 17K words of memory on a UNIVAC1100/44,  255K bytes in a IBM4331, and 42,000 (octal) words on a CDC CYBER170/875.
NESC0830/06
Execution of the test case in this package on a VAX-11/780 required a peak working set size of 1301 pages (HAUSER-5) and 844 pages (TISO).
top ]
12. PROGRAMMING LANGUAGE(S) USED
Package ID Computer language
NESC0830/03 FORTRAN-IV
NESC0830/04 FORTRAN-V (UNIVAC)
NESC0830/05 FORTRAN-IV
NESC0830/06 FORTRAN-IV
NESC0830/07 FORTRAN-V (UNIVAC)
top ]
13. OPERATING SYSTEM UNDER WHICH PROGRAM IS EXECUTED

EXEC8
(UNIVAC1100), VM/CMS (IBM4331), NOS 2.2 (CDC CYBER170).
NESC0830/06
VMS V4.4 (VAX-11/780).
top ]
14. OTHER PROGRAMMING OR OPERATING INFORMATION OR RESTRICTIONS

Segments of the code are independent, allowing easy segmentation or  overlay, and the storage requirements can also be reduced by eliminating underised options. The HAUSER5 UNIVAC version will have  to be modified to execute under the FORTRAN ASCII compiler, as the present edition of the code produces compiler errors. An NTAB$ element written in Assembler language is included to provide carriage control in the alternate print files.
top ]
15. NAME AND ESTABLISHMENT OF AUTHOR

1100 & 7600    F.M. Mann
                Hanford Engineering Development Laboratory
                Westinghouse Hanford Company
                P.O. Box 1970
                Richland, Washington 99352

  370           NEA Data Bank
                91191 Gif-sur-Yvette
                France

370  TISO      L.R. Eyberger
                National Energy Sofwtare Center
                Argonne National Laboratory
                9700 South Cass Avenue
                Argonne, Illinois 60439
top ]
16. MATERIAL AVAILABLE
NESC0830/05
source program   mag tapeHAUSER-5 Source Program                    SRCTP
test-case data   mag tapeHAUSER-5 Sample Problem Input              DATTP
test-case output mag tapeHAUSER-5 Sample Problem Output (Unit 6)    OUTTP
test-case output mag tapeHAUSER-5 Sample Problem Output (Unit 10)   OUTTP
test-case output mag tapeHAUSER-5 Sample Problem Output (Unit 11)   OUTTP
test-case data   mag tapeHAUSER-5 Control Information               DATTP
source program   mag tapeTISO Source Program                        SRCTP
test-case data   mag tapeTISO Sample Problem Input                  DATTP
test-case output mag tapeTISO Sample Problem Output (Unit 6)        OUTTP
test-case output mag tapeTISO Sample Problem Output (Unit 7)        OUTTP
test-case output mag tapeTISO Sample Problem Output (Unit 8)        OUTTP
test-case data   mag tapeTISO Control Information                   DATTP
prog. note               NESC Note 85-60  (December 20, 1984)       NOTPT
report                   HEDL-TME 78-83   (July 1979)               REPPT
report                   NEANDC-152"A"/INDC(NEA)4 (October 1983)    REPPT
report                   NEANDC-204"U"/INDC(NEA)6 (September 1985)  REPPT

NESC0830/07
source program   mag tapeHAUSER-5 Source Program                    SRCTP
test-case data   mag tapeHAUSER-5 Sample Problem Input              DATTP
source program   mag tapeTISO Source Program                        SRCTP
test-case data   mag tapeTISO Sample Problem Input                  DATTP
test-case data   mag tapeTISO Control Information                   DATTP
test-case data   mag tapeHAUSER-5 Control Information               DATTP
test-case output listing HAUSER-5 Sample Output                     OUTLS
test-case output listing TISO Sample Output                         OUTLS
prog. note               NESC Note 85-61  (December 19, 1984)       NOTPT
prog. note               NESC Note 85-62  (April 23, 1985)          NOTPT
report                   HEDL-TME 78-83   (July 1979)               REPPT
report                   NEANDC-152"A"/INDC(NEA)4 (October 1983)    REPPT
report                   NEANDC-204"U"/INDC(NEA)6 (September 1985)  REPPT
NESC0830/03
File name File description Records
NESC0830_03.001 INFORMATION 9
NESC0830_03.002 FORTRAN SOURCE 4606
NESC0830_03.003 TEST INPUT 699
NESC0830_03.004 OUTPUT FILE 06 491
NESC0830_03.005 OUTPUT FILE 10 320
NESC0830_03.006 OUTPUT FILE 11 226
NESC0830_03.007 JCL 16
NESC0830/04
File name File description Records
NESC0830_04.001 INFORMATION FILE 5
NESC0830_04.002 HAUSER-5 JCL 185
NESC0830_04.003 HAUSER-5 SOURCE 6213
NESC0830_04.004 HAUSER-5 INPUT 698
NESC0830_04.005 TISO JCL 28
NESC0830_04.006 TISO SOURCE 570
NESC0830_04.007 TISO INPUT 9
NESC0830_04.008 HAUSER-5 OUTPUT UNIT 6 458
NESC0830_04.009 HAUSER-5 OUTPUT UNIT 10 316
NESC0830_04.010 HAUSER-5 OUTPUT UNIT 11 226
NESC0830_04.011 TISO OUTPUT UNIT 6 36
NESC0830_04.012 TISO OUTPUT UNIT 7 257
NESC0830_04.013 TISO OUTPUT UNIT 8 258
NESC0830/06
File name File description Records
NESC0830_06.001 Information File 87
NESC0830_06.002 HAUSER-5 Fortran Source Code 4640
NESC0830_06.003 HAUSER-5 Command file 10
NESC0830_06.004 HAUSER-5 Test case input file 697
NESC0830_06.005 HAUSER-5 Test case output file (unit 6) 491
NESC0830_06.006 HAUSER-5 Test case output file (unit 10) 320
NESC0830_06.007 HAUSER-5 Test case output file (unit 11) 226
NESC0830_06.008 TISO Fortran Source Code 630
NESC0830_06.009 TISO Command file 7
NESC0830_06.010 TISO Test case input file 8
NESC0830_06.011 TISO Test case output file (unit 6) 41
NESC0830_06.012 TISO Test case output file (unit 7) 302
NESC0830_06.013 TISO Test case output file (unit 8) 302
top ]
17. CATEGORIES
  • A. Cross Section and Resonance Integral Calculations

Keywords: Clebsch-Gordon coefficients, Hauser-Feshbach theory, Racah coefficients, cross sections, neutron reactions, precompound-nucleus emission.