=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D Legend

=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

PROGRAM LEGEND = &nb= sp; = &nb= sp; Legend

VERSION 80= -1 (SEPTEMBER 1980) = &nb= sp; = Legend

VERSION 84= -1 (NOVEMBER 1984) = &nb= sp; = Legend

VERSION 86= -1 (JANUARY 1986) *CORRECTED BASED ON USER COMMENTS Legend

= = *FORTRAN-77/H VERSION = Legend

VERSION 87= -1 (JANUARY 1987) *CORRECTED BASED ON USER COMMENTS Legend

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

= &nb= sp; FILE NAMES (SEE, SUBROUTINE FILEIO &= nbsp; Legend

= &nb= sp; = FOR DETAILS). = &nb= sp; Legend

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

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

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

= &nb= sp; = CRAZY. = &nb= sp; Legend

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

= &nb= sp; = KEYWORDS. = &nb= sp; Legend

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

= &nb= sp; = CONVENTIONS. = = Legend

VERSION 92= -1 (JANUARY 1992) *FOR ANGULAR DISTRIBUTIONS CALCULATED Legend

= &nb= sp; = FROM LEGENDRE COEFFICIENTS, INTERVAL Legend

= &nb= sp; = HALF TO CONVERGENCE. = Legend

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

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

= &nb= sp; *ADDED SELECTED OF DATA TO PROCESS Legend

= &nb= sp; = BY MAT/MF/MT/ENERGY RANGES. = Legend

= &nb= sp; *WARNING...THE INPUT PARAMETER FORMAT Legend

= &nb= sp; = HAS BEEN CHANGED - FOR DETAILS SEE Legend

= &nb= sp; BELOW. = &nb= sp; Legend

VERSION 92= -2 (SEPT. 1992) *CORRECTED PROCESSING OF ISOTROPIC &= nbsp; Legend

= &nb= sp; = ANGULAR DISTRIBUTIONS = Legend

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

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

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

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

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

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

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

= &nb= sp; *IMPROVED COMPUTER INDE= PENDENCE Legend

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

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

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

= &nb= sp; *IMPROVED OUTPUT PRECISION = Legend

= &nb= sp; *INCREASED MAX. POINTS FROM 5,000 Legend

= &nb= sp; = TO 20,000. = &nb= sp; Legend

VERSION 99= -1 (MARCH 1999) *CORRECTED CHARACTER TO FLOATING Lege= nd

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

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

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

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

= &nb= sp; = USER FEEDBACK = &nb= sp; Legend

VERS. 2000= -1 (FEBRUARY 2000)*GENERAL IMPROVEMENTS BASED ON Legend

= &nb= sp; = USER FEEDBACK = &nb= sp; Legend

VERS. 2001= -1 (MARCH 2001) *UPDATED TO HANDLE COMBINATIONS OF &n= bsp; Legend

= &nb= sp; = LEGENDRE COEFFICIENTS AT LOW ENERGY Legend

= &nb= sp; = AND TABULATED DATA AT HIGH ENERGY. Legend

VERS. 2002= -1 (MAY 2002) *OPTIONAL INPUT PARAMETERS = Legend

VERS. 2004= -1 (MARCH 2004) *ADDED INC= LUDE FOR COMMON = Legend

= &nb= sp; *ZERO ANGULAR DISTRIBUTIONS ARE O.K. Legend

= &nb= sp; = (PREVIOUSLY ZERO OR NEGATIVE WAS Legend

= &nb= sp; = TREATED AS AN ERROR - ZERO IS O.K. Legend

= &nb= sp; = FOR SOME REACTIONS OVER SOME COSINE= Legend

= &nb= sp; = RANGES) = &nb= sp; Legend

VERS. 2006= -1 (MARCH 2006) *INCREASED MAXIMUM NUMBER OF LEGENDRE Le= gend

= &nb= sp; = COEFFICIENTS FROM 50 TO 500. = Legend

= &nb= sp; = WARNING - THE RECURSION RELATIONSHIP Legend

= &nb= sp; = FOR LEGENDRE POLYNOMIALS BECOMES Legend

= &nb= sp; = UNSTABLE IN HIGHER ORDER POLYTNOMIALS Legend

= &nb= sp; = EVEN USING DOUBLE PRECISION. = Legend

VERS. 2007= -1 (JAN. 2007) *CHECKED AGAINST ALL ENDF/B= =3DVII. Legend

= &nb= sp; *INCREASED MAX. POINTS FROM 60,000 Legend

= &nb= sp; = TO 240,000. = Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

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

------------------------------------ = &nb= sp; Legend

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

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

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

A-1400, VIENNA, AUSTRIA = &nb= sp; = Legend

EUROPE = &nb= sp; = &nb= sp; = Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

ORIGINALLY WRITTEN BY = &nb= sp; = Legend

------------------------------------ = &nb= sp; Legend

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

CURRENT ADDRESS = &nb= sp; = &nb= sp; Legend

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

LAWRENCE LIVERMORE NATIONAL LABORATORY = &nb= sp; Legend

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

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

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

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

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

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

WEBSITE HTTP://WWW.LLNL.GOV/CULLEN1 = = Le= gend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

PURPOSE = &nb= sp; = &nb= sp; = Legend

------- = &nb= sp; = &nb= sp; = Legend

CALCULATE LINEARLY INTERPOLABLE TABULATED ANGULAR DISTRIBUTIONS Legend

STARTING F= ROM DATA IN THE ENDF/B FORMAT. ANGULAR DISTRIBUTIONS Legend

MAY BE DES= CRIBED IN THE ENDF/B FORMAT IN ONE OF THREE WAYS. Legend

FOR EACH OF THESE THREE FORMS THE USER MAY CHOOSE (SEE, INPUT Legend

OPTIONS) TO EITHER COPY EACH TYPE OF DATA OR TO PROCESS IT AT Legend

AS FOLLOWS= , = &nb= sp; = &nb= sp; Legend

= &nb= sp; = &nb= sp; = &nb= sp;Legend

(1) ANGULAR DISTRIBUTION IS ISOTROPIC AT ALL ENERGIES (LTT=3D0) Legend

------------------------------------------------------------- Legend

IN THIS CA= SE THE INPUT DATA DOES NOT INCLUDE ANY ANGULAR = Legend

DISTRIBUTI= ONS. A SECTION MERELY CONTAINS A FLAG TO INDICATE Legend

THE ANGULAR DISTRIBUTION IS ISOTROPIC AT ALL ENERGIES. IN THIS Legend

CASE THE S= ECTION IS OUTPUT IN EXACTLY THE SAME FORM IN WHICH IT Legend

WAS READ F= ROM THE INPUT. = &nb= sp; = Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

(2) ANGULAR DISTRIBUTIONS GIVEN BY LEGENDRE COEFFICIENTS (LTT=3D1) Legend

---------------------------------------------------------------- Legend

LEGENDRE COEFFICIENTS ARE GIVEN AT A SERIES OF ENERGIES. AN Legend

INTERPOLAT= ION LAW IS GIVEN BETWEEN ENERGIES. THE INTERPOLATION Legend

LAW BETWEEN ENERGIES IS COPIED AS INPUT (I.E., NO ATTEMPT IS Legend

MADE TO LINEARIZE THE VARIATION WITH ENERGY). FOR EACH ENERGY AT Legend

WHICH LEGE= NDRE COEFFICIENTS ARE GIVEN A LINEARLY INTERPOLABLE Legend

ANGULAR DISITRIBUTION IS RECONSTRUCTED IN THE SYSTEM IN WHICH THE Legend

THE COEFFI= CIENTS ARE GIVEN (I.E., CM OR LAB - NO ATTEMPT IS MADE Legend

TO CONVERT= FROM ONE SYSTEM TO THE OTHER). A MAXIMUM OF 50 LEGENDRE Legend

COEFFICIEN= TS IS ALLOWED. REGARDLESS OF THE NUMBER OF COEFFICIENTS Legend

INPUT THE PROGRAM WILL ONLY USE COEFFICIENTS UP TO THE LAST ORDER Legend

AT WHICH T= HE COEFFICIENTS ARE NON-ZERO (E.G. IF COEFFICIENTS P1 Legend

THROUGH P1= 2 ARE READ, BUT P9=3DP10=3DP11=3DP12=3D0.0, THE PROGRAM WILL Legend

ONLY USE COEFFICIENTS UP TO P8). IF OVER 50 NON-ZERO COEFFICIENTS Legend

ARE READ O= NLY THE FIRST 50 WILL BE USED. = &nb= sp; Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

(2) ANGULAR DISTRIBUTIONS IS TABULATED (LTT=3D2) = Legend

---------------------------------------------------------------- Legend

ANGULAR DISTRIBUTIONS ARE GIVEN AT A SERIES OF ENERGIES. AN Legend

INTERPOLAT= ION LAW IS GIVEN BETWEEN ENERGIES AND A SECOND = Legend

INTERPOLAT= ION LAW IS GIVEN AT EACH ENERGY TO INTERPOLATE BETWEEN Legend

THE POINTS= IN EACH TABULATED DISTRIBUTION. AT EACH ENERGY THE Legend

ANGULAR DISTRIBUTION WILL BE CONVERTED TO LINEARLY INTERPOLABLE Legend

FORM. THE INTERPOLATION BETWEEN ENERGIES IS OUTPUT EXACTLY AS Legend

INPUT. THE INTERPOLATION LAW AT EACH ENERGY IS OUTPUT TO INDICATE Legend

THE NOW LI= NEARLY INTERPOLABLE ANGULAR DISTRIBUTION. = Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

(3) LEGEND= RE COEFFICIENTS AND TABULATED (LTT=3D3) = Legend

---------------------------------------------------------------- Legend

ENDF-102 S= AYS THIS SHOULD BE LTT=3D4, BUT ALL OF THE EVALUATIONS Legend

IN ENDF/B-= VI, RELEASE 7, USE LTT=3D3? THIS CODE WILL TREAT THESE Legend

AS LTT=3D4= - SEE BELOW. = &nb= sp; = Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

(4) LEGEND= RE COEFFICIENTS AND TABULATED (LTT=3D4) = Legend

---------------------------------------------------------------- Legend

THIS IS A COMBINATION OF (1) AND (2) DESCRIBED ABOVE. THE = Legend

LEGENDRE D= ATA IS ALWAYS GIVEN FIRST, FOR LOWER ENERGIES, Legend

FOLLOWED BY TABULATED ANGULAR DISTRIBUTIONS, FOR HIGHER ENERGIES. Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

THIS TYPE = OF DATA CAN ONLY BE COPIED OR ALL CONVERTED TO = Legend

TABULATED (LTT=3D2). = &nb= sp; = &nb= sp; Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

POINT VALU= ES - NORMALIZED VS. UNNORMALIZED = &nb= sp; Legend

----------= -------------------------------------------------------- Legend

THE VALUE = OF AN ANGULAR DISTRIBUTION AT ANY COSINE WILL BE Legend

CORRECTLY CALCULATED BY THIS CODE, BASED EITHER DIRECTLY ON THE Legend

ANGULAR DI= STRIBUTION, OR ON THE SUM OF THE CONTRIBUTING LEGENDRE Legend

MOMENTS. = &nb= sp; = &nb= sp; Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

ENDF/B ANG= ULAR DISTRIBUTIONS ARE BY DEFINITION NORMALIZED WHEN Legend

INTEGRATED= OVER COSINE. THEREFORE THIS CODE WILL NORMALIZE EACH Legend

ANGULAR DISTRIBUTION BEFORE IT IS OUTPUT. THE OUTPUT REPORT FROM Legend

THIS CODE = WILL INDICATE THE NORMALIZATION FACTOR USED. = Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

THE REASON= THAT AN ANGULAR DISTRIBUTION MAY NOT BE NORMALIZED IS Legend

DUE TO THE APPROXIMATION OF CREATING LINEARLY INTERPOLABLE Legend

TABULATED ANGULAR DISTRIBUTIONS - THE MORE ACCURATELY THIS IS Legend

DONE THE C= LOSER THE NORMALIZATION FACTOR WILL BE TO UNITY. AS YOU Legend

DECREASE T= HE ALLOWABLE ERROR THE NORMALIZED VALUES WILL APPROACH Legend

THE CORRECT POINT VALUES CALCULATED BY THE CODE. = Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

SINCE THE = DATA IS NORMALIZED PRIOR TO OUTPUT THE RESULTS IN THE Legend

ENDF/B FOR= MAT MAY DIFFER SLIGHTLY FROM VALUES REFERRED TO BE ERROR Legend

MESSAGES, = ETC. PRINTED BY THE CODE DURING EXECUTION. IN ALL CASES Legend

THE VALUES PRINTED BY THE CODE IN ERROR MESSAGES, ETC. SHOULD BE Legend

CONSIDERED= TO BE THE CORRECT VALUES AND THE OUTPUT TABULATED Legend

ANGULAR DISTRIBUTIONS APPROXIMATE DUE TO THE RE-NORMALIZATION - Legend

TO RE-ITER= ATE, THE OUTPUT TABULATED VALUES ARE APPROXIMATE DUE Legend

TO THE APPROXIMATIONS USED IN CONSTRUCTING LINEAR INTERPOLABLE Legend

ANGULAR DISTRIBUTIONS TO WITHIN SOME ALLOWABLE TOLERANCE. = Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

ELIMINATIO= N OF NEGATIVE VALUES = &nb= sp; = Legend

------------------------------ = &nb= sp; = Legend

THE RECONSTRUCTED ANGULAR DISTRIBUTION WILL BE TESTED AND IF IT Legend

IS NEGATIV= E AT ONE OR MORE COSINES AN ERROR MESSAGE WILL BE OUTPUT Legend

AND BASED = ON THE INPUT OPTION SELECTED ONE OF THE FOLLOWING Legend

CORRECTIVE ACTIONS WILL BE TAKEN (SEE, INPUT OPTIONS), = Legend

(1) NO CORRECTION = = &nb= sp; = Legend

(2) CHANGE INDIVIDUAL LEGENDRE COEFFICIENTS (EACH BY LESS THAN Legend

= 1.0 PER-CENT) UNTIL THE RECONSTRUCTED ANGULAR DISTRIBUTION Legend

= IS POSITIVE (MINIMUM MORE THAN 1 MILLI-BARN). THE ALLOWABLE Legend

= PER-CENT CHANGE IN COEFFICIENTS AND MINIMUM CROSS SECTION CAN Legend

= BE CHANGED BY INPUT. = &nb= sp; = Legend

(3) CHANGE= ALL LEGENDRE COEFFICIENTS TO FORCE DISTRIBUTION TO BE Legend

= POSITIVE (MINIMUM MORE THAN 1 MILLI-BARN). WITH THIS OPTION Legend

= THERE IS NO RESTRICTION ON THE AMOUNT THAT EACH COEFFICIENT Legend

= IS CHANGED AND AS SUCH THIS OPTION SHOULD BE USED WITH Legend

= CAUTION AND ONLY AS A LAST RESORT IF NO OTHER APPROACH CAN Legend

= BE USED TO MAKE THE DISTRIBUTION POSITIVE. = Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

OUTPUT = &nb= sp; = &nb= sp; = Legend

------ = &nb= sp; = &nb= sp; = Legend

THE USER M= AY REQUEST OUTPUT OF EITHER, = &nb= sp; Legend

(1) TABULATED VALUES - POSSIB= LY CORRECTED TO ELIMINATE NEGATIVE Legend

= VALUES. THE TABULATED DISTRIBUTION WILL BE NORMALIZED BEFORE Legend

= OUTPUT. = &nb= sp; = &nb= sp; Legend

(2) LEGEND= RE COEFFICIENTS - POSSIBLY CORRECTED TO ELIMINATE Legend

= NEGATIVE VALUES AND WITHOUT HIGHER ORDER ZERO COEFFICIENTS. Legend

= BY DEFINITION DISTRIBUTIONS DEFINED BY LEGENDRE COEFFICIENTS Legend

= ARE NORMALIZED TO UNITY. = &nb= sp; = Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

(3) ANGULAR DISTRIBUTIONS GIVEN BY A TABULATION (LTT=3D2) = Legend

------------------------------------------------------- = Legend

TABULATED ANGULAR DISTRIBUTIONS ARE GIVEN AT A SERIES OF ENERGIES. Legend

AN INTERPO= LATION LAW IS GIVEN BETWEEN ENERGIES. THE INTERPOLATION Legend

LAW BETWEEN ENERGIES IS COPIED AS INPUT (I.E., NO ATTEMPT IS Legend

<= /p>

MADE TO LINEARIZE THE VARIATION WITH ENERGY). FOR EACH ENERGY AT Legend

AT WHICH TABULATED DATA ARE GIVEN A LINEARLY INTERPOLABLE ANGULAR Legend

DISTRIBUTI= ON IS CONSTRUCTED IN THE SYSTEM IN WHICH THE TABULATED Legend

DATA ARE G= IVEN (I.E., CM OR LAB - NO ATTEMPT IS MADE TO CONVERT Legend

FROM ONE S= YSTEM TO THE OTHER). A MAXIMUM OF 60000 POINTS IS ALLOWE Legend

TO REPRESE= NT THE ANGULAR DISTRIBUTION AT EACH ENERGY. = Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

ELIMINATIO= N OF NEGATIVE VALUES = &nb= sp; = Legend

------------------------------ = &nb= sp; = Legend

THE RECONSTRUCTED ANGULAR DISTRIBUTION WILL BE TESTED AND IF IT Legend

IS NEGATIV= E AT ONE OR MORE COSINES AN ERROR MESSAGE WILL BE OUTPUT Legend

AND BASED = ON THE INPUT OPTION SELECTED ONE OF THE FOLLOWING Legend

CORRECTIVE ACTIO= NS WILL BE TAKEN (SEE, INPUT OPTIONS), = Legend

(1) NO CORRECTION = &nb= sp; = &nb= sp; Legend

(2) CHANGE= ALL TABULATED VALUES TO FORCE DISTRIBUTION TO BE Legend

= POSITIVE (MINIMUM MORE THAN 1 MILLI-BARN). THE MINIMUM VALUE Legend

= MAY BE CHANGED BY INPUT. WITH THIS OPTION THERE IS NO = Legend

= RESTRICTION ON THE AMOUNT THAT EACH VALUE IS CHANGED AND AS Legend

= SUCH THIS OPTION SHOULD BE USED WITH CAUTION AND ONLY AS A Legend

= LAST RESORT IF NO OTHER APPROACH CAN BE USED TO MAKE THE Lege= nd

= DISTRIBUTION POSITIVE. = &nb= sp; = Legend

= &nb= sp; = &nb= sp; = Legend

OUTPUT = &nb= sp; = &nb= sp; = Legend

------ = &nb= sp; = &nb= sp; = Legend

THE OUTPUT= WILL BE THE LINEARIZED ANGULAR DISTRIBUTION. THE Legend

TABULATED DISTRIBUTION WILL BE NORMALIZED TO UNITY BEFORE OUTPUT. Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

CORRECTING NEGATIVE ANGULAR DISTRIBUTION = &nb= sp; Legend

---------------------------------------- = &nb= sp; Legend

IF AN ANGU= LAR DISTRIBUTION IS NEGATIVE AN ERROR MESSAGE WILL BE Legend

PRINTED AN= D THE USER MAY DECIDE (BASED ON INPUT OPTION) TO, Legend

(1) NOT PE= RFORM ANY CORRECTIVE ACTION. = &nb= sp; Legend

(2) FOR TABULATED DISTRIBUTIONS - ADD THE SAME VALUE TO EACH POINT Legend

= VALUE SUCH THAT WHEN THE DISTRIBUTION IS RE-NORMALIZED THE Legend

= MINIMUM VALUE IS 0.001 (1 MILLI-BARN). THE MINIMUM VALUE CAN Legend

= BE CHANGED BY INPUT. WARNING...EXCEPT FOR SELECTION OF THE Legend

= MINIMUM VALUE (BY INPUT) THE USER HAS NO CONTROL OVER HOW Legend

= MUCH THE DISTRIBUTION IS CHANGED. THEREFORE THIS OPTION SHOULD Legend

= BE USED WITH CAUTION. = &nb= sp; = Legend

(3) FOR LE= GENDRE COEFFICIENTS ONE OF TWO OPTIONS MAY BE SELECTED, Legend

(A) CHANGE INDIVIDUAL COEFFICIENTS (NO ONE COEFFICIENT BY MORE Legend

= THAN 1 PER-CENT) TO MAKE THE DISTRIBUTION POSITIVE WITH A Legend

= MINIMUM VALUE OF 0.001 (1 MILLI-BARN). THE MAXIMUM PER-CENT Legend

= CHANGE IN EACH COEFFICIENT AND MINIMUM VALUE MAY BE CHANGED Legend

= BY INPUT. INPUT THE PROGRAM CANNOT MAKE THE DISTRIBUTION Lege= nd

= POSITIVE BY CHANGING EACH COEFFICIENT BY UP TO THE MAXIMUM Legend

= ALLOWABLE AMOUNT, THE ORIGINAL ANGULAR DISTRIBUTION OR Legend

= COEFFICIENTS WILL BE OUTPUT. ONLY IN THE LATTER CASE SHOULD Legend

= ONE CONSIDER USING OPTION (B) DESCRIBED BELOW. = Legend

(B) LOGICA= LLY ADD THE SAME VALUE TO EACH POINT VALUE SUCH THAT Legend

= WHEN THE DISTRIBUTION IS RE-NORMALIZED THE MINIMUM VALUE IS Legend

= 0.001 (1 MILLI-BARN). THIS IS EQUIVALENT AT INCREASING P0 Legend

= BY A CERTAIN AMOUNT AND RE-NORMALIZATION IS EQUIVALENT TO THEN Legend

= DIVIDING EACH COEFFICIENT BY A CERTAIN AMOUNT. THEREFORE, Legend

= WHAT IS PHYSICALLY DONE BY THE PROGRAM IS TO DIVIDE EACH Lege= nd

= COEFFICIENT BY THE SAME AMOUNT. WARNING..EXCEPT FOR SELECTION Legend

= OF THE MINIMUM VALUE (BY INPUT) THE USER HAS NO CONTROL OVER Legend

= HOW MUCH THE DISTRIBUTION IS CHANGED. THEREFORE THIS OPTION Legend

= SHOULD BE USED WITH CAUTION. = &nb= sp; Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

WARNING ME= SSAGES FROM PROGRAM = &nb= sp; = Legend

----------------------------- = &nb= sp; = Legend

THE WARNING MESSAGES PRINTED BY THIS PROGRAM SHOULD ONLY BE Legend

CONSIDERED= TO BE EXACTLY THAT..WARNINGS..NOT AN ABSOLUTE JUDGEMENT Legend

BY THIS PR= OGRAM THAT THERE IS SOMETHING WRONG WITH THE DATA. WHEN Legend

WARNING ME= SSAGES ARE PRINTED EXAMINE THE DATA AND EITHER TAKE NO Legend

ACTION (IF= YOU FEEL THAT THE DATA IS O.K.) OR CORRECT THE DATA Legend

(IF YOU FE= EL THAT THE DATA IS INCORRECT AND YOU CAN CORRECT IT). Legend

= = &nb= sp; = &nb= sp; Legen= d

VALIDITY OF MODIFIED DATA = &nb= sp; = Legend

------------------------- = &nb= sp; = Legend

BEFORE BEL= IEVING AND USING DATA WHICH HAS BEEN MODIFIED (EITHER Legend

TABULATED ANGULAR DISTRIBUTIONS OR LEGENDRE COEFFICIENTS) THE USER Legend

SHOULD INS= URE THAT THE MODIFIED DATA IS PHYSICALLY MORE ACCEPTABLE Legend

THAN THE ORIGINAL DATA. IN ORDER TO DO THIS ONE OR MORE OF THE Legend

FOLLOWING METHODS SHOULD BE USED, = &nb= sp; Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

(1) USE THE ENERGY VARIATION TESTS BUILT-IN TO THIS PROGRAM AND Legend

= EVALPLOT TO PLOT THE ENERGY DEPENDENCE OF THE LEGENDRE Legend

= COEFFICIENTS IN ORDER TO IDENTIFY AND CORRECT (BY HAND...NOT Legend

= BY THIS PROGRAM) ANY COEFFICIENTS WHICH HAVE UNREALISTIC Legend

= ENERGY AND L ORDER VARIATIONS. THIS SHOULD ALWAYS BE DONE Legend

= FIRST TO ELIMINATE MAJOR PROBLEMS BEFORE USING THIS PROGRAM Legend

= TO AUTOMATICALLY MAKE MINOR CORRECTIONS. = Legen= d

(1) OUTPUT= AND PLOT THE UNCORRECTED AND CORRECTED ANGULAR = Legend

= DISTRIBUTIONS. COMPARE THE PLOTS TO INSURE THAT THE CORRECTED Legend

= DATA DOES NOT SERIOUSLY CHANGE THE ENERGY DEPENDENCE OF THE Legend

= ANGULAR DISTRIBUTION. = &nb= sp; = Legend

(2) IF PLO= TTING CAPABILITY IS NOT AVAIALABLE, USE THE PRINTED OUT Legend

= OF THIS PROGRAM TO DETERMINE HOW MUCH THE TABULATED ANGULAR Legend

DISTRIBUTIO= N OR LEGENDRE COEFFICIENTS HAVE BEEN MODIFIED. Legend

= GENERALLY IF ONE COEFFICIENT HAS BEEN ONLY SLIGHTLY MODIFIED Legend

= THE DISTRIBUTION WILL BE ACCEPTABLE. HOWEVER IF MANY = Legend

= COEFFICIENTS HAVE BEEN MODIFIED THE RESULT WILL NOT BE Legend

= RELIABLE. = &nb= sp; = &nb= sp; Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

SEEING ANG= ULAR DISTRIBUTIONS AND LEGENDRE COEFFICIENTS = Legend

------------------------------------------------------ = Legend

PROGRAM EV= ALPLOT CAN BE USED TO PLOT ANGULAR DISTRIBUTION AND Legend

LEGENDRE COEFFICIENTS - WHEN IT COMES TO CHECKING THIS TYPE OF Legend

DATA THERE= IS NO SUBSTITUTE FOR PLOTS OF THE DATA TO MAKE THE Legend

JOB EASY A= ND STRAIGHTFORWARD. = &nb= sp; = Legend

= &nb= sp; = = &nb= sp; Legend

FOR LEGEND= RE COEFFICIENTS EVALPLOT CAN BE USED TO SEE THE ENERGY Legend

DEPENDENCE= OF EACH COEFFICIENT - THIS IS AN EXTREMELY EASY AND Legend

USEFUL WAY= TO CHECK FOR ERRORS IN THE BASIC DATA. = Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

FOR ANGULAR DISTRIBUTION EVALPLOT CAN BE USED TO PLOT THEM AT Legend

EACH ENERG= Y THAT THEY ARE TABULATED - THIS IS ALSO AN EASY AND Legend

USEFUL WAY= TO CHECK FOR ERRORS. = &nb= sp; = Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

I/O UNIT DEFINITIONS = &nb= sp; = &nb= sp; Legend

-------------------- = &nb= sp; = &nb= sp; Legend

UNIT DESCRIPTION = &nb= sp; = &nb= sp; Legend

---- ----------- = &nb= sp; = &nb= sp; Legend

2 INPUT CARDS = &nb= sp; = &nb= sp; Legend

3 OUTPUT REPORT<= span style=3D'mso-spacerun:yes'> = &nb= sp; = &nb= sp; Legend

10 ORIGINAL DATA IN ENDF/B FORMAT = &nb= sp; Legend

11 FINAL DATA IN ENDF/B FORMAT<= span style=3D'mso-spacerun:yes'> = &nb= sp; Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

OPTIONAL STANDARD FILE NAMES (SEE SUBROUTINE FILIO1 AND FILIO2) Legend

--------------------------------------------------------------- Legend

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

---- ---------- = &nb= sp; = &nb= sp; Legend

2 LEGEND.INP = = &nb= sp; = Legend

3 LEGEND.LST = &nb= sp; = &nb= sp; Legend

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

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

= &nb= sp; = &nb= sp; = &nb= sp; Legend

INPUT CARD= = &nb= sp; = &nb= sp; Legend

----------= = &nb= sp; = = Legend

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

---- ----- ------ ----------- = &nb= sp; = Legend

1 1-11 E11.4 FRACTIONAL THINNING CRITERIA &nbs= p; = Legend

12-2= 2 I11 MAXIMUM NUMBER OF POINTS IN ANGULAR DISTRIBUTION Legend

= RECONSTRUCTED FROM LEGENDRE COEFFICIENTS (PRESENT Legend

= LIMITS ARE 11 TO 60000 POINTS) = &nb= sp; Legend

= *THIS OPTION CAN BE USED TO RUN QUICK, BUT NOT Legend

= NECESSARILY SO ACCURATE CALCULATIONS - TO ROUGHLY Legend

= SEE WHAT THE ANGULAR DISTRIBUTIONS LOOK LIKE. Legend

= *IT IS RECOMMENDED THAT YOU USE 0 AS INPUT - IN Legend

= WHICH CASE THE PROGRAM WILL USE THE MAXIMUM Legend

= ALLOWABLE NUMBER OF POINTS =3D 60000. = Legend

23-3= 3 I11 TABULATED ANGULAR DISTRIBUTI= ON TREATMENT = Legend

= =3D 0 - COPY TABLES = &nb= sp; = Legend

= =3D 1 - LINEARIZE TABLES (OUTPUT TABLES) = Legend

= =3D 2 - LINEARIZE AND THIN TABLES (OUTPUT TABLES) Legend

34-4= 4 I11 LEGENDRE COEFFICIENT TREATMENT &nb= sp; = Legend

= =3D 0 - COPY LEGENDRE COEFFICIENTS = Legend

= =3D 1 - RECONSTRUCT TABULATED ANGULAR DISTRIBUTION. Legend

= &nb= sp; (OUTPUT TABLES). &= nbsp; &nbs= p; &= nbsp; Legend

= =3D 2 - RECONSTRUCT TABULATED ANGULAR DISTRIBUTION. Legend

= &nb= sp; (OUTPUT LEGENDRE COEFFICIENTS). = Legend

45-5= 5 I11 NEGATIVE ANGULAR DISTRIBUTION TREATMENT. = Legend

= =3D 0 - NO CORRECTION = &nb= sp; Legend

= =3D 1 - TABULATE DATA - NO CORRECTION. = Legend

= &nb= sp; - LEGENDRE DATA - CHANGE COEFFICIENTS = Legend

= &nb= sp; (NONE BY MORE THAN 1.0 PER-CENT - CAN BE Legend

= &nb= sp; CHANGED BY INPUT). = ; = Legend

= =3D 2 - FORCE DISTRIBUTIONS TO BE POSITIVE = Legend

= &nb= sp; (TABULATED OR LEGENDRE DATA). = Legend

56-6= 6 I11 LEGENDRE COEFFICIENT VARIATI= ON TEST FLAG. Legend

= =3D 0 - TEST TESTS. = &nb= sp; = Legend

= =3D 1 - PERFORM TESTS, = &nb= sp; Legend

= &nb= sp; (A) LEGENDRE ORDER INCREASES WITH ENERGY. Legend

= &nb= sp; (C) MONOTONIC VARIATION OF COEFFICIENTS Legend

= &nb= sp; AS A FUNCTION OF ENERGY. = Legend

= &nb= sp; (C) COEFFICIENTS DECREASE AS A FUNCTION OF Legend

= &nb= sp; LEGENDRE ORDER. = &nb= sp; Legend

2 1-60 60A1 ENDF/B INPUT DATA FILENAME = &nb= sp; Legend

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

3 1-60 60A1 ENDF/B OUTPUT DATA FILENAME = &nb= sp; Legend

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

4-N 1- 6 I6 LOWER MAT LIMIT = &nb= sp; = Legend

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

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

12-1= 7 I6 UPPER MAT LIMIT = &nb= sp; = Legend

18-1= 9 I2 UPPER MF LIMIT = &nb= sp; = Legend

20-2= 2 I3 UPPER MT LIMIT = &nb= sp; = Legend

23-3= 3 E11.4 LOWER ENERGY LIMIT = &nb= sp; Legend

34-4= 4 E11.4 UPPER ENERGY LIMIT = = &nb= sp; Legend

45-5= 5 E11.4 MINIMUM ALLOWABLE VALUE OF ANGULAR DISTRIBUTION Legend

56-6= 6 E11.4 ALLOWABLE FRACTION (NOT PER-CENT) = CHANGE IN ANY Legend

= ONE LEGENDRE COEFFICIENT TO MAKE THE ANGULAR Legend

= DISTRIBUTION POSITIVE (AND AT LEAST EQUAL TO THE Legend

= INPUT MINIMUM ALLOWABLE VALUE). = Legend

= &nb= sp; = &nb= sp; = Legend

*UP TO 100 MAT/MT/E RANGES MAY BE INPUT, EACH SPECIFYING AN Legend

ALLO= WABLE MINIMUM SIGMA AND MAXIMUM CHANGE IN COEFFICIENTS. Legend

*INPUT IS TERMINATED BY A BLANK CARD. = &nb= sp; Legend

*ALL MAY/M= T/E RANGES NOT SPECIFIED BY INPUT WILL BE TREATED BY Legend

ALLO= WING A MINIMUM SIGMA OF 0.001 (1 MILLI-BARN) AND A CHANGE Legend

IN E= ACH COEFFICIENT BY UP TO 0.01 (1 PER-CENT). = Legend

*THESE MAT= /MT/E RANGES ARE NOT USED TO CORRECT ALL ANGULAR Legend

DISTRIBUTIONS WHERE SIGMA IS LESS THAN THE MINIMUM. THEY ARE Legend

ONLY= USED TO CORRECT DISTRIBUTION THAT ARE NEGATIVE AND TO Legend

INSU= RE THAT THE CROSS SECTION AT THE COSINES WHERE THE ANGULAR Legend

DISTRIBUTION ARE INITIALLY NEGATIVE ARE CORRECTED TO BE POSITIVE Legend

AND = AT LEAST AS LARGE AS THE MINIMUM ALLOWABLE SIGMA (SPECIFIED Legend

BY INPUT). = = &nb= sp; = &nb= sp;Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

EXAMPLE IN= PUT NO. 1 = &nb= sp; = &nb= sp; Legend

------------------- = = &nb= sp; = Legend

PROCESS BO= TH LEGENDRE COEFFICIENTS AND TABULATED DATA TO OBTAIN Legend

ANGULAR DISTRIBUTION WHICH ARE ACCURATE TO WITHIN 0.1 PER-CENT Legend

AND OUTPUT UNCORRECTED TABULATED ANGULAR DISTRIBUTION USING Legend

A MAXIMUM = OF 501 POINTS IN EACH TABULATED ANGULAR DISTRIBUTION. Legend

SINCE LEGE= NDRE COEFFICIENTS WILL NOT BE CORRECTED THE INPUT NEED Legend

NOT SPECIFY MAT/MT/E RANGES. = &nb= sp; = Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

READ /ENDFB6/K300/LEAD.IN AND WRITE /ENDFB6/K300/LEAD.OUT = Legend

= &nb= sp; = &nb= sp; = Legen= d

THE FOLLOW= ING 4 INPUT LINES ARE REQUIRED, = &nb= sp; Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

1.00000- 3 501 = 2 = 1 = 0 &nbs= p; Legend

/ENDFB6/K300/LEAD.IN = &nb= sp; = &nb= sp; Legend

/ENDFB6/K300/LEAD.OUT = &nb= sp; = &nb= sp; Legend

(BLANK CARD TERMINATED INPUT) = &nb= sp; = Legend

= &nb= sp; = &nb= sp; = Legend

EXAMPLE IN= PUT NO. 2 = &nb= sp; = &nb= sp; Legend

------------------- = &nb= sp; = &nb= sp; Legend

PROCESS BO= TH LEGENDRE COEFFICIENTS AND TABULATED DATA TO OBTAIN Legend

ANGULAR DISTRIBUTION WHICH ARE ACCURATE TO WITHIN 0.1 PER-CENT Legend

AND OUTPUT CORRECTED TABULATED ANGULAR DISTRIBUTION (ONLY THOSE Legend

RE-CONSTRU= CTED FROM LEGENDRE COEFFICIENTS WILL BE CORRECTED). Legend

FOR ALL MA= T/MT/E CORRECT NEGATIVE ANGULAR DISTRIBUTION TO A VALUE Legend

OF 0.01 (10 MILLI-BARNS) AND ALLOW LEGENDRE COEFFICIENTS TO BE Legend

CHANGED BY= UP TO 0.02 (2 PER-CENT). = &nb= sp; Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

USE THE DE= FAULT FILENAMES ENDFB.IN AND ENDFB.OUT (THIS CAN BE Legend

DONE BY LE= AVING THE SECOND AND THIRD INPUT LINES BLANK). = Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

THE FOLLOW= ING 5 INPUT LINES ARE REQUIRED, = &nb= sp; Legend

= &nb= sp; = &nb= sp; = Legend

1.00000- 3 501 = 2 = 1 = 1 &nbs= p; Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

= &nb= sp; = &nb= sp; = = Legend

1 1 1= 999999999 0.00000+ 0 3.00000+ 7 1.00000- 2 2.00000- 2 Legend

(BLANK CARD TERMINATED INPUT) = &nb= sp; = Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

EXAMPLE IN= PUT NO. 3 = &nb= sp; = &nb= sp; Legend

------------------- = &nb= sp; = &nb= sp; Legend

PROCESS BO= TH LEGENDRE COEFFICIENTS AND TABULATED DATA TO OBTAIN Legend

ANGULAR DISTRIBUTION WH= ICH ARE ACCURATE TO WITHIN 0.1 PER-CENT Legend

AND OUTPUT CORRECTED LEGENDRE COEFFICIENTS AND UNCORRECTED Legend

TABULATED ANGULAR DISTRIBUTIONS. FOR MAT=3D1800, MT=3D2 CORRECT Legend

NEGATIVE A= NGULAR DISTRIBUTIONS TO INSURE THE MINIMUM IS 0.01 Legend

(10 MILLI-= BARNS) ALLOWING EACH LEGENDRE COEFFICIENT TO CHANGE BY Legend

UP TO 0.02= (2 PER-CENT). ALL OTHER MAT/MT/E WILL BE CORRECTED Legend

TO A MINIM= UM OF 0.001 (1 MILLI-BARN) ALLOWING A 0.01 (1 PER-CENT) Legend

CHANGE (BU= ILT-IN OPTION). = &nb= sp; = Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

READ /ENDFB6/K300/LEAD.IN AND WRITE /ENDFB6/K300/LEAD.OUT = Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

THE FOLLOW= ING 5 INPUT LINES ARE REQUIRED, = &nb= sp; Legend

= &nb= sp; = = &nb= sp; Legend

<= /p>

1.00000- 3 501 = 2 = 2 = 1 &nbs= p; Legend

/ENDFB6/K300/LEAD.IN = &nb= sp; = &nb= sp; Legend

/ENDFB6/K300/LEAD.OUT = &nb= sp; = &nb= sp;Legend

1800 4 2= 1800 4 2 0.00000+ 0 3.= 00000+ 7 1.00000- 2 2.00000- 2 Legend

(BLANK CARD TERMINATED INPUT) = &nb= sp; = Legend

= &nb= sp; = &nb= sp; = = Legend

EXAMPLE IN= PUT NO. 4 = &nb= sp; = &nb= sp; Legend

------------------- = &nb= sp; = &nb= sp; Legend

TO COPY TABULATED ANGULAR DISTRIBUTION AND CONVERT LEGENDRE Legend

COEFFICIEN= TS TO UNCORRECTED TABULAR DISTRIBUTIONS. = Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

USE THE DE= FAULT FILENAMES ENDFB.IN AND ENDFB.OUT (THIS CAN BE Legend

DONE BY LE= AVING THE SECOND AND THIRD INPUT LINES BLANK). = Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

THE FOLLOW= ING 4 INPUT LINES ARE REQUIRED, = &nb= sp; Legend

= = &nb= sp; = &nb= sp; = Legend

1.00000- 3 501 = 0 = 1 = 0 &nbs= p; Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend

= = &nb= sp; = &nb= sp; Legend

(BLANK CARD TERMINATED INPUT) = &nb= sp; = Legend

= &nb= sp; = &nb= sp; = &nb= sp; Legend