MIME-Version: 1.0 Content-Location: file:///C:/CE966F10/Fixup.htm Content-Transfer-Encoding: quoted-printable Content-Type: text/html; charset="us-ascii"
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
PROGRAM
FIXUP =
&nb=
sp; =
&nb=
sp;
Fixup
VERSION 84=
-1
(NOVEMBER 1984) =
&nb=
sp; =
Fixup
VERSION 86=
-1
(JANUARY 1986) *IMPROVED BASED ON USER COMMENTS Fixu=
p
=
&nb=
sp;
*FORTRAN-77/H VERSION =
Fixup
VERSION 86=
-2 (JUNE
1986) *ALLOW CREA=
TION
OF SECTIONS OF CROSS
Fixup
=
&nb=
sp; =
SECTIONS WHICH ARE NOT PRESENT IN Fixup
=
&nb=
sp; =
THE ORIGINAL EVALUATION =
Fixup
VERSION 88=
-1
(JULY 1988)
*OPTION...INTERNALLY DEFINE ALL I/O Fixup
=
&nb=
sp; =
FILE NAMES (SEE, SUBROUTINE FILEIO Fixup
=
&nb=
sp; =
FOR DETAILS). =
&nb=
sp;
Fixup
=
&nb=
sp;
*IMPROVED BASED ON USER COMMENTS. Fixup
VERSION 89=
-1
(JANUARY 1989) *PSYCHOANALYZED BY PROGRAM FREUD TO Fixup
=
&nb=
sp; =
INSURE PROGRAM WILL NOT DO ANYTHING Fixup
=
&nb=
sp; =
CRAZY.
=
&nb=
sp; Fixup
=
&nb=
sp;
*UPDATED TO USE NEW PROGRAM CONVERT Fixup
=
&nb=
sp; =
KEYWORDS. =
&nb=
sp;
Fixup
=
&nb=
sp;
*ADDED
=
&nb=
sp; =
CONVENTIONS. =
&nb=
sp;
Fixup
VERSION 89=
-2
(MARCH 1989) *ADDED END=
F/B-VI
SUMMATION RULES AND Fix=
up
=
&nb=
sp; =
DEFINED MF AND MT NUMBERS. PROGRAM Fixup
=
&nb=
sp; =
WILL NOW USE MF=3D1, MT=3D451 TO DEFINE Fixup
=
&nb=
sp; =
THE ENDF/B FORMAT OF THE DATA (E.G., Fixup
=
&nb=
sp; =
ENDF/B-VI OR EARLIER) AND USE THE Fixup
=
&nb=
sp; =
CORRECT SUMMATION RULES FOR EACH Fixup
=
&nb=
sp; =
VERSION OF THE ENDF/B FORMAT. IF Fixup
=
&nb=
sp; =
MF=3D1, MT=3D451 IS NOT PRESENT PROGRAM Fixup
=
&nb=
sp; WILL
USE ENDF/B-VI SUMMATION =
Fixup
=
&nb=
sp; =
CONVENTIONS AS A DEFAULT. =
Fixup
VERSION 90=
-1
(JUNE 1990) *UPDA=
TED
BASED ON USER COMMENTS
Fixup
=
=
*ADDED
PHOTON INTERACTION, MF=3D23 Fixu=
p
VERSION 91=
-1
(JUNE 1991) *ADDED
FORTRAN SAVE OPTION =
Fixup
=
&nb=
sp;
*NEW MORE CONSISTENT ENERGY OUTPUT Fixup
=
&nb=
sp;
ROUTINE =
&nb=
sp;
Fixup
VERSION 92=
-1
(JANUARY 1992) *ADDED OPTION TO CALCULATE RATIOS, Fixup
=
&nb=
sp; =
E.G., CAPTURE/FISSION AND PRODUCTS, Fixup
=
&nb=
sp; =
NU-BAR*FISSION - AND OUTPUT THE Fixu=
p
=
&nb=
sp; =
RESULTS IN THE ENDF/B FORMAT (SEE, Fixup
=
&nb=
sp; =
BELOW - CREATING RATIOS AND PRODUCTS) Fixup
=
&nb=
sp;
*ALLOW TOTAL NU-BAR (MF=3D1, MT=3D452) TO Fixup
=
&nb=
sp; =
BE USED IN DEFINING RATIOS OR
Fixup
=
&nb=
sp; =
PRODUCTS. =
&nb=
sp;
Fixup
=
&nb=
sp;
*ALLOW ALL CROSS SECTIONS TO BE PUT Fixup
=
&nb=
sp; =
ON A UNIFORM ENERGY GRID. =
Fixup
=
&nb=
sp;
*NOTE, CHANGE IN INPUT FORMAT FOR Fixup
=
&nb=
sp; =
RANGES OF MT NUMBERS =
Fixup
=
&nb=
sp;
*COMPLETELY CONSISTENT I/O ROUTINES - Fixup
=
&nb=
sp; =
TO MINIMIZE COMPUTER DEPENDENCE. Fixup
VERSION 93=
-1
(JULY 1993) *CORR=
ECTED
ALGORITHM TO CREATE UNIFORM Fixup &nb=
sp;
=
&nb=
sp; =
ENERGY GRID. =
&nb=
sp;
Fixup
VERSION 94=
-1
(JANUARY 1993) *VARIABLE ENDF/B DATA FILENAMES
Fixup
=
&nb=
sp; =
TO ALLOW ACCESS TO FILE STRUCTURES Fixup
=
&nb=
sp; (WARNING
- INPUT PARAMETER FORMAT =
Fixup
=
&nb=
sp; =
HAS BEEN CHANGED) =
Fixup
=
&nb=
sp;
*INCREASED PAGE SIZE FROM 1002 TO Fixup
=
=
12=
000
DATA POINTS. =
Fixup
=
&nb=
sp;
*CLOSE ALL FILES BEFORE TERMINATING Fixup
=
&nb=
sp; =
(SEE, SUBROUTINE ENDIT) =
Fixup
VERSION 96=
-1
(JANUARY 1996) *COMPLETE RE-WRITE =
Fixup
=
&nb=
sp;
*IMPROVED COMPUTER
=
&nb=
sp;
*ALL DOUBLE PRECISION =
Fixup
=
&nb=
sp;
*ON SCREEN OUTPUT =
&nb=
sp;
Fixup
=
&nb=
sp;
*UNIFORM TREATMENT OF ENDF/B I/O Fixu=
p
=
&nb=
sp;
*IMPROVED OUTPUT PRECISION =
Fixup
=
&nb=
sp;
*DEFINED SCRATCH FILE NAMES =
Fixup
=
&nb=
sp;
*INCREASED PAGE SIZE FROM 12000 TO Fixup
=
&nb=
sp; =
36000 DATA POINTS. =
Fixup
VERSION 99=
-1
(MARCH 1999) *CORRECTED
CHARACTER TO FLOATING Fixu=
p
=
&nb=
sp; =
POINT READ FOR MORE DIGITS =
Fixup
=
&nb=
sp;
*UPDATED TEST FOR ENDF/B FORMAT
Fixup
=
&nb=
sp; =
VERSION BASED ON RECENT FORMAT CHANGE Fixup
=
&nb=
sp;
*GENERAL IMPROVEMENTS BASED ON
Fixup
=
&nb=
sp; =
USER FEEDBACK =
&nb=
sp;
Fixup
VERSION 99=
-2
(JUNE 1999) *ASSU=
ME
ENDF/B-VI, NOT V, IF MISSING
Fixup
=
&nb=
sp; =
MF=3D1, MT-451. =
&nb=
sp;
Fixup
=
&nb=
sp;
*FIXED CREATION OF SECTIONS =
Fixup
VERS. 2000=
-1
(FEBRUARY 2000)*GENERAL IMPROVEMENTS BASED ON
Fixup
=
&nb=
sp; USER
FEEDBACK =
&nb=
sp;
Fixup
VERS. 2002=
-1
(MAY 2002)
*OPTIONAL INPUT PARAMETERS =
Fixup
=
&nb=
sp;
*SUMMATION RULES ARE DEFINED BASED Fixup
=
=
&nb=
sp;ON
CONTENTS OF TABLES. =
Fixup
VERS. 2004=
-1
(JAN. 2004) *GENE=
RAL
UPDATE BASED ON USER FEEDBACK Fixup &=
nbsp;
=
&nb=
sp;
*INCREASED PAGE SIZE FROM 36000 TO Fixup
=
&nb=
sp;
=
60000
DATA POINTS. =
Fixup
VERS. 2005=
-1
(JAN. 2005) *UPDA=
TED MT
CREATION TO ALLOW MAT =3D0
Fixup
=
&nb=
sp; =
INDICATING CREATE FOR ALL MATS. Fixu=
p
VERS. 2007=
-1
(JAN. 2007) *CHEC=
KED
AGAINST ALL ENDF/B-VII
Fixup
=
&nb=
sp;
*INCREASED PAGE SIZE FROM 60,000 TO Fixup
=
&nb=
sp; =
600,000 DATA POINTS. =
Fixup
=
&nb=
sp; =
=
&nb=
sp; Fixup
OWNED,
MAINTAINED AND DISTRIBUTED BY =
&nb=
sp;
Fixup
------------------------------------ =
&nb=
sp;
Fixup
THE NUCLEA=
R DATA
SECTION =
&nb=
sp;
=
Fi=
xup
INTERNATIO=
NAL
ATOMIC ENERGY AGENCY =
&nb=
sp;
Fixup
P.O. BOX
100 =
&nb=
sp; =
&nb=
sp;
Fixup
A-1400, VI=
ENNA,
AUSTRIA =
&nb=
sp; =
=
Fixup
EUROPE =
&nb=
sp; =
&nb=
sp; =
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
ORIGINALLY
WRITTEN BY =
&nb=
sp; =
Fixup
------------------------------------ =
&nb=
sp;
Fixup
DERMOTT E.
CULLEN =
&nb=
sp; =
&nb=
sp;
Fixup
UNIVERSITY=
OF
CALIFORNIA =
&nb=
sp; =
Fixup
LAWRENCE LIVERMORE
NATIONAL LABORATORY =
&nb=
sp;
Fixup
L-159 =
&nb=
sp; =
&nb=
sp; =
Fixup
P.O. BOX
808 =
&nb=
sp; =
&nb=
sp;
Fixup
LIVERMORE,=
CA
94550 =
&nb=
sp; =
&nb=
sp;
Fixup
U.S.A. =
&nb=
sp; =
&nb=
sp; =
Fixup
TELEPHONE<=
span
style=3D'mso-spacerun:yes'> 925-423-7359 =
&nb=
sp; =
Fixup
E. MAIL
WEBSITE
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
PURPOSE
=3D=3D=3D=
=3D=3D=3D=3D =
&nb=
sp; =
&nb=
sp; =
Fixup
THIS PROGR=
AM IS
DESIGNED TO READ EVALUATED DATA IN THE ENDF/B Fixup
FORMAT, PE=
RFORM
CORRECTIONS AND OUTPUT THE RESULT IN THE ENDF/B Fixup
FORMAT. TWO
TYPES OF CORRECTIONS ARE POSSIBLE (1) AUTOMATIC AND Fixup
(2) OPTION=
AL
(BASED ON USER INPUT) CORRECTIONS. =
Fixup
=
&nb=
sp; =
&nb=
sp;
=
&nb=
sp;Fixup
ONE OF THE=
MOST
IMPORTANT FUNCTIONS OF THIS PROGRAM IS TO =
Fixup
RE-DEFINE =
ALL
REDUNDANT CROSS SECTIONS (E.G. TOTAL) TO BE EXACTLY Fixup
EQUAL TO T=
HE SUM
OF ITS PARTS. THIS PROCEDURE ELIMINATES THE Fixu=
p
PROBLEM WI=
TH
MANY ENDF/B EVALUATIONS, WHERE DUE TO THE USE OF Fixup
NON-LINEAR
INTERPOLATION LAWS THE TOTAL MAY BE EQUAL TO THE SUM Fixup
OF ITS PAR=
TS AT
ALL TABULATED ENERGIES, BUT BASED ON THE =
Fixup
INTERPOLAT=
ION
LAWS IT CAN BE QUITE DIFFERENT AT ENERGIES BETWEEN Fixup
TABULATED
ENERGIES. =
&nb=
sp; =
&nb=
sp;
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
AUTOMATIC
CHECKS/CORRECTIONS =
&nb=
sp; =
Fixup
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D =
&nb=
sp; =
Fixup
(1) CHECK =
THAT
MAT/MF/MT DOES NOT CHANGE UNLESS A MEND/FEND/SEND Fixup
=
LINE IS READ. IF MAT/MF/MT CHANGES A WARNING MESSAGE IS
Fixup
=
PRINTED BUT NO CORRECTIVE ACTION IS TAKEN. =
Fixup
(2) ALL LI=
NES
WITHIN A GIVEN MAT WILL BE SEQUENTIALLY NUMBERED Fixup
=
ON OUTPUT. =
&nb=
sp; =
&nb=
sp;
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
OPTIONAL
CHECKS/CORRECTIONS =
&nb=
sp; =
Fixup
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D =
&nb=
sp; =
Fixup
THE FOLLOW=
ING
NUMBERS CORRESPOND TO THE INPUT DATA OPTION COLUMNS Fixup
(SEE THE
DESCRIPTION OF THE INPUT BELOW) =
&nb=
sp;
Fixup
=
&nb=
sp; =
=
&nb=
sp; =
Fixup
(1) CORREC=
T ZA
AND AWR IN ALL SECTIONS. CHECK TO INSURE THAT THE Fixup
=
C1 AND C2 VALUES (ZA AND AWR) ARE THE SAME IN ALL SECTIONS. Fixup
=
THE C1 AND C2 OF THE FIRST SECTION READ ARE ASSUMED TO BE Fixup
=
CORRECT AND ARE USED FOR COMPARISON. IF THE C1 AND/OR C2 OF Fixup
=
THE FIRST SECTION ARE NOT POSITIVE AN ERROR MESSAGE IS OUTPUT Fixup
=
AND THE MATERIAL IS COPIED WITHOUT CHANGE. =
Fixup
=
NOTE....TO CHANGE THE ZA AND/OR AWR OF ANY MATERIAL IT IS Fixup
=
MERELY NECESSARY TO CHANGE THE ZA AND/OR AWR IN THE FIRST Fixup
=
SECTION OF THE MATERIAL AND USE THIS OPTION TO AUTOMATICALLY Fixup
=
CHANGE ALL OTHER SECTIONS. =
&nb=
sp; =
Fixup
(2) CORRECT
CROSS SECTION (MF=3D3) THRESHOLDS. THE Q-VALUE AND AWR Fixup
=
ARE USED TO DERIVE THE REACTION THRESHOLD USING THE RELATION, Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
=
E-THRESHOLD =3D -(Q-VALUE)*(AWRE+1.0)/AWRE =
&nb=
sp;
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
IF THE THRESHOLD IS POSITIVE =
THE
CROSS SECTION IS CHECKED TO
Fixup
=
INSURE THAT THE FIRST TABULATED POINT IS AT THE THRESHOLD AND Fixup
=
HAS A ZERO CROSS SECTION. IF NOT, THE CROSS SECTION WILL BE Fixup
=
CHANGED. =
&nb=
sp; =
&nb=
sp;
Fixup
=
(A) IF THE FIRST TABULATED POINT IS ABOVE THE THRESHOLD AND Fixup
=
HAS A ZERO CROSS SECTION, THE POINT IS DELETED AND A POINT Fixup
=
IS INSERTED AT THE THRESHOLD. =
&nb=
sp;
Fixup
=
(B) IF THE FIRST TABULATED POINT IS ABOVE THE THRESHOLD AND Fixup
=
HAS A NON-ZERO CROSS SECTION, A POINT WITH ZERO CROSS Fixup
=
SECTION IS INSERTED AT THE THRESHOLD. =
&nb=
sp;
Fixup
=
(C) IF THE FIRST TABULATED POINT IS BELOW THE THRESHOLD AND Fixup
=
HAS A NON-ZERO CROSS SECTION, ALL POINTS BELOW THE
Fixup
=
THRESHOLD ARE DELETED AND A POINT WITH ZERO CROSS SECTION Fixup
=
IS INSERTED AT THE THRESHOLD. =
&nb=
sp;
Fixup
(3) EXTEND=
ALL
CROSS SECTIONS (MF=3D3) TO 20 MEV. IF THE TABULATED Fixup
=
CROSS SECTION ENDS BELOW 20 MEV IT WILL BE EXTENDED TO 20 MEV Fixup
=
AS EITHER ZERO (IMOPS(3)=3D1) OR CONSTANT (IMOPS(3)=3D2) EQUAL Fixup
=
TO THE LAST TABULATED VALUE. =
&nb=
sp; =
Fixup
(4) ALLOW
REACTION (MF=3D3, ANY MT) DELETION. ALL SPECIFIED Fixup
=
REACTIONS WILL BE DELETED WHEN THE DATA IS READ FROM THE Fixu=
p
=
INPUT ENDF/B DATA FILE AND WILL NOT BE IN THE OUTPUT ENDF/B Fixup
=
DATA FILE. WARNING DELETED REACTIONS MAY NOT BE USED TO DEFINE Fixup=
=
ANY RECONSTRUCTED REACTIONS (I.E. REACTIONS DEFINED BY SUMMING
Fixup
=
OTHER REACTIONS). SINCE DELETED REACTIONS ARE DELETED DURING Fixup
=
READING IT IS AS IF THEY NEVER EXISTED AND IF ANY DELETED Fixup
REACTION IS REQUI=
RED
LATER TO DEFINE ANY SUM AN ERROR WILL Fixup
=
RESULT. THE USER MAY SPECIFY THAT THE DELETION RULES ARE TO BE
Fixup
=
READ FROM INPUT (IMOPS(4)=3D1) OR THAT THE BUILT IN SUMMATION Fixup
=
RULES ARE TO BE USED (MOPS(4)=3D2). AT THE PRESENT TIME THE Fixup
=
BUILT-IN DELETION RULES ARE THAT NO SECTIONS SHOULD BE DELETED
Fixup
=
(THE USER MAY OVERRIDE THIS CONVENTION BY INPUT). =
Fixup
(5) ALLOW
REACTION (MF=3D3, ANY MT) RECONSTRUCTION BY SUMMING OTHER Fixup
=
REACTIONS. IN ORDER TO OPTIMIZE THE RUNNING TIME OF THIS Fixu=
p
=
PROGRAM CARE SHOULD BE EXERCISED TO MINIMIZE THE NUMBER OF Fixup
=
TIMES THAT EACH CONTRIBUTING CROSS SECTION MUST BE USED. Fixu=
p
=
THE USED MAY SPECIFY THAT THE SUMMATION RULES ARE TO BE READ Fixup
=
AS INPUT (IMOPS(5)=3D1) OR THAT THE BUILT IN SUMMATION RULES Fixup
=
ARE TO BE USED (IMOPS(5)=3D2). THE BUILT IN SUMMATION RULES ARE Fixup
=
DESIGNED TO USE ENDF/B CONVENTIONS AND TO MINIMIZE THE NUMBER Fixup
=
OF TIMES THAT EACH CROSS SECTION IS USED. =
&nb=
sp;
Fixup
(6) INSURE=
THAT
ALL CROSS SECTIONS ARE NON-NEGATIVE (I.E. ARE Fixup
=
ZERO OR POSITIVE). DURING READING ALL NEGATIVE CROSS SECTIONS Fixup
=
WILL BE SET EQUAL TO ZERO AND TREATED AS SUCH DURING ALL Fixu=
p
=
SUBSEQUENT SUMMATIONS AND ENDF/B OUTPUT. =
Fixup
=
NOTE...THIS OPTION SHOULD NEVER BE USED WITH DATA CONTAINING Fixup
=
BACKGROUND CROSS SECTIONS WHICH MAY BE NEGATIVE. ONLY AFTER Fixup
=
THE RESONANCE CONTRIBUTION HAS BEEN ADDED TO THE BACKGROUND Fixup
=
TO DEFINE THE ACTUAL CROSS SECTION IS IT VALID TO ELIMINATE Fixup
=
NEGATIVE CROSS SECTIONS. =
&nb=
sp; =
Fixup
=
NOTE...THIS OPTION MAY BE USED TO DELETE NEGATIVE ELASTIC Fixup
CROSS
SECTIONS THAT MAY RESULT FROM RECONSTRUCTING CROSS Fixu=
p
=
SECTIONS FROM SINGLE LEVEL BREIT-WIGNER PARAMETERS. IF THE Fixup
=
TOTAL CROSS SECTION IS THEN RECONSTRUCTED USING THE CORRECTED Fixup
=
ELASTIC CROSS SECTION THE TOTAL WILL BE POSITIVE DUE TO THE Fixup
=
CONTRIBUTIONS OF CAPTURE AND FISSION (THUS AVOIDING NUMERICAL Fixup
=
INSTABILITY PROBLEMS DURING SELF-SHIELDING CALCULATIONS). Fixup
(7) WITHIN=
EACH
SECTION OF CROSS SECTIONS DELETE ENERGIES THAT Fixup
=
ARE NOT IN ASCENDING ENERGY ORDER (ENERGY REPETITION IS O.K.) Fixup
(8) WITHIN=
EACH
SECTION OF CROSS SECTIONS ELIMINATE DUPLICATE Fixup
=
POINTS (SUCCESSIVE POINTS WITH THE SAME ENERGY-CROSS SECTION).
Fixup
(9) TEST T=
HAT
ALL SECTIONS ARE IN ASCENDING MAT/MF/MT ORDER. Fixu=
p
=
IF NOT, NO CORRECTIVE ACTION WILL BE TAKEN, ONLY AN ERROR Fixup
=
MESSAGE WILL BE OUTPUT. =
=
&nb=
sp; Fixup
(10) CHECK MF/MT=
FOR
EACH SECTION TO INSURE THAT THEY ARE DEFINED Fixup
=
IN THE ENDF/B FORMAR MANUAL. IF THEY ARE NOT DEFINED AN ERROR Fixup
=
MESSAGE IS PRINTED, BUT NO CORRECTIVE ACTION IS TAKEN.
Fixup
(11) ALLOW SECTI=
ONS
WHICH ARE NOT PRESENT IN THE ORIGINAL (INPUT) Fixup
=
EVALUATION TO BE CREATED. NORMALLY THIS PROGRAM WILL ONLY Fixup
=
RECONSTRUCT AND OUTPUT SECTIONS IF THE SECTION IS PRESENT Fixup
=
IN THE ORIGINAL EVALUATION. THIS PROCEDURE IS FOLLOWED BECAUSE
Fixup
=
NORMALLY THE PROGRAM DOES NOT KNOW HOW TO DEFINE THE CONTENTS Fixup
=
OF THE FIRST TWO LINES OF THE SECTION (E.G., Q-VALUE, =
Fixup
=
TEMPERATURE, INITIAL AND FINAL STATES). THIS OPTION MAY BE Fixup
=
USED TO ALLOW THE PROGRAM TO READ AND SAVE A TABLE DEFINING Fixup
=
THE CONTENTS OF THE FIRST TWO LINES OF EACH SECTION TO BE Fixup
CREATED. =
&nb=
sp; =
&nb=
sp;
Fixup
=
NOTE...IF A SECTION IS PRESENT ANY COMMAND TO CREATE IT WILL Fixup
=
BE IGNORED. =
&nb=
sp; =
&nb=
sp;
Fixup
(12)ALLOW =
ENERGY
POINTS TO BE INSERTED. THE PROGRAM CAN READ UP Fixup
=
TO 50, ENERGIES, MAT, MT AND USE LINEAR INTERPOLATION TO Fixu=
p
=
INSERT ENERGY POINTS INTO TABLES AS THEY ARE READ, E.G., Fixu=
p
=
INSERT AN ENERGY POINT AT THERMAL ENERGY (0.0253 EV). IF Fixu=
p
=
AN MAT AND/OR MT IS ZERO THIS IMPLIES =3D ALL - INSERT THE Fixu=
p
=
ENERGY IN ALL TABLES. =
&nb=
sp; =
Fixup
(13)PUT AL=
LOW
CROSS SECTIONS ON A UNIFORM ENERGY GRID =3D EACH Fixu=
p
=
SECTION (MT) OF CROSS SECTIONS WILL INCLUDE ALL ENERGIES Fixu=
p
=
WHICH APPEAR IN AT LEAST ONE SECTION OF DATA. PARAMETERS Fixu=
p
=
(MT=3D251 THROUGH 255) ARE NOT INCLUDED IN THE UNIFORM ENERGY Fixup
=
GRID. =
&nb=
sp; =
&nb=
sp;
Fixup
(14)DELETE
SECTION IF CROSS SECTION =3D 0 AT ALL ENERGIES. THIS Fixup
=
SOUNDS LIKE AN ABSURD OPTION, BUT IS REQUIRED BECAUSE SUCH Fixup
=
SECTIONS EXIST IN ENDF/B-VI. =
&nb=
sp; =
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
CREATING R=
ATIOS
AND PRODUCTS =
&nb=
sp;
=
Fixup
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D =
&nb=
sp; =
Fixup
IN ORDER TO
CREATE RATIOS AND PRODUCTS =3D NEW MT NUMBERS, YOU MUST Fixup
DO TWO
THINGS, =
&nb=
sp; =
&nb=
sp;
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
1) DEFINE =
EACH
NEW MT NUMBER AS A RATIO OR PRODUCT OF TWO MT Fixu=
p
NUMBERS. =
&nb=
sp; =
&nb=
sp;
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
2) USE THE
CREATE MT NUMBER OPTION AND INPUT THE FIRST TWO LINES Fixup
OF THE SECTION =
&nb=
sp; =
&nb=
sp;
Fixup
=
&nb=
sp; =
&nb=
sp; =
Fixup
WARNING - =
UNLESS
YOU DO BOTH OF THESE YOU WILL NOT OBTAIN OUTPUT Fixup
IN THE END=
F/B
FORMAT. =
&nb=
sp; =
Fixup
=
=
&nb=
sp; =
&nb=
sp; Fixup
TWO SPECIA=
L MT
NUMBERS HAVE BEEN DEFINED BY CSEWG INVOLVING
Fixup
RATIOS AND
PRODUCTS, =
&nb=
sp; =
&nb=
sp;
Fixup
=
&nb=
sp;
=
&nb=
sp; =
Fi=
xup
ALPHA (MT=
=3D254)=3D
CAPTURE (MT=3D102)/FISSION (MT=3D18) =
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
ETA
(MT=3D255) =3D NU-BAR (MT=3D4=
52)*FISSION
(MT=3D18)/ABSORPTION (MT=3D27) Fixup =
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
ABSORPTION
(MT=3D27) =3D FISSION (MT=3D18) + SUM (MT=3D102 THROUGH 116) Fixup
=
&nb=
sp; =
&nb=
sp;
=
&nb=
sp; Fixup
AS YET THE=
RE IS
NO STANDARD DEFINITION OF MT NUMBERS FOR RATIO Fixup
OR PRODUCT=
DATA.
YOU ARE FREE TO USE ANY MT NUMBERS NORMALLY NOT Fixup
USED IN THE
ENDF/B. HOWEVER, IT WILL THEN BE YOUR RESPONSIBILITY Fixup
TO PROPERLY
INTERPRET THE RESULTS, I.E., NOBODY ELSE WILL HAVE Fixup
ANY IDEA H=
OW TO
INTERPRET A TABLE OF DATA ASSOCIATED WITH THE MT Fixup
NUMBERS YO=
U HAVE
USED. =
&nb=
sp; =
Fixu=
p
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
THIS PROGR=
AM CAN
BE ONLY DIRECTLY DEFINE RATIOS AND PRODUCTS Fixu=
p
USING TWO =
MT
NUMBERS =3D BINARY OPERATIONS, E.G., DEFINE THE CAPTURE Fixup
TO FISSION
RATIO, OR DEFINE THE PRODUCT NU-BAR*FISSION. =
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
THIS PROGR=
AM
CANNOT DIRECTLY DEFINE RATIO OR PRODUCT OF A SUM OF Fixup
SECTIONS T=
O THE
SUM OF ANOTHER SET OF SECTIONS. HOWEVER, THIS CAN Fixup
BE DONE
INDIRECTLY BY FIRST DEFINING A DUMMY MT NUMBER (ANY MT Fixup
NUMBER NOT
NORMALLY USED IN ENDF/B) TO BE A SUM OF SECTIONS AND Fixup
A SECOND D=
UMMY
MT NUMBER TO BE A SECOND SUM OF SECTIONS. YOU CAN Fixup
THEN DEFINE
RATIO OR PRODUCT YOU REQUIRE TO BE THE RATIO OF THESE Fixup
TWO DUMMY =
MT
NUMBERS. =
&nb=
sp; =
Fixup
=
&nb=
sp;
=
&nb=
sp; =
&nb=
sp;Fixup
FOR EXAMPL=
E, TO
DEFINE ETA, =
&nb=
sp; =
Fixup
1) FIRST D=
EFINE
(MT=3D27) =3D (MT=3D27) + (SUM OF MT=3D102 THROUGH 116) Fixup
2) NEXT DE=
FINE
(MT=3D333) =3D (MT=3D452)*(MT=3D18) =
&nb=
sp;
Fixup
3) LAST DE=
FINE
(MT=3D255) =3D (MT=3D333)/(MT=3D27) =
&nb=
sp;
Fixup
DO NOT FOR=
GET TO
TURN ON THE CREATE SECTION OPTION (ON THE FIRST Fixup
INPUT LINE=
) AND
INPUT THE FIRST TWO LINES OF SECTION MT=3D255 - Fixup
OTHERWISE =
YOU
WILL NOT GET ANY ENDF/B FORMATTED OUTPUT. =
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
THE ONLY S=
PECIAL
CONVENTIONS USED BY THIS PROGRAM IN CALCULATING Fixup
RATIOS ARE=
WHEN
THE DENOMINATOR OF THE RATIO IS ZERO. IN THIS Fixup
CASE IF THE
NUMERATOR IS ALSO ZERO THE RATIO IS DEFINED TO BE ONE. Fixup
IN THIS CA=
SE IF
THE NUMERATOR IS NOT ZERO THE RATIO IS DEFINED Fixup
TO BE ZERO=
. =
&nb=
sp; =
&nb=
sp;
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
ENDF/B
FORMAT =
&nb=
sp; =
&nb=
sp;
Fixup
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D =
&nb=
sp; =
&nb=
sp;
Fixup
THIS PROGR=
AM MAY
BE USED WITH DATA IN ANY VERSION OF THE ENDF/B Fixup
FORMAT (I.=
E.
ENDF/B-I, II, III, IV, V OR VI FORMAT). SINCE A Fixu=
p
PAGING SYSTEM IS USED STORE CROSS S=
ECTION
TABLES ON SCRATCH FILES Fixup=
THERE IS NO
LIMIT TO THE SIZE OF TABLES (E.G. THE TOTAL CROSS Fixup
SECTION MA=
Y BE
REPRESENTED BY 200,000 TABULATED POINTS). =
Fixup
=
=
&nb=
sp; =
&nb=
sp; =
Fixup
WARNING
=3D=3D=3D=
=3D=3D=3D=3D =
&nb=
sp; =
&nb=
sp; =
Fixup
(1) FOR EA=
CH
SECTION OF CROSS SECTIONS (I.E. EACH MT, MF=3D3) IN Fixup
=
THE ORIGINAL EVALUATION (I.E. ENDF/B DATA READ) ONE SECTION Fixup
=
OF DATA WILL BE OUTPUT, UNLESS THE SECTION HAS BEEN DELETED. Fixup
=
THIS INCLUDES ANY SECTIONS WHICH ARE NOT PRESENT IN THE
Fixup
=
ORIGINAL EVALUATION, BUT THE USER INDICATES (BY INPUT) SHOULD Fixup
=
BE CREATED. =
&nb=
sp; =
&nb=
sp;
Fixup
=
&nb=
sp; =
=
&nb=
sp; Fixup
=
THE PROGRAM WILL NOT OUTPUT ANY SECTION RECONSTRUCTED BY Fixu=
p
=
SUMMATION UNLESS THE CORRESPONDING SECTION (MT NUMBER) IS Fixup
=
PRESENT IN THE ORIGINAL EVALUATION OR USER INPUT INDICATES Fixup
=
SHOULD BE CREATED AND OUTPUT. THIS IS (A) BECAUSE THE =
Fixup
=
PROGRAM CANNOT DEFINE THE PARAMETERS TO APPEAR ON THE FIRST Fixup
=
TWO LINES OF THE SECTION, (B) TO AVOID OUTPUTTING TOO MUCH Fixup
=
DATA WHICH THE USER MAY NOT BE INTERESTED IN. =
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
(2) FOR ANY
SECTIONS THAT DO NOT APPEAR IN THE ORIGINAL DATA THE Fixup
=
USER MAY SPECIFY THAT THEY BE DEFINED BY SUMMATION. ANY SUCH Fixup
=
SECTION MAY BE USED BE DEFINE SUBSEQUENT SUMS, BUT THE SECTION
Fixup
=
ITSELF WILL NOT BE OUTPUT (E.G. GENERALLY MT=3D27 AND 101 ARE Fixup
NOT
PRESENT IN EVALUATIONS. HOWEVER, THE BUILT-IN SUMMATION Fixup
=
RULES OF THIS PROGRAM USES THE ENDF/B SUMMATION RULES TO Fixu=
p
=
DEFINE MT=3D27 AND 101, WHICH IN TURN ARE USED TO DEFINE THE Fixup
=
NON-ELASTIC CROSS SECTION, MT=3D3. SECTIONS MT=3D27 AND 101 ARE Fixup
=
NOT OUTPUT). =
&nb=
sp; =
&nb=
sp;
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
(3) ALL DA=
TA IN
FILE 3 AND 23 MUST BE LINEARLY INTERPOLABLE. IF Fixup
=
THE DATA IS NOT LINEARLY INTERPOLABLE THIS PROGRAM WILL
Fixup
=
TERMINATE. =
&nb=
sp; =
&nb=
sp;
Fixup
=
&nb=
sp;
=
&nb=
sp; =
Fixup
PROGRAM
OPERATION =
&nb=
sp; =
&nb=
sp;
Fixup
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D =
&nb=
sp; =
&nb=
sp;
Fixup
ALL MAT NU=
MBER
ON AN ENDF/B TAPE ARE PROCESSED. EACH MAT IS
Fixup
TREATED
SEPARATELY. WITHIN EACH MAT, EACH SECTION BEFORE MF=3D3 Fixup
IS READ,
CHECKED/CORRECTED (BASED ON INPUT OPTIONS) AND OUTPUT. Fixup
WHEN MF=3D=
3 IS
LOCATED ALL CROSS SECTIONS ARE READ, SECTIONS TO BE Fixup
DELETED ARE
DELETED, SECTIONS WHICH ARE NOT PRESENTED AND USER Fixup
INPUT INDI=
CATES
SHOULD BE CREATED ARE CREATE, SECTIONS TO BE KEPT Fixup
ARE
CHECKED/CORRECTED (BASED ON INPUT OPTIONS) AND WRITTEN TO A Fixup
SCRATCH FI=
LE.
NEXT, IF THE USER SPECIFIES THAT THEY SHOULD,
Fixup
SECTIONS A=
RE
RECONSTRUCTED. FINALLY ALL CROSS SECTIONS (OLD AND Fixup
NEW) ARE O=
UTPUT.
WITHIN THE SAME MAT, EACH SECTION AFTER MF=3D3 IS Fixup
READ,
CHECKED/CORRECTED (BASED ON INPUT OPTIONS) AND OUTPUT. Fixu=
p
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
MF=3D3 =
&nb=
sp; =
&nb=
sp; =
Fixup
=3D=3D=3D=3D =
&nb=
sp; =
&nb=
sp; =
Fixup
THE TREATM=
ENT OF
THE CROSS SECTIONS REQUIRES UP TO 4 PASSES FOR Fixup
CROSS SECT=
IONS.
IN THE PROGRAM THEY CORRESPOND TO SUBROUTINES Fixup
PASS1, PAS=
S2,
PASS3 AND PASS4. THE ORIGINAL AND FINAL ENDF/B DATA Fixup
FILES, 5 S=
CRATCH
FILES AND 3 IN CORE ARRAYS ARE USED. OPERATIONS Fixup
PERFORMED =
DURING
EACH PASS ARE, =
&nb=
sp; =
Fixup
=
=
&nb=
sp; =
&nb=
sp; Fixup
PASS1 =
&nb=
sp; =
&nb=
sp; =
Fixup
=3D=3D=3D=
=3D=3D =
&nb=
sp; =
&nb=
sp; =
Fixup
READ ALL C=
ROSS
SECTIONS FROM ITAPE. DELETED ANY SECTIONS. CREATE Fixup
ANY SECTIO=
NS.
CHECK/CORRECT THEM AND WRITE THEM TO SCRATCH FILE. Fixup
DATA IS RE=
AD
INTO ARRAY A, TRANSFERRED TO ARRAY C (AFTER EDITING) Fixup
AND OUTPUT=
TO
ISCRC FROM ARRAY C. =
&nb=
sp; Fixup
ITAPE - UNIT ORIGINAL ENDF/B DATA IS READ
FROM. =
Fixup
ISCRC - SCRATCH UNIT THAT EDITED DATA IS
WRITTEN ON. =
Fixup
TABA - ARRAY INTO WHICH ORIGINAL =
DATA
IS READ. =
Fixup
TABC - ARRAY INTO WHICH EDITED DA=
TA IS
TRANSFERRED TO AND
Fixup
=
FROM WHICH IT IS WRITTEN TO ISCRC. =
&nb=
sp;
Fixup
=
&nb=
sp; =
&nb=
sp; =
=
Fixup
PASS2 =
&nb=
sp; =
&nb=
sp; =
Fixup
=3D=3D=3D=
=3D=3D =
&nb=
sp; =
&nb=
sp; =
Fixup
IF A UNIFO=
RM
ENERGY GRID IS REQUESTED IT IS CREATED DURING THIS Fixup
PASS. FIRS=
T ALL
OF THE CROSS SECTIONS FROM PASS1 ARE READ AND A Fixup
UNIFORM EN=
ERGY
GRID IS CREATED =3D ALL ENERGIES THAT ARE INCLUDED Fixup
IN AT LEAS=
T ONE
SECTION (MT) OF CROSS SECTIONS. =
Fixup
ISCRA - SCRATCH UNIT CONTAINING UNIFORM =
ENERGY
GRID. =
Fixup
ISCRB - SCRATCH UNIT CONTAINING UNIFORM =
ENERGY
GRID. =
Fixup
ISCRC - SCRATCH UNIT THAT EDITED DATA IS=
READ
FROM. =
Fixup
TABA - ARRAY CONTAINING UNIFORM E=
NERGY
GRID. =
Fixup
TABB - ARRAY CONTAINING UNIFORM E=
NERGY
GRID. =
Fixup
TABC - ARRAY CONTAINING EDITED
DATA. =
&nb=
sp;
Fixup
=
=
&nb=
sp; =
&nb=
sp; Fixup
THE UNIFORM
ENERGY GRID ENDS UP ON ISCRB. NEXT EACH SECTION OF Fixup
CROSS SECT=
IONS
FROM PASS1 IS READ FROM ISCRC, INTERPOLATED TO Fixup
THE UNIFORM
ENERGY GRID AND OUTPUT TO ISCRA. FINALLY ISCRA AND Fixup
ISCRC ARE
SWITCH, SO THAT AT THE END OF THIS PASS THE DATA WILL Fixup
AGAIN BE ON
ISCRC (EXACTLY AS AT THE END OF PASS1), WITH UPDATED Fixup
POINT
COUNTS. =
=
&nb=
sp; =
Fixup
ISCRA - SCRATCH UNIT THAT UNIFORM ENERGY=
GRID
DATA IS WRITTEN ON. Fixup
ISCRB - SCRATCH UNIT CONTAINING UNIFORM =
ENERGY
GRID. =
Fixup
ISCRC - SCRATCH UNIT THAT EDITED DATA IS=
READ
FROM. =
Fixup
TABA - ARRAY CONTAINING UNIFORM E=
NERGY
GRID DATA. =
Fixup
TABB - ARRAY CONTAINING UNIFORM E=
NERGY
GRID. =
Fixup
TABC - ARRAY CONTAINING EDITED
DATA. =
=
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
PASS3 =
&nb=
sp; =
&nb=
sp; =
Fixup
=3D=3D=3D=
=3D=3D =
&nb=
sp; =
&nb=
sp;
Fixu=
p
SUMMATION =
CROSS
SECTIONS ARE DEFINED BY READING DATA FROM ISCRC Fixup
AND MERGIN=
G THEM
ONTO ISCRA. THE FIRST SECTION THAT CONTRIBUTES Fixup
TO A SUM IS
MERELY COPIED FROM C TO A. IF MORE SECTIONS WILL Fixu=
p
CONTRIBUTE=
TO
THE SUM THE DATA IN A IS TRANSFERRED TO B, A
Fixup
SECTION OF=
DATA
FROM C IS ADDED TO THE DATA IN B AND STORED IN Fixup
A. THE CYL=
E OF
ADDED C AND B TO A, FOLLOWED BY MOVING A TO B Fixu=
p
IS CONTINU=
ED
UNTIL ALL CONTRIBUTING SECTIONS HAVE BEEN ADDED. Fixup
THE SUM IS=
THEN
COPIED FROM A TO D. IF NEWLY CONSTRUCTED SECTION Fixup
IS REQUIRE=
D FOR
ANY LATER SUMMUATIONS IT IS ALSO COPIED TO E. Fixup
THE CYCLE =
OF
ADDED SECTIONS FROM C AND B TO A IS REPEATED FOR Fixup
EACH REQUI=
RED
SUMMATION REACTION. IN ADDITION TO SECTIONS FROM Fixup
C, AFTER T=
HE
FIRST SUMMATION SECTIONS MAY ALSO BE ADDED TO A Fixu=
p
FROM E (THE
CONTRIBUTION OF NEW RECONSTRUCTED CROSS SECTIONS). Fixup
WHEN ALL
REQUIRED SECTIONS HAVE BEEN RECONSTRUCTED THE NEW
Fixup
SECTIONS W=
ILL BE
ON E AND THE ORIGINAL SECTIONS ON C. =
Fixup
ISCRC - SCRATCH FILE FROM WHICH ORIGINAL=
DATA
IS READ. =
Fixup
ISCRA - SCRATCH FILE ONTO WHICH SUM FOR =
ONE
SECTION IS WRITTEN. Fix=
up
ISCRD - SCRATCH FILE ONTO WHICH ALL SUM =
CROSS
SECTIONS ARE Fixup
=
WRITTEN. =
&nb=
sp;
=
&nb=
sp; Fixup
ISCRE - SCRATCH FILE ONTO WHICH ALL SUM =
CROSS
SECTIONS WHICH &nbs=
p;
Fixup
=
ARE REQUIRED FOR LATER SUMS ARE WRITTEN. =
Fixup
ISCRB - UTILITY SCRATCH FILE USED TO CRE=
ATE
SUM CROSS SECTIONS.
Fixup
TABA - ARRAY INTO WHICH SUMS ARE
WRITTEN. =
&nb=
sp;
Fixup
TABB - ARRAY INTO WHICH PARTIAL S=
UMS
ARE WRITTEN. =
Fixup
TABC - ARRAY INTO WHICH ORIGINAL =
DATA
IS READ. =
Fixup=
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
PASS4 =
&nb=
sp; =
&nb=
sp; =
Fixup
=3D=3D=3D=
=3D=3D =
&nb=
sp; =
&nb=
sp; =
Fixup
CROSS SECT=
IONS
ARE READ FROM ISCRC (ORIGINAL) AND ISCRD (NEW) Fixup
AND ARE WR=
ITTEN
IN THE ENDF/B FORMAT ON OTAPE. THE BEGINNING OF Fixup
EACH SECTI=
ON OF
ORIGINAL DATA IS READ FROM ISCRC (TO DEFINE
Fixup
SECTION HEADER INFORMATION). IF THI=
S MT
HAS NOT BEEN RECOSTRUCTED
Fixup
ON ISCRD T=
HE
ORIGINAL SECTION IS OUTPUT. IF THE SECTION HAS BEEN Fixup
RECONSTRUC=
TED
THE ORIGINAL SECTION IS SKIPPED AND THE NEW SECTION Fixup
IS OUTPUT.=
=
&nb=
sp; =
&nb=
sp;
Fixup
OTAPE - OUTPUT DATA IN THE ENDF/B FORMAT=
. =
&nb=
sp;
Fixup
ISCRC - SCRATCH FILE FROM WHICH ORIGINAL=
DATA
IS READ. =
Fixup
ISCRD - SCRATCH FILE FROM WHICH NEW DATA=
IS
READ. =
Fixup
TABC - ARRAY INTO WHICH CROSS SEC=
TIONS
ARE READ FROM SCRATCH &nb=
sp;
Fixup
=
AND WRITTEN TO OTAPE =
&nb=
sp; =
Fixup
=
&nb=
sp; =
=
&nb=
sp; =
Fixup
I/O FILE
DEFINITIONS =
&nb=
sp; =
&nb=
sp;
Fixup
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D =
&nb=
sp; =
&nb=
sp;
Fixup
UNIT DESCRIPTION =
=
&nb=
sp; Fixup
=3D=3D=3D=
=3D =3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D =
&nb=
sp; =
&nb=
sp;
Fixup
2 INPUT
PARAMETERS. =
&nb=
sp; =
Fixup
3 OUTPUT
REPORT. =
&nb=
sp;
=
Fixup
10 ORIGINAL DATA IN THE E=
NDF/B
FORMAT. =
&nb=
sp;
Fixup
11 FINAL DATA IN THE ENDF=
/B
FORMAT. =
&nb=
sp;
Fixup
12 SCRATCH FILE =
&nb=
sp; =
=
Fixup
14 SCRATCH FILE =
&nb=
sp; =
&nb=
sp;
Fixup
15 SCRATCH FILE =
&nb=
sp; =
&nb=
sp;
Fixup
16 SCRATCH FILE =
&nb=
sp; =
&nb=
sp;
Fixup
17 SCRATCH FILE =
&nb=
sp; =
&nb=
sp;
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
OPTIONAL
STANDARD FILE NAMES (SEE SUBROUTINE FILIO1 AND FILIO2) Fixup
=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D Fixup
UNIT FILE NAME FORMAT =
&nb=
sp; =
Fixup
=3D=3D=3D=
=3D =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D =3D=3D=3D=3D=3D=3D =
&nb=
sp; =
Fixup
2 FIXUP.INP BCD =
&nb=
sp; =
Fixup
3 FIXUP.LST BCD =
&nb=
sp; =
Fixup
10 ENDFB.IN BCD =
&nb=
sp; =
Fixup
11 ENDFB.OUT BCD =
&nb=
sp; =
Fixup
12-17 (SCRATCH) BINARY =
&nb=
sp; =
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
INPUT LINE=
S =
=
&nb=
sp; =
Fixup
=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D =
&nb=
sp; =
&nb=
sp;
Fixup
LINE COLUMNS FORMAT DESCRIPTION =
&nb=
sp;
Fixup
=3D=3D=3D=
=3D =3D=3D=3D=3D=3D=3D=3D =3D=3D=3D=3D=3D=3D =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D<=
span
style=3D'mso-spacerun:yes'> =
&nb=
sp; Fixup
1 1-14 14I1 INPUT OPTIONS AS DESCRIBED
ABOVE. =
Fixup
=
&nb=
sp;
EACH COLUMN OF THE INPUT LINE CONTROLS Fixup
=
&nb=
sp;
ONE OF THE TESTS/CORRECTIONS DESCRIBED Fixup
=
&nb=
sp;
ABOVE. TESTS/CORRECTION 1-14 (NOT ALL Fixu=
p
=
&nb=
sp;
IMPLEMENTED YET) CORRESPOND TO COLUMNS Fixup
=
&nb=
sp;
1-14 OF THIS INPUT LINE AND ARE TREATED Fixup
=
&nb=
sp;
AS FOLLOWS, =
&nb=
sp;
Fixup
=
&nb=
sp;
=3D 0 - DO NOT PERFORM TEST/CORRECTION. Fixu=
p
=
&nb=
sp;
=3D 1 - PERFORM TEST/CORRECTION. =
Fixup
=
&nb=
sp;
FOR MT EXCLUSION FROM THRESHOLD TESTS Fixu=
p
=
&nb=
sp;
(COLUMN 2), DELETION (COLUMN 4), OR
Fixup
=
&nb=
sp;
SUMMATION (COLUMN 5) THE INPUT OPTION Fixu=
p
=
&nb=
sp;
MAY BE, &nbs=
p; &=
nbsp; &nbs=
p;
Fixup
=
&nb=
sp;
=3D 1 - READ RULES FROM INPUT =
Fixup
=
&nb=
sp;
=3D 2 - USE BUILT-IN RULES =
Fixup
2 1-60 A60 ENDF/B INPUT DATA FILENAME =
Fixup
=
&nb=
sp;
(STANDARD OPTION =3D ENDFB.IN) =
Fixup
3 1-60 A60 ENDF/B OUTPUT DATA FILENAME<=
span
style=3D'mso-spacerun:yes'> =
Fixup
=
=
(STANDARD
OPTION =3D ENDFB.OUT) =
Fixup
4-M 1-5 FREE CHARACTER (S,D,T,R,*) FOLLOW=
ED BY
BLANK OR Fixup
=
&nb=
sp;
FORM MT NUMBER =
&nb=
sp; =
Fixup
=
&nb=
sp;
- THE ALLOWED CHARACTERS ARE, =
Fixup
=
&nb=
sp;
- S OR BLANK =3D SUM (OR DIFFERENCES)
Fixup
=
&nb=
sp;
- D =3D DELETE =
&nb=
sp;
Fixup
=
&nb=
sp;
- T =3D NO THRESHOLD ENERGY CORRECTIONS Fixu=
p
=
&nb=
sp;
- R =3D RATIO =
&nb=
sp;
Fixup
=
&nb=
sp;
- * =3D PRODUCT =
&nb=
sp;
Fixup
=
6-72
FREE UP TO 10 LO=
WER
AND UPPER MT RANGES WHICH
Fixup
=
&nb=
sp;
FORM WILL BE USE=
D TO
DEFINE THE RECONSTRUCTED
Fixup
=
&nb=
sp;
CROSS SECTION OR TO DEFINE MT RANGES WHICH Fixup
=
&nb=
sp;
ARE EXCLUDED FROM THRESHOLD TESTS. =
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
=
&nb=
sp;
EACH MT NUMBER IS DEFINED BY A CONTINUOUS Fixup
=
&nb=
sp;
STRING OF DIGITS, POSSIBILITY PRECEEDED BY Fixup
=
&nb=
sp;
A - (MINUS SIGN). EACH MT NUMBER MUST BE Fixup
=
&nb=
sp;
BLANK OR OTHERWISE (NOT A DIGIT) DELIMITED. Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
=
&nb=
sp;
COLUMNS 6-72 MAY CONTAIN STRINGS OF DIGITS Fixup
=
&nb=
sp;
THE FIRST DIGIT STRING OF EACH PAIR MAY BE Fixup
=
&nb=
sp;
PRECEEDED BY A - (MINUS SIGN). =
Fixup
=
&nb=
sp; =
&nb=
sp; =
Fixup
=
&nb=
sp;
EACH LINE WILL BE INTERPRETED AS FOLLOWS, Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
=
=
*SUMMATION
(OR DIFFERENCES) =
Fixup
=
&nb=
sp;
-------------------------- =
Fixup
=
&nb=
sp;
COLUMNS 1-5 =3D S OR BLANK FOLLOWED BY THE Fixup
=
&nb=
sp;
MT NUMBER TO BE DEFINE=
D BY
SUMMATION
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
=
&nb=
sp;
COLUMNS 6-72 =3D UP TO 10 MT RANGE (PAIRS OF Fixup
=
&nb=
sp;
MT NUMBERS) TO BE USED TO DEFINED THE SUM. Fixup
=
&nb=
sp;
IF THE FIRST MT NUMBER OF A PAIR IS
Fixup
=
&nb=
sp;
NEGATIVE THE RANGE OF MT NUMBERS IS
Fixup
=
&nb=
sp;
SUBTRACTED - AT LEAST ONE RANGE MUST BE Fixup
=
&nb=
sp;
SPECIFIED. &=
nbsp; &nbs=
p; &=
nbsp;
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
=
&nb=
sp;
*DELETIONS &=
nbsp; &nbs=
p;
=
Fixup
=
&nb=
sp;
--------- &n=
bsp;  =
; &n=
bsp;
Fixup
=
&nb=
sp;
COLUMNS 1-5 =3D D FOLLOWED BY BLANKS =
Fixup
=
&nb=
sp; =
&nb=
sp; =
Fixup
=
&nb=
sp;
COLUMNS 6-72 CONTAIN UP TO 10 MT RANGE Fixup
=
&nb=
sp;
(PAIRS OF MT NUMBERS), EACH RANGE DEFINING Fixup
=
&nb=
sp;
A RANGE OF MT NUMBERS TO BE DELETED - AT Fixup
=
&nb=
sp;
LEAST ONE RANGE MUST BE SPECIFIED. =
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
=
&nb=
sp;
*EXCLUSION FROM THRESHOLD TESTS =
Fixup
=
&nb=
sp; ------------------------------ =
Fixup
=
&nb=
sp;
COLUMNS 1=3D5 =3D T FOLLOWED BY BLANKS =
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
=
=
COLUMNS
6-72 CONTAIN UP TO 10 MT RANGE Fixup
=
&nb=
sp;
(PAIRS OF MT NUMBERS), EACH RANGE DEFINING Fixup
=
&nb=
sp;
A RANGE OF MT NUMBERS WHOSE THRESHOLD Fixu=
p
=
&nb=
sp;
ENERGY WIL=
L NOT
BE CHECKED - AT LEAST ONE
Fixup
=
&nb=
sp;
RANGE MUST BE SPECIFIED. =
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
=
&nb=
sp;
*RATIO =
&nb=
sp; =
Fixup
=
&nb=
sp;
----- =
&nb=
sp; =
Fixup
=
&nb=
sp;
COLUMNS 1-5 =3D R FOLLOWED BY THE MT NUMBER Fixup
=
&nb=
sp;
TO BE DEFINED BY A RATIO =
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
=
&nb=
sp;
COLUMNS 6-72 CONTAINS 2 MT NUMBERS TO BE Fixup
=
&nb=
sp;
USED TO DEFINE THE RATIO. =
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
=
&nb=
sp;
*PRODUCT &nb=
sp; =
&nb=
sp;
Fixup
=
&nb=
sp;
----- =
&nb=
sp; =
Fixup
=
&nb=
sp;
COLUMNS 1-5 =3D * FOLLOWED BY THE MT NUMBER Fixup
=
&nb=
sp;
TO BE DEFINED BY A PRODUCT =
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
=
&nb=
sp;
COLUMNS 6-72 CONTAINS 2 MT NUMBERS TO BE Fixup
=
&nb=
sp;
USED TO DEFINE THE PRODUCT. =
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
=
&nb=
sp; CONVENTIONS =
&nb=
sp;
Fixup
=
&nb=
sp;
----------- =
&nb=
sp;
Fixup
=
&nb=
sp;
*UP TO 20 DELETIONS AND 20 SUMMATIONS OR Fixup
=
=
RATIOS
OR PRODUCTS MAY BE SPECIFIED.
Fixup
=
&nb=
sp;
*ONLY 1 EXCLUSION FROM THRESHOLD TESTS Fixu=
p
=
&nb=
sp;
MAY BE SPECIFIED (THE 1 LINE MAY CONTAIN Fixup
=
&nb=
sp;
UP
TO 10 MT RANGES TO EXCLUDE FROM TESTS).&nb=
sp;
Fixup
=
&nb=
sp;
*INPUT IS TERMINATED BY INPUTTNG 0 OR
Fixup
=
&nb=
sp;
BLANK IN COLUMNS 1-72 (I.E. THE LAST
Fixup
=
&nb=
sp;
INPUT LINE MUST BE BLANK). =
Fixup
=
&nb=
sp;
*THE UPPER LIMIT OF EACH RANGE MUST BE AT Fixup
=
&nb=
sp;
LEAST AS BIG AS THE LOWER LIMIT (IN
Fixup
=
&nb=
sp;
ABSOLUTE VALUE). =
&nb=
sp;
Fixup
=
&nb=
sp;
*FOR RECONSTRUCTION POSITIVE MT RANGES WILL Fixup
=
&nb=
sp;
BE ADDED TO THE SUM AND NEGATIVE MT RANGES Fixup
=
&nb=
sp;
WILL BE SUBTRACTED. =
Fi=
xup
=
&nb=
sp;
*IF INPUT OPTION 2 (FIRST INPUT LINE) IS Fixup
=
&nb=
sp;
0 THRESHOLD EXCLUSION IS NOT ALLOWED. Fixu=
p
=
&nb=
sp;
*IF INPUT OPTION 4 (FIRST INPUT LINE) IS Fixup
=
&nb=
sp;
0 DELETIONS ARE NOT ALLOWED. =
Fixup
=
&nb=
sp;
*IF INPUT OPTION 5 (FIRST INPUT LINE) IS Fixup
=
&nb=
sp;
0 SUMMATIONS AND RATIOS ARE NOT ALLOWED. Fixup
N-K =
IF THE USER SPECIFIES THAT SECTIONS WHICH Fixup
=
&nb=
sp;
ARE NOT PRESENT IN THE ORIGINAL EVALUATION Fixup
=
&nb=
sp;
MAY BE CREATED, TWO LINES MUST BE INPUT FOR Fixup
=
&nb=
sp; EACH
SECTION TO BE CREATED. THE TWO LINES =
Fixup
=
&nb=
sp;
DEFINE (C1, C2, L1 AND L2) FOR EACH OF THE Fixup
=
&nb=
sp;
FIRST TWO LINES OF THE SECTION TO BE
Fixup
=
=
CREATED.
THE FIRST LINE ALSO DEFINES (MAT &nbs=
p;
Fixup
=
&nb=
sp;
AND MT). (N1, N2) ARE ALWAYS ZERO ON THE Fixup
=
&nb=
sp;
FIRST LINE AND WILL BE CALCULATED BY THE Fixup
=
&nb=
sp;
PROGRAM
FOR THE SECOND LINE. =
Fixup
FIRST 1-11 E11.4 ZA OF SECTION TO BE CREATED =
Fixup
LINE 12-22 E11.4 AWRE OF SECTION TO BE CREATED =
Fixup
=
23-33
I11 L1 OF SECTIO=
N TO
BE CREATED =
Fixup
=
34-44
I11 L2 OF SECTIO=
N TO
BE CREATED =
Fixup
=
45-48
I4 MAT OF
SECTION TO BE CREATED =
Fixup
=
49-51
I3 MT OF S=
ECTION
TO BE CREATED =
Fixup
SECOND 1-11 E11.4 C1 OF SECTION TO BE CREATED =
Fixup
LINE 12-22 E11.4 C2 OF SECTION TO BE CREATED =
Fixup
=
23-33
I11 L1 OF SECTIO=
N TO
BE CREATED =
Fixup
=
34-44
I11 L2 OF SECTIO=
N TO
BE CREATED =
Fixup
=
&nb=
sp;
*PAIRS OF LINES MAY BE IN ANY MAT/MT ORDER Fixup
=
&nb=
sp;
(E.G., THEY NEED NOT BE IN ASCENDING
Fixup
=
&nb=
sp;
MAT/MT ORDER). =
&nb=
sp;
Fixup
=
&nb=
sp;
*UP TO 50 PAIRS OF LINES MAY BE USED TO Fixup
=
&nb=
sp;
DEFINE SECTIONS TO BE CREATED. THE LIST Fixup
=
&nb=
sp;
IS TERMINATED WHEN THE FIRST LINE OF A Fixup
=
&nb=
sp;
PAIR CONTAINS A ZERO (OR BLANK) MAT AND/OR Fixup
=
&nb=
sp;
MT. &n=
bsp;  =
; &n=
bsp;
Fixup
M-N =
IF THE USER SPECIFIES THAT ENERGIES WHICH Fixup
=
&nb=
sp;
ARE NOT PRESENT IN THE ORIGINAL EVALUATION Fixup
=
&nb=
sp;
MAY BE INSERTED, ONE LINE MUST BE INPUT FOR Fixup
=
=
EA=
CH
ENERGY TO BE INSERTED. =
Fixup
=
1-11 E11.4=
ENERGY TO BE INSERTED =
&nb=
sp;
Fixup
=
12-15
I4 M=
AT IN
WHICH TO INSERT ENERGY =3D 0 =3D ALL Fixup
=
16-18 I3 MT IN WHICH TO I=
NSERT
ENERGY =3D 0 =3D ALL &nbs=
p;
Fixup
=
&nb=
sp;
*UP TO 50 (ENERGY, MAT, MT) LINES MAY BE Fixup
=
&nb=
sp;
USED. THE LIST IS TERMINATED BY A BLANK Fixup
=
&nb=
sp;
LINE. =
&nb=
sp; =
Fixup
=
&nb=
sp;
*INPUT MAY BE IN ANY (ENERGY, MAT, MT) Fixu=
p
=
&nb=
sp;
ORDER.  =
; &n=
bsp;  =
;
Fixup
=
&nb=
sp;
*ENERGY POINTS CAN ONLY BE INSERTED WITHIN Fixup
=
&nb=
sp;
THE ORIGINAL ENERGY RANGE OF A SECTION - Fixup
=
&nb=
sp;
THIS OPTION CANNOT BE USED TO EXTEND THE Fixup
=
&nb=
sp;
CROSS SECTION EITHER BELOW OR ABOVE THE Fixup
=
&nb=
sp;
ORIGINAL TABULATED ENERGY RANGE. =
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
EXAMPLE IN=
PUT
NO. 1 =
&nb=
sp; =
=
Fixup
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D =
&nb=
sp; =
&nb=
sp;
Fixup
(1) USE OP=
TIONS
1-11 (ALL OPTIONS, EXCEPT INSERT ENERGY POINTS) Fixup
(2) DELETE
MT=3D900 (FOR EXAMPLE PURPOSES ONLY) =
Fixup
(3) DEFINE=
THE
FOLLOWING MT NUMBERS TO BE RECONSTRUCTED, =
Fixup
=
(MT=3D 4) =3D THE SUM =
OF MT=3D 51
THROUGH 91 =
&nb=
sp;
Fixup
=
(MT=3D103) =3D THE SUM OF MT=3D700 THROUGH 718 (NOT 719) =
Fixup
=
(MT=3D104) =3D THE SUM OF MT=3D720 THROUGH 738 (NOT 739) =
Fixup
=
(MT=3D105) =3D THE SUM OF MT=3D740 THROUGH 758 (NOT 759) =
Fixup
=
(MT=3D106) =3D THE SUM OF MT=3D760 THROUGH 778 (NOT 779) =
Fixup
(MT=3D107) =3D THE SUM OF MT=
=3D780
THROUGH 798 (NOT 799) =
Fixup
=
(MT=3D101) =3D THE SUM OF MT=3D102 THROUGH 114 =
&nb=
sp;
Fixup
=
(MT=3D 18) =3D (MT=3D19) + (MT=3D20 AND 21) + (MT=3D38) =
Fixup
=
(IF TOTAL
FISSION, MT=3D18, IS NOT PRESENT, DEFINE Fixup
=
IT BY SUMMING FIRST, SECOND, ETC. CHANCE - NOTE Fixup
=
THAT THIS MUST BE DONE IN THIS ORDER, SINCE THE Fixup
=
NEXT SUM INVOLVES USING MT=3D18. =
&nb=
sp;
Fixup
=
(MT=3D 27) =3D THE SUM OF MT=3D 18 AND 101 =
&nb=
sp;
Fixup
=
(MT=3D101 RECONSTRUCTED ABOVE USED IN SUM). =
Fixup
=
(MT=3D 3) =3D THE SUM =
OF (MT=3D4)+(MT=3D6-9)+(MT=3D16-17)+(MT=3D22-37)+ Fixup
=
(MT=3D41-45) =
&nb=
sp; =
Fixup
=
(MT=3D4 AND 27 RECONSTRUCTED ABOVE USED IN SUM). Fixup
=
(MT=3D 19) =3D (MT=3D18) - (MT=3D20 AND 21) - (MT=3D38) =
Fixup
=
(DEFINE FIRST CHANGE FISSION BY SUBTRACTION TO Fixup
=
ALLOW RESONANCE CONTRIBUTION FROM MT=3D18 TO BE Fixu=
p
=
INCLUDED IN MT=3D19). =
=
Fixup
=
(MT=3D 1) =3D THE SUM =
OF MT=3D2
AND 3 =
&nb=
sp;
Fixup
=
(MT=3D3 RECONSTRUCTED ABOVE USED IN SUM). =
Fixup
(4) THRESHOLD EN=
ERGIES
OF THE FOLLOWING MT NUMBERS WILL NOT BE Fixup
=
TESTED OR CORRECTED. =
&nb=
sp; =
Fixup
=
MT=3D1, 4, 18, 19, 91, 103 THROUGH 114. =
&nb=
sp;
Fixup
(5) DEFINE MT=3D=
254 TO
BE THE CAPTURE TO FISSION RATIO (MT=3D102/18) Fixup
(6) CREATE
MAT=3D1300/MT=3D254 - NOTE, THIS IS NECESSARY IN ORDER TO Fixup
HAVE THE CAPTURE TO FISSION RATIO OUTPUT IN THE ENDF/B FORMAT Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
NOTE, ON T=
HE
FOLLOWING INPUT LINES THE CHARACTERS =3D ( ) + , HAVE Fixup
BEEN USED =
ONLY
TO MAKE THE INPUT MORE READABLE - THESE CHARACTERS Fixup
WILL BE SK=
IPPED
BY THE PROGRAM IN READING INPUT - THE RESULTS Fixup
WOULD BE T=
HE
SAME IF THESE CHARACTERS WERE OMITTED, AS LONG AS Fixup
ALL OF THE=
MT
NUMBERS ARE DELIMITED, I.E., THERE IS AT LEAST ONE Fixup
NON-DIGITAL
CHARACTER BETWEEN MT NUMBERS. NOTE, THAT - (MINUS Fixup
SIGN) IS
IMPORTANT AND IS USED DURING INPUT TO DEFINE MT RANGES Fixup
WHICH SHOU=
LD BE
SUBTRACTED, E.,G., SEE THE DEFINITION OF MT=3D19. Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
READ FILE
/ENDFB6/K300/LEAD.IN AND WRITE /ENDFB6/K300/LEAD.OUT Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
THE FOLLOW=
ING 21
INPUT LINES ARE REQUIRED. =
&nb=
sp;
Fixup
=
&nb=
sp; =
=
&nb=
sp; Fixup
1111111111=
1 =
&nb=
sp; =
&nb=
sp;
Fixup
/ENDFB6/K300/LEAD.IN =
&nb=
sp; =
&nb=
sp;
Fixup
/ENDFB6/K300/LEAD.OUT =
&nb=
sp;
=
Fixup
D900 =
&nb=
sp; =
&nb=
sp; =
Fixup
4=3D( 51, 91) =
&nb=
sp; =
&nb=
sp;
Fixup
103=3D(700,718) =
&nb=
sp; =
Fixup
104=3D(720,738) =
&nb=
sp; =
&nb=
sp;
Fixup
105=3D(740,758) =
&nb=
sp; =
&nb=
sp;
Fixup
106=3D(760,778) =
&nb=
sp; =
&nb=
sp;
Fixup
107=3D(780,798) =
&nb=
sp; =
&nb=
sp;
Fixup
101=3D(102,114) =
&nb=
sp; =
&nb=
sp;
Fixup
18=3D(
19, 19)+( 20, 21)+( 38, 38) =
&nb=
sp;
Fixup
27=3D( 18,
18)+(101,101) =
&nb=
sp; =
Fixup
3=3D( 4, 4)+( 6,
9)+( 16, 17)+( 22, 37)+( 41, 45) =
Fixup
19=3D(
18, 18)-( 20, 21)-( 38, 38) =
&nb=
sp;
Fixup
1=3D( 2, 3) =
&nb=
sp; =
&nb=
sp;
Fixup
T ( 1,
1) ( 4, 4) ( 18, 19) ( 91, 91) (103,114) =
Fixup
R254=3D(10=
2/
18) =
&nb=
sp; =
&nb=
sp;
Fixup
=
(BLANK LINE TO TERMINATE SUMMATION/DELETION RULES) Fixup
2.00=
400+ 3
0.00000+ 0 =
0 &nbs=
p;
01300254 =
Fixup
0.00=
000+ 0
0.00000+ 0 =
0 &nbs=
p;
0 =
&nb=
sp;
Fixup
=
(BLANK LINE TO TERMINATE SECTION CREATION RULES) Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
NOTE, THE
DELETION AND THRESHOLD EXCLUSION LINES MAY APPEAR IN Fixup
IN ANY ORD=
ER.
HOWEVER, SUMMATION AND RATIO RULES MUST APPEAR IN Fixup
THE ORDER =
IN
WHICH YOU WANT THEM TO BE EXECUTED - E.G., THE
Fixup
ABOVE INPU=
T WILL
FIRST RECONSTRUCT MT=3D4, WHICH CAN THEN BE USED Fixup
TO CONTRIB=
UTE TO
THE FOLLOWING SUM TO DEFINE MT=3D3, WHICH IN TURN Fixup
CAN THEN B=
E USED
TO CONTRIBUTE TO THE FOLLOWING SUM TO DEFINE Fixup
MT=3D1. IF=
THE
ORDER OF THE INPUT LINES IS CHANGED SUCH THAT MT=3D3 Fixup
IS RECONST=
RUCTED
BEFORE MT=3D4, THE ORIGINAL MT=3D4 WILL BE USED IN Fixup
THE SUMMAT=
ION TO
DEFINE MT=3D3. THE SAME RULES APPLY TO CALCULATING Fixup
RATIOS, IF
EITHER THE NUMERATOR OR DENOMINATOR IS TO BE DEFINED Fixup
BY SUMMATI=
ON,
THIS SHOULD BE DONE BEFORE DEFINING THE RATIO BY Fixup
INPUT
PARAMETERS. =
&nb=
sp; =
&nb=
sp;
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
EXAMPLE IN=
PUT
NO. 2 =
&nb=
sp; =
&nb=
sp;
Fixup
=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D =
&nb=
sp; =
&nb=
sp;
Fixup
(1) USE OP=
TIONS
1-11 (ALL OPTIONS, EXCEPT INSERT ENERGY POINTS) Fixup
(2) USE BU=
ILT-IN
TABLES FOR SUMMATION/DELETION/THRESHOLD EXCLUSION Fixup
=
(THIS ONLY REQUIRES COLUMNS 2, 4 AND 5 TO BE SET =3D2 ON THE Fixup
=
FIRST INPUT LINE. THE BUILT-IN RULES EXACTLY CORRESPOND TO Fixup
=
THE INPUT ABOVE UNDER EXAMPLE NO. 1, EXCEPT THAT NO MT NUMBERS
Fixup
=
WILL BE DELETED. =
&nb=
sp; =
&nb=
sp;
Fixup
(3) IF NOT
PRESENT, CREATE MAT=3D1300/MT=3D1 =
&nb=
sp;
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
USE THE ST=
ANDARD
FILE NAMES ENDFB.IN AND ENDFB.OUT (THIS CAN BE Fixup
DONE BY LE=
AVING
THE SECOND AND THIRD INPUT LINES BLANK). =
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
THE FOLLOW=
ING 6
INPUT LINES ARE REQUIRED. =
&nb=
sp;
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
1212211111=
1 =
&nb=
sp; =
&nb=
sp;
Fixup
=
&nb=
sp; =
&nb=
sp;
=
&nb=
sp; Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
2.00=
400+ 3
0.00000+ 0 =
0 &nbs=
p;
01300 1 =
Fixup
0.00=
000+ 0
0.00000+ 0 =
0 &nbs=
p;
0 =
=
Fixup
=
(BLANK LINE TO TERMINATE SECTION CREATION RULES) Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
EXAMPLE IN=
PUT
NO. 3 =
&nb=
sp; =
Fixup
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D =
&nb=
sp; =
&nb=
sp;
Fixup
(1) USE OP=
TIONS
1-10 (ALL OPTIONS PRESENTLY IMPLEMENTED, EXCEPT Fixup
=
DO NOT ALLOW SECTION CREATION AND INSERT ENERGY POINTS). Fixu=
p
(2) USE BU=
ILT-IN
TABLES FOR SUMMATION/DELETION/THRESHOLD EXCLUSION Fixup
=
(THIS ONLY REQUIRES COLUMNS 2, 4 AND 5 TO BE SET =3D2 ON THE Fixup
=
FIRST INPUT LINE. THE BUILT-IN RULES EXACTLY CORRESPOND TO Fixup
THE INPUT ABOVE UNDER
EXAMPLE NO. 1, EXCEPT THAT NO MT NUMBERS Fixup
=
WILL BE DELETED. =
&nb=
sp; =
&nb=
sp;
Fixup
(3) DO NOT
CREATE ANY SECTIONS. =
&nb=
sp; =
Fixup
=
=
&nb=
sp; =
&nb=
sp; Fixup
READ FILE
/ENDFB6/K300/LEAD.IN AND WRITE /ENDFB6/K300/LEAD.OUT Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
THE FOLLOW=
ING 3
INPUT LINES ARE REQUIRED. =
&nb=
sp;
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
1212211111=
=
&nb=
sp; =
&nb=
sp;
Fixup
/ENDFB6/K300/LEAD.IN =
=
&nb=
sp; =
Fixup
/ENDFB6/K300/LEAD.OUT =
&nb=
sp; =
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
EXAMPLE IN=
PUT
NO. 4 =
&nb=
sp;
=
&nb=
sp; Fixup
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D =
&nb=
sp; =
&nb=
sp;
Fixup
SAME AS EX=
AMPLE
NO. 3, ABOVE, EXCEPT INSERT AN ENERGY POINT AT Fixup
THERMAL FO=
R ALL
REACTIONS WHICH SPAN THE THERMAL ENERGY RANGE. Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
USE THE ST=
ANDARD
FILE NAMES ENDFB.IN AND ENDFB.OUT (THIS CAN BE Fixup
DONE BY LE=
AVING
THE SECOND AND THIRD INPUT LINES BLANK). Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
THE FOLLOW=
ING 5
INPUT LINES ARE REQUIRED. =
&nb=
sp;
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
121221111101 =
&nb=
sp; =
&nb=
sp;
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
2.53=
000-
2 0 0 =
&nb=
sp; =
&nb=
sp;
Fixup
=
(BLANK LINE TO TERMINATE ENERGY INSERTS) =
Fixup
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
WARNING
=3D=3D=3D=
=3D=3D=3D=3D =
&nb=
sp; =
&nb=
sp; =
Fixup
ALTHOUGH T=
HIS
PROGRAM IS DESIGNED TO ALLOW REACTIONS TO BE DEFINED Fixup
BY ADDING =
OR
SUBTRACTING REACTIONS THE USER SHOULD ALWAYS TRY TO Fixup
DEFINE REA=
CTIONS
BY SUMMING TO AVOID NEGATIVE CROSS SECTIONS. FOR Fixup
EXAMPLE, I=
T IS
POSSIBLE TO CALCULATE MT=3D3 AND DEFINE MT=3D1 AS THE Fixup
SUM OF MT=
=3D2 AND
3 (THE RECOMMENDED APPROACH AS USED IN THE ABOVE Fixup
INPUT).
ALTERATIVELY IT IS POSSIBLE TO CALCULATE MT=3D1 AND DEFINE Fixup
MT=3D3 AS =
MT=3D1
MINUS MT=3D2 (THIS APPROACH IS NOT RECOMMENDED).
Fixup
=
&nb=
sp; =
&nb=
sp;
=
&nb=
sp; Fixup
THE ONLY
BUILT-IN SUMMATION RULE THAT USES SUBTRACTION IS THE Fixup
CALCULATIO=
N OF
THE FIRST CHANGE FISSION (MT=3D19) AS THE TOTAL Fixu=
p
FISSION (M=
T=3D18)
MINUS THE SECOND, THIRD AND FOURTH CHANGE FISSION Fixup
(MT=3D20, =
21, 38).
THIS HAS BEEN DONE TO ALLOW THE RESONANCE
Fixup
CONTRIBUTI=
ON,
CALCULATED BY MANY CODES AND INCLUDED IN MT=3D18, Fixup
TO BE
CONSISTENTLY INCLUDED IN THE FIRST CHANCE FISSION. Fixup=
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Fixup
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
Fixup