=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 Groupie

=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 Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

PROGRAM GROUPIE = &nb= sp; = &nb= sp; Groupie

VERSION 76= -1 (NOVEMBER 1976) = &nb= sp; = Groupie

VERSION 79= -1 (OCTOBER 1979) CDC-7600 AND CRAY-1 VERSION. = Groupie

VERSION 80= -1 (MAY 1980) IBM, CDC AND CRAY VERSION = Groupie

VERSION 81= -1 (JANUARY 1981) EXTENSION TO 3000 GROUPS = Groupie

VERSION 81= -2 (MARCH 1981) IMPROVED SPEED = &nb= sp; Groupie

VERSION 81= -3 (AUGUST 1981) BUILT-IN 1/E WEIGHTING SPECTRUM Groupie

VERSION 82= -1 (JANUARY 1982) IMPROVED COMPUTER COMPATIBILITY Groupie

VERSION 83= -1 (JANUARY 1983)*MAJOR RE-DESIGN. = &nb= sp; Groupie

= &nb= sp; *ELIMINATED COMPUTER DEPENDENT CODING. Groupie

= &nb= sp; *NEW, MORE COMPATIBLE I/O UNIT NUMBERS. Groupie

= &nb= sp; *NEW MULTI-BAND LIBRARY BINARY FORMAT. Groupie

VERSION 83= -2 (OCTOBER 1983) ADDED OPTION TO ALLOW SIGMA-0 TO BE Groupie

= &nb= sp; DEFINED EITHER AS MULTIPLES OF Groupie

= &nb= sp; UNSHIELDED TOTAL CROSS SECTION IN EACH Groupie

= &nb= sp; GROUP, OR POWERS OF 10 IN ALL GROUPS. Groupie

VERSION 84= -1 (APRIL 1984) ADDED MORE= BUILT IN MULTIGROUP ENERGY Groupie =

= &nb= sp; STRUCTURES. = &nb= sp; Groupie

VERSION 85= -1 (APRIL 1985) *UPDATED FOR END= F/B-VI FORMATS. Groupie

= &nb= sp; *SPECIAL I/O ROUTINES TO GUARANTEE Groupie

= &nb= sp; ACCURACY OF ENERGY. = Groupie

= &nb= sp; *DOUBLE PRECISION TREATMENT OF ENERGY Groupie

= &nb= sp; (REQUIRED FOR NARROW RESONANCES). Groupie

= &nb= sp; *MINIMUM TOTAL CROSS SECTION TREATMENT Groupie

VERSION 85= -2 (AUGUST 1985) *FORTRAN-77/H VERSION = Groupie

VERSION 86= -1 (JANUARY 1986)*ENDF/B-VI FORMAT = &nb= sp; Groupie

VERSION 86= -2 (JUNE 1986) *BUILT-IN MAXWELLIAN, 1/E AND FISSION Groupie

= &nb= sp; WEIGHTING SPECTRUM. = Groupie

VERSION 88= -1 (JULY 1988) *OPTION...INTERNALLY DEFINE ALL I/O Groupie

= = FILE NAMES (SEE, SUBROUTINES FILIO1 = Groupie

= &nb= sp; FILIO2 FOR DETAILS). = Groupie

= &nb= sp; *IMPROVED BASED ON USER COMMENTS. Grou= pie

VERSION 89= -1 (JANUARY 1989)*PSYCHOANALYZED BY PROGRAM FREUD TO Groupie

= &nb= sp; INSURE PROGRAM WILL NOT DO ANYTHING Groupie

= &nb= sp; CRAZY. = &nb= sp; Groupie

= &nb= sp; *UPDATED TO USE NEW PROGRAM CONVERT Groupie

= &nb= sp; KEYWORDS. = &nb= sp; Groupie

= &nb= sp; *ADDED LIVERMORE CIVIC COMPILER Groupie

= &nb= sp; CONVENTIONS. = &nb= sp; Groupie

VERSION 91= -1 (JUNE 1991) *INCREASED = PAGE SIZE FROM 1002 TO 5010 Groupi= e

= &nb= sp; POINTS = &nb= sp; Groupie

= &nb= sp; *UPDATED BASED ON USER COMMENTS Groupie

= &nb= sp; *ADDED FORTRAN SAVE OPTION = Groupie

= &nb= sp; *COMPLETELY CONSISTENT ROUTINE TO READ Groupie

= &nb= sp; FLOATING POINT NUMBERS. = Groupie

VERSION 92= -1 (JANUARY 1992)*ADDED RESONANCE INTEGRAL CALCULATION - Groupie

= &nb= sp; UNSHIELDED AND/OR SHIELDED - FOR Grou= pie

= &nb= sp; DETAILS SEE BELOW = &nb= sp; Groupie

= &nb= sp; *INCREASED NUMBER OF ENERGY POINTS Groupie

= &nb= sp; IN BUILT-IN SPECTRA - TO IMPROVE Grou= pie

= &nb= sp; ACCURACY. = &nb= sp; Groupie

= &nb= sp; *ALLOW SELECTION OF ZA/MF/MT OR Groupie

= &nb= sp; MAT/MF/MT RANGES - ALL DATA NOT Groupie

= &nb= sp; SELECTED IS SKIPPED ON INPUT AND Grou= pie

= = NOT WRITTEN AS OUTPUT. = Groupie

= &nb= sp; *COMPLETELY CONSISTENT I/O ROUTINES - Groupie

= &nb= sp; TO MINIMIZE COMPUTER DEPENDENCE. Grou= pie

= &nb= sp; *NOTE, CHANGES IN INPUT PARAMETER Grou= pie

= &nb= sp; FORMAT - FOR ZA/MF/MT OR MAT/MF/MT Groupie

= &nb= sp; RANGES. = &nb= sp; Groupie

VERSION 92= -2 (JUNE 1992) *MULTIBAND PARAMETERS OUTOUT AS Groupie

= &nb= sp; CHARACTER (RATHER THAN BINARY) FILE. Groupie

VERSION 93= -1 (APRIL 1993) *INCREASED PAGE = SIZE FROM 5010 TO = Groupie

= &nb= sp; 30000 POINTS = &nb= sp; Groupie

= &nb= sp; *ELIMINATED COMPUTER DEPENDENCE. Groupie

VERSION 94= -1 (JANUARY 1994)*VARIABLE ENDF/B DATA FILENAMES Groupie

= &nb= sp; TO ALLOW ACCESS TO FILE STRUCTURES Groupie

= &nb= sp; (WARNING - INPUT PARAMETER FORMAT Groupie

= &nb= sp; HAS BEEN CHANGED) = &nb= sp; Groupie

= &nb= sp; *CLOSE ALL FILES BEFORE TERMINATING Groupie

= &nb= sp; (SEE, SUBROUTINE ENDIT) = Groupie

VERSION 95= -1 (JANUARY 1994)*CORRECTED MAXWELLIAN WEIGHTING Groupie

= &nb= sp; *CHANGING WEIGHTING SPECTRUM FROM Grou= pie

= &nb= sp; 0.1 TO 0.001 % UNCERTAINTY = Groupie

VERSION 96= -1 (JANUARY 1996) *COMPLETE RE-WRITE = Groupie

= &nb= sp; *IMPROVED COMPUTER INDEPENDENCE Groupie

= &nb= sp; *ALL DOUBLE PRECISION = Groupie

= &nb= sp; *ON SCREEN OUTPUT = &nb= sp; Groupie

= &nb= sp; *UNIFORM TREATMENT OF ENDF/B I/O Grou= pie

= = *IMPROVED OUTPUT PRECISION = Groupie

= &nb= sp; *DEFINED SCRATCH FILE NAMES = Groupie

= &nb= sp; *UP TO 1000 GROUP MULTI-BAND = Groupie

= &nb= sp; = CALCULATION (PREVIOUSLY 175) = Groupie

= &nb= sp; *MAXIMUM NUMBER OF GROUPS REDUCED Groupie

= &nb= sp; = FROM 3,000 TO 1,000 = Groupie

= &nb= sp; *UP TO 1000 MATERIALS = Groupie

= &nb= sp; = (PREVIOUSLY 100) = &nb= sp; Groupie

= &nb= sp; *CORRECTED USE OF MAXWELLIAN + Groupie

= &nb= sp; = 1/E + FISSION SPECTRUM = Groupie

= &nb= sp; *ONLY 2 BAND VERSION DISTRIBUTED Grou= pie

= &nb= sp; = (CONTACT AUTHOR FOR DETAILS) = Groupie

= &nb= sp; *DEFINED SCRATCH FILE NAMES = Groupie

VERSION 99= -1 (MARCH 1999) *CORRECTED CHARACTER TO FLOATING Grou= pie

= &nb= sp; = POINT READ FOR MORE DIGITS = Groupie

= &nb= sp; *UPDATED TEST FOR ENDF/B FORMAT Groupie

= &nb= sp; = VERSION BASED ON RECENT FORMAT CHANGE Groupie

= &nb= sp; *GENERAL IMPROVEMENTS BASED ON Groupie

= &nb= sp; = USER FEEDBACK = &nb= sp; Groupie

VERSION 99= -2 (JUNE 1999) *ASSU= ME ENDF/B-VI, NOT V, IF MISSING Groupie

= &nb= sp; = MF=3D1, MT-451. = &nb= sp; Groupie

VERS. 2000= -1 (FEBRUARY 2000)*ADDED MF=3D10, ACTIVATION CROSS SECTION Groupie =

= &nb= sp; = PROCESSING. = &nb= sp; Groupie

= &nb= sp; *GENERAL IMPROVEMENTS BASED ON Groupie

= &nb= sp; = USER FEEDBACK = &nb= sp; Groupie

VERS. 2002= -1 (FEBRUARY 2002)*ADDED TART 700 GROUP STRUCTURE Groupie

= &nb= sp; *ADDED VARIABLE SIGMA0 INPUT OPTION Groupie

= (MAY 2002) *OPTIONAL INPUT PARAMETERS = Groupie

= (NOV. 2002) *ADDED SAND-II EXTENDED DOWN TO Groupie

= &nb= sp; = 1.0E-5 EV. = &nb= sp; Groupie

= (JUNE 2003) *CORRECTED SAND-II 620 AND 640 GROUP Groupie

= &nb= sp; ENERGY BOUNDARIES DEFINITIONS. Groupie

VERS. 2004= -1 (SEPT. 2004) *INCREASED PAGE = SIZE FROM 30000 TO Groupie

= &nb= sp; 120000 POINTS = &nb= sp; Groupie

= &nb= sp; *ADDED "OTHER" AS ADDITIONAL REACTION Groupie

= &nb= sp; TO IMPROVE MULTI-BAND FITTING = Groupie

= &nb= sp; *ADDED ITERATION FOR "BEST" PARTIAL Groupie

= &nb= sp; PARAMETERS. = &nb= sp;Groupie

= &nb= sp; *DO NOT SKIP LOW TOTAL ENERGY RANGES Groupie

= &nb= sp; WHEN DEFINING AVERAGE CROSS SECTIONS - Groupie

= &nb= sp; THIS MAKES OUTPUT COMPATIBLE WITH Groupie

= &nb= sp; ANY STANDARD AVERAGING PROCEDURE Grou= pie

VERS. 2005= -1 (JAN. 2005) *ADDED OPTI= ON TO CHANGE TEMPERATURE OF Groupie=

= &nb= sp; BUILT-IN STANDARD SPECTRUM. = Groupie

VERS. 2007= -1 (JAN. 2007) *CHECKED AG= AINST ALL ENDF/B-VII. O= F Groupie

= &nb= sp; *INCREASED PAGE SIZE FROM 120,000 TO Groupie

= &nb= sp; 600,000 POINTS = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

OWNED, MAINTAINED AND DISTRIBUTED BY = &nb= sp; Groupie

------------------------------------ = &nb= sp; Groupie

THE NUCLEA= R DATA SECTION = &nb= sp; = Groupie

INTERNATIO= NAL ATOMIC ENERGY AGENCY = &nb= sp; Groupie

P.O. BOX 100 = &nb= sp; = &nb= sp; Groupie

A-1400, VI= ENNA, AUSTRIA = &nb= sp; = Groupie

EUROPE = &nb= sp; = &nb= sp; = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

ORIGINALLY WRITTEN BY = &nb= sp; = Groupie

------------------------------------ = &nb= sp; Groupie

DERMOTT E. CULLEN = &nb= sp; = &nb= sp; Groupie

UNIVERSITY= OF CALIFORNIA = = &nb= sp; = Groupie

LAWRENCE LIVERMORE NATIONAL LABORATORY = &nb= sp; Groupie

L-159 = &nb= sp; = &nb= sp; = Groupie

P.O. BOX 808 = &nb= sp; = &nb= sp; Groupie

LIVERMORE,= CA 94550 = &nb= sp; = &nb= sp; Groupie

U.S.A. = &nb= sp; = &nb= sp; = Groupie

TELEPHONE<= span style=3D'mso-spacerun:yes'> 925-423-7359 = &nb= sp; = Groupie

E. MAIL CULLEN1@LLNL.GOV = &nb= sp; = Groupie

WEBSITE HTTP://WWW.LLNL.GOV/CULLEN1 = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = Groupie

AUTHORS MESSAGE = &nb= sp; = &nb= sp; Groupie

--------------- = &nb= sp; = &nb= sp; Groupie

THE REPORT DESCRIBED ABOVE IS THE LATEST PUBLISHED DOCUMENTATION Groupie

FOR THIS PROGRAM. HOWEVER, THE COMMENTS BELOW SHOULD BE CONSIDERED Groupie

THE LATEST DOCUMENTATION INCLUDING ALL RECENT IMPROVEMENTS. PLEASE Groupie =

READ ALL OF THESE COMMENTS BEFORE IMPLEMENTATION, PARTICULARLY Groupie

THE COMMEN= TS CONCERNING MACHINE DEPENDENT CODING. = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

AT THE PRE= SENT TIME WE ARE ATTEMPTING TO DEVELOP A SET OF COMPUTER Groupie

INDEPENDEN= T PROGRAMS THAT CAN EASILY BE IMPLEMENTED ON ANY ONE Groupie

OF A WIDE VARIETY OF COMPUTERS. IN ORDER TO ASSIST IN THIS PROJECT Groupie

IT WOULD BE APPECIATED IF YOU WOULD NOTIFY THE AUTHOR OF ANY Grou= pie

COMPILER DIAGNOSTICS, OPERATING PROBLEMS OR SUGGESTIONS ON HOW TO Groupie

IMPROVE TH= IS PROGRAM. HOPEFULLY, IN THIS WAY FUTURE VERSIONS OF Groupie

THIS PROGR= AM WILL BE COMPLETELY COMPATIBLE FOR USE ON YOUR Groupie

COMPUTER.<= span style=3D'mso-spacerun:yes'> = &nb= sp; = &nb= sp; = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

PURPOSE = &nb= sp; = &nb= sp; = Groupie

------- = &nb= sp; = = &nb= sp; Groupie

THIS PROGR= AM IS DESIGNED TO CALCULATE ANY COMBINATION OF = Groupie

THE FOLLOW= ING QUANTITIES FROM LINEARLY INTERPOLABLE TABULATED Groupie

CROSS SECT= IONS IN THE ENDF/B FORMAT = = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

(1) UNSHIE= LDED GROUP AVERAGED CROSS SECTIONS = &nb= sp; Groupie

(2) BONDAR= ENKO SELF-SHIELDED GROUP AVERAGED CROSS SECTIONS Groupie

(3) MULTI-= BAND PARAMETERS = &nb= sp; = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

IN THE FOL= LOWING FOR SIMPLICITY THE ENDF/B TERMINOLOGY--ENDF/B Groupie

TAPE--WILL= BE USED. IN FACT THE ACTUAL MEDIUM MAY BE TAPE, CARDS, Groupie

DISK OR ANY OTHER MEDIUM. = &nb= sp; = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

ENDF/B FORMAT = &nb= sp; = &nb= sp; Groupie

------------- = &nb= sp; = &nb= sp; Groupie

THIS PROGR= AM ONLY USES THE ENDF/B BCD OR CARD IMAGE FORMAT (AS Groupie

OPPOSED TO= THE BINARY FORMAT) AND CAN HANDLE DATA IN ANY VERSION Groupie

OF THE END= F/B FORMAT (I.E., ENDF/B-I, II,III, IV OR V FORMAT). Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

IT IS ASSU= MED THAT THE DATA IS CORRECTLY CODED IN THE ENDF/B Grou= pie

FORMAT AND= NO ERROR CHECKING IS PERFORMED. IN PARTICULAR IT IS Groupie

ASSUMED TH= AT THE MAT, MF AND MT ON EACH CARD IS CORRECT. SEQUENCE Groupie

NUMBERS (C= OLUMNS 76-80) ARE IGNORED ON INPUT, BUT WILL BE = Groupie

CORRECTLY = OUTPUT ON ALL CARDS. THE FORMAT OF SECTION MF=3D1, MT=3D451 Groupie

AND ALL SE= CTIONS OF MF=3D 3 MUST BE CORRECT. THE PROGRAM COPIES ALL Groupie

OTHER SECT= ION OF DATA AS HOLLERITH AND AS SUCH IS INSENSITIVE TO Groupie

THE CORREC= TNESS OR INCORRECTNESS OF ALL OTHER SECTIONS. = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

ALL FILE 3= CROSS SECTIONS THAT ARE USED BY THIS PROGRAM MUST BE Groupie

LINEARLY INTERPOLABLE IN ENERGY AND CROSS SECTION (ENDF/B = Groupie

INTERPOLAT= ION LAW 2). FILE 3 BACKGROUND CROSS SECTIONS MAY BE MADE Groupie

LINEARLY INTERPOLABLE USING PROGRAM LINEAR (UCRL-50400, VOL. 17, Groupie

PART A). T= HE RESONANCE CONTRIBUTION MAY BE ADDED TO THE BACKGROUND Groupie

CROSS SECT= IONS USING PROGRAM RECENT (UCRL-50400, VOL. 17, PART B). Groupie

IF THIS PR= OGRAM FINDS THAT THE FILE 3 CROSS SECTIONS ARE NOT Grou= pie

LINEARLY INTERPOLABLE THIS PROGRAM WILL TERMINATE EXECUTION. Grou= pie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

CONTENTS OF OUTPUT = &nb= sp; = &nb= sp; Groupie

------------------ = &nb= sp; = &nb= sp; Groupie

IF ENDF/B FORMATTED OUTPUT IS REQUESTED ENTIRE EVALUATIONS ARE Groupie

OUTPUT, NO= T JUST THE MULTI-GROUPED FILE 3 CROSS SECTIONS, E.G. Groupie

ANGULAR AND ENERGY DISTRIBUTIONS ARE ALSO INCLUDED. = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

DOCUMENTATION = &nb= sp; = &nb= sp; Groupie

------------- &nbs= p; = &nb= sp; = &nb= sp; Groupie

THE FACT T= HAT THIS PROGRAM HAS OPERATED ON THE DATA IS DOCUMENTED Groupie

BY THE ADD= ITION OF THREE COMMENT CARDS AT THE END OF EACH = Groupie

HOLLERITH SECTION TO DESCRIBE THE GROUP STRUCTURE AND WEIGHTING Groupie

SPECTRUM, E.G. = &nb= sp; = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

********************** PROGRAM GROUPIE (2007-1) *************** Groupie

<= /p>

UNSHIELDED= GROUP AVERAGES USING 69 GROUPS (WIMS) = Groupie

MAXWELLIAN= , 1/E AND FISSION WEIGHTING SPECTRUM = Groupie

= &nb= sp; = &nb= sp; = Groupie

THE ORDER = OF ALL SIMILAR COMMENTS (FROM LINEAR, RECENT AND SIGMA1) Groupie

REPRESENTS= A COMPLETE HISTORY OF ALL OPERATIONS PERFORMED ON Grou= pie

THE DATA.<= span style=3D'mso-spacerun:yes'> = &nb= sp; = &nb= sp; = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

THESE COMM= ENT CARDS ARE ONLY ADDED TO EXISTING HOLLERITH SECTIONS, Groupie

I.E., THIS PROGRAM WILL NOT CREATE A HOLLERITH SECTION. THE FORMAT Groupie =

OF THE HOL= LERITH SECTION IN ENDF/B-V DIFFERS FROM THE THAT OF Groupie

EARLIER VE= RSIONS OF ENDF/B. BY READING AN EXISTING MF=3D1, MT=3D451 Groupie

IT IS POSS= IBLE FOR THIS PROGRAM TO DETERMINE WHICH VERSION OF Groupie

THE ENDF/B FORMA= T THE DATA IS IN. WITHOUT HAVING A SECTION OF Groupie

MF=3D1, MT= =3D451 PRESENT IT IS IMPOSSIBLE FOR THIS PROGRAM TO = Groupie

DETERMINE = WHICH VERSION OF THE ENDF/B FORMAT THE DATA IS IN, AND Groupie

AS SUCH IT= IS IMPOSSIBLE FOR THE PROGRAM TO DETERMINE WHAT FORMAT Groupie

SHOULD BE = USED TO CREATE A HOLLERITH SECTION. = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

REACTION I= NDEX = &nb= sp; = &nb= sp; Groupie

-------------- = &nb= sp; = &nb= sp; Groupie

THIS PROGR= AM DOES NOT USE THE REACTION INDEX WHICH IS GIVEN IN Groupie

SECTION MF= =3D1, MT=3D451 OF EACH EVALUATION. = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

THIS PROGR= AM DOES NOT UPDATE THE REACTION INDEX IN MF=3D1, MT=3D451. Groupie

THIS CONVE= NTION HAS BEEN ADOPTED BECAUSE MOST USERS DO NOT Groupie

REQUIRE A CORRECT REACTION INDEX FOR THEIR APPLICATIONS AND IT WAS Groupie

NOT CONSID= ERED WORTHWHILE TO INCLUDE THE OVERHEAD OF CONSTRUCTING Groupie

A CORRECT REACTION INDEX IN THIS PROGRAM. HOWEVER, IF YOU REQUIRE Groupie

A REACTION= INDEX FOR YOUR APPLICATIONS, AFTER RUNNING THIS PROGRAM Groupie

YOU MAY USE PROGRAM DICTIN TO CREATE A CORRECT REACTION INDEX. Groupie

= &nb= sp; = &nb= sp; = = Groupie

SECTION SIZE = &nb= sp; = &nb= sp; Groupie

------------ = &nb= sp; = &nb= sp; Groupie

SINCE THIS PROGRAM USES A LOGICAL PAGING SYSTEM THERE IS NO LIMIT Groupie

TO THE NUM= BER OF POINTS IN ANY SECTION, E.G., THE TOTAL CROSS Groupie

SECTION MA= Y BE REPRESENTED BY 200,000 DATA POINTS. = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

SELECTION = OF DATA = &nb= sp; = &nb= sp; Groupie

----------------- = &nb= sp; = &nb= sp; Groupie

THE PROGRAM SELECTS MATERIALS TO BE PROCESSED BASED EITHER ON Groupie

MAT (ENDF/= B MAT NO.) OR ZA. THE PROGRAM ALLOWS UP TO 100 MAT OR Groupie

ZA RANGES = TO BE SPECIFIED. THE PROGRAM WILL ASSUME THAT THE Groupie

ENDF/B TAP= E IS IN EITHER MAT OR ZA ORDER, WHICHEVER CRITERIA IS Groupie

USED TO SE= LECT MATERIALS, AND WILL TERMINATE WHEN A MAT OR ZA Groupie

IS FOUND T= HAT IS ABOVE THE RANGE OF ALL REQUESTS. = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

ENERGY ORD= ER AND UNITS = &nb= sp; = Gr= oupie

---------------------- = &nb= sp; = Groupie

ALL ENERGI= ES (FOR CROSS SECTIONS, WEIGHTING SPECTRUM OR GROUP Groupie

BOUNDARIES= ) MUST BE IN UNITS OF EV AND MUST BE IN ASCENDING Groupie

NUMERICAL ORDER. = &nb= sp; = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

ENERGY GRI= D = &nb= sp; = &nb= sp; Groupie

----------= - = &nb= sp; = &nb= sp; Groupie

ALTHOUGH A= LL REACTIONS MUST TO LINEARLY INTERPOLABLE, THEY DO NOT Groupie

ALL HAVE T= O USE THE SAME ENERGY GRID. EACH REACTION CAN BE GIVEN Groupie

BY AN INDEPENDENT ENERGY GRID. THIS PROGRAM WILL PROCEED FROM Groupie

THE LOWEST= TO HIGHEST ENERGY SELECTING EACH ENERGY INTERVAL OVER Groupie

WHICH ALL = DATA, FOR ANY GIVEN CALCULATION, ARE ALL LINEARLY Groupie

INTERPOLABLE. = &nb= sp; = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

GROUP STRUCTURE = &nb= sp; = &nb= sp; Groupie

--------------- = &nb= sp; = &nb= sp; Groupie

THIS PROGR= AM IS DESIGNED TO USE AN ARBITRARY ENERGY GROUP = Groupie

STRUCTURE = WHERE THE ENERGIES ARE IN EV AND ARE IN INCREASING Grou= pie

ENERGY ORD= ER. THE MAXIMUM NUMBER OF GROUPS IS 1000. = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

THE USER M= AY INPUT AN ARBITRARY GROUP STRUCTURE OR THE USER MAY Groupie

USE USE ON= E OF THE SEVEN BUILT-IN GROUP STRUCTURES. = Groupie

(0) 175 GR= OUP (TART STRUCTURE) = &nb= sp; = Groupie

(1) 50 GROUP (ORNL STRUCTURE) = &nb= sp; = Groupie

(2) 126 GR= OUP (ORNL STRUCTURE) = &nb= sp; = Groupie

(3) 171 GR= OUP (ORNL STRUCTURE) = &nb= sp; = Groupie

(4) 620 GR= OUP (SAND-II STRUCTURE, UP TO 18 MEV) = Groupie

(5) 640 GR= OUP (SAND-II STRUCTURE, UP TO 20 MEV) = Groupie

(6) 69 GROUP (WIMS STRUCTURE) = &nb= sp; = Groupie

(7) 68 GROUP (GAM-I STRUCTURE) = &nb= sp; = Groupie

(8) 99 GROUP (GAM-II STRUCTURE) = &nb= sp; Groupie

(9) 54 GROUP (MUFT STRUCTURE) = &nb= sp; = Groupie

(10) 28 GROUP (ABBN STRUCTURE) = &nb= sp; = Groupie

(11) 650 GROUP (= TART STRUCTURE) = = Groupie

(12) 700 GROUP (= TART STRUCTURE) = &nb= sp; = Groupie

(13) 665 GROUP (SAND-II STRUCTURE, 1.0e-5 eV, UP TO 18 MEV) Groupie

(14) 685 GROUP (SAND-II STRUCTURE, 1.0e-5 eV, UP TO 20 MEV) Group= ie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

GROUP AVERAGES = &nb= sp; = &nb= sp; Groupie

-------------- = &nb= sp; = &nb= sp; Groupie

THIS PROGR= AM DEFINES GROUP AVERAGED CROSS SECTIONS AS... = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

= (INTEGRAL E1 TO E2) (SIGMA(E)*S(E)*WT(E)*DE) = Groupie

AVERAGE =3D ----------------------------------------- = Groupie

= (INTEGRAL E1 TO E2) (S(E)*WT(E)*DE) = &nb= sp; Groupie

WHERE... = &nb= sp; = &nb= sp; Groupie

= = &nb= sp; = &nb= sp; = Groupie

AVERAGE =3D GROUP AVERAGED CROSS SECTION = &nb= sp; Groupie

E1, E2 =3D ENERGY LIMITS OF THE GRO= UP = &nb= sp; Groupie

SIGMA(E) = =3D ENERGY DEPENDENT CROSS SECTION FOR ANY GIVEN REACTION Groupie

S(E) =3D ENERGY DEPEN= DENT WEIGHTING SPECTRUM = Groupie

WT(E) =3D ENERGY DEPENDENT SELF-SHIELDING FACTOR. = Groupie

= &nb= sp; = = &nb= sp; = Groupie

ENERGY DEP= ENDENT WEIGHTING SPECTRUM = &nb= sp; Groupie

----------------------------------- = &nb= sp; Groupie

THE ENERGY DEPENDENT WEIGHTING SPECTRUM IS GIVEN BY AN ARBITRARY Groupie

TABULATED LINERLY INTERPOLABLE FUNCTION WHICH CAN BE DESCRIBED Groupie

BY AN ARBI= TRARY NUMBER OF POINTS. THIS ALLOWS THE USER TO = Groupie

SPECIFY ANY DESIRED WEIGHTING SPECTRUM TO ANY GIVEN DEGREE OF Groupie

ACCURACY. REMEMBER THAT THE PROGRAM WILL ASSUME THAT THE SPECTRUM Groupie

IS LINEARLY INTERPOLABLE BETWEEN TABULATED POINTS. THEREFORE THE Groupie

USER SHOUL= D USE ENOUGH POINTS TO INSURE AN ADEQUATE REPRESENTATION Groupie

OF THE SPE= CTRUM BETWEEN TABULATED DATA POINTS. = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

THE PRESENT VERSION OF THE CODE HAS THREE BULIT-IN WEIGHTING Grou= pie

SPECTRA, = &nb= sp; = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

(1) CONSTANT = &nb= sp; = &nb= sp; Groupie

(2) 1/E = &nb= sp; = &nb= sp; = Groupie

(3) MAXWEL= LIAN =3D E*EXP(-E/KT)/KT = (0.0 TO 4*KT) Groupie

= 1/E =3D C1/E &n= bsp; = ; (4*KT TO 67 KEV) Groupie

= FISSION =3D C2*EXP(-E/WA)*SINH(SQRT(E*WB)) (ABOVE 67 KEV) Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

= KT = =3D 0.253 EV (293 KELVIN) = &nb= sp; Groupie

= WA = =3D 9.65E+5 = &nb= sp; = &nb= sp; Groupie

= WB = =3D 2.29E-6 = &nb= sp; = &nb= sp; Groupie

= C1, C2 =3D DEFINED TO MAKE SPECTRUM CONTINUOUS = Groupie

= &nb= sp; = &nb= sp; = Groupie

= FISSION SPECTRUM CONSTANTS FROM = &nb= sp; Groupie

= A.F.HENRY, NUCLEAR REACTOR ANALYSIS, P. 11, MIT PRESS (1975) Groupie

= &nb= sp; = = &nb= sp; Groupie

UNSHIELDED= GROUP AVERAGES = &nb= sp; = Groupie

------------------------- = &nb= sp; = Groupie

FOR UNSHIE= LDED AVERAGES THE SELF-SHIELDING FACTOR (WT(E)) IS SET Groupie

TO UNITY. = THIS PROGRAM ALLOWS UP TO 1000 GROUPS. = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

SELF-SHIEL= DED GROUP AVERAGES = &nb= sp; = Groupie

---------------------------- = &nb= sp; = Groupie

IF SELF-SH= IELDED AVERAGES AND/OR MULTI-BAND PARAMETERS ARE Groupie

CALCULATED= THIS PROGRAM ALLOWS UP TO 1000 GROUPS. SELF-SHIELDED Groupie

AVERAGES A= ND/OR MULTI-BAND PARAMETERS ARE CALCULATED FOR THE Grou= pie

TOTAL, ELA= STIC, CAPTURE AND FISSION. = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

FOR THE TOTAL, ELASTIC, CAPTURE AND FISSION THE PROGRAM USES A Groupie

WEIGHTING FUNCTION THAT IS A PRODUCT OF THE ENERGY DEPENDENT Grou= pie

WEIGHTING SPECTRUM TIMES A BONDERENKO TYPE SELF-SHIELDING FACTOR. Groupie

= = &nb= sp; = &nb= sp; = Groupie

WT(E) =3D S(E)/(TOTAL(E)+SIGMA0)**N = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

WHERE... = &nb= sp; = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

S(E) - ENERGY DEPENDE= NT WEIGHTING SPECTRUM (DEFINED BY Groupie

= TABULATED VALUES AND LINEAR INTERPOLATION BETWEEN Grou= pie

= TABULATED VALUES). = &nb= sp; = Groupie

TOTAL(E) - ENERGY DEPENDENT TOTAL CROSS SECTION FOR ONE MATERIAL Groupie

= (DEFINED BY TABULATED VALUES AND LINEAR INTERPOLATION Groupie

= BETWEEN TABULATED VALUES). = &nb= sp; Groupie

SIGMA0 - CROSS SECTION TO REPRESENT= THE EFFECT OF ALL OTHER Groupie

= MATERIALS AND LEAKAGE (DEFINED WITHIN EACH GROUP TO BE Groupie

= A MULTIPLE OF THE UNSHIELDED TOTAL CROSS SECTION WITHIN Groupie

= THAT GROUP OR POWERS OF 10 - INPUT OPTION). = Groupie

N - A POSITIVE INTEGER (0, 1, 2 OR 3). = = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

THE PROGRA= M WILL USE ONE ENERGY DEPENDENT WEIGHTING SPECTRUM S(E) Groupie

AND 25 DIF= FERENT BONDERENKO TYPE SELF-SHIELDING FACTORS (25 SIGMA0 Groupie

AND N COMBINATIONS) TO DEFINE 25 DIFFERENT AVERAGE CROSS SECTIONS, Groupie <= /o:p>

FOR EACH REACTION, WITHIN EACH GROUP. = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

THE 25 WEI= GHTING FUNCTIONS USED ARE.... = &nb= sp; Groupie

(1) - UNSHIELDED CROSS SECTIONS (N=3D0) = &nb= sp; Groupie

(2-22)- PARTIALLY SHIELDED CROSS SECTIONS (N=3D1 ,VARIOUS SIGMA0) Groupie

THE VALUES OF SIGMA0 USED WILL BE EITHER, = Groupie

= (A) THE VALUES OF SIGMA0 THAT ARE USED VARY FROM 1024 Groupie

= TIMES THE UNSHIELDED TOTAL CROSS SECTIONS IN STEPS OF 1/2 Groupie

= DOWN TO 1/1024 TIMES THE UNSHIELDED TOTAL CROSS SECTION Groupie

= (A RANGE OF OVER 1 MILLION, CENTERED ON THE UNSHIELDED Groupie

= TOTAL CROSS SECTION WITHIN EACH GROUP). = Groupie

= (B) THE SAME CONSTANT VALUES OF SIGMA0 IN EACH GROUP. THE Groupie

= VALUES OF SIGMA0 USED INCLUDE 40000, 20000, 10000, 7000, Groupie

= 4000, 2000, 1000, 700, 400, 200, 100, 70, 40, 20, 10, 7, Groupie

= 4, 2, 1, 0.7, 0.4 (A RANGE OF 100,000 SPANNING MORE THAN Groupie

= THE RANGE OF SIGMA0 VALUES THAT MAY BE ENCOUNTERED IN Groupie

= ACTUAL APPLICATIONS) = &nb= sp; = Groupie

(23) - TOTALLY SHIELDED FLUX WEIGHTED C= ROSS SECTION = Groupie

= (N=3D1, SIGMA0=3D0) = &nb= sp; = Groupie

(24) - TOTALLY SHIELDED CURRENT WEIGHTED CROSS SECTION = Groupie

= (N=3D2, SIGMA0=3D0) = &nb= sp; = Groupie

(25) - TOTALLY SHIELDED COSINE SQUARED WEIGHTED CROSS SECTION &n= bsp; Groupie

= (N=3D3, SIGMA0=3D0) = &nb= sp; = Groupie

= &nb= sp; = &nb= sp; = Grou= pie

FOR ALL OT= HER REACTIONS (EXCEPT TOTAL, ELASTIC, CAPTURE AND Groupie

FISSION) T= HE PROGRAM WILL USE THE ENERGY DEPENDENT WEIGHTING Grou= pie

SPECTRUM S= (E) TO DEFINE THE UNSHIELDED (BONDERENKO N=3D0) = Groupie

AVERAGED C= ROSS SECTION WITHIN EACH GROUP. = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

CALCULATIO= N OF RESONANCE INTEGRALS = &nb= sp; Groupie

----------= ------------------------ = &nb= sp; Groupie

IN A PURE ELASTIC ISOTROPICALLY SCATTERING MATERIAL WITH A Groupie

CONSTANT C= ROSS SECTION THE SPECTRUM WILL BE 1/E AND THERE WILL Groupie

BE NO SELF= -SHIELDING. = &nb= sp; = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

IN THIS CA= SE IF THE CROSS SECTION VARIES WITH ENERGY THE = Groupie

SPECTRUM W= ILL STILL BE 1/E AND THE SELF-SHIELDING FACTOR WILL Groupie

BE EXACTLY 1/SIG-TOT(E) - WHERE SIG-TOT(E) =3D SIG-EL(E), SINCE Groupie

THERE IS O= NLY SCATTERING. = &nb= sp; = Groupie

= &nb= sp; = = &nb= sp; = Groupie

IF WE HAVE= AN INFINITELY DILUTE AMOUNT OF A MATERIAL UNIFORMLY Groupie

MIXED WITH= A PURE ELASTIC ISOTROPICALLY SCATTERING MATERIAL WITH Groupie

A CONSTANT= CROSS SECTION THE STANDARD DEFINITION OF THE RESONANCE Groupie

INTEGRAL C= AN BE USED TO DEFINE REACTION RATES FOR EACH REACTION. Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

THE RESONA= NCE INTEGRAL IS DEFINED AS, = = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

RI =3D (INTEG= RAL E1 TO E2) (SIGMA(E)*S(E)*WT(E)*DE) = Groupie

= &nb= sp; = &nb= sp; = Group= ie

WHERE NORMALLY, = &nb= sp; = &nb= sp; Groupie

S(E) =3D 1/E = &nb= sp; = &nb= sp; Groupie

WT(E) =3D 1 - NO SELF-SHIELDING = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

FROM THE A= BOVE DEFINITION OF GROUP AVERAGED CROSS SECTIONS THE Groupie

RESONANCE INTEGRAL IS, = &nb= sp; = Groupie

= &nb= sp; = &nb= sp; = Groupie

RI =3D AVERAG= E * (INTEGRAL E1 TO E2) (S(E)*WT(E)*DE) = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

FOR A 1/E SPECTRUM AND NO SELF-SHIELDING THIS REDUCES TO, = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

RI =3D AVERAG= E* LOG(E2/E1) = &nb= sp; = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

IN ANY OTH= ER SITUATION, INCLUDING ABSORPTION AND/OR ENERGY Groupie

DEPENDENT = CROSS SECTIONS, THE SPECTRUM WILL NOT BE 1/E - = Groupie

ABSORPTION= WILL TEND TO DECREASE THE SPECTRUM PROGRESSIVELY Groupie

MORE AT LO= WER ENERGIES - ENERGY DEPENDENCE OF THE CROSS SECTION Groupie

WILL LEAD = TO SELF-SHIELDING. = &nb= sp; = Groupie

= &nb= sp; = = &nb= sp; Groupie

HERE WE WI= LL NOT ATTEMPT TO PERFORM A DETAILED SPECTRUM = Groupie

CALCULATIO= N TO ACCOUNT FOR ABSORPTION. = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = Groupie

HOWEVER, W= E WILL EXTEND THE DEFINITION OF THE RESONANCE INTEGRAL Groupie

TO ACCOUNT= FOR SELF-SHIELDING EFFECTS BY ALLOWING FOR INCLUSION Groupie

OF SELF-SHIELDING EFFECTS IN THE DEFINITION OF GROUP AVERAGES Groupie

AND THEN DEFINING THE RESONANCE INTEGRAL AS, = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

RI =3D AVERAG= E* LOG(E2/E1) = &nb= sp; = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

IN ORDER TO CALCULATE RESONANCE INTEGRALS YOU MUST FOLLOW THESE Groupie

STEPS, = &nb= sp; = &nb= sp; = Groupie

= &nb= sp; = &nb= sp; = Groupie

1) SELECT = A 1/E SPECTRUM - ON FIRST LINE OF INPUT PARAMETERS. Groupie

2) SELECT = THE ENERGY BOUNDARIES - NORMALLY ONLY 1 GROUP FROM Grou= pie

0.5 EV UP TO 20 MEV - HOWEVER, YOU ARE FREE TO SELECT ANY Grou= pie

ENERGY RANGE THAT YOU WISH - YOU MAY EVEN SELECT MORE THAN Groupie

1 GROUP MERELY BY SPECIFYING MORE THAN 1 GROUP AS INPUT - Grou= pie

THIS CAN BE USED TO DEFINE THE CONTRIBUTIONS TO THE RESONANCE Groupie

INTEGRAL FROM INDIVIDUAL ENERGY RANGES. = &nb= sp; Groupie

3) SELECT = THIS OPTION FOR THE UNSHIELDED AND/OR SHIELDED OUTPUT Groupie

LISTING - ON THE SECOND LINE OF INPUT PARAMETERS. = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

WHEN THIS = OPTION IS USED THE PROGRAM WILL CALCULATE GROUP AVERAGED Groupie

CROSS SECT= IONS - AS DEFINED ABOVE - PRIOR TO OUTPUT THE RESULTS Groupie

<= /p>

WILL MEREL= Y BE MULTIPLIED BY THE WIDTH OF THE GROUP ASSUMING YOU Groupie

HAVE SELEC= TED A 1/E SPECTRUM - THERE IS NO CHECK ON THIS - THE Groupie

PROGRAM ME= RELY MULTIPLIES THE GROUP AVERAGED CROSS SECTIONS BY, Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

LOG(E2/E1)= - WHERE E2 AND E1 ARE THE GROUP ENERGY BOUNDARIES. Groupie

= &nb= sp; = &nb= sp; = = Groupie

WARNING - = IT IS UP TO YOU TO INSURE THAT YOU FOLLOW EXACTLY THE Groupie

= STEPS OUTLINED ABOVE IF YOU WISH TO OBTAIN MEANINGFUL Groupie

= RESULTS. = &nb= sp; = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

NOTE - OUT= PUT IN THE ENDF/B FORMAT IS ALWAYS GROUP AVERAGED CROSS Groupie

= SECTIONS, REGARDLESS OF WHETHER YOU ASK FOR AVERAGED CROSS Groupie

= SECTIONS OR RESONANCE INTEGRALS - THIS IS BECAUSE DATA IN Groupie

= THE ENDF/B FORMAT IS EXPLICITLY DEFINED TO BE CROSS Groupie

= SECTIONS. = &nb= sp; = &nb= sp; Groupie

= = &nb= sp; = &nb= sp; = Groupie

= RESONANCE INTEGRAL OUTPUT CAN ONLY BE OBTAINED IN THE Grou= pie

= LISTING FORMATS. = &nb= sp; = Groupie

= = &nb= sp; = &nb= sp; Groupie

MINIMUM TO= TAL CROSS SECTION TREATMENT = &nb= sp; Groupie

------------------------------------- = &nb= sp; Groupie

SINCE THE BONDARENKO SELF-SHIELDING DEPENDS ON 1/TOTAL CROSS Grou= pie

SECTION, T= HE ALGORITHM WILL BECOME NUMERICALLY UNSTABLE IF THE Groupie

TOTAL CROSS SECTION IS NEGATIVE (AS OCCURS IN MANY ENDF/B = Groupie

EVALUATION= S). IF THE TOTAL IS LESS THAN SOME MINIMUM ALLOWABLE Groupie

VALUE (DEF= INE BY OKMIN, PRESENTLY 1 MILLI-BARN) AN ERROR MESSAGE Groupie

WILL BE PR= INTED AND FOR THE SELF-SHIELDING CALCULATION ALL ENERGY Groupie

INTERVALS = IN WHICH THE TOTAL IS LESS THAN THE MINIMUM WILL BE Groupie

IGNORED. = &nb= sp; = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

NOTE, FOR = THE UNSHIELDED CALCULATIONS ALL CROSS SECTIONS WILL BE Groupie

CONSIDERED WHETHER THEY ARE POSITIVE OR NEGATIVE. THEREFORE IF Groupie

THE TOTAL = CROSS SECTION IS NEGATIVE OR LESS THAN THE MINIMUM Grou= pie

VALUE THER= E MAY BE AN INCONSISTENCY BETWEEN THE UNSHIELDED AND Groupie

THE SELF-SHIELDED CROSS SECTIONS. IF THE TOTAL CROSS SECTION IS Groupie

NEGATIVE A= ND SELF-SHIELDED CROSS SECTIONS ARE CALCULATED THE Grou= pie

PROGRAM WI= LL PRINT AN ERROR MESSAGE INDICATING THAT THE SELF- Groupie

SHIELDED R= ESULTS ARE UNRELIABLE AND SHOULD NOT BE USED. THEREFORE Groupie

IN THIS CA= SE THE PROGRAM WILL NOT ATTEMPT TO MODIFY THE UNSHIELDED Groupie

RESULTS TO ELIMINATE THE EFFECT OF NEGATIVE CROSS SECTIONS, SINCE Groupie

THE UNSHIE= LDED RESULTS ARE THE ONLY ONES WHICH TRULY REFLECT THE Groupie

ACTUAL INPUT. = &nb= sp; = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

RESOLVED R= ESONANCE REGION = &nb= sp; = Groupie

------------------------- = &nb= sp; = Groupie

IN THE RES= OLVED RESONANCE REGION (ACTUALLY EVERYWHERE BUT IN THE Groupie

UNRESOLVED RESONANCE REGION) THE CROSS SECTIONS OUTPUT BY LINEAR- Groupie

RECENT-SIG= MA1 WILL BE ACTUAL ENERGY DEPENDENT CROSS SECTIONS AND Groupie

THE CALCUL= ATIONS BY THIS PROGRAM WILL YIELD ACTUAL SHIELDED AND Groupie

UNSHIELDED= CROSS SECTIONS. = &nb= sp; = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

UNRESOLVED RESONANCE REGION = &nb= sp; = Groupie

--------------------------- = = &nb= sp; Groupie

IN THE UNRESOLVED RESONANCE REGION PROGRAM RECENT USES THE Groupie

UNRESOLVED RESONANCE PARAMETERS TO CALCULATE INFINITELY DILUTE Groupie

AVERAGE CR= OSS SECTIONS. THIS PROGRAM WILL MERELY READ THIS Groupie

INFINITELY DILUTE DATA AS IF IT WERE ENERGY DEPENDENT DATA AND Groupie

GROUP AVER= AGE IT. AS SUCH THIS PROGRAM WILL PRODUCE THE CORRECT Groupie

UNSHIELDED= CROSS SECTION IN THE UNRESOLVED RESONANCE REGION, BUT Groupie

IT WILL NOT PRODUCE THE CORRECT SELF-SHIELDING EFFECTS. = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

ACCURACY OF RESULTS = &nb= sp; = &nb= sp; Groupie

------------------- = &nb= sp; = &nb= sp; Groupie

ALL INTEGR= ALS ARE PERFORMED ANALYTICALLY. THEREFORE NO ERROR IS Groupie

INTRODUCED= DUE TO THE USE OF TRAPAZOIDAL OR OTHER INTEGRATION Groupie

SCHEME. THE TOTAL ERROR THAT CAN BE ASSIGNED TO THE RESULTING Groupie

AVERAGES I= S JUST THAT DUE TO THE ERROR IN THE CROSS SECTIONS Grou= pie

AND ENERGY DEPENDENT WEIGHTING SPECTRUM. GENERALLY SINCE THE Grou= pie

THE ENERGY DEPENDENT WEIGHTING SPECTRUM APPEARS IN BOTH THE Groupie

NUMERATOR = AND THE DENOMINATOR THE AVERAGES RAPIDLY BECOME = Groupie

INSENSITIV= E TO THE WEIGHTING SPECTRUM AS MORE GROUPS ARE USED. Groupie

SINCE THE WEIGHTING SPECTRUM IS LOADED IN THE PAGING SYSTEM THE Groupie

USER CAN DESCRIBE THE SPECTRUM TO ANY REQUIRED ACCURACY USING Groupie

ANY NUMBER= OF ENERGY VS. SPECTRUM PAIRS. = &nb= sp; Groupie

= &nb= sp; = = &nb= sp; = Groupie

MULTI-BAND PARAMETERS = &nb= sp; = Groupie

--------------------- = &nb= sp; = Groupie

MULTI-BAND PARAMETERS ARE CALCULATED FOR THE TOTAL, ELASTIC, Grou= pie

CAPTURE AND FISSION REACTIONS. WITH THE NUMBER OF GROUPS THAT Groupie

ARE NORMAL= LY USED (SEE BUILT IN GROUP STRUCTURES) ALL OTHER Groupie

REACTIONS = RESULT IN A NEGLIGABLE AMOUNT OF SELF-SHIELDING. AS Groupie

SUCH THEIR EQUIVALENT BAND CROSS SECTION WILL MERELY BE THEIR Groupie

UNSHIELDED= VALUE WITHIN EACH BAND. = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = Groupie

FOR ANY GI= VEN EVALUATION, WITHIN ANY GIVEN GROUP THIS PROGRAM Groupie

WILL GENER= ATE THE MINIMUM NUMBER OF BANDS REQUIRED WITHIN THAT Groupie

GROUP. AS = OUTPUT TO THE COMPUTER READABLE DISK FILE THE BAND Grou= pie

PARAMETERS= FOR EACH EVALUATION WILL BE FORMATTED TO HAVE THE Grou= pie

SAME NUMBE= R OF BANDS IN ALL GROUPS (WITH ZERO WEIGHT FOR SOME Groupie

BANDS WITH= IN ANY GROUP). THE USER MAY DECIDE TO HAVE OUTPUT Groupie

EITHER WITH THE MINIMUM NUMBE= R OF BANDS REQUIRED FOR EACH = Groupie

EVALUATION= (E.G. 2 BANDS FOR HYDROGEN AND 4 BANDS FOR U-233) OR Groupie

THE SAME N= UMBER OF BANDS FOR ALL EVALUATIONS (E.G. 4 BANDS FOR Groupie

BOTH HYDRO= GEN AND U-233). = &nb= sp; = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

FOR 2 OR F= EWER BANDS THE PROGRAM USES AN ANALYTIC EXPRESSION Grou= pie

TO DEFINE = ALL MULTI-BAND PARAMETERS. FOR MORE THAN 2 BANDS THE Groupie

PROGRAM PE= RFORMS A NON-LINEAR FIT TO SELECT THE MULTI-BAND Groupie

PARAMETERS= THAT MINIMIZE THE MAXIMUM FRACTIONAL ERROR AT ANY Grou= pie

POINT ALON= G THE ENTIRE SELF-SHIELDING CURVE. THE NUMBER OF BANDS Groupie

REQUIRED W= ITHIN ANY GIVEN GROUP IS DEFINED BY INSURING THAT THE Groupie

MULTI-BAND PARAMETERS CAN BE USED TO ACCURATELY DEFINE SELF- Grou= pie

SHIELDED C= ROSS SECTIONS ALONG THE ENTIRE SELF-SHIELDING CURVE Groupie

FROM SIGMA= 0 =3D 0 TO INFINITY. THE USER MAY DEFINE THE ACCURACY Groupie

REQUIRED.<= span style=3D'mso-spacerun:yes'> = &nb= sp; = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = Gr= oupie

ENDF/B FOR= MATTED UNSHIELDED AVERAGES = &nb= sp; Groupie

------------------------------------ = &nb= sp; Groupie

UNSHIELDED MULTI-GROUP AVERAGED CROSS SECTIONS FOR ALL REACTIONS Groupie

MAY BE OBT= AINED IN THE ENDF/B FORTRAN IN EITHER HISTOGRAM = Groupie

(INTERPOLA= TION LAW 1) OR LINEARLY INTERPOLABLE (INTERPOLATION Groupie

LAW 2) FOR= M. SEE INPUT BELOW FOR DETAILS. = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

MIXTURES OF MATERIALS AND RESONANCE OVERLAP = &nb= sp; Groupie

------------------------------------------- = &nb= sp; Groupie

THE SELF-SHIELDED= CROSS SECTIONS FOR THE INDIVIDUAL CONSTITUENTS Groupie

OF ANY MIX= TURE CAN BE CALCULATED BY THIS PROGRAM BY REALIZING THAT Groupie

THIS PROGR= AM ESSENTIALLY ONLY USES THE TOTAL CROSS SECTION AS A Groupie

WEIGHTING FUNCTION TO ACCOUNT FOR SELF-SHIELDING EFFECTS. FOR A Groupie

MIXTURE IT= IS THEREFORE ONLY NECESSARY TO USE THE TOTAL CROSS Groupie

SECTION FO= R THE MIXTURE IN PLACE OF THE ACTUAL TOTAL CROSS SECTION Groupie

FOR EACH C= ONSTITUENT AND TO RUN THIS PROGRAM. THIS CAN BE DONE BY Groupie

FIRST RUNN= ING PROGRAM MIXER TO CALCULATE THE ENERGY DEPENDENT Groupie

TOTAL CROSS SECTION FOR ANY COMPOSITE MIXTURE. NEXT, SUBSTITUTE Groupie

THIS COMPO= SITE TOTAL CROSS SECTION FOR THE ACTUAL TOTAL CROSS Groupie

SECTION OF= EACH CONSTITUENT (IN EACH ENDF/B FORMATTED EVALUATION). Groupie

FINALLY, R= UN THIS PROGRAM TO CALCULATE THE SELF-SHIELDED CROSS Groupie

SECTION FO= R EACH CONSTITUENT, PROPERLY ACCOUNTING FOR RESONANCE Groupie

OVERLAP BE= TWEEN THE RESONANCES OF ALL OF THE CONSTITUENTS OF THE Groupie

MIXTURE. D= URING THE SAME RUN THESE SELF-SHIELDED CROSS SECTIONS Groupie

CAN IN TUR= N BE USED TO CALCULATE FULLY CORRELATED MULT-BAND Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

MULTI-BAND PARAMETER OUTPUT FORMAT = &nb= sp; Groupie

---------------------------------- = &nb= sp; = Groupie

FOR VERSIO= NS 92-2 AND LATER VERSIONS THE MULTI-BAND PARAMETERS Groupie

ARE OUTPUT= IN A SIMPLE CHARACTER FORMAT, THAT CAN BE TRANSFERRED Groupie

AND USED ON VIRTUALLY ANY COMPUTER. = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

THE BINARY FORMAT USED IN EARLIER VERSIONS OF THIS CODE IS NO Groupie

LONGER USED. = &nb= sp; = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

CONTACT THE AUTHOR IF YOU WOULD LIKE TO RECEIVE A SIMPLE PROGRAM Groupie

TO READ THE CHARACTER FORMATTED MULTI-BAND PARAMETER FILE AND Groupie

CREATE A B= INARY, RANDOM ACCESS FILE FOR USE ON VIRTUALLY ANY Grou= pie

COMPUTER.<= span style=3D'mso-spacerun:yes'> = &nb= sp; = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

THE FORMAT= OF THE CHARACTER FILE IS, = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

RECORD COLUMNS FORMAT DESCRIPTION = &nb= sp; Groupie

1 &nbs= p; 1-72 18A4 LIBRARY DESCRIPTION (AS READ) = Groupie

2 &nbs= p; 1-11 I11 MATERI= AL ZA = &nb= sp; Groupie

= 12-22 I11 NUMBER GROUPS = &nb= sp; Groupie

= 23-33 I11 NUMBER= OF BANDS = &nb= sp; Groupie

= 34-44 D11.4 TEMPERATURE (KELVIN) = Groupie

= 45-55 1X,10A1 HOLLERITH DESC= RIPTION OF ZA = Groupie

3 &nbs= p; 1-11 D11.4 ENERGY (EV) - GROUP BOUNDARY= . = Groupie

= 12-22 D11.4 TOTAL (FIRST BAND) = Groupie

= 23-33 D11.4 ELASTIC = &nb= sp; Groupie

= 34-44 D11.4 CAPTURE = = Groupie

= 35-55 D11.4 FISSION = &nb= sp; Groupie

4 &nbs= p; 1-11 ----- BLANK = &nb= sp; Groupie

= 12-22 D11.4 TOTAL (SECOND BAND) = Groupie

= 23-33 D11.4 ELASTIC = &nb= sp; Groupie

= 34-44 D11.4 CAPTURE = &nb= sp; Groupie

= 35-55 D11.4 FISSION = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

LINES 3 AN= D 4 ARE REPEATED FOR EACH GROUP. THE LAST LINE FOR EACH Groupie

MATERIAL (= ZA) IS, = &nb= sp; = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = Groupie

N &nbs= p; 1-11 D11.4 ENERGY (EV) - UPPER ENERGY L= IMIT OF Groupie <= /o:p>

= &nb= sp; = &nb= sp; LAST GROUP. = Groupie

= = &nb= sp; = &nb= sp; Groupie

FOR EXAMPL= E, A 175 GROUP, 2 BAND FILE, FOR EACH MATERIAL WILL Groupie

CONTAIN 352 LINES =3D 1 HEADER LINE, 175 * 2 LINES OF PARAMETERS, Groupie

= &nb= sp; AND 1 FINAL LINE WITH THE UPPER ENERGY LIMIT Groupie

= &nb= sp; OF THE LAST GROUP. = ; &n= bsp; Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

INPUT FILE= S = = &nb= sp; = Groupie

----------= - = &nb= sp; = &nb= sp; Groupie

UNIT DESCRIPTION = &nb= sp; = &nb= sp; Groupie

---- ----------- = &nb= sp; = &nb= sp; Groupie

2 INPUT DATA (BC= D - 80 CHARACTERS/RECORD) = &nb= sp; Groupie

10 ORIGINAL ENDF/B DATA (BCD - = 80 CHARACTERS/RECORD) = Groupie

= &nb= sp; = &nb= sp; = Groupie

OUTPUT FILES = &nb= sp; = &nb= sp; Groupie

------------ = &nb= sp; = &nb= sp; Groupie

UNIT DESCRIPTION = &nb= sp; = Groupie

---- ----------- = &nb= sp; = &nb= sp; Groupie

31 MULTI-BAND PARAMETERS CHARAC= TER FILE - OPTIONAL = Groupie

= (BCD - 80 CHARACTERS/RECORD) = &nb= sp; Groupie

32 SELF-SHIELDED CROSS SECTION LISTING - OPTIONAL = Groupie

= (BCD - 120 CHARACTERS/RECORD) = &nb= sp; Groupie

33 MULTI-BAND PARAMETER LISTING= - OPTIONAL = &nb= sp; Groupie

(BCD = - 120 CHARACTERS/RECORD) = &nb= sp; Groupie

34 UNSHIELDED CROSS SECTION LIS= TING - OPTION = Groupie

= (BCD - 120 CHARACTERS/RECORD) = &nb= sp; Groupie

3 OUTPUT REPORT = (BCD - 80 CHARACTERS/RECORD) = Groupie

11 MULTI-GROUP ENDF/B DATA - OPTIONAL = &nb= sp; Groupie

= (BCD - 80 CHARACTERS/RECORD) = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

SCRATCH FILES = &nb= sp; = &nb= sp; Groupie

------------- = &nb= sp; = &nb= sp; Groupie

UNIT FILENAME DESCRIPTION = &nb= sp; = Groupie

---- -------- ----------- = &nb= sp; = Groupie

8 ENERGY DEPENDE= NT WEIGHTING SPECTRUM = &nb= sp; Groupie

= (BINARY - 40080 WORDS/BLOCK) = &nb= sp; Groupie

9 TOTAL CROSS SECTION = &nb= sp; = Groupie

= (BINARY - 40080 WORDS/BLOCK) = &nb= sp; Groupie

12 ELASTIC CROSS SECTION - ONLY= FOR SELF-SHIELDING CALCULATION Gr= oupie

= (BINARY - 40080 WORDS/BLOCK) = &nb= sp; Groupie

13 CAPTURE CROSS SECTION - ONLY= FOR SELF-SHIELDING CALCULATION Gr= oupie

= (BINARY - 40080 WORDS/BLOCK) = &nb= sp; Groupie

14 FISSION CROSS SECTION - ONLY= FOR SELF-SHIELDING CALCULATION Gr= oupie

= (BINARY - 40080 WORDS/BLOCK) = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

OPTIONAL STANDARD FILE NAMES (SEE SUBROUTINES FILIO1 AND FILIO2) Groupie

---------------------------------------------------------------- Groupie

UNIT FILE NAME = &nb= sp; = &nb= sp; Groupie

---- ---------- = &nb= sp; = &nb= sp; Groupie

2 GROUPIE.INP = &nb= sp; = &nb= sp; Groupie

3 GROUPIE.LST = &nb= sp; = &nb= sp; Groupie

8 (SCRATCH) = &nb= sp; = &nb= sp; Groupie

9 (SCRATCH) = &nb= sp; = &nb= sp; Groupie

10 ENDFB.IN = &nb= sp; = &nb= sp; Groupie

11 ENDFB.OUT = &nb= sp; = &nb= sp; Groupie

12 (SCRATCH) = &nb= sp; = &nb= sp; Groupie

13 (SCRATCH) = &nb= sp; = &nb= sp; Groupie

14 (SCRATCH) = = &nb= sp; = Groupie

31 MULTBAND.TAB = &nb= sp; = &nb= sp; Groupie

32 SHIELD.LST = &nb= sp; = &nb= sp; Groupie

33 MULTBAND.LST = = &nb= sp; Groupie

34 UNSHIELD.LST = &nb= sp; = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

I/O = UNITS USED = &nb= sp; = Gr= oupie

-------------- = &nb= sp; = &nb= sp; Groupie

UNIT= S 2, 3 8, 9 AND 10 WILL ALWAYS BE USED. = &nb= sp; Groupie

UNIT= S 31 THROUGH 34 AND 11 ARE OPTIONALLY USED DEPENDING ON THE Groupie

OUTP= UT REQUESTED. = &nb= sp; = &nb= sp; Groupie

UNIT= S 12, 13 AND 14 WILL ONLY BE USED IF SELF-SHIELDED OR Groupie

MULT= IBAND OUTPUT IS REQUESTED. = &nb= sp; = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

INPUT CARD= S = &nb= sp; = &nb= sp; Groupie

----------= - = &nb= sp; = &nb= sp; Groupie

CARD COLS. FORMAT DESCRIPTION = &nb= sp; = Groupie

---- ----- ------ ----------- = &nb= sp; = Groupie

1 1-11 I11 SELECTION CRITERIA (0=3DMAT, 1=3DZA) = Groupie

1 12-22 I11 NUMBER OF GROUPS. = &nb= sp; Groupie

= &nb= sp; =3D.GT.0 - ARBITRARY GROUP BOUNDARIES ARE READ Groupie

= &nb= sp; = FROM INPUT FILE (N GROUPS REQUIRE Groupie

= &nb= sp; = N+1 GROUP BOUNDARIES). CURRENT Grou= pie

= &nb= sp; = PROGRAM MAXIMUM IS 1000 GROUPS. Groupie

= &nb= sp; = BUILT-IN OPTIONS INCLUDE.... Groupie

= &nb= sp; =3D 0 - TART 175 GROUPS = Groupie

= &nb= sp; =3D -1 - ORNL 50 GROUPS = Groupie

= &nb= sp; =3D -2 - ORNL 126 GROUPS = Groupie

= &nb= sp; =3D -3 - ORNL 171 GROUPS = Groupie

<= /p>

= &nb= sp; =3D -4 - SAND-II= 620 (665) GROUPS TO 18 MEV Groupie

= &nb= sp; =3D -5 - SAND-II= 640 (685) GROUPS TO 20 MEV Groupie

= &nb= sp; =3D -6 - WIMS 69 GROUPS = Groupie

= &nb= sp; =3D -7 - GAM-I 68 GROUPS = Groupie

= &nb= sp; =3D -8 - GAM-II<= span style=3D'mso-spacerun:yes'> 99 GROUPS = Groupie

= &nb= sp; =3D -9 - MUFT 54 GROUPS = Groupie

= &nb= sp; =3D-10 - ABBN 28 GROUPS = Groupie

= &nb= sp; =3D-11 - TART 650 GROUPS = Groupie

= &nb= sp; =3D-12 - TART 700 GROUPS = Groupie

= &nb= sp; =3D-13 - SAND-II= 665 GROUPS TO 18 MEV Groupie

= &nb= sp; =3D-14 - SAND-II= 685 GROUPS TO 20 MEV Groupie

1 23-33 I11 MULTI-BAND SELECTOR = &nb= sp; Groupie

= &nb= sp; =3D 0 - NO MULTI-BAND CALCULATIONS = Groupie

= &nb= sp; =3D 1 - 2 BAND. CONSER= VE AV(TOT), AV(1/TOT) Groupie

= &nb= sp; AND AV(1/TOT**2) = &nb= sp; Groupie

= =3D 2 - 2 BAND. CONSERVE AV(TOT), AV(1= /TOT) Groupie

= &nb= sp; AND AV(1/(TOT+SIGMA0)) WHERE = Groupie

= &nb= sp; SIGMA0 =3D AV(TOT) IN EACH GROUP Groupie

= = =3D 3-5- MULTI-BAND FIT. CONSERVE AV(TOT) AND Groupie

= &nb= sp; MINIMIZE FRACTIONAL ERROR FOR ENTIRE Groupie

= &nb= sp; SELF-SHIELDING CURVE (SIGMA0 =3D 0 TO Groupie

= &nb= sp; INFINITY) = &nb= sp; Groupie

= &nb= sp; IF THE SELECTOR IS POSITIVE (1 TO 5) THE Groupie

= &nb= sp; MINIMUM NUMBER OF BANDS WILL BE OUTPUT FOR Groupie

= &nb= sp; EACH ISOTOPE INDEPENDENTLY. IF THE SELECTOR Groupie

= &nb= sp; IS NEGATIVE (-1 TO -5) THE SAME NUMBER OF Groupie

= &nb= sp; BANDS (ABS(SELECTOR)) WILL BE OUTPUT FOR Groupie

= &nb= sp; ALL ISOTOPES. &nbs= p; = &nb= sp; Groupie

1 34-44 I11 NUMBER OF POINTS USED TO DES= CRIBE ENERGY Groupie

= &nb= sp; DEPENDENT WEIGHTING SPECTRUM S(E). = Groupie

= &nb= sp; =3D -2 - MAXWELLIAN - UP TO 0.1 EV = Groupie

= &nb= sp; = 1/E - 0.1 EV TO 67 KEV Grou= pie

= &nb= sp; = FISSION - = ABOVE 67 KEV = Groupie

05/01/20-----------------ADDED OPT= ION TO ALLOW TEMPERATURE OF THE Groupie

= &nb= sp; MAXWELLIAN TO BE CHANGED - SEE INPUT LINE 4, Groupie

= &nb= sp; COLUMNS 55 - 66. &= nbsp; &nbs= p; &= nbsp; Groupie

= &nb= sp; =3D -1 - 1= /E = &nb= sp; Groupie

= &nb= sp; =3D 0 OR 1- ENERGY INDEPENDENT (SO CALLED FLAT Groupie

= &nb= sp; = WEIGHTING SPECTRUM). = Groupie

= &nb= sp; =3D .GT.1 - READ THIS MANY POINTS FROM INPUT Groupie

= &nb= sp; TO DESCRIBE WEIGHTING SPECTRUM. Groupie

= &nb= sp; = NO LIMIT TO THE NUMBER OF POINTS Groupie

= &nb= sp; = USED TO DESCRIBE WEIGHTING. Groupie

1 45-55 D11.4 MULTI-BAND CONVERGENCE CRITERIA. = Groupie

= &nb= sp; ONLY USED FOR 3 OR MORE BANDS. THE NUMBER OF Groupie

= &nb= sp; BANDS IN EACH GROUPS IS SELECTED TO INSURE Groupie

= &nb= sp; THAT THE ENTIRE SELF-SHIELDING CURVE CAN BE Groupie

= &nb= sp; REPRODUCED TO WITHIN THIS FRACTIONAL ERROR. Groupie

= &nb= sp; =3D .LT. 0.0001 - USE STANDARD 0.001 = Groupie

= &nb= sp; = (0.1 PER-CENT) = Groupie

= &nb= sp; =3D .GE. 0.0001 - USE AS CONVERGENCE CRITERIA Groupie

1 56-66 I11 SIGMA-0 DEFINITION SELECTOR.= = Groupie

= &nb= sp; < 0 - 21 VALUES OF SIGMA0 ARE READ INPUT AND Groupie

= &nb= sp; INTERPRETED AS FIXED VALUES =3D SAME AS Groupie

= &nb= sp; =3D 1 DESCRIPTION BELOW = Groupie

= &nb= sp; INPUT VALUES MUST ALL BE, = Groupie

= &nb= sp; 1) GREATER THAN 0 = &nb= sp; Groupie

= &nb= sp; 2) IN DESCENDING VALUE ORDER = Groupie

= &nb= sp; =3D 0 - SIGMA-0 WILL BE DEFINED AS A MULTIPLE Groupie

= &nb= sp; OF THE UNSHIELDED TOTAL CROSS SECTION Groupie

= &nb= sp; IN EACH GROUP (VALUES OF 1/1024 TO Groupie

= &nb= sp; 1024 IN STEPS OF A FACTOR OF 2 WILL Groupie

= &nb= sp; BE USED AS THE MULTIPLIER). = Groupie

= &nb= sp; =3D 1 - SIGMA-0 WILL BE DEFINED AS THE SAME Groupie

= &nb= sp; NUMBER OF BARNS IN EACH GROUP (VALUES Groupie

= &nb= sp; 40000 TO 0.4 BARNS WILL BE USED. WITHIN Groupie

= &nb= sp; EACH DECADE VALUES OF 10, 7, 4, 2, 1 Groupie

= &nb= sp; BARNS WILL BE USED). = Groupie

2-4 1-66 6D11.4 IF SIGMA-0 DEFINITION SELECT= OR < 0, THE NEXT Groupie

= &nb= sp; 4 LINES OF INPUT ARE THE 22 VALUES OF SIGMA0, Groupie

= &nb= sp; 6 PER LINE. = &nb= sp; = Groupie

2 1-60 A60 ENDF/B INPUT DATA FILENAME = Groupie

= &nb= sp; (STANDARD OPTION =3D ENDFB.IN) = Groupie

3 1-60 A60 ENDF/B OUTPUT DATA FILENAME<= span style=3D'mso-spacerun:yes'> = Groupie

= &nb= sp; (STANDARD OPTION =3D ENDFB.OUT) = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

THE FOURTH= INPUT CARD IS USED TO SELECT ALL DESIRED OUTPUT MODES. Groupie

EACH OUTPUT DEVICE MAY BE TURNED OFF (0) OR ON (1). THEREFORE Groupie

THEREFORE = EACH OF THE FOLLOWING INPUT PARAMETERS MAY BE EITHER Groupie

ZERO TO IN= DICATE NO OUTPUT OR NON-ZERO TO INDICATE OUTPUT. Groupie

= &nb= sp; = &nb= sp; = Groupie

4 1-11 I11 SELF-SHIELDED CROSS SECTION LISTING = Groupie

= &nb= sp; =3D 1 - CROSS SECTIONS &= nbsp; &nbs= p; Groupie

= &nb= sp; =3D 2 - RESONANCE INTEGRALS = = Groupie

4 12-22 I11 MULTI-BAND PARAMETER LISTING= = Groupie

4 23-33 I11 MULTI-BAND PARAMETERS COMPUT= ER READABLE &nbs= p; Groupie

4 34-44 I11 UNSHIELDED CROSS SECTIONS IN ENDF/B FORMAT Gro= upie

= &nb= sp; =3D 1 - HISTOGRAM FORMAT (INTERPOLATION LAW 1) Groupie

= &nb= sp; =3D 2 - LINEAR-LINEAR (INTERPOLATION LAW 2) Groupie

4 45-55 I11 UNSHIELDED CROSS SECTIONS LISTING = Groupie

= &nb= sp; =3D 1 - CROSS SECTIONS = &nb= sp; Groupie

= &nb= sp; =3D 2 - RESONANCE INTEGRALS = Groupie

05/01/20 - ADDED THE BELOW OPTION<= span style=3D'mso-spacerun:yes'> = &nb= sp; = Groupie

4 56-66 D11.4 IF THE STANDARD BUILT-= IN SPECTRA IS USED, Groupie

= &nb= sp; INPUT LINE 1, COLUMNS 34-44 =3D 2, THIS FIELD Groupie

= &nb= sp; CAN BE USED TO OPTIONALLY CHANGE TEMPERATURE Groupie

= &nb= sp; OF T= HE MAXWELLIAN. = &nb= sp; Groupie

= &nb= sp; INPUT IS IN EV (0.0253 EV =3D ROOM TEMPERATURE) Groupie <= /span>

= &nb= sp; =3D 0 - USE DEFAULT 0.0253 EV, ROOM TEMPERATURE Groupie <= /span>

= &nb= sp; > 0 - USE THIS AS THE TEMPERATURE = Groupie

= &nb= sp; RESTRICTION - TEMPERATURE CANNOT EXCEED Grou= pie

= &nb= sp; 1000 EV. &nb= sp; = &nb= sp; Groupie

= &nb= sp; = = &nb= sp; Groupie

5 1-80 18A4 LIBRARY IDENTIFICATION. ANY TEXT T= HAT THE Groupie=

= &nb= sp; USER WISHES TO IDENTIFY THE MULTI-BAND Groupie

= &nb= sp; PARAMETERS. THIS LIBRARY IDENTIFICATION IS Groupie

= &nb= sp; WRITTEN INTO THE COMPUTER READABLE MULTI-BAND Groupie

= &nb= sp; DATA FILE. &= nbsp; &nbs= p; &= nbsp; Groupie

= &nb= sp; = &nb= sp; = = Groupie

6-N<= span style=3D'mso-spacerun:yes'> 1- 6 I6 LOWER MAT OR ZA LIMIT = &nb= sp; Groupie

= 7- 8 I2 LOWER MF LIMIT = &nb= sp; Groupie

= 9-11 I3 LOWER MT LIMIT = &nb= sp; Groupie

= 12-17 I11 UPPER MAT OR ZA LIMIT = &nb= sp; Groupie

= 18-19 I2 UPPER MF LIMIT = &nb= sp; Groupie

= 20-22 I3 UPPER MT LIMIT = &nb= sp; Groupie

= &nb= sp; UP TO 100 RANGES MAY BE SPECIFIED, ONE RANGE Groupie

= &nb= sp; PER LINE. THE LIST OF RANGES IS TERMINATED Groupie

= &nb= sp; BY A BLANK CARD. IF THE UPPER MAT OR ZA Grou= pie

= = LIMIT IS LESS THAN THE LOWER LIMIT THE UPPER&nbs= p; Groupie

= &nb= sp; IS SET EQUAL TO THE LOWER LIMIT. IF THE UPPER Groupie

= &nb= sp; MF OR MT LIMIT IS ZERO IT WILL BE SET EQUAL Groupie

= TO ITS MAXIMUM VALUE, 99 OR 999, RESPECTIVELY Groupie

= &nb= sp; IF THE FIRST REQUEST LINE IS BLANK IT WILL Groupie

= &nb= sp; TERMINATE THE LIST OF REQUESTS AND CAUSE ALL Groupie

= &nb= sp; DATA TO BE RETRIEVED (SEE EXAMPLE INPUT). Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

VARY= 1-66 6D11.4 ENERGY GROUP BOUNDARIES. ON= LY REQUIRED IF Groupie

= &nb= sp; THE NUMBER OF GROUPS INDICATED ON THE FIRST Groupie

= &nb= sp; INPUT CARD IS POSITIVE. ALL ENERGIES MUST Groupie

= &nb= sp; BE IN ASCENDING ENERGY IN EV. THE PRESENT Groupie

= &nb= sp; LIMITS ARE 1 TO 1000 GROUPS. FOR N GROUPS Groupie

= &nb= sp; N+1 BOUNDARIES WILL BE READ FROM THE = Groupie

= &nb= sp; INPUT FILE, E.G. IF THE FIRST INPUT CARD Groupie

= &nb= sp; INDICATES 20 GROUPS, 21 ENERGY BOUNDARIES Groupie

= &nb= sp; WILL BE READ FROM THE INPUT FILE. = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

VARY= 1-66 6D11.4 ENERGY DEPENDENT WEIGHTING SPECTRUM. ONLY Groupie

= &nb= sp; REQUIRED IF THE NUMBER OF POINTS INDICATED Groupie

= &nb= sp; ON FIRST CARD IS MORE THAN ONE. DATA IS Grou= pie

= &nb= sp; GIVEN IN (ENERGY, WEIGHT) PAIRS, UP TO 3 Groupie

= &nb= sp; PAIRS PER CARD, USING ANY NUMBER OF CARDS Groupie

= &nb= sp; REQUIRED. ENERGIES MUST BE IN ASCENDING Grou= pie

= &nb= sp; ORDER IN EV. THE SPECTRUM VALUES MUST BE Groupie

= NON-NEGA= TIVE. THE ENERGY RANGE OF SPECTRUM &n= bsp; Groupie

= &nb= sp; MUST AT LEAST SPAN THE ENERGY RANGE OF THE Groupie

= &nb= sp; ENERGY GROUPS. SINCE SPECTRUM IS STORED IN Groupie

= = PAGING SYSTEM THERE IS NO LIMIT TO NUMBER Groupie

= &nb= sp; OF POINTS THAT CAN BE USED TO DESCRIBE THE Groupie

= &nb= sp; WEIGHTING SPECTRUM. &nbs= p; &= nbsp; Groupie

= &nb= sp; = &nb= sp; = Gr= oupie

EXAMPLE IN= PUT NO. 1 = &nb= sp; = &nb= sp; Groupie

------------------- = &nb= sp; = &nb= sp; Groupie

REQUEST DA= TA BY MAT AND PROCESS ALL DATA (ALL MAT BETWEEN 1 AND Groupie

9999). USE= THE TART 175 GROUP STRUCTURE, GENERATE 2 BAND = Groupie

PARAMETERS= (THE FOR ALL ISOTOPES) TO 0.1 PER-CENT ACCURACY Groupie

IN THE SELF-SHIELDING CURVE. OUTPUT ALL LISTING, COMPUTER Groupie

READABLE A= ND ENDF/B FORMAT GROUP AVERAGES. = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

EXPLICITLY SPECIFY THE STANDARD FILENAMES. = = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

THE FOLLOW= ING 7 INPUT LINES ARE REQUIRED. = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = Grou= pie

= 0 = 0 &nbs= p; -2 = 0 1.00000-03 = 0 Groupie

ENDFB.IN = &nb= sp; = &nb= sp; = Groupie

ENDFB.OUT = &nb= sp; = &nb= sp; = Groupie

= 1 = 1 &nbs= p; 1 = 1 = 1 = Groupie

TART 175 GROUP, 2 BAND LIBRARY TO = 0.1 PER-CENT ACCURACY = Groupie

1 1 1= 9999 0 0 = &nb= sp; = &nb= sp; Groupie

= (BLANK CARD TERMINATES REQUEST LIST) = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

EXAMPLE IN= PUT NO. 2 = &nb= sp; = &nb= sp; Groupie

----------= --------- = &nb= sp; = &nb= sp; Groupie

THE SAME E= XAMPLE 1, AS ABOVE, ONLY THE ENDF/B DATA WILL BE READ Groupie

FROM \ENDFB6\SIGMA1\K300\ZA092238 (U-238 AT 300 KELVIN) AND Groupie

WRITTEN TO \ENDFB6\GROUPIE\K300\ZA092238 = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

THE FOLLOW= ING 7 INPUT LINES ARE REQUIRED. = &nb= sp; Groupie

= &nb= sp; = = &nb= sp; = Groupie

= 0 = 0 &nbs= p; -2 = 0 1.00000-03 = 0 Groupie

\ENDFB6\SIGMA1\K300\ZA092238 = &nb= sp; = Groupie

\ENDFB6\GROUPIE\K300\ZA092238 = = &nb= sp; Groupie

= 1 = 1 &nbs= p; 1 = 1 = 1 = Groupie

TART 175 GROUP, 2 BAND LIBRARY TO = 0.1 PER-CENT ACCURACY = Groupie

1 1 1= 9999 0 0 = &nb= sp; = Groupie

= &nb= sp; (BLANK CARD TERMINATES REQUEST LIST) = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

EXAMPLE IN= PUT NO. 3 = &nb= sp; = Group= ie

------------------- = &nb= sp; = &nb= sp; Groupie

PROCESS ALL DATA. USE 1/V WEIGHTING IN ORDER TO CALCULATE = Groupie

UNSHIELDED= ONE GROUP CROSS SECTIONS OVER THE ENERGY RANGE 0.5 EV Groupie

TO 1 MEV (= NOTE THAT THE RESULTS ARE SIMPLY PROPORTIONAL TO THE Groupie

RESONANCE INTEGRAL FOR EACH REACTION). OUTPUT UNSHIELDED LISTING. Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

LEAVE THE DEFINITION OF THE FILENAM= ES BLANK - THE PROGRAM WILL = Groupie

THEN USE STANDARD FILENAMES. = &nb= sp; = Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

THE FOLLOW= ING 7 INPUT CARDS ARE REQUIRED. = &nb= sp; Groupie

= &nb= sp; = &nb= sp; = &nb= sp; Groupie

= 0 = 0 &nbs= p; 1 -1 = 0 Groupie

= &nb= sp; (USE STANDARD FILENAME =3D ENDFB.IN) = Groupie

= &nb= sp; (USE STANDARD FILENAME =3D ENDFB.OUT) &= nbsp; Groupie

= 0 = 0 &nbs= p; 0 = 0 = 1 = Groupie

RESONANCE INTEGRAL CALCULATION (FR= OM 0.5 EV TO 1 MEV) = Groupie

= &nb= sp; (RETRIEVE ALL DATA, TERMINATE REQUEST LIST) Groupie

5.00000-01 1.00000+06 = &nb= sp; = &nb= sp; Groupie

= &nb= sp; = = &nb= sp; Groupie