=======================================================================SPECTRA
SPECTRA
PROGRAM SPECTRA SPECTRA
=============== SPECTRA
An extension of LINEAR to linearize ALl MF=5 spectra. SPECTRA
2012/05/28 - Added MF=15 neutron induced, photon spectra. SPECTRA
2021/01/26 - MF=6 Still NOT Implemented SPECTRA
SPECTRA
First released in 2010 - Earlier below dates refer to LINEAR. SPECTRA
SPECTRA
VERSION 74-1 (MAY 1974) SPECTRA
VERSION 75-1 (APRIL 1975) SPECTRA
VERSION 76-2 (OCTOBER 1976) SPECTRA
VERSION 77-1 (JANUARY 1977) SPECTRA
VERSION 78-1 (JULY 1978) SPECTRA
VERSION 79-1 (JULY 1979) CDC-7600 AND CRAY-1 VERSION. SPECTRA
VERSION 80-1 (MAY 1980) IBM, CDC AND CRAY VERSION. SPECTRA
VERSION 80-2 (DECEMBER 1980) SPECTRA
VERSION 81-1 (MARCH 1981) SPECTRA
VERSION 82-1 (JANUARY 1982) IMPROVED COMPUTER COMPATIBILITY. SPECTRA
VERSION 83-1 (JANUARY 1983) *MAJOR RE-DESIGN. SPECTRA
*PAGE SIZE INCREASED - 1002 TO 3006. SPECTRA
*ELIMINATED COMPUTER DEPENDENT CODING.SPECTRA
*NEW, MORE COMPATIBLE I/O UNIT NUMBER.SPECTRA
*ADDED OPTION TO KEEP ALL ORIGINAL SPECTRA
ENERGY POINTS FROM EVALUATION. SPECTRA
*ADDED STANDARD ALLOWABLE ERROR OPTIONSPECTRA
(CURRENTLY 0.1 PER-CENT). SPECTRA
VERSION 83-2 (OCTOBER 1983) IMPROVED BASED ON USER COMMENTS. SPECTRA
VERSION 84-1 (APRIL 1984) IMPROVED BASED ON USER COMMENTS. SPECTRA
VERSION 84-2 (JUNE 1984) *UPDATED FOR ENDF/B-VI FORMATS. SPECTRA
*SPECIAL I/O ROUTINES TO GUARANTEE SPECTRA
ACCURACY OF ENERGY. SPECTRA
*DOUBLE PRECISION TREATMENT OF ENERGY SPECTRA
(REQUIRED FOR NARROW RESONANCES). SPECTRA
VERSION 85-1 (AUGUST 1985) *FORTRAN-77/H VERSION SPECTRA
VERSION 86-1 (JANUARY 1986)*ENDF/B-VI FORMAT SPECTRA
VERSION 87-1 (JANUARY 1987)*DOUBLE PRECISION TREATMENT OF CROSS SPECTRA
SECTION SPECTRA
VERSION 88-1 (JULY 1988) *OPTION...INTERNALLY DEFINE ALL I/O SPECTRA
FILE NAMES (SEE, SUBROUTINE FILEIO SPECTRA
FOR DETAILS). SPECTRA
*IMPROVED BASED ON USER COMMENTS. SPECTRA
VERSION 89-1 (JANUARY 1989)*PSYCHOANALYZED BY PROGRAM FREUD TO SPECTRA
INSURE PROGRAM WILL NOT DO ANYTHING SPECTRA
CRAZY. SPECTRA
*UPDATED TO USE NEW PROGRAM CONVERT SPECTRA
KEYWORDS. SPECTRA
*ADDED LIVERMORE CIVIC COMPILER SPECTRA
CONVENTIONS. SPECTRA
VERSION 90-1 (JUNE 1990) *EXTENDED TO LINEARIZE PHOTON SPECTRA
INTERACTION DATA, MF=23 AND 27 SPECTRA
*ADDED FORTRAN SAVE OPTION SPECTRA
*UPDATED BASED ON USER COMMENTS. SPECTRA
*NEW MORE CONSISTENT ENERGY OUTPUT SPECTRA
ROUTINE. SPECTRA
*WARNING...INPUT PARAMETER FORMAT SPECTRA
HAS BEEN CHANGED...SEE DESCRIPTION SPECTRA
BELOW. SPECTRA
VERSION 91-1 (JULY 1991) *ADDED INTERPOLATION LAW 6 - ONLY USED SPECTRA
FOR CHARGED PARTICLE CROSS SECTIONS SPECTRA
FOR COULOMB PENETRABILITIES. SPECTRA
VERSION 92-1 (JANUARY 1992)*ADDED NU-BAR (TOTAL, DELAYED, PROMPT) SPECTRA
POLYNOMIAL OR TABULATED ALL CONVERTED SPECTRA
TO LINEARLY INTERPOLABLE SPECTRA
*INCREASED PAGE SIZE FROM 3006 TO 5010 SPECTRA
POINTS. SPECTRA
*ALL ENERGIES INTERNALLY ROUNDED PRIOR SPECTRA
TO CALCULATIONS. SPECTRA
*COMPLETELY CONSISTENT I/O AND ROUNDINGSPECTRA
ROUTINES - TO MINIMIZE COMPUTER SPECTRA
DEPENDENCE. SPECTRA
VERSION 92-2 (JULY 1992) *CORRECTED CONVERSION OF NU-BAR FROM SPECTRA
POLYNOMIAL TO TABULATED - COPY SPECTRA
SPONTANEOUS NU-BAR (BY DEFINITION SPECTRA
THE SPONTANEOUS NU-BAR IS NOT AN SPECTRA
ENERGY DEPENDENT QUANTITY). SPECTRA
VERSION 93-1 (MARCH 1993) *UPDATED FOR USE WITH LAHEY COMPILER SPECTRA
ON IBM-PCS. SPECTRA
*INCREASED PAGE SIZE FROM 5010 TO SPECTRA
30000 POINTS SPECTRA
VERSION 94-1 (JANUARY 1994)*VARIABLE ENDF/B DATA FILENAMES SPECTRA
TO ALLOW ACCESS TO FILE STRUCTURES SPECTRA
(WARNING - INPUT PARAMETER FORMAT SPECTRA
HAS BEEN CHANGED) SPECTRA
*CLOSE ALL FILES BEFORE TERMINATING SPECTRA
(SEE, SUBROUTINE ENDIT) SPECTRA
VERSION 96-1 (JANUARY 1996) *COMPLETE RE-WRITE SPECTRA
*IMPROVED COMPUTER INDEPENDENCE SPECTRA
*ALL DOUBLE PRECISION SPECTRA
*ON SCREEN OUTPUT SPECTRA
*UNIFORM TREATMENT OF ENDF/B I/O SPECTRA
*IMPROVED OUTPUT PRECISION SPECTRA
*DEFINED SCRATCH FILE NAMES SPECTRA
*ALWAYS INCLUDE THERMAL VALUE SPECTRA
*INCREASED PAGE SIZE FROM 30000 TO SPECTRA
60000 POINTS SPECTRA
VERSION 99-1 (MARCH 1999) *CORRECTED CHARACTER TO FLOATING SPECTRA
POINT READ FOR MORE DIGITS SPECTRA
*UPDATED TEST FOR ENDF/B FORMAT SPECTRA
VERSION BASED ON RECENT FORMAT CHANGESPECTRA
*GENERAL IMPROVEMENTS BASED ON SPECTRA
USER FEEDBACK SPECTRA
VERSION 99-2 (JUNE 1999) *ASSUME ENDF/B-VI, NOT V, IF MISSING SPECTRA
MF=1, MT-451. SPECTRA
VERS. 2000-1 (FEBRUARY 2000)*ADDED MF = 9 AND 10 LINEARIZATION SPECTRA
*GENERAL IMPROVEMENTS BASED ON SPECTRA
USER FEEDBACK SPECTRA
VERS. 2002-1 (MAY 2002) *OPTIONAL INPUT PARAMETERS SPECTRA
VERS. 2004-1 (JAN. 2004) *GENERAL UPDATE BASED ON USER FEEDBACKSPECTRA
VERS. 2005-1 (JAN. 2005) *ALWAYS KEEP ORIGINAL TABULATED SPECTRA
NU-BAR POINTS. SPECTRA
VERS. 2006-1 (FEB. 2006) *CORRECTED INT=6 NEAR THRESHOLD SPECTRA
*NO SUBDIVIDE BELOW MINIMUM XCMIN SPECTRA
VERS. 2007-1 (JAN. 2007) *CHECKED AGAINST ALL ENDF/B-VII. SPECTRA
*INCREASED PAGE SIZE FROM 60,000 TO SPECTRA
600,000 POINTS SPECTRA
VERS. 2010-1 (JUNE 2010) *ADDED MF = 5 - MF = 6 STILL PLANNED. SPECTRA
*72 CHARACTER FILE NAMES. SPECTRA
*ONLY PROCESS MF=5 - SKIP ALL OTHERS SPECTRA
TO PREVENT CONFLICT WITH LINEAR SPECTRA
THINNING. SPECTRA
VERS. 2012-1 (Aug. 2012) *Added MF=15, neutron induced photon SPECTRA
spectra. SPECTRA
*Added CODENAME SPECTRA
*32 and 64 bit Compatible SPECTRA
*Added ERROR stop SPECTRA
VERS. 2015-1 (Jan. 2015) *Extended OUT9. SPECTRA
*Replaced ALL 3 way IF Statements. SPECTRA
*Corrected MF=15 Data - it was adding SPECTRA
SEND between sub-sections. SPECTRA
*Deleted unused parts, e.g., NUBAR. SPECTRA
VERS. 2017-1 (May 2017) *Increased page size to 3,000,000 SPECTRA
*Updated based on user feedback SPECTRA
*Changed DGAMMA to REDGAMMA to avoid SPECTRA
conflict with possble RESERVED NAME SPECTRA
*All floating input parameters changedSPECTRA
to character input + IN9 conversion. SPECTRA
VERS. 2018-1 (Jan. 2018) *On-line output for ALL ENDERROR SPECTRA
VERS. 2019-1 (June 2019) *Additional Interpolation Law Tests SPECTRA
*Check Maximum Tabulated Energy to SPECTRA
insure it is the same for all MTs - SPECTRA
if not, print WARNING messages. SPECTRA
*Corrected END Histogram linearized - SPECTRA
Previously deleted last point - ERRORSPECTRA
to assume this has Y=0 - now keep SPECTRA
point, but insure Y = 0. SPECTRA
VERS. 2020-1 (Mar. 2020) *Added Target Isomer State SPECTRA
VERS. 2021-1 (Jan. 2021) *Updated for FORTRAN 2018 SPECTRA
SPECTRA
OWNED, MAINTAINED AND DISTRIBUTED BY SPECTRA
------------------------------------ SPECTRA
THE NUCLEAR DATA SECTION SPECTRA
INTERNATIONAL ATOMIC ENERGY AGENCY SPECTRA
P.O. BOX 100 SPECTRA
A-1400, VIENNA, AUSTRIA SPECTRA
EUROPE SPECTRA
SPECTRA
ORIGINALLY WRITTEN BY SPECTRA
------------------------------------ SPECTRA
Dermott E. Cullen SPECTRA
SPECTRA
PRESENT CONTACT INFORMATION SPECTRA
--------------------------- SPECTRA
Dermott E. Cullen SPECTRA
1466 Hudson Way SPECTRA
Livermore, CA 94550 SPECTRA
U.S.A. SPECTRA
Telephone 925-443-1911 SPECTRA
E. Mail RedCullen1@Comcast.net SPECTRA
Website RedCullen1.net/HOMEPAGE.NEW SPECTRA
SPECTRA
AUTHORS MESSAGE SPECTRA
--------------- SPECTRA
THE REPORT DESCRIBED ABOVE IS THE LATEST PUBLISHED DOCUMENTATION SPECTRA
FOR THIS PROGRAM. HOWEVER, THE COMMENTS BELOW SHOULD BE CONSIDEREDSPECTRA
THE LATEST DOCUMENTATION INCLUDING ALL RECENT IMPROVEMENTS. PLEASESPECTRA
READ ALL OF THESE COMMENTS BEFORE IMPLEMENTATION. SPECTRA
SPECTRA
AT THE PRESENT TIME WE ARE ATTEMPTING TO DEVELOP A SET OF COMPUTERSPECTRA
INDEPENDENT PROGRAMS THAT CAN EASILY BE IMPLEMENTED ON ANY ONE SPECTRA
OF A WIDE VARIETY OF COMPUTERS. IN ORDER TO ASSIST IN THIS PROJECTSPECTRA
IT WOULD BE APPECIATED IF YOU WOULD NOTIFY THE AUTHOR OF ANY SPECTRA
COMPILER DIAGNOSTICS, OPERATING PROBLEMS OR SUGGESTIONS ON HOW TO SPECTRA
IMPROVE THIS PROGRAM. HOPEFULLY, IN THIS WAY FUTURE VERSIONS OF SPECTRA
THIS PROGRAM WILL BE COMPLETELY COMPATIBLE FOR USE ON YOUR SPECTRA
COMPUTER. SPECTRA
SPECTRA
PURPOSE SPECTRA
------- SPECTRA
THIS PROGRAM IS DESIGNED TO CONVERT ENDF/B FILE 3, 23 AND 27 DATA SPECTRA
TO LINEAR-LINEAR INTERPOLABLE FORM. ANY SECTION THAT IS ALREADY SPECTRA
LINEAR-LINEAR INTERPOLABLE WILL BE THINNED. SPECTRA
SPECTRA
IN THE FOLLOWING DISCUSSION FOR SIMPLICITY THE ENDF/B TERMINOLOGY SPECTRA
---ENDF/B TAPE---WILL BE USED. IN FACT THE ACTUAL MEDIUM MAY BE SPECTRA
TAPE, CARDS, DISK OR ANY OTHER MEDIUM. SPECTRA
SPECTRA
ENDF/B FORMAT SPECTRA
------------- SPECTRA
THIS PROGRAM ONLY USES THE ENDF/B BCD OR CARD IMAGE FORMAT (AS SPECTRA
OPPOSED TO THE BINARY FORMAT) AND CAN HANDLE DATA IN ANY VERSION SPECTRA
OF THE ENDF/B FORMAT (I.E., ENDF/B-I, II,III, IV, V OR VI FORMAT).SPECTRA
SPECTRA
IT IS ASSUMED THAT THE DATA IS CORRECTLY CODED IN THE ENDF/B SPECTRA
FORMAT AND NO ERROR CHECKING IS PERFORMED. IN PARTICULAR IT IS SPECTRA
ASSUMED THAT THE MAT, MF AND MT ON EACH LINE IS CORRECT. SEQUENCE SPECTRA
NUMBERS (COLUMNS 76-80) ARE IGNORED ON INPUT, BUT WILL BE SPECTRA
CORRECTLY OUTPUT ON ALL LINES. THE FORMAT OF SECTION MF=1, MT=451 SPECTRA
AND ALL SECTIONS OF MF=3 MUST BE CORRECT. THE PROGRAM COPIES ALL SPECTRA
OTHER SECTION OF DATA AS HOLLERITH AND AS SUCH IS INSENSITIVE TO SPECTRA
THE CORRECTNESS OR INCORRECTNESS OF ALL OTHER SECTIONS. SPECTRA
SPECTRA
OUTPUT FORMAT SPECTRA
------------- SPECTRA
IN THIS VERSION OF LINEAR ALL ENERGIES WILL BE OUTPUT IN SPECTRA
F (INSTEAD OF E) FORMAT IN ORDER TO ALLOW ENERGIES TO BE WRITTEN SPECTRA
WITH UP TO 9 DIGITS OF ACCURACY. IN PREVIOUS VERSIONS THIS WAS AN SPECTRA
OUTPUT OPTION. HOWEVER USE OF THIS OPTION TO COMPARE THE RESULTS SPECTRA
OF ENERGIES WRITTEN IN THE NORMAL ENDF/B CONVENTION OF 6 DIGITS SPECTRA
TO THE 9 DIGIT OUTPUT FROM THIS PROGRAM DEMONSTRATED THAT FAILURE SPECTRA
TO USE THE 9 DIGIT OUTPUT CAN LEAD TO LARGE ERRORS IN THE DATA SPECTRA
DUE TO TRUNCATION OF ENERGIES TO 6 DIGITS DURING OUTPUT. SPECTRA
SPECTRA
CONTENTS OF OUTPUT SPECTRA
------------------ SPECTRA
ENTIRE EVALUATIONS ARE OUTPUT, NOT JUST THE LINEARIZED DATA SPECTRA
CROSS SECTIONS, E.G. ANGULAR AND ENERGY DISTRIBUTIONS ARE ALSO SPECTRA
INCLUDED. SPECTRA
SPECTRA
DOCUMENTATION SPECTRA
------------- SPECTRA
THE FACT THAT THIS PROGRAM HAS OPERATED ON THE DATA IS DOCUMENTED SPECTRA
BY THE ADDITION OF 3 COMMENT LINES AT THE END OF EACH HOLLERITH SPECTRA
SECTION IN THE FORM SPECTRA
SPECTRA
***************** PROGRAM SPECTRA (2021-1) **************** SPECTRA
FOR ALL DATA GREATER THAN 1.00000-10 IN ABSOLUTE VALUE SPECTRA
DATA LINEARIZED TO WITHIN AN ACCURACY OF 0.1 PER-CENT SPECTRA
SPECTRA
THE ORDER OF SIMILAR COMMENTS (FROM RECENT, SIGMA1 AND GROUPIE) SPECTRA
REPRESENTS A COMPLETE HISTORY OF ALL OPERATIONS PERFORMED ON SPECTRA
THE DATA BY THESE PROGRAMS. SPECTRA
SPECTRA
THESE COMMENT LINES ARE ONLY ADDED TO EXISTING HOLLERITH SECTIONS,SPECTRA
I.E., THIS PROGRAM WILL NOT CREATE A HOLLERITH SECTION. THE FORMATSPECTRA
OF THE HOLLERITH SECTION IN ENDF/B-V DIFFERS FROM THE THAT OF SPECTRA
EARLIER VERSIONS OF ENDF/B. BY READING AN EXISTING MF=1, MT=451 SPECTRA
IT IS POSSIBLE FOR THIS PROGRAM TO DETERMINE WHICH VERSION OF SPECTRA
THE ENDF/B FORMAT THE DATA IS IN. WITHOUT HAVING A SECTION OF SPECTRA
MF=1, MT=451 PRESENT IT IS IMPOSSIBLE FOR THIS PROGRAM TO SPECTRA
DETERMINE WHICH VERSION OF THE ENDF/B FORMAT THE DATA IS IN, AND SPECTRA
AS SUCH IT IS IMPOSSIBLE FOR THE PROGRAM TO DETERMINE WHAT FORMAT SPECTRA
SHOULD BE USED TO CREATE A HOLLERITH SECTION. SPECTRA
SPECTRA
REACTION INDEX SPECTRA
-------------- SPECTRA
THIS PROGRAM DOES NOT USE THE REACTION INDEX WHICH IS GIVEN IN SPECTRA
SECTION MF=1, MT=451 OF EACH EVALUATION. SPECTRA
SPECTRA
THIS PROGRAM DOES NOT UPDATE THE REACTION INDEX IN MF=1, MT=451. SPECTRA
THIS CONVENTION HAS BEEN ADOPTED BECAUSE MOST USERS DO NOT SPECTRA
REQUIRE A CORRECT REACTION INDEX FOR THEIR APPLICATIONS AND IT WASSPECTRA
NOT CONSIDERED WORTHWHILE TO INCLUDE THE OVERHEAD OF CONSTRUCTING SPECTRA
A CORRECT REACTION INDEX IN THIS PROGRAM. HOWEVER, IF YOU REQUIRE SPECTRA
A REACTION INDEX FOR YOUR APPLICATIONS, AFTER RUNNING THIS PROGRAMSPECTRA
YOU MAY USE PROGRAM DICTIN TO CREATE A CORRECT REACTION INDEX. SPECTRA
SPECTRA
SECTION SIZE SPECTRA
------------ SPECTRA
SINCE THIS PROGRAM USES A LOGICAL PAGING SYSTEM THERE IS NO LIMIT SPECTRA
TO THE NUMBER OF POINTS IN ANY SECTION, E.G., THE TOTAL CROSS SPECTRA
SECTION MAY BE REPRESENTED BY 200,000 DATA POINTS. SPECTRA
SPECTRA
FOR ANY LINEARIZED SECTION THAT CONTAINS 60000 OR FEWER POINTS SPECTRA
THE ENTIRE OPERATION WILL BE PERFORMED IN CORE AND THE LINEARIZED SPECTRA
DATA WILL BE OUTPUT DIRECTLY TO THE ENDF/B FORMAT. FOR ANY SECTIONSPECTRA
THAT CONTAINS MORE POINTS THE DATA WILL BE LINEARIZED A PAGE AT A SPECTRA
TIME (1 PAGE = 60000 POINTS) AND OUTPUT TO SCRATCH. AFTER THE SPECTRA
ENTIRE SECTION HAS BEEN LINEARIZED THE DATA WILL BE READ BACK FROMSPECTRA
SCRATCH AND OUTPUT TO THE ENDF/B FORMAT. SPECTRA
SPECTRA
SELECTION OF DATA SPECTRA
----------------- SPECTRA
THE PROGRAM SELECTS DATA TO BE LINEARIZED BASED EITHER ON EITHER SPECTRA
MAT (ENDF/B MAT NO.) OR ZA AS WELL AS MF AND MT NUMBERS. THIS SPECTRA
PROGRAM ALLOWS UP TO 100 MAT/MF/MT OR ZA/MF/MT RANGES TO BE SPECTRA
SPECIFIED BY INPUT PARAMETERS. THE PROGRAM WILL ASSUME THAT THE SPECTRA
ENDF/B TAPE IS IN MAT ORDER, REGARDLESS OF THE CRITERIA USED SPECTRA
TO RETRIEVE MATERIALS. IF RETRIEVAL IS BY MAT RANGE THE PROGRAM SPECTRA
WILL TERMINATE WHEN A MAT IS FOUND THAT IS ABOVE ALL REQUESTED SPECTRA
MAT RANGES. IF RETRIEVAL IS BY ZA RANGE THE PROGRAM WILL SEARCH SPECTRA
THE ENTIRE ENDF/B TAPE. SPECTRA
SPECTRA
PROGRAM OPERATION SPECTRA
----------------- SPECTRA
EACH SECTION OF DATA IS CONSIDERED SEPARATELY. EACH SECTION OF SPECTRA
ENDF/B DATA TO LINEARIZE IS REPRESENTED BY A TABLE OF ENERGY SPECTRA
VS. CROSS SECTION AND ANY ONE OF FIVE ALLOWABLE INTERPOLATION LAWSSPECTRA
BETWEEN ANY TWO TABULATED POINTS. THIS PROGRAM WILL REPLACE EACH SPECTRA
SECTION OF DATA CROSS SECTIONS BY A NEW TABLE OF ENERGY VS. SPECTRA
CROSS SECTION IN WHICH THE INTERPOLATION LAW IS ALWAYS LINEAR IN SPECTRA
ENERGY AND CROSS SECTION BETWEEN ANY TWO TABULATED POINTS. SPECTRA
SPECTRA
DATA IS READ AND LINEARIZED A PAGE AT A TIME (ONE PAGE CONTAINS SPECTRA
60000 DATA POINTS). IF THE FINAL LINEARIZED SECTION CONTAINS TWO SPECTRA
PAGES OR LESS, DATA POINTS IT WILL BE ENTIRELY CORE RESIDENT SPECTRA
AFTER IT HAS BEEN LINEARIZED AND WILL BE WRITTEN DIRECTLY FROM SPECTRA
CORE TO THE OUTPUT TAPE. IF THE LINEARIZED SECTION IS LARGER THAN SPECTRA
TWO PAGES, AFTER EACH PAGE IS LINEARIZED IT WILL BE WRITTEN TO SPECTRA
SCRATCH. AFTER THE ENTIRE SECTION HAS BEEN LINEARIZED IT WILL SPECTRA
BE READ BACK FROM SCRATCH, TWO PAGES AT A TIME, AND WRITTEN TO SPECTRA
THE OUTPUT TAPE. SPECTRA
SPECTRA
KEEP EVALUATED DATA POINTS SPECTRA
-------------------------- SPECTRA
SOMETIMES IT IS CONVENIENT TO KEEP ALL ENERGY POINTS WHICH WERE SPECTRA
PRESENT IN THE ORIGINAL EVALUATION AND TO MERELY SUPPLEMENT THESE SPECTRA
POINTS WITH ADDITIONAL ENERGY POINTS IN ORDER TO LINEARIZE THE SPECTRA
CROSS SECTIONS. FOR EXAMPLE, IT IS OFTEN CONVENIENT TO KEEP THE SPECTRA
THERMAL VALUE (AT 0.0253 EV) OR THE VALUE AT 14.1 MEV. SPECTRA
SPECTRA
THE CURRENT VERSION OF THIS PROGRAM WILL ALLOW THE USER TO KEEP SPECTRA
ALL ORIGINAL EVALUATED DATA POINTS BY SPECIFYING 1 IN COLUMNS SPECTRA
34-44 OF THE FIRST INPUT LINE. THIS WILL TURN OFF THE BACKWARD SPECTRA
THINNING (SEE UCRL-50400, VOL. 17, PART A FOR EXPLANATION) AND SPECTRA
RESULT IN ALL ORIGINAL ENERGY POINTS BEING KEPT. CAUTION SHOULD SPECTRA
BE EXERCISED IN USING THIS OPTION SINCE IT CAN RESULT IN A SPECTRA
CONSIDERABLE INCREASE IN THE NUMBER OF DATA POINTS OUTPUT BY SPECTRA
THIS CODE. SPECTRA
SPECTRA
FOR ALL USERS WHO ARE NOT INTERESTED IN THIS OPTIONS NO CHANGES SPECTRA
ARE REQUIRED IN THE INPUT TO THIS PROGRAM, I. E. IF COLUMNS SPECTRA
34-44 ARE BLANK (AS FOR ALL PREVIOUS VERSIONS OF THIS CODE) THE SPECTRA
PROGRAM WILL OPERATE EXACTLY AS IT DID BEFORE. SPECTRA
SPECTRA
ALLOWABLE ERROR SPECTRA
--------------- SPECTRA
ALLOWABLE ERROR MUST ALWAYS BE SPECIFIED IN THE INPUT TO THIS SPECTRA
PROGRAM AS A FRACTION, NOT A PER-CENT. FOR EXAMPLE, INPUT THE SPECTRA
ALLOWABLE FRACTIONAL ERROR 0.001 IN ORDER TO OBTAIN DATA THAT IS SPECTRA
ACCURATE TO WITHIN 0.1 PER-CENT. SPECTRA
SPECTRA
THE CONVERSION OF THE DATA FROM THE GENERAL INTERPOLATION FORM TO SPECTRA
LINARLY INTERPOLABLE FORM CANNOT BE PERFORMED EXACTLY. HOWEVER, ITSPECTRA
CAN BE PERFORMED TO VIRTUALLY ANY REQUIRED ACCURACY AND MOST SPECTRA
IMPORTANTLY CAN BE PERFORMED TO A TOLERANCE THAT IS SMALL COMPAREDSPECTRA
TO THE UNCERTAINTY IN THE CROSS SECTIONS THEMSELVES. AS SUCH THE SPECTRA
CONVERSION OF CROSS SECTIONS TO LINEARLY INTERPOLABLE FORM CAN BE SPECTRA
PERFORMED WITH ESSENTIALLY NO LOSE OF INFORMATION. SPECTRA
SPECTRA
THE ALLOWABLE ERROR MAY BE ENERGY INDEPENDENT (CONSTANT) OR ENERGYSPECTRA
DEPENDENT. THE ALLOWABLE ERROR IS DESCRIBED BY A TABULATED SPECTRA
FUNCTION OF UP TO 20 (ENERGY,ERROR) PAIRS AND LINEAR INTERPOLATIONSPECTRA
BETWEEN TABULATED POINTS. IF ONLY ONE TABULATED POINT IS GIVEN THESPECTRA
ERROR WILL BE CONSIDERED CONSTANT OVER THE ENTIRE ENERGY RANGE. SPECTRA
WITH THIS ENERGY DEPENDENT ERROR ONE MAY OPTIMIZE THE OUTPUT FOR SPECTRA
ANY GIVEN APPLICATION BY USING A SMALL ERROR IN THE ENERGY RANGE SPECTRA
OF INTEREST AND A LESS STRINGENT ERROR IN OTHER ENERGY RANGES. SPECTRA
SPECTRA
DEFAULT ALLOWABLE ERROR SPECTRA
----------------------- SPECTRA
IN ORDER TO INSURE CONVERGENCE OF THE LINEARIZING ALGORITHM THE SPECTRA
ALLOWABLE ERROR MUST BE POSITIVE. IF THE USER INPUTS AN ERROR SPECTRA
THAT IS NOT POSITIVE IT WILL AUTOMATICALLY BE SET TO THE DEFAULT SPECTRA
VALUE (CURRENTLY 0.001, CORRESPONDING TO 0.1 PER-CENT) AND SPECTRA
INDICATED AS SUCH IN THE OUTPUT LISTING. SPECTRA
SPECTRA
COULOMB PENETRABILITY (INTERPOLATION LAW = 6) SPECTRA
-------------------------------------------- SPECTRA
INTRODUCED FOR ENDF/B-VI. THIS IS DEFINED AS, SPECTRA
SPECTRA
SIG(E) = C1*EXP(-C2/SQRT(E - T)) SPECTRA
SPECTRA
THIS PROGRAM ONLY CONSIDERS EXOTHERMIC REACTIONS - T = 0 SPECTRA
SPECTRA
SIG(E) = C1*EXP(-C2/SQRT(E)) SPECTRA
SPECTRA
WARNING...THIS INTERPOLATION LAW SHOULD ONLY BE USED FOR REACTIONSSPECTRA
WHICH HAVE A POSITIVE Q-VALUE (EXOTHERMIC REACTIONS), SPECTRA
SINCE HERE WE ONLY CONSIDER T = 0.0 IN THE FORMALISM. SPECTRA
IN ALL OTHER CASES A WARNING MESSAGE WILL BE PRINTED. SPECTRA
SPECTRA
INPUT FILES SPECTRA
----------- SPECTRA
UNIT DESCRIPTION SPECTRA
---- ----------- SPECTRA
2 INPUT LINES (BCD - 80 CHARACTERS/RECORD) SPECTRA
10 ORIGINAL ENDF/B DATA (BCD - 80 CHARACTERS/RECORD) SPECTRA
SPECTRA
OUTPUT FILES SPECTRA
------------ SPECTRA
UNIT DESCRIPTION SPECTRA
---- ----------- SPECTRA
3 OUTPUT REPORT (BCD - 120 CHARACTERS/RECORD) SPECTRA
11 FINAL ENDF/B DATA (BCD - 80 CHARACTERS/RECORD) SPECTRA
SPECTRA
SCRATCH FILES SPECTRA
------------- SPECTRA
UNIT DESCRIPTION SPECTRA
---- ----------- SPECTRA
12 SCRATCH FILE (BINARY - 180000 WORDS/RECORD SPECTRA
SPECTRA
OPTIONAL STANDARD FILE NAMES (SEE SUBROUTINE FILEIO) SPECTRA
---------------------------------------------------- SPECTRA
UNIT FILE NAME SPECTRA
---- ---------- SPECTRA
2 SPECTRA.INP SPECTRA
3 SPECTRA.LST SPECTRA
10 ENDFB.IN SPECTRA
11 ENDFB.OUT SPECTRA
12 (SCRATCH) SPECTRA
SPECTRA
SPECTRA
INPUT PARAMETERS SPECTRA
---------------- SPECTRA
FOR VERSIONS EARLIER THAN 90-1 THIS PROGRAM ONLY ALLOWED THE USER SPECTRA
TO SPECIFY BY INPUT PARAMETERS WHICH MATERIALS (MAT) TO PROCESS. SPECTRA
FOR EACH REQUESTED MATERIAL NEUTRON INTERACTION CROSS SECTIONS SPECTRA
(MF=3) WOULD BE LINEARIZED AND THE REMAINDER OF THE MATERIAL SPECTRA
WOULD BE COPIED. SPECTRA
SPECTRA
FOR VERSIONS 90-1 AND LATER THIS PROGRAM WILL ALLOW THE USER TO SPECTRA
TO SPECIFY BY INPUT PARAMETERS EXACTLY WHAT SECTIONS OF DATA SPECTRA
TO PROCESS. FOR EACH SECTION OF DATA, SPECIFIED BY MAT, MF, MT SPECTRA
RANGES, SECTIONS OF MF=3, 23 AND 27 WILL BE LINEARIZED AND ALL SPECTRA
OTHER REQUESTED SECTIONS WILL BE COPIED. ALL SECTIONS WHICH ARE SPECTRA
NOT EXPLICITLY REQUESTED WILL BE SKIPPED AND WILL NOT APPEAR ON SPECTRA
ENDF/B FILE OUTPUT BY THIS PROGRAM. SPECTRA
SPECTRA
WITH THIS NEW PROCEDURE YOU CAN MINIMIZE THE SIZE OF THE ENDF/B SPECTRA
FILE OUTPUT BY THIS PROGRAM, E.G., IF YOU ONLY WANT NEUTRON SPECTRA
CROSS SECTIONS FOR SUBSEQUENT PROCESSING YOU NEED ONLY REQUEST SPECTRA
ONLY MF=3 DATA. SPECTRA
SPECTRA
HOWEVER, YOU MUST UNDERSTAND THAT ONLY THOSE SECTIONS WHICH YOU SPECTRA
EXPLICITLY REQUEST WILL APPEAR ON THE ENDF/B FILE OUTPUT BY SPECTRA
THIS PROGRAM. FOR EXAMPLE, IF YOU WISH TO DOCUMENT EXACTLY SPECTRA
HOW YOU LINEARIZED THE DATA BY INCLUDING COMMENTS IN MF=1, MT=451 SPECTRA
THEN YOU MUST EXPLICITLY REQUEST THAT MF=1, MT=451 BE PROCESSED SPECTRA
FOR EACH MATERIAL THAT YOU REQUEST. SIMILAR IF YOU WANT THE SPECTRA
ENTIRE EVALUATION YOU MUST REQUEST ALL MF AND MT TO BE OUTPUT. SPECTRA
SPECTRA
LINE COLS. DESCRIPTION SPECTRA
---- ----- ----------- SPECTRA
1 1-11 SELECTION CRITERIA (0=MAT, 1=ZA) SPECTRA
12-22 MONITOR MODE SELECTOR SPECTRA
= 0 - NORMAL OPERATION SPECTRA
= 1 - MONITOR PROGRESS OF LINEARIZING OF THE DATA. SPECTRA
EACH TIME A PAGE OF DATA POINTS IS WRITTEN TO SPECTRA
THE SCRATCH FILE PRINT OUT THE TOTAL NUMBER OF SPECTRA
POINTS ON SCRATCH AND THE LOWER AND UPPER SPECTRA
ENERGY LIMITS OF THE PAGE (THIS OPTION MAY BE SPECTRA
USED IN ORDER TO MONITOR THE EXECUTION SPEED SPECTRA
OF LONG RUNNING JOBS). SPECTRA
23-33 MINIMUM CROSS SECTION OF INTEREST (BARNS). SPECTRA
(IF 0.0 OR LESS IS INPUT THE PROGRAM WILL SPECTRA
USE 1.0E-10). ENERGY INTERVALS WILL NOT BE SPECTRA
SUB-DIVIDED IF THE ABSOLUTE VALUE OF THE CROSS SPECTRA
SECTION WITHIN THE INTERVAL IS LESS THAN THIS VALUE. SPECTRA
AN EXCEPTION TO THIS RULE IS NEAR THRESHOLDS ENERGY SPECTRA
INTERVALS WILL BE SUB-DIVIDED UNTIL CONVERGENCE SPECTRA
REGARDLESS OF THE MAGNITUDE OF THE CROSS SECTION. SPECTRA
34-44 KEEP ORIGINAL EVALUATED DATA POINTS. SPECTRA
= 0 - NO. SPECTRA
= 1 - YES - ADDITIONAL POINTS MAY BE ADDED IN ORDER SPECTRA
TO LINEARIZE DATA, BUT ALL ORIGINAL SPECTRA
DATA POINTS WILL BE INCLUDED IN THE SPECTRA
RESULTS. SPECTRA
2 1-72 ENDF/B INPUT DATA FILENAME SPECTRA
(STANDARD OPTION = ENDFB.IN) SPECTRA
3 1-72 ENDF/B OUTPUT DATA FILENAME SPECTRA
(STANDARD OPTION = ENDFB.OUT) SPECTRA
4-N 1- 6 LOWER MAT OR ZA LIMIT SPECTRA
7- 8 LOWER MF LIMIT SPECTRA
9-11 LOWER MT LIMIT SPECTRA
12-17 UPPER MAT OR ZA LIMIT SPECTRA
18-19 UPPER MF LIMIT SPECTRA
20-22 UPPER MT LIMIT SPECTRA
UP TO 100 RANGES MAY BE SPECIFIED, ONLY ONE RANGE SPECTRA
PER LINE. THE LIST OF RANGES IS TERMINATED BY A SPECTRA
BLANK LINE. IF THE UPPER MAT LIMIT OF ANY REQUEST SPECTRA
IS LESS THAN THE LOW LIMIT IT WILL BE SET EQUAL TO SPECTRA
THE LOWER LIMIT. IF THE UPPER LIMIT IS STILL ZERO SPECTRA
IT WILL BE SET EQUAL TO 999999. IF THE UPPER MF OR SPECTRA
MT LIMIT IS ZERO IT WILL BE SET TO 99 OR 999 SPECTRA
RESPECTIVELY. SPECTRA
VARY 1-11 ENERGY FOR ERROR LAW SPECTRA
12-22 ALLOWABLE FRACTIONAL ERROR FOR ERROR LAW. SPECTRA
THE ACCEPTABLE LINEARIZING ERROR MAY BE SPECIFIED TO SPECTRA
BE EITHER ENERGY INDEPENDENT (DEFINED BY A SINGLE SPECTRA
ERROR), OR ENERGY DEPENDENT (DEFINED BY UP TO 20 SPECTRA
ENERGY, ERROR PAIRS). FOR THE ENERGY DEPENDENT CASE SPECTRA
LINEAR INTERPOLATION WILL BE USED TO DEFINE THE ERRORSPECTRA
AT ENERGIES BETWEEN THOSE AT WHICH IT IS TABULATED. SPECTRA
IN ALL CASES THE ERROR LAW IS TERMINATED BY A BLANK SPECTRA
LINE. IF ONLY ONE ENERGY, ERROR PAIR IS GIVEN THE SPECTRA
THE LAW WILL BE CONSIDERED TO BE ENERGY INDEPENDENT. SPECTRA
IF MORE THAN ONE PAIR IS GIVEN IT WILL BE CONSIDERED SPECTRA
TO BE ENERGY DEPENDENT (NOTE, ENERGY INDEPENDENT SPECTRA
FORM WILL RUN FASTER THAN THE EQUIVALENT ENERGY SPECTRA
DEPENDENT FORM). FOR AN ENERGY DEPENDENT ERROR LAW SPECTRA
ALL ENERGIES MUST BE ASCENDING ENERGY ORDER. FOR SPECTRA
CONVERGENCE OF THE LINEARIZING ALGORITHM ALL ERRORS SPECTRA
MUST BE POSITIVE. IF AN ALLOWABLE ERROR IS NOT SPECTRA
POSITIVE IT WILL BE SET EQUAL TO THE STANDARD OPTION SPECTRA
(CURRENTLY 0.001, CORRESPONDING TO 0.1 PER-CENT). SPECTRA
IF THE FIRST ERROR LINE IS BLANK IT WILL TERMINATE SPECTRA
THE ERROR LAW AND THE ERROR WILL BE TREATED AS SPECTRA
ENERGY INDEPENDENT, EQUAL TO THE STANDARD OPTION SPECTRA
(CURRENTLY 0.1 PER-CENT). (SEE EXAMPLE INPUT 4). SPECTRA
SPECTRA
EXAMPLE INPUT NO. 1 SPECTRA
------------------- SPECTRA
RETRIEVE DATA BY ZA IN ORDER TO FIND ALL URANIUM ISOTOPES AND SPECTRA
THORIUM 232. RETRIEVE ALL NEUTRON INTERACTION CROSS SECTIONS SPECTRA
(MF=3). ALL ENERGY INTERVALS IN WHICH THE CROSS SECTION IS SPECTRA
AT LEAST 1 MICRO-BARN (1.0E-06 BARNS) WILL BE SUBDIVIDED. SPECTRA
BACKWARD THINNING WILL BE PERFORMED. FROM 0 TO 100 EV LINEARIZE SPECTRA
TO WITHIN 0.1 PER-CENT ACCURACY. FROM 100 EV TO 1 KEV VARY SPECTRA
ACCURACY BETWEEN 0.1 AND 1.0 PER-CENT. ABOVE 1 KEV USE 1 SPECTRA
PER-CENT ACCURACY. SPECTRA
SPECTRA
EXPLICITLY SPECIFY THE STANDARD FILENAMES. SPECTRA
SPECTRA
IN THIS CASE THE FOLLOWING 11 INPUT LINES ARE REQUIRED SPECTRA
SPECTRA
1 0 1.00000- 6 0 SPECTRA
ENDFB.IN SPECTRA
ENDFB.OUT SPECTRA
92000 3 0 92999 3999 SPECTRA
90232 3 0 0 3 0 (UPPER LIMIT AUTOMATICALLY SET TO 90232 3999)SPECTRA
(END OF REQUEST LIST) SPECTRA
0.00000+ 0 1.00000-03 SPECTRA
1.00000+ 2 1.00000-03 SPECTRA
1.00000+ 3 1.00000-02 SPECTRA
1.00000+ 9 1.00000-02 SPECTRA
(END OF ERROR LAW) SPECTRA
SPECTRA
EXAMPLE INPUT NO. 2 SPECTRA
------------------- SPECTRA
SAME AS THE ABOVE CASE, EXCEPT LINEARIZE ALL DATA TO WITHIN THE SPECTRA
STANDARD ACCURACY (CURRENTLY 0.1 PER-CENT). IN ORDER TO USE THE SPECTRA
STANDARD ACCURACY YOU NEED NOT SPECIFY ANY ERROR LAW AT ALL. IN SPECTRA
THIS CASE INCLUDE THE HOLLERITH SECTION, MF=1, MT=451, FOR EACH SPECTRA
MATERIAL. SPECTRA
SPECTRA
LEAVE THE DEFINITION OF THE FILENAMES BLANK - THE PROGRAM WILL SPECTRA
THEN USE STANDARD FILENAMES. SPECTRA
SPECTRA
IN THIS CASE THE FOLLOWING 9 INPUT LINES ARE REQUIRED SPECTRA
SPECTRA
1 0 1.00000- 6 0 SPECTRA
(USE DEFAULT FILENAME = ENDFB.IN) SPECTRA
(USE DEFAULT FILENAME = ENDFB.OUT) SPECTRA
92000 1451 92999 1451 SPECTRA
92000 3 0 92999 3999 SPECTRA
90232 1451 0 1451 SPECTRA
90232 3 0 0 3 0 (UPPER LIMIT AUTOMATICALLY SET TO 90232 3999)SPECTRA
(END OF REQUEST LIST) SPECTRA
(0.1 PER-CENT ERROR, END OF ERROR LAW) SPECTRA
SPECTRA
EXAMPLE INPUT NO. 3 SPECTRA
------------------- SPECTRA
LINEARIZE ALL MATERIALS ON AN ENDF/B TAPE TO WITHIN AN ACCURACY SPECTRA
OF 0.5 PER-CENT (0.005 AS A FRACTION). IN THIS CASE YOU NEED NOT SPECTRA
SPECIFY THE MAT, MF, MT RANGES. SPECTRA
SPECTRA
READ THE ENDF/B DATA FROM \ENDFB6\ZA092238 AND WRITE THE ENDF/B SPECTRA
DATA TO \ENDFB6\LINEAR\ZA092238. SPECTRA
SPECTRA
IN THIS CASE THE FOLLOWING 6 INPUT LINES ARE REQUIRED SPECTRA
SPECTRA
(MAT, 1.0E-10 BARNS, THIN)SPECTRA
\ENDFB6\ZA092238 SPECTRA
\ENDFB6\LINEAR\ZA092238 SPECTRA
(RETRIEVE ALL DATA, END REQUEST LIST) SPECTRA
5.00000-03 SPECTRA
(END OF ERROR LAW) SPECTRA
SPECTRA
NOTE THAT IN THIS CASE IF THE INPUT HAD SPECIFIED AN EQUIVALENT SPECTRA
ENERGY DEPENDENT ERROR LAW BY GIVING A NUMBER OF ENERGY POINTS SPECTRA
AT EACH OF WHICH THE ERROR IS 0.5 PER-CENT THE PROGRAM WOULD TAKE SPECTRA
LONGER TO RUN (I.E., ONLY USE AN ENERGY DEPENDENT ERROR LAW WHEN SPECTRA
IT IS NECESSARY). SPECTRA
SPECTRA
EXAMPLE INPUT NO. 4 SPECTRA
------------------- SPECTRA
IN ORDER TO LINEARIZE ALL MATERIALS ON AN ENDF/B TAPE TO THE SPECTRA
STANDARD OPTION OF 0.1 PER-CENT IT IS ADEQUATE TO INPUT A SET SPECTRA
OF COMPLETELY BLANK LINES WHICH WILL AUTOMATICALLY INVOKE ALL SPECTRA
OF THE STANDARD OPTIONS. SPECTRA
SPECTRA
LEAVE THE DEFINITION OF THE FILENAMES BLANK - THE PROGRAM WILL SPECTRA
THEN USE STANDARD FILENAMES. SPECTRA
SPECTRA
IN THIS CASE THE FOLLOWING THREE INPUT LINES ARE REQUIRED SPECTRA
SPECTRA
(MAT, 1.0E-10 BARNS, THIN)SPECTRA
(USE DEFAULT FILENAME = ENDFB.IN) SPECTRA
(USE DEFAULT FILENAME = ENDFB.OUT) SPECTRA
(RETRIEVE ALL DATA, END REQUEST LIST) SPECTRA
(0.1 PER-CENT ERROR, END OF ERROR LAW) SPECTRA
SPECTRA
=======================================================================SPECTRA