MIME-Version: 1.0 Content-Location: file:///C:/CF066D12/Mixer.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
Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
PROGRAM
MIXER =
&nb=
sp; =
&nb=
sp;
Mixer
=
=
&nb=
sp; =
&nb=
sp; =
Mixer
VERSION 76=
-1
(NOVEMBER 1976) =
&nb=
sp; =
Mixer
VERSION 81=
-1
(APRIL 1981) *IBM VERSION =
&nb=
sp;
Mixer
VERSION 82=
-1 (AUGUST
1982) *COMPUTER INDEPENDENT VERSION =
Mixer
VERSION 84=
-1
(JUNE 1984) *SPECIAL I/O
ROUTINES TO GUARANTEE Mixer
=
&nb=
sp;
ACCURACY OF ENERGY. =
Mixer
=
&nb=
sp;
*DOUBLE
PRECISION TREATMENT OF ENERGY
Mixer
=
&nb=
sp;
(REQUIRED FOR NARROW RESONANCES). Mixer
VERSION 86=
-1
(JANUARY 1986)*FORTRAN-77/H VERSION =
Mixer
VERSION 88=
-1
(JULY 1988) *OPTION...I=
NTERNALLY
DEFINE ALL I/O
Mixer
=
&nb=
sp;
FILE NAMES (SEE, SUBROUTINE FILIO1 Mixer
=
&nb=
sp;
AND FILIO2 FOR DETAILS). =
Mixer
=
&nb=
sp;
*IMPROVED BASED ON USER COMMENTS. Mixe=
r
VERSION 89=
-1
(JANUARY 1989)*PSYCHOANALYZED BY PROGRAM FREUD TO Mixer
=
&nb=
sp;
INSURE PROGRAM WILL NOT DO ANYTHING Mixer
=
&nb=
sp;
CRAZY. =
=
Mixer
=
&nb=
sp;
*UPDATED TO USE NEW PROGRAM CONVERT Mixer
=
&nb=
sp;
KEYWORDS. =
&nb=
sp;
Mixer
=
&nb=
sp;
*ADDED
=
&nb=
sp;
CONVENTIONS. =
&nb=
sp;
Mixer
VERSION 92=
-1
(JANUARY 1992)*UPDATED BASED ON USER COMMENTS
Mixer
=
&nb=
sp;
*ADDED PHOTON CROSS SECTIONS =
Mixer
=
&nb=
sp;
*ADDED FORTRAN SAVE OPTION =
Mixer
=
&nb=
sp;
*OUTPUT IN ENDF/B-VI FORMAT =
Mixer
=
&nb=
sp;
*COMPLETELY CONSISTENT I/O ROUTINES - Mixer
=
&nb=
sp; TO
MINIMIZE COMPUTER DEPENDENCE. Mixe=
r
=
&nb=
sp;
*NOTE, CHANGE IN INPUT PARAMETER
Mixer
=
&nb=
sp;
FORMAT. =
&nb=
sp;
Mixer
VERSION 94=
-1
(JANUARY 1994)*VARIABLE ENDF/B DATA FILENAMES
Mixer
=
&nb=
sp;
TO ALLOW ACCESS TO FILE STRUCTURES Mixer
=
&nb=
sp;
(WARNING - INPUT PARAMETER FORMAT Mixer
=
&nb=
sp;
HAS B=
EEN
CHANGED) =
&nb=
sp;
Mixer
=
&nb=
sp;
*CLOSE ALL FILES BEFORE TERMINATING Mixer
=
&nb=
sp;
(SEE, SUBROUTINE ENDIT) =
Mixer
=
&nb=
sp;
*INCREASED INCORE PAGE SIZE FROM
Mixer
=
&nb=
sp;
1002 TO 4008. =
&nb=
sp;
Mixer
VERSION 96=
-1
(JANUARY 1996) *COMPLETE RE-WRITE =
Mixer
=
&nb=
sp;
*IMPROVED COMPUTER
=
&nb=
sp;
*ALL DOUBLE PRECISION =
Mixer
=
&nb=
sp;
*ON SCREEN OUTPUT =
&nb=
sp;
Mixer
=
&nb=
sp;
*UNIFORM TREATMENT OF ENDF/B I/O Mixe=
r
=
&nb=
sp;
*IMPROVED OUTPUT PRECISION =
Mixer
=
&nb=
sp;
*DEFINED SCRATCH FILE NAMES =
Mixer
=
&nb=
sp;
*INCREASED INCORE PAGE SIZE FROM&nb=
sp;
Mixer
=
&nb=
sp; =
4008 TO 12000. =
&nb=
sp;
Mixer
VERSION 99=
-1
(MARCH 1999) *CORRECTED
CHARACTER TO FLOATING Mixe=
r
=
&nb=
sp; =
POINT READ FOR MORE DIGITS =
Mixer
=
&nb=
sp;
*UPDATED TEST FOR ENDF/B FORMAT
Mixer
=
&nb=
sp; =
VERSION BASED ON RECENT FORMAT CHANGE Mixer
=
&nb=
sp;
*GENERAL IMPROVEMENTS BASED ON
Mixer
=
&nb=
sp; USER
FEEDBACK =
&nb=
sp;
Mixer
VERSION 99=
-2
(JUNE 1999) *ASSU=
ME
ENDF/B-VI, NOT V, IF MISSING
Mixer
=
&nb=
sp; =
MF=3D1, MT-451. =
&nb=
sp;
Mixer
VERS. 2000=
-1
(FEBRUARY 2000)*GENERAL IMPROVEMENTS BASED ON
Mixer
=
&nb=
sp; =
USER FEEDBACK =
&nb=
sp;
Mixer
VERS. 2002=
-1
(MAY 2002)
*OPTIONAL INPUT PARAMETERS =
Mixer
VERS. 2004=
-1
(MARCH 2004) *ADDED INC=
LUDE
FOR COMMON =
Mixer
=
&nb=
sp;
*INCREASED INCORE PAGE SIZE FROM Mixe=
r
=
&nb=
sp; =
12000 TO 60000. =
&nb=
sp;
Mixer
VERS. 2005=
-1
(OCT. 2005) *CORR=
ECTED
MERGE ERROR =
Mixer
VERS. 2007=
-1
(JAN. 2007) *CHEC=
KED
AGAINST ALL ENDF/B-VII
Mixer
=
&nb=
sp;
*INCREASED INCORE PAGE SIZE FROM Mixe=
r
=
&nb=
sp; =
60,000 TO 240,000. =
Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
OWNED,
MAINTAINED AND DISTRIBUTED BY =
&nb=
sp;
Mixer
------------------------------------ =
=
Mixer
THE NUCLEA=
R DATA
SECTION =
&nb=
sp; =
Mixer
INTERNATIO=
NAL
ATOMIC ENERGY AGENCY =
&nb=
sp;
Mixer
P.O.
A-1400,
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
ORIGINALLY
WRITTEN BY =
&nb=
sp; =
Mixer
------------------------------------ =
&nb=
sp;
Mixer
DERMOTT E.
CULLEN =
&nb=
sp; =
&nb=
sp;
Mixer
L-159 =
&nb=
sp; =
&nb=
sp; =
Mixer
P.O.
TELEPHONE<=
span
style=3D'mso-spacerun:yes'> 925-423-7359 =
&nb=
sp; =
Mixer
E. MAIL
WEBSITE
=
&nb=
sp;
=
&nb=
sp; =
Mixer
PURPOSE
-------
THIS PROGR=
AM IS
DESIGNED TO CALCULATE THE ENERGY DEPENDENT CROSS Mixer
SECTION FO=
R A
COMPOSITE MIXTURE OF UP TO 10 DIFFERENT MATERIALS. Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
THE PRESENT
VERSION WILL ONLY CALCULATE THE CROSS SECTION FOR ONE Mixer
FINAL REAC=
TION
(ENDF/B SECTION), E.G. TOTAL CROSS SECTION, BUT NOT Mixer
ANY OTHER
REACTION. =
&nb=
sp; =
&nb=
sp;
Mixer
=
&nb=
sp; =
&nb=
sp; =
=
Mixer
NOTE, THIS
PROGRAM WILL NOT COMBINE ALL REACTIONS FOR A MIXTURE Mixer
OF MATERIA=
LS
DURING A SINGLE RUN - ONLY ONE REACTION WILL BE Mixe=
r
CREATED PER
RUN. =
&nb=
sp; =
&nb=
sp;
Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
EVALUATED =
DATA
FORMAT =
&nb=
sp; =
Mixer
--------------------- =
&nb=
sp; =
Mixer
THE CROSS SECTION=
S ARE
READ FROM THE ENDF/B FORMAT AND THE
Mixer
COMPOSITE =
CROSS
SECTION IS CONVERTED TO AN EQUIVALENT BARNS/ATOM Mixer
FORM AND O=
UTPUT
IN THE ENDF/B FORMAT WITH AN EQUIVALENT ATOMIC Mixer
WEIGHT. TH=
E USER
MUST SPECIFY THE COMPOSITION BY GIVING THE ZA, Mixer
MT AND GRA=
MS/CC
OF EACH CONSTITUENT. IN ADDITION THE USER MUST Mixer
IDENTIFY T=
HE
COMPOSITE CROSS SECTION BY SPECIFYING THE ZA, MAT Mixer
AND MT TO =
BE USED
IN THE ENDF/B FORMATTED OUTPUT. =
Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
SINCE ONLY=
THE
CROSS SECTIONS IN FILE 3 AND 23 ARE USED, AND THE Mixer
FORMAT FOR=
FILE
3/23 IS THE SAME IN ALL VERSIONS ON ENDF/B, THIS Mixer
PROGRAM MA=
Y BE
USED WITH ANY VERSION OF ENDF/B DATA (I.E.,
Mixer
ENDF/B-I, =
II,
III, IV, V OR VI). DURING A SINGLE RUN IT MAY EVEN Mixer
BE USED TO=
READ
AND COMBINE EVALUATIONS WHICH ARE IN DIFFERENT Mixer
VERSIONS O=
F THE
ENDF/B FORMAT. =
&nb=
sp; =
Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
ENDF/B FOR=
MATTED
OUTPUT WILL BE IN THE ENDF/B-VI FORMAT REGARDLESS Mixer
OF THE FOR=
MAT OF
THE INPUT ENDF/B DATA. THIS WILL ONLY EFFECT THE Mixer
HOLLERITH
SECTION (MF=3D1, MT=3D451). THE FORMAT OF CROSS SECTIONS Mixer
(MF=3D3) I=
S THE
SAME IN ALL VERSION OF THE ENDF/B FORMAT. =
Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
IN ORDER TO
GUARANTEE PROPER OPERATION OF THIS PROGRAM THE DATA Mixer
MUST BE PR=
OPERLY
CODED IN THE ENDF/B FORMAT. NO ERROR CHECKING IS Mixer
PERFORMED.=
IT IS
PARTICULARLY IMPORTANT THAT THE FOLLOWING DATA Mixer
BE CORRECT=
=
&nb=
sp; =
&nb=
sp;
Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
(1) ZA, MF=
, MT -
MUST BE CORRECT IN ORDER TO ALLOW PROGRAM TO Mixer
=
SELECT THE APPROPRIATE SECTIONS TO BE COMBINED. =
Mixer
(2) AWRE -
ATOMIC WEIGHT RATIO MUST BE CORRECT TO ALLOW PROGRAM Mixer
=
TO CONVERT THE USER SPECIFIED GRAMS/CC INTO ATOMS/CC FOR Mixe=
r
=
PROPER ATOM RATIO MIXING. =
&nb=
sp; =
Mixer
(3) (ENERG=
IES,
CROSS SECTIONS) - MUST BE CORRECT, LINEARLY
Mixer
=
=
&nb=
sp; =
=3D=3D=3D=3D=3D=3D=3D=3D
Mixer
=
INTERPOLABLE, IN ASCENDING ENERGY ORDER OF (E, BARNS).
Mixer
=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D =
&nb=
sp; =
&nb=
sp;
Mixer
=
&nb=
sp;
=
&nb=
sp; =
Mixer
=
TO CONVERT ENDF/B FORMATTED DATA TO THE REQUIRED INPUT FORM Mixer
=
THE FOLLOWING PROGRAMS MAY BE USED, =
&nb=
sp;
Mixer
=
LINEAR - CONVERT TABULATED CROSS SECTIONS TO LINEARLY =
Mixer
=
INTERPOLABLE FORM. =
&nb=
sp; =
Mixer
=
RECENT - RECONSTRUCT RESONANCE CONTRIBUTION, ADD TO BACKGROUND
Mixer
=
CROSS SECTION AND OUTPUT THE COMBINATION IN LINEARLY Mixer
=
INTERPOLABLE FORM. =
&nb=
sp; =
Mixer
=
SIGMA1 - DOPPLER BROADEN CROSS SECTIONS TO ANY TEMPERATURE AND
Mixer
=
OUTPUT THE RESULT IN LINEARLY INTERPOLABLE FORM. Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
DOCUMENTATION =
&nb=
sp; =
&nb=
sp;
Mixer
------------- =
&nb=
sp; =
&nb=
sp;
Mixer
THE FACT T=
HAT
THIS PROGRAM HAS COMBINED THE DATA IS DOCUMENTED Mixer
IN THE OUT=
PUT
ENDF/B FORMAT IN THE HOLLERITH SECTION BY FIRST Mixer
IDENTIFYIN=
G THE
VERSION OF THIS PROGRAM THAT WAS USED, IN THE FORM Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
********************( PROGRAM MIXER 2007-1) **********************
Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
THIS IS FO=
LLOWED
BY THE TWO LINE IDENTIFICATION INPUT BY THE USER. Mixer
THIS IS FO=
LLOWED
BY COMPOSITION INPUT BY THE USER. =
Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
NEUTRON OR=
PHOTON
DATA =
&nb=
sp; =
Mixer
---------------------- =
&nb=
sp; =
Mixer
THIS PROGR=
AM
WILL ALLOW YOU TO PROCESS EITHER NEUTRON OR PHOTON Mixer
CROSS SECT=
IONS -
BUT YOU CANNOT MIX THE TWO TYPES TOGETHER. BY Mixer
INPUT YOU =
CAN
SPECIFY THE OUTPUT MF =3D 3 (NEUTRONS) OR 23 (PHOTONS) Mixer
WHATEVER T=
YPE
YOU SPECIFIED FOR OUTPUT IS THE ONLY TYPE OF DATA Mixer
WHICH WILL=
BE
PROCESSED BY THIS PROGRAM. =
&nb=
sp;
Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
DEFINING T=
HE
COMPOSITION =
&nb=
sp; =
Mixer
------------------------ =
=
&nb=
sp; Mixer
THE USER M=
AY
SPECIFY UP TO 10 DIFFERENT SECTIONS OF DATA TO BE Mixer
COMBINED, =
EACH
SECTION IDENTIFIED BY ZA AND MT NUMBER. THE
Mixer
AMOUNT OF =
EACH
MATERIAL IS SPECIFIED BY DEFINING THE NUMBER OF Mixer
GRAMS/CC O=
F EACH
MATERIAL IN THE COMPOSITE MIXTURE. THIS CAN BE Mixer
DERIVED FR=
OM THE
VOLUME FRACTION SIMPLY BY MULTIPLYING THE STP Mixer
DENSITY OF=
EACH
MATERIAL BY ITS VOLUME FRACTION. NOTE, DO NOT Mixer
INPUT ATOM
FRACTIONS. =
&nb=
sp; =
Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
THE LIST OF
SECTIONS TO BE COMBINED MAY BE SPECIFIED IN ANY
Mixer
ORDER, I.E=
. THEY
NEED NOT BE IN ZA ORDER OR THE ORDER THAT THE Mixer
EVALUATED =
DATA
APPEARS ON THE ENDF/B FORMATTED TAPE. =
Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
IF ANY REQ=
UESTED
SECTION OF DATA IS NOT FOUND ON THE ORIGINAL Mixer
ENDF/B FOR=
MATTED
FILE, THE PROGRAM WILL PRINT A LIST OF THE
Mixer
MISSING SE=
CTIONS
AND TERMINATE. IF ALL REQUESTED SECTIONS ARE Mixer
FOUND THE =
PROGRAM
WILL PRODUCE A COMPOSITE SECTION USING THE Mixe=
r
WILL NOT BE
THINNED. =
&nb=
sp; =
&nb=
sp;
Mixer
=
&nb=
sp;
=
&nb=
sp; =
&nb=
sp; Mixer
PRIOR TO L=
ATER
USE IN ANY APPLICATION THE NUMBER OF ENERGY POINTS Mixer
IN THE COM=
POSITE
CROSS SECTION MAY BE MINIMIZED BY USING PROGRAM Mixer
LINEAR,
UCRL-50400, VOL. 17, PART B TO THIN THE DATA. =
Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
ONLY LINEA=
RLY
INTERPOLABLE DATA =
&nb=
sp; =
Mixer
-------------------------------
=
&nb=
sp; Mixer
THE CROSS
SECTIONS TO BE COMBINED MUST BE IN LINEARLY INTERPOLABLE Mixer
TABULATED =
FORM (
=
&nb=
sp; =
&nb=
sp;
=
Mixer
TO CONVERT
TABULATED CROSS SECTIONS TO LINEARLY INTERPOLABLE FORM Mixer
SEE, PROGR=
AM
LINEAR, UCRL-50400, VOL. 17, PART A. =
Mixer
=
&nb=
sp; =
&nb=
sp; =
Mixer
TO CONVERT
RESONANCE PARAMETERS TO LINEARLY INTERPOLABLE FORM SEE, Mixer
PROGRAM RE=
CENT,
UCRL-50400, VOL. 17, PART C. =
&nb=
sp;
Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
TO DOPPLER
BROADEN LINEARLY INTERPOLABLE DATA TO ANY TEMPERATURE Mixer
SEE PROGRAM
SIGMA1, UCRL-50400, VOL. 17, PART B. =
Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
PAGING SYSTEM =
&nb=
sp; =
&nb=
sp;
Mixer
------------- =
&nb=
sp; =
&nb=
sp;
Mixer
THERE IS NO
LIMIT TO THE THE NUMBER OF DATA POINTS IN EACH OF THE Mixer
SECTIONS T=
O BE
COMBINED, NOR IS THERE A LIMIT TO THE NUMBER OF Mixer
DATA POINT=
S IN
THE COMPOSITE MIXTURE CROSS SECTION. =
Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
ALL REQUIR=
ED
SECTIONS OF DATA ARE READ FROM THE ORIGINAL ENDF/B Mixer
FORMATTED =
FILE.
ANY SECTION OF 60000 OR FEWER POINTS WILL BE Mixe=
r
TOTALLY CO=
RE
RESIDENT. LARGER SECTIONS ARE LOADED INTO A PAGING Mixer
SYSTEM USI=
NG A
SCRATCH FILE WITH ONLY 60000 POINTS PER SECTION Mixer
CORE RESID=
ENT AT
ANY ONE TIME. SIMILARLY THE COMPOSITE SECTION Mixer
WILL BE TO=
TALLY
CORE RESIDENT IF IT CONTAINS 60000 OR FEWER POINTS Mixer
AND LARGER
COMPOSITE SECTIONS WILL BE LOADED INTO A PAGING
Mixer
SYSTEM WHE=
RE
ONLY 60000 POINTS ARE CORE RESIDENT AT ANY TIME. SINC Mixer
A PAGING S=
YSTEM
MAY BE USED BY ANY SECTION OF DATA THERE IS NO Mixer
LIMIT TO T=
HE
SIZE OF EITHER THE ORIGINAL SECTIONS, NOR TO THE Mixer
COMPOSITE
SECTION, E.G. A SECTION MAY CONTAIN 100,000 ENERGIES Mixer
AND CROSS
SECTIONS TO DESCRIBE A GIVEN REACTION. =
Mixer
=
&nb=
sp; =
&nb=
sp; =
=
Mixer
PAGE SIZE<=
span
style=3D'mso-spacerun:yes'> =
&nb=
sp; =
&nb=
sp;
Mixer
---------<=
span
style=3D'mso-spacerun:yes'> =
&nb=
sp; =
&nb=
sp;
Mixer
THE PAGE S=
IZE
USED IN THIS PROGRAM IS DEFINED BY THE PARAMETER Mixer
NPAGE AND =
THE
DIMENSIONS OF THE ARRAYS XTAB AND YTAB. IN ORDER Mixer
TO ADAPT T=
HIS
PROGRAM FOR USE ON ANY COMPUTER THE PAGE SIZE MAY Mixer
BE INCREAS=
ED OR
DECREASED BUT THE FOLLOWING RULES MUST BE FOLLOWED Mixer
=
&nb=
sp; =
&nb=
sp;
=3D=3D=3D=3D =
Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
(1) NPAGE =
- MUST
BE A MULTIPLE OF 3 IN ORDER TO ALLOW THE PROGRAM Mixer
=
TO READ FULL CARDS OF ENDF/B DATA (3 POINTS PER LINE). FAILURE
Mixer
=
TO FOLLOW THIS RULE CAN LEAD TO LOSS OF DATA AND/OR PROGRAM Mixer
=
ERRORS DURING EXECUTION. =
&nb=
sp; =
Mixer
(3) YTAB - THE DIMENSION OF YTAB MUST BE
(NPAGE,11). =
Mixer
(4) XTAB - THE DIMENSION OF XTAB MUST BE
(NPAGE,11). =
Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
DOPPLER
BROADENING &n=
bsp;
=
&nb=
sp; =
Mixer
------------------ =
&nb=
sp; =
&nb=
sp;
Mixer
THE COMPOS=
ITE
CROSS SECTION OUTPUT FROM THIS PROGRAM SHOULD NOT Mixer
BE DOPPLER
BROADENED USING PROGRAM SIGMA1, OR THE EQUIVALENT. THE Mixer
ATOMIC WEI=
GHT
USED TO IDENTIFY THE COMPOSITE MIXTURE IS BASED ON Mixer
THE ATOM
FRACTION OF EACH CONSTITUENT AND CANNOT BE USED TO
Mixer
CHARACTERI=
ZE THE
BROADENING OF ANY GIVEN RESONANCE IN THE MIXTURE Mixer
DUE TO THE
CONTRIBUTION OF ONE CONSTITUENT. IN ORDER TO CONSIDER Mixer
DOPPLER
BROADENING FIRST USE PROGRAM SIGMA1 TO BROADEN THE CROSS Mixer
SECTION FO=
R EACH
OF THE CONSTITUENTS AND THEN COMBINE THE =
Mixer
BROADENED =
DATA
USING PROGRAM MIXER. =
&nb=
sp;
Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
EXAMPLE US=
E =
&nb=
sp; =
&nb=
sp;
Mixer
----------=
- =
&nb=
sp; =
&nb=
sp;
Mixer
THE OUTPUT=
FROM
THIS PROGRAM HAS BEEN FOUND TO BE EXTREMELY
Mixer
USEFUL IN =
THE
FOLLOWING APPLICATIONS... =
&nb=
sp;
Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
(1) CALCUL=
ATE A
COMPOSITE TOTAL CROSS SECTON FOR LATER USE AS Mixer
=
A WEIGHTING FUNCTION IN SELF-SHIELDING THE CROSS SECTIONS Mixer
OF EACH CONSTITUENT OF=
THE
MIXTURE SEPARATELY. =
Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
=
PROGRAM GROUPIE CAN USE THE CALCULATED COMPOSITE TOTAL CROSS Mixer
=
SECTION AS THE TOTAL CROSS SECTION FOR EACH CONSTITUENT OF Mixer
=
THE MIXTURE IN ORDER TO CALCULATE&n=
bsp;
SELF-SHIELDED CROSS SECTION Mixer
=
FOR EACH CONSTITUENT OF THE MIXTURE. =
&nb=
sp;
Mixer
=
&nb=
sp;
=
&nb=
sp; =
Mi=
xer
(2) CALCUL=
ATE
COMPOSITE TOTAL AND FISSION CROSS SECTIONS IN
Mixer
=
ORDER TO CALCULATE THE TRANSMISSION AND SELF-INDICATION
Mixer
=
THROUGH COMPOSITE MATERIALS. GENERALLY IN THIS CASE THE
Mixer
=
TOTAL CROSS SECTION WILL BE CALCULATED FOR THE COMPOSITION Mixer
=
OF THE SAMPLE AND THE FISSION CROSS SECTION WILL BE =
Mixer
=
CALCULATED FOR THE COMPOSITION OF THE FISSION CHAMBER =
Mixer
=
(WHICH GENERALLY WILL HAVE A DIFFERENT COMPOSITION THAN THE Mixer
=
SAMPLE). =
&nb=
sp; =
&nb=
sp;
Mixer
=
&nb=
sp; =
&nb=
sp;
=
Mixer
=
PROGRAM VIRGIN CAN USE THE OUTPUT FROM THIS PROGRAM TO
Mixer
=
PERFORM TRANSMISSION AND SELF-INDICATION CALCULATIONS.
Mixer
=
PROGRAM VIRGIN WILL ANALYTICALLY CALCULATE THE UNCOLLIDED Mixer
=
(I.E. VIRGIN) FLUX TRANSMITTED AND REACTION RATE DUE TO ANY Mixer
=
TABULATED LINEARLY INTERPOLABLE INCIDENT SPECTRUM. RESULTS Mixer
=
WILL BE PRESENTLY FOR UP TO 10 DIFFERENT SAMPLE THICKNESSES Mixer
=
AND BINNED INTO ENERGY GROUPS IN ORDER TO SIMULATE AN =
Mixer
=
EXPERIMENTAL MEASUREMENT. =
&nb=
sp; =
Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
(3) THE OU=
TPUT
FROM THIS PROGRAM IS VERY USEFUL TO PLOT IN ORDER Mixer
=
TO SEE THE IMPORTANCE OF SPECIFIC CROSS SECTION FEATURES IN Mixer
=
THE COMPOSITE CROSS SECTION. =
&nb=
sp; =
Mixer
=
=
&nb=
sp; =
&nb=
sp; Mixer=
=
PROGRAM COMPLOT CAN BE USED TO PLOT THE OUTPUT FROM THIS Mixe=
r
=
PROGRAM AND IF REQUIRED EXAMINE ANY PARTICULAR ENERGY RANGE Mixer
=
IN DETAIL. IN ORDER TO DO THIS THE (ZA, MT) EQUIVALENCE OPTION
Mixer
=
OF PROGRAM COMPLOT SHOULD BE USED. TO COMPARE ANY CONSTITUENT Mixer
=
CROSS SECTION TO THE COMPOSITE CROSS SECTION THE INPUT TO Mixer
=
COMPLOT SHOULD EQUATE THE (ZA,MT) OF THE COMPOSITE TO THE Mixer
=
(ZA,MT) OF ONE CONSTITUENT AND THE MULTIPLIER INPUT TO
Mixer
=
COMPLOT SHOULD BE THE ATOM FRACTION FOR THE CONSTITUENT (THE Mixer
=
ATOM FRACTIONS ARE DEFINED IN THE OUTPUT LISTING FROM PROGRAM Mixer
=
MIXER). =
&nb=
sp; =
&nb=
sp;
Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
INPUT FILE=
S =
&nb=
sp; =
=
Mixer
----------=
- =
&nb=
sp; =
&nb=
sp;
Mixer
UNIT DESCRIPTION =
&nb=
sp; =
&nb=
sp;
Mixer
---- ----------- =
&nb=
sp; =
Mixer=
2 INPUT CARDS (B=
CD -
80 CHARACTERS/RECORD) =
Mixer
10 ORIGINAL EVALUATED DATA IN E=
NDF/B
FORMAT =
Mixer
=
&nb=
sp;
(BCD - 80 CHARACTERS/RECORD) =
Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
OUTPUT
FILES =
&nb=
sp; =
&nb=
sp;
Mixer
------------ =
&nb=
sp; =
&nb=
sp;
Mixer
UNIT
DESCRIPTION =
&nb=
sp; =
&nb=
sp;
Mixer
---- ----------- =
&nb=
sp; =
&nb=
sp;
Mixer
3 OUTPUT LISTING=
(BCD
- 120 CHARACTERS/RECORD) =
Mixer
11 COMPOSITE EVALUATED DATA IN =
ENDF/B
FORMAT =
Mixer
=
&nb=
sp;
(BCD - 80 CHARACTERS/RECORD) =
&nb=
sp;
Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
SCRATCH
FILES =
&nb=
sp; =
&nb=
sp; Mixer
------------- =
&nb=
sp; =
&nb=
sp;
Mixer
UNIT DESCRIPTION =
&nb=
sp; =
&nb=
sp;
Mixer
---- ----------- =
=
&nb=
sp; =
Mixer
12 SCRATCH FILE FOR EACH OF THE=
10
SECTIONS WHICH =
Mixer
13 WILL BE ADDED TOGETHER TO DE=
FINE
THE FINAL =
Mixer
. SECTION (BINAR=
Y -
60000 AND 480000 WORDS/RECORD) =
Mixer
.
. =
&nb=
sp; =
&nb=
sp; =
Mixer
.
. =
&nb=
sp; =
&nb=
sp; =
Mixer
20 .=
=
&nb=
sp; =
=
Mixer
21 .=
=
&nb=
sp; =
&nb=
sp; =
Mixer
22 SCRATCH FILE FOR COMBINED
SECTION. =
&nb=
sp;
Mixer
=
(BINARY - 2004 WORDS/RECORD) =
&nb=
sp;
=
Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
STANDARD F=
ILE
NAMES (SEE SUBROUTINES FILIO1 AND FILIO2) =
Mixer
---------------------------------------------------------------- Mixer
UNIT FILE NAME =
&nb=
sp; =
&nb=
sp;
Mixer
---- ---------- =
&nb=
sp; =
&nb=
sp;
Mixer
2 MIXER.INP =
&nb=
sp; =
&nb=
sp;
Mixer
3 MIXER.LST =
&nb=
sp; =
&nb=
sp;
Mixer
10 ENDFB.IN =
&nb=
sp; =
&nb=
sp;
Mixer
11 ENDFB.OUT =
&nb=
sp; =
&nb=
sp;
Mixer
12-22 (SCRATCH) =
&nb=
sp; =
&nb=
sp;
Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
INPUT CARD=
S =
&nb=
sp; =
&nb=
sp;
Mixer
----------=
- =
&nb=
sp; =
&nb=
sp; Mixer
LINE COLS. FORMAT NAME DESCRIPTION =
&nb=
sp;
Mixer
---- ----- ------ ------- ---------- =
&nb=
sp;
Mixer
1-2<=
span
style=3D'mso-spacerun:yes'> 1-66 16A4,A2 TITLE TWO LINE TITLE DESCRIBING
PROBLEM
Mixer
=
&nb=
sp; =
(THIS TITLE IS USED TO IDENTIFY THE Mixer
=
&nb=
sp; =
OUTPUT LISTING AND IS ALSO WRITTEN Mixer
=
&nb=
sp; =
IN MF=3D1, MT=3D451 (HOLLERITH SECTION) Mixer
=
&nb=
sp; =
OF THE ENDF/B FORMATTED OUTPUT TO Mixer
=
&nb=
sp; =
IDENTIFY THE COMPOSITE MIXTURE). Mixer
3 1-60 =
ENDF/B INPUT DATA FILENAME =
Mixer
=
&nb=
sp; =
(STANDARD OPTION =3D ENDFB.IN) =
Mixer
4 1-60 =
ENDF/B OUTPUT DATA FILENAME =
Mixer
=
&nb=
sp; =
(STANDARD OPTION =3D ENDFB.OUT)
Mixer
5 1-11 I11 IZAOUT ZA IDENTIFICATION FOR COMBINATION<=
span
style=3D'mso-spacerun:yes'> Mixer
5 12-17 I6 MATOUT MAT IDENTIFICATION FOR COMBINATION=
Mixer
5 18-19 I2 MFOUT MF IDENTIFICATION FOR
COMBINATION Mixer
5 20-22 I3 MTOUT MT IDENTIFICATION FOR
COMBINATION
Mixer
6-N<=
span
style=3D'mso-spacerun:yes'> 1-11 I11 IZAGET ZA (1000*Z+A) OF MATERIAL =
Mixer
6-N<=
span
style=3D'mso-spacerun:yes'> 12-22 I11 MTGET MT OF REACTION =
&nb=
sp;
Mixer
6-N 23-33 E11.4 DENSE DENSITY OF MATERIAL
(GRAMS/CC)
Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
THE SIXTH =
LINE
IS REPEATED FOR EACH SECTION (FROM 2 TO 10).
Mixer
SINCE THE =
ENDF/B
FORMATTED OUTPUT IS IN BARNS/ATOM FORM A MINIMUM Mixer
OF TWO SEC=
TIONS
MUST BE COMBINED (I.E., IF ONLY ONE SECTION IS Mixer
SPECIFIED =
THE
OUTPUT WOULD BE IDENTICAL TO THE INPUT AND AS SUCH Mixer
THE PROGRA=
M WILL
CONSIDER THIS TO BE AN ERROR AND NOT PERFORM THE Mixer
CALCULATIO=
N).
THE LIST OF SECTIONS IS TERMINATED BY A BLANK LINE. Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
THE LIST OF
SECTIONS TO BE COMBINED MAY BE SPECIFIED IN ANY
Mixer
ORDER, I.E=
. THEY
NEED NOT BE IN ZA ORDER OR THE ORDER THAT THE Mixer
EVALUATED =
DATA
APPEARS ON THE ENDF/B FORMATTED TAPE. =
Mixer
=
&nb=
sp; =
=
&nb=
sp; Mixer
EXAMPLE IN=
PUT
NO. 1 =
&nb=
sp; =
&nb=
sp;
Mixer
------------------- =
&nb=
sp; =
&nb=
sp;
Mixer
CREATE THE=
TOTAL
CROSS SECTION (MT=3D1) FOR STAINLESS STEEL AND Mixer
IDENTIFY T=
HE
COMBINED MATERIAL WITH ZA=3D26800 AND MAT=3D4000,
Mixer
THE COMPOS=
ITION
BY VOLUME OF THE STEEL WILL BE... =
Mixer
=
&nb=
sp; =
&nb=
sp; =
=
Mixer
THE DATA F=
ROM
\ENDFB6\K300\LIBRARY.DAT AND WRITE DATA TO =
Mixer
\MIXER\STEEL.DAT =
&nb=
sp; =
&nb=
sp;
Mixer
=
&nb=
sp; =
&nb=
sp; =
Mixer
IRON - 74.8
PER-CENT =
&nb=
sp; =
Mixer
CHROMIUM - 16.0 =
&nb=
sp; =
&nb=
sp;
Mixer
NICKEL - 6.0 =
&nb=
sp; =
&nb=
sp;
Mixer
MANGANESE =
- 2.0 =
&nb=
sp; =
&nb=
sp;
Mixer
SILICON
CARBON - 0.2 =
&nb=
sp; =
&nb=
sp;
Mixer
=
&nb=
sp; =
&nb=
sp; =
Mixer
THE INPUT =
MUST
SPECIFY THE COMPOSITION BY GRAMS/CC. THIS IS
Mixer
DEFINED AS=
THE
PRODUCT OF THE STANDARD DENSITY (GRAMS/CC) =
Mixer
TIMES THE =
VOLUME
FRACTION. NOTE, DO NOT USE ATOM FRACTIONS.
Mixer
FOR THIS E=
XAMPLE
THE FOLLOWING 12 INPUT CARDS ARE REQUIRED.... Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
STAINLESS =
STEEL.
COMPOSITION BY PER-CENT VOLUME IS 74.8-IRON, Mixer
16-CHROME,
6-NICKEL, 2-MANGANESE, 1-SILICON, 0.2-CARBON =
Mixer
\ENDFB6\K300\LIBRARY.DAT =
&nb=
sp; =
Mixer
\MIXER\STEEL.DAT =
=
&nb=
sp; =
Mixer
=
26800 4000 3 1 =
&nb=
sp; =
Mixer
=
26000 =
1 5.88676 =
(NOTE,
GRAMS/CC INPUT FOR EACH
Mixer
=
24000 =
1 1.150448
CONSTITUENT, E.G. FOR IRON THE Mixer
=
28000 =
1 0.533928 STP
DENSITY IS 7.87 GRAMS/CC.
Mixer
=
25055 =
1 0.1486 &nb=
sp;
THE INPUT VALUE OF 5.88676 IS Mixer
=
14000 =
1 0.0233 &nb=
sp;
0.748 X 7.87,I.E. VOLU=
ME
Mixer
=
6012 =
1 0.0044958 FRAC=
TION
TIMES STP DENSITY).
Mixer
=
&nb=
sp; =
(BLANK LINE TERMINATES INPUT LIST) Mixer
=
&nb=
sp; =
&nb=
sp; =
Mixe=
r
EXAMPLE IN=
PUT
NO. 2 =
&nb=
sp; =
&nb=
sp;
Mixer
------------------- =
&nb=
sp; =
&nb=
sp;
Mixer
THE SAME E=
XAMPLE
AS THE ABOVE PROBLEM, ONLY USE THE STANDARD Mixe=
r
ENDF/B DATA
FILENAMES - ENDFB.IN AND ENDFB.OUT (THIS CAN BE
Mixer
DONE BY LE=
AVING
THE THIRD AND FOURTH INPUT LINES BLANK). =
Mixer
FOR THIS E=
XAMPLE
THE FOLLOWING 12 INPUT CARDS ARE REQUIRED.... Mixer
=
&nb=
sp; =
&nb=
sp; =
Mixer
STAINLESS =
STEEL.
COMPOSITION BY PER-CENT VOLUME IS 74.8-IRON, Mixer
16-CHROME,
6-NICKEL, 2-MANGANESE, 1-SILICON, 0.2-CARBON =
Mixer
(NOTE - TH=
IS
LINE IS REALLY BLANK) =
&nb=
sp;
Mixer
(NOTE - TH=
IS
LINE IS REALLY BLANK) =
&nb=
sp;
Mixer
=
26800 4000 3 1 =
&nb=
sp; =
Mixer
=
26000 =
1 5.88676 =
(NOTE,
GRAMS/CC INPUT FOR EACH
Mixer
=
24000 =
1 1.150448
CONSTITUENT, E.G. FOR IRON THE Mixer
=
28000 =
1 0.533928 STP
DENSITY IS 7.87 GRAMS/CC.
Mixer
=
25055 =
1 0.1486 THE INPUT VALUE OF 5.88=
676
IS Mixer
=
14000 =
1 0.0233 &nb=
sp;
0.748 X 7.87,I.E.
VOLUME
Mixer
=
6012 =
1 0.0044958 FRAC=
TION
TIMES STP DENSITY).
Mixer
=
&nb=
sp; =
(BLANK LINE TERMINATES INPUT LIST) Mixer
=
&nb=
sp; =
&nb=
sp; =
&nb=
sp;
Mixer
=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
Mixer