Computer Programs
NEA-0810 FORM-OTA.
last modified: 21-DEC-1984 | catalog | categories | new | search |

NEA-0810 FORM-OTA.

FORM-OTA, MultiGroup Constant for Epithermal Neutron Slowing-Down in Homogeneous Media

top ]
1. NAME OR DESIGNATION OF PROGRAM:  FORM-OTA.
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
FORM-OTA NEA-0810/01 Tested 21-SEP-1982
FORM-OTA NEA-0810/02 Tested 21-DEC-1984

Machines used:

Package ID Orig. computer Test computer
NEA-0810/01 CDC CYBER 174 CDC CYBER 174
NEA-0810/02 UNIVAC 1108 UNIVAC 1100
top ]
3. DESCRIPTION OF PROBLEM OR FUNCTION

FORM-OTA performs a multi- group slowing down calculation for a fundamental mode of given buckling in a homogeneous medium to obtain space-independent energy spectra for the epithermal neutron flux and current. Using the calculated flux and current spectra the program produces group constants for desired few group schemes.
top ]
4. METHOD OF SOLUTION

FORM-OTA is a member of the MUFT family of programs. The one-dimensional transport equation for the flux in plane geometry is solved by removing the spatial dependence by a Fourier transformation and by treating the angular dependence in either B1- or P1-approximation. Elastic slowing-down by hydrogen can be solved in an exact manner using a differential equation formulation. Elastic slowing-down by all non-hydrogen elements is lumped together and treated in the Greuling-Goertzel approximation.  For resonance absorption a rather simple formulation is used. A flux peaking in the fuel can be assessed, too. The energy group structure (54 groups in the range 10 MeV - .625 eV) is preprogrammed into the  code. A facility is provided to modify library data and to introduce entirely new data at run-time.
top ]
5. RESTRICTIONS ON THE COMPLEXITY OF THE PROBLEM

Maximum 18 elements (isotopes) in a mixture.
Of these 18 elements maximum 10 elements can have resonance data.
Maximum 6 few group schemes.
Maximum 25 group in any few group scheme.
Maximum 25 groups in a heterogeneous two-region (fuel-moderator) calculation.
top ]
6. TYPICAL RUNNING TIME

NEA-DB required the following CP times for the execution of the test cases on CDC CYBER 174:
          FORM-OTA:       4 seconds
          FORMLIST:      37 seconds
          FORMCONV:      32 seconds.
To run the test case on UNIVAC 1100, 2.9 CP seconds were required.
top ]
7. UNUSUAL FEATURES OF THE PROGRAM:
top ]
8. RELATED AND AUXILIARY PROGRAMS

ETOF:     a program to generate data for the FORM-OTA data library.
NEA-0810/01
FORMLIST
LIBCON1
LIBCON3

NEA-0810/02
FORMLBMD            Library update program
FORMLBPR            library list program
LIBCON3
LIBCON1
top ]
9. STATUS
Package ID Status date Status
NEA-0810/01 21-SEP-1982 Tested at NEADB
NEA-0810/02 21-DEC-1984 Tested at NEADB
top ]
10. REFERENCES:
NEA-0810/01, included references:
-  P. Siltanen
    FORM: A Multigroup Code for Calculating the fundamental Mode
          Flux and Current Spectra of Fast Neutrons. Report 6 (1973)
NEA-0810/02, included references:
-  P. Siltanen
    FORM: A Multigroup Code for Calculating the Fundamental Mode
          Flux and Current Spectra of Fast Neutrons. Rep. 6 (1973)
top ]
11. MACHINE REQUIREMENTS

Main storage on CDC CYBER 174:
          FORM-OTA:     114,000
          FORMLIST:      24,700
          FORMCONV:      24,700 (octal) words.
Main storage on UNIVAC 1100: 32,004 (decimal) words.
top ]
12. PROGRAMMING LANGUAGE(S) USED
Package ID Computer language
NEA-0810/01 FORTRAN-77
NEA-0810/02 FORTRAN-IV
top ]
13. OPERATING SYSTEM UNDER WHICH PROGRAM IS EXECUTED:
UNIVAC 1108 EXEC 8.
CDC CYBER 174: NOS 1.4-531.
top ]
14. OTHER PROGRAMMING OR OPERATING INFORMATION OR RESTRICTIONS:
top ]
15. NAME AND ESTABLISHMENT OF AUTHOR

          P. Siltanen
          Technical Research Centre of Finland
          Nuclear Engineering Laboratory
          Vuorimiehentie 5
          02150 Espoo 15
          Finland
top ]
16. MATERIAL AVAILABLE
NEA-0810/01
File name File description Records
NEA0810_01.003 FORM-OTA INFORMATION FILE 81
NEA0810_01.004 LIBCONV SOURCE (FORTRAN77) 52
NEA0810_01.005 LIBCONV JCL FOR FORM-OTA LIB GENERATION 12
NEA0810_01.006 LIBRARY IN FORMATTED FORM 5754
NEA0810_01.007 FORM-OTA SOURCE (FORTRAN77) 1743
NEA0810_01.008 FORM-OTA JCL FOR TEST CASE 11
NEA0810_01.009 FORM-OTA INPUT FOR TEST CASE 16
NEA0810_01.010 FORM-OTA OUTPUT OF TEST CASE 177
NEA0810_01.011 FORMLIST SOURCE (FORTRAN77) 84
NEA0810_01.012 FORMLIST JCL FOR LIBRARY LISTING 11
NEA0810_01.013 FORMLIST OUTPUT OF LIBRARY LIST RUN 6508
NEA-0810/02
File name File description Records
NEA0810_02.003 FORM-OTA INFORMATION FILE 36
NEA0810_02.004 JCL 42
NEA0810_02.005 FORM-OTA SOURCE PROGRAM 1732
NEA0810_02.006 FORMLBMD SOURCE PROGRAM 566
NEA0810_02.007 FORMLBPR SOURCE PROGRAM 83
NEA0810_02.008 LIBCON3 SOURCE PROGRAM 49
NEA0810_02.009 LIBCON1 SOURCE PROGRAM 49
NEA0810_02.010 FORM-OTA TEST CASE INPUT DATA 16
NEA0810_02.011 DATA LIBRARY (FORMATTED) 5754
NEA0810_02.012 FORM-OTA TEST CASE PRINTED OUTPUT 177
top ]
17. CATEGORIES
  • B. Spectrum Calculations, Generation of Group Constants and Cell Problems

Keywords: epithermal neutrons, group constants, multigroup, neutron flux, neutron spectra, one-dimensional, slowing-down.