last modified: 01-OCT-1979 | catalog | categories | new | search |

NEA-0578 KEMA.

KEMA, KEDAK Utility, Data Update

top ]
1. NAME OR DESIGNATION OF PROGRAM:  KEMA.
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
KEMA NEA-0578/01 Tested 01-OCT-1979

Machines used:

Package ID Orig. computer Test computer
NEA-0578/01 IBM 370 series IBM 370 series
top ]
3. NATURE OF PHYSICAL PROBLEM SOLVED

Deletion, insertion and exchange  of data records in the data file 'KEDAK'. Printout of a list of contents of the KEDAK library. Conversion of the KEDAK library from  direct access form into card image form and vice versa.
top ]
4. METHOD OF SOLUTION

For the universal exchange of the KEDAK library  it is necessary to transform the library from direct access form into a sequential form. This sequential form will be exchanged and retransformed into direct access form.
top ]
5. RESTRICTIONS ON THE COMPLEXITY OF THE PROBLEM
top ]
6. TYPICAL RUNNING TIME

For a deletion, insertion and exchange of data approximately 50 seconds CPU time of an IBM 168 computer is used. 7  minutes is used to transform the library into direct access form.
top ]
7. UNUSUAL FEATURES OF THE PROGRAM

KEMA is a service and handling code for the Karlsruhe Nuclear Data library KEDAK.
top ]
8. RELATED OR AUXILIARY PROGRAMS: RELATED AND AUXILIARY PROGRAMS
top ]
9. STATUS
Package ID Status date Status
NEA-0578/01 01-OCT-1979 Tested at NEADB
top ]
10. REFERENCES
NEA-0578/01, included references:
- B. Krieg:
  Handling and Service Programs for the Karlsruhe Nuclear Data File
  KEDAK, Part I, Management and Retrieval Programs
  KFK 1725 (June 1973).
- B. Krieg:
  The KEDAK Program Compendium, Part II, KEDAK Basic Management
  KFK 2387/II (January 1977).
top ]
11. MACHINE REQUIREMENTS

The machine instructions of the programme and  the buffers need 600-k bytes storage if an overlay structure is used. For storing the KEDAK library in direct access form a disk storage unit is necessary.
top ]
12. PROGRAMMING LANGUAGE(S) USED
Package ID Computer language
NEA-0578/01 FORTRAN+ASSEMBLER
top ]
13. OPERATING SYSTEM OR MONITOR UNDER WHICH PROGRAM IS EXECUTED:  OS/VS release 3.7.
top ]
14. ANY OTHER PROGRAMMING OR OPERATING INFORMATION OR RESTRICTIONS

The ASSEMBLER routine 'DATUM' gives the day and the time of the calculation and 'DDTEST' checks whether all DD-cards needed are specified in the job.
With the ASSEMBLER routines 'DINF' and 'DEFI' it is possible to  use a data set in direct access form (in this special case the KEDAK library) with variable length.
The length is taken from the space parameter in the DD-card corresponding to the direct access library to be used and does not depend on the program.  For example:
//G.FT01F001 DD UNIT = 2314, VOL=SER=....,DSN=KEDAK,
// DISP=SHR,SPACE=(3520,3000)
If DINF and DEFI do not run on your computer the statements:
CALL DINF(.....)
NSZ = NSZ/4
CALL DEFI(.....)
may be replaced by:
DEFINE FILE 1(3000,880,U,K8) in all KEMA modules reading or  writing a direct access library.
If the module 01750 for updating the KEDAK library is used, a  DD-card for unit 3 must be added.
Storage unit 3 contains all ZZSTATUS records for one material.
ZZSTATUS is a new data type on KEDAK which is created automati-  cally by the KEMA module 01750.
ZZSTATUS contains information about the kind of data changes per-  formed on KEDAK.
Numerical name : 14512
Further   name :

Arguments    : 1. Date of the change in the format YYMMDD
                2. Time of the change
Functional   : 1. Kind of change (ADD,DPS or DPA)
values 2.,3. Data type to be changed in alphanumerical form                 4. Further name of the data type to be changed
                5. First energy value to be changed.
                6. Last  energy value to be changed.
                7. Number of energy values to be changed
top ]
15. NAME AND ESTABLISHMENT OF AUTHOR

    B. Krieg
    Institut fuer Neutronenphysik und Reaktortechnik
    Kernforschungszentrum
    Postfach 36 40
    D-7500 Karlsruhe 1
    The Federal Republic of Germany
top ]
16. MATERIAL AVAILABLE
NEA-0578/01
File name File description Records
NEA0578_01.001 INFORMATION FILE 8
NEA0578_01.002 DATUM ROUTINE 125
NEA0578_01.003 DINF ROUTINE 29
NEA0578_01.004 DEFI ROUTINE 108
NEA0578_01.005 DDTEST ROUTINE 111
NEA0578_01.006 SOURCE (F4,EBCDIC) 6121
NEA0578_01.007 JCL CARDS 121
NEA0578_01.008 OVERLAY CARDS 33
NEA0578_01.009 SAMPLE INPUT 52
NEA0578_01.010 SAMPLE OUTPUT 3304
top ]
17. CATEGORIES
  • B. Spectrum Calculations, Generation of Group Constants and Cell Problems
  • M. Data Management

Keywords: KEDAK, cross sections, data processing.