=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D Activate

=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D Activate

= &nb= sp; = &nb= sp; = &nb= sp; Activate

PROGRAM ACTIVATE = &nb= sp; = &nb= sp; Activate

VERS. 2000-1 (APRIL 2000) *INITIAL VERSION. = &nb= sp; Activate

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

VERS. 2004-1 (JAN. 2004) *CORRECTED ERROR - FIR= ST RECORD AFTER Activate

= = MF=3D10 WAS MISSING. = Activate

= &nb= sp; *ADDED INCLUDE TO DEFINE COMMON Activate

= &nb= sp; *INCREASED MAX. POINTS FROM 100,000 Activate

= &nb= sp; TO 1,000,000. = &nb= sp; Activate

VERS. 2007-1 (JAN. 2007) *CHECKED AGAINST ALL ENDF/B-VII Activate

= &nb= sp; = &nb= sp; = &nb= sp; Activate

Acknowledg= ement 2004 = = &nb= sp; = Activate

-------------------- = &nb= sp; = &nb= sp; Activate

Currently = almost all improvements to this code are based upon Activate

feedback from code users who report problems. This feedback Activate

benefits ALL users of this code, and ALL users are encouraged Activate

to report problems. = &nb= sp; = &nb= sp; Activate

= &nb= sp; = &nb= sp; = = Activate

Improvemen= ts on the 2004 version of this code based on user Activate

feedback including, = &nb= sp; = &nb= sp; Activate

1) Andrej = Trkov - reported that the first record of the section Activate

= &nb= sp; after an inserted MF=3D10 was missing. = Activate

= &nb= sp; = &nb= sp; = &nb= sp; Activate

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

------------------------------------ = &nb= sp; Activate

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

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

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

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

EUROPE = &nb= sp; = &nb= sp; = Activate

= = &nb= sp; = &nb= sp; Activate

ORIGINALLY WRITTEN BY = &nb= sp; = Activate

------------------------------------ = &nb= sp; Activate

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

UNIVERSITY OF CALIFORNIA = &nb= sp; = Activate

LAWRENCE LIVERMORE NATIONAL LABORATORY = &nb= sp; Activate

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

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

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

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

TELEPHONE 925-423-7359 = &nb= sp; = Activate

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

WEBSITE HTTP://WWW.LLNL.GOV/CULLEN1 = = Activate=

= &nb= sp; = &nb= sp; = &nb= sp; Activate

AUTHORS MESSAGE = &nb= sp; = &nb= sp; Activate

--------------- = &nb= sp; = &nb= sp; Activate

THE REPORT DESCRIBED ABOVE IS THE LATEST PUBLISHED DOCUMENTATION Activate

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

THE LATEST DOCUMENTATION INCLUDING ALL RECENT IMPROVEMENTS. PLEASE Activate

READ ALL OF THESE COMMENTS BEFORE IMPLEMENTATION. = Activate

= &nb= sp; = &nb= sp; = &nb= sp; Activate

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

INDEPENDENT PROGRAMS THAT CAN EASILY BE IMPLEMENTED ON ANY ONE Activate

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

IT WOULD BE APPECIATED IF YOU WOULD NOTIFY THE AUTHOR OF ANY Acti= vate

COMPILER D= IAGNOSTICS, OPERATING PROBLEMS OR SUGGESTIONS ON HOW TO Activate<= /p>

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

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

COMPUTER. = = &nb= sp; = &nb= sp; Activate

= &nb= sp; = &nb= sp; = &nb= sp; Activate

PURPOSE = &nb= sp; = &nb= sp; = Activate

------- = &nb= sp; = &nb= sp; = Activate

THIS PROGR= AM IS DESIGNED TO CREATE FILE 10 ACTIVATION CROSS Activate

SECTIONS BY COMBINING FILE 3 CROSS SECTIONS AND FILE 9 MULTIPLIERS Activate<= /span>

= &nb= sp; = = &nb= sp; Activate

IN THE FOL= LOWING DISCUSSION FOR SIMPLICITY THE ENDF/B TERMINOLOGY Activate<= /p>

---ENDF/B TAPE---WILL BE USED. IN FACT THE ACTUAL MEDIUM MAY BE Activate

TAPE, CARDS, DISK OR ANY OTHER MEDIUM. = = Activate<= /o:p>

= &nb= sp; = &nb= sp; = &nb= sp; Activate

ASSUMPTION= S = &nb= sp; = &nb= sp; Activate

----------= - = &nb= sp; = &nb= sp; Activate

IT IS ASSU= MED THAT THE FILE 3 AND 9 DATA HAVE BEEN LINEARIZED Activate

BEFORE THI= S CODE IS USED - FILE 3 AND 9 DATA CAN BE LINEARIZED Activate

USING PROGRAM LINEAR. = &nb= sp; = Activate

= &nb= sp; = &nb= sp; = &nb= sp; Activate

IT IS ASSU= MED THAT THE FILE 9 MULTIPLIERS ARE FAIRLY SMOOTH VERSUS Activate

ENERGY, AN= D THAT THE ACTIVATION CROSS SECTIONS FOR FILE 10 CAN BE Activate<= /p>

DEFINED AT EXACTLY THE SAME ENERGIES AS THE FILE 3 CROSS SECTIONS, Activate

AND THAT T= HESE NEED MERELY BE MULTIPLIED BY THE FILE 9 TO DEFINE Activate

THE FILE 10 ACTIVATION CROSS SECTIONS. = &nb= sp; Activate

= = &nb= sp; = &nb= sp; = Activate

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

------------- = &nb= sp; = &nb= sp; Activate

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

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

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

= &nb= sp; = &nb= sp; = Activate

IT IS ASSU= MED THAT THE DATA IS CORRECTLY CODED IN THE ENDF/B Acti= vate

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

ASSUMED TH= AT THE MAT, MF AND MT ON EACH LINE IS CORRECT. SEQUENCE Activa= te

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

CORRECTLY OUTPUT ON ALL LINES. THE FORMAT OF SECTION M= F=3D1, MT=3D451 = Activate

AND ALL SE= CTIONS OF MF=3D3 MUST BE CORRECT. THE PROGRAM COPIES ALL Activate

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

THE CORRECTNESS OR INCORRECTNESS OF ALL OTHER SECTIONS. = Activate

= &nb= sp; = &nb= sp; = = Activate

OUTPUT FORMAT = &nb= sp; = &nb= sp; Activate

------------- = &nb= sp; = &nb= sp; Activate

ALL ENERGI= ES WILL BE OUTPUT IN F (INSTEAD OF E) FORMAT IN ORDER Activate

TO ALLOW ENERGIES TO BE WRITTEN WITH UP TO 9 DIGITS OF ACCURA= CY. Activate

COMPARISON= OF THE NORMAL ENDF/B CONVENTION OF 6 DIGITS= TO THE 9 Activate

DIGIT OUTP= UT FROM THIS PROGRAM DEMONSTRATED THAT FAILURE TO USE Activate

THE 9 DIGIT OUTPU= T CAN LEAD TO LARGE ERRORS IN THE DATA DUE TO Activate

TRUNCATION OF ENERGIES TO 6 DIGITS DURING OUTPUT. = Activate

= &nb= sp; = &nb= sp; = &nb= sp; Activate

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

------------------ = &nb= sp; = &nb= sp; Activate

ENTIRE EVALUATIONS ARE OUTPUT, NOT JUST THE PROCESSED DATA, E.G., Activate<= /p>

ANGULAR AN= D ENERGY DISTRIBUTIONS ARE ALSO INCLUDED. = Activate

= &nb= sp; = &nb= sp; = &nb= sp; Activate

DOCUMENTATION = &nb= sp; = &nb= sp; Activate

------------- = = &nb= sp; = Activate<= /span>

THE FACT T= HAT THIS PROGRAM HAS OPERATED ON THE DATA IS DOCUMENTED Activate<= /p>

BY THE ADD= ITION OF 3 COMMENT LINES AT THE END OF EACH HOLLERITH Activate

SECTION IN= THE FORM = = &nb= sp; Activ= ate

= &nb= sp; = &nb= sp; = &nb= sp; Activate

***************** PROGRAM ACTIVATE (2007-1) **************** Acti= vate

FILE 10 ACTIVATION CROSS SECTIONS HAVE BEEN DEFINED BY COMBINING Activate

FILE 3 CRO= SS SECTIONS AND FILE 9 MULTIPLIERS. FILE 9 DELETED. Activate

= &nb= sp; = &nb= sp; = &nb= sp; Activate

THE ORDER = OF SIMILAR COMMENTS (FROM RECENT, SIGMA1 AND GROUPIE) Activate

REPRESENTS= A COMPLETE HISTORY OF ALL OPERATIONS PERFORMED ON Acti= vate

THE DATA BY THESE PROGRAMS. = &nb= sp; = Activate

= &nb= sp; = &nb= sp; = &nb= sp; Activate

THESE COMM= ENT LINES ARE ONLY ADDED TO EXISTING HOLLERITH SECTIONS, Activate

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

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

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

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

THE ENDF/B FORMAT THE DATA IS IN. WITHOUT HAVING A SECTION OF Activate

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

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

AS SUCH IT= IS IMPOSSIBLE FOR THE PROGRAM TO DETERMINE WHAT FORMAT Activate<= /p>

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

= &nb= sp; = &nb= sp; = &nb= sp; Activate

REACTION INDEX = &nb= sp; = &nb= sp; Activate

-------------- = = &nb= sp; = Activate=

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

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

= &nb= sp; = = &nb= sp; = Activate

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

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

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

NOT CONSID= ERED WORTHWHILE TO INCLUDE THE OVERHEAD OF CONSTRUCTING Activate<= /p>

A CORRECT REACTION INDEX IN THIS PROGRAM. HOWEVER, IF = YOU REQUIRE Activat= e

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

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

= &nb= sp; = &nb= sp; = &nb= sp; Activate

SECTION SIZE = &nb= sp; = &nb= sp; Activate

------------ = &nb= sp; = &nb= sp; Activate

SECTIONS O= F MF=3D9 MULTIPLIERS ARE LIMITED TO A MAXIMUM OF 10,000 Activate

ENERGY POINTS. = &nb= sp; = &nb= sp; Activate

= &nb= sp; = &nb= sp; = &nb= sp; Activate

THERE IS NO LIMIT ON THE NUMBER OF ENERGY POINTS IN MF=3D3 AND 10 Activate

TABLES. = &nb= sp; = &nb= sp; = Activate

= &nb= sp; = &nb= sp; = Activate=

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

----------------- = &nb= sp; = &nb= sp; Activate

THE PROGRA= M PROCESSES ALL ENDF/B DATA ON A SERIES OF ENDF/B TAPES. Activate

= &nb= sp; = &nb= sp; = &nb= sp; Activate

PROGRAM OPERATION = &nb= sp; = &nb= sp; Activate

----------------- = = &nb= sp; = Activate

PASS #1 = &nb= sp; = &nb= sp; = Activate

------- = &nb= sp; = &nb= sp; = Activate

THE ENTIRE= MAT IS COPIED TO A SCRATCH FILE IN THE ENDF/B ASCII Activate

FORMAT AND= WHILE COPYING IT TO SCRATCH MF=3D3, 9, AND 10 ARE ALSO Activate

COPIED TO SEPERATE SCRATCH FILES, I.E., THERE ARE A TOTAL OF 4 Activate

SCRATCH FI= LES - SEE THEIR DEFINITIONS BELOW. = &nb= sp; Activate

= &nb= sp; = &nb= sp; = &nb= sp; Activate

PASS #2 = &nb= sp; = &nb= sp; = Activate

------- = &nb= sp; = = Activate=

IF NO MF= =3D9 MULTIPLIERS ARE FOUND DURING PASS #1, THE ENTIRE MAT Activate

IS COPIED FROM SCRATCH TO THE OUTPUT FILE, WITHOUT ANY CHECKS= . Activate

= &nb= sp; = &nb= sp; = Activate

IF MF=3D9 MULTIPLIERS ARE FOUND THEY ARE USED WITH MF=3D3 CROSS Activate

SECTIONS TO CREATE MF=3D10 ACTIVATION CROSS SECTIONS. = Activate

= &nb= sp; = &nb= sp; = &nb= sp; Activate

FOR ANY SE= CTION OF MF=3D10 DATA FOR WHICH NO MF=3D9 MULTIPLIERS ARE Activate

FOUND, THE ORIGINAL MF=3D10 IS OUTPUT. = &nb= sp; Activate

= &nb= sp; = &nb= sp; = &nb= sp; Activate

FOR CONSIS= TENCY ALL MF=3D9 MULTIPLIERS ARE DELETED, I.E., THEY ARE Activate

NOT INCLUD= ED IN THE OUTPUT. = &nb= sp; = Activate

= &nb= sp; = &nb= sp; = &nb= sp; Activate

KEEP EVALU= ATED DATA POINTS = &nb= sp; = Activate

-------------------------- = &nb= sp; = Activate

THE FILE 10 OUTPUT WILL BE AT EXACTLY THE SAME ENERGY POINTS AS Activate

THE FILE 3= CROSS SECTIONS USED TO DEFINE THE FILE 10 ACTIVATION Activate

CROSS SECTIONS. = &nb= sp; = &nb= sp; Activate

= &nb= sp; = &nb= sp; = &nb= sp; Activate

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

----------= - = &nb= sp; = &nb= sp; Activate

UNIT DESCRIPTIO= N = &nb= sp; = &nb= sp; Activate

---- ----------- = &nb= sp; = &nb= sp; Activate

2 INPUT LINES (BCD - 80 CHARACTERS/RECORD) = Activate

10 ORIGINAL ENDF/B DAT= A (BCD - 80 CHARACTERS/RECORD) = Activate

= &nb= sp; = &nb= sp; = Activate<= /o:p>

OUTPUT FILES = &nb= sp; = &nb= sp; Activate

------------ = &nb= sp; = &nb= sp; Activate

UNIT DESCRIPTION = &nb= sp; = Activate

---- ----------- = &nb= sp; = &nb= sp; Activate

3 OUTPUT REPORT (BCD -= 120 CHARACTERS/RECORD) = Activate

11 FINAL ENDF/B DATA (= BCD - 80 CHARACTERS/RECORD) = Activate

= &nb= sp; = &nb= sp; = &nb= sp; Activate

SCRATCH FILES = &nb= sp; = &nb= sp; Activate

------------- = &nb= sp; = &nb= sp; Activate

UNIT DESCRIPTION = &nb= sp; = &nb= sp; Activate

---- ----------- = &nb= sp; = &nb= sp; Activate

12 SCRATCH FILE FOR AL= L MAT (BCD - 80 CHARACTERS/RECORD) Activate

14 SCRATCH FILE FOR MF= =3D3 DATA (BCD - 80 CHARACTERS/RECORD) Activate

15 SCRATCH FILE FOR MF= =3D9 DATA (BCD - 80 CHARACTERS/RECORD) Activate

16 SCRATCH FILE FOR MF= =3D10 DATA (BCD - 80 CHARACTERS/RECORD) Activate

= &nb= sp; = &nb= sp; = &nb= sp; Activate

OPTIONAL STANDARD FILE NAMES (SEE SUBROUTINE FILEIO) = Activate

---------------------------------------------------- = Activate

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

---- ---------- = &nb= sp; = &nb= sp; Activate

2 ACTIVATE.INP = &nb= sp; = &nb= sp; Activate

3 ACTIVATE.LST = = &nb= sp; Activate

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

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

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

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

15 (SCRATCH) = &nb= sp; = &nb= sp; Activate

= &nb= sp; = &nb= sp; = = Activate

INPUT PARAMETERS = &nb= sp; = &nb= sp; Activate

---------------- = &nb= sp; = &nb= sp; Activate

= &nb= sp; = &nb= sp; = &nb= sp; Activate

LINE COLS. DESCRIPTION = &nb= sp; = Activate

---- ----- ----------- = &nb= sp; = Activate

1 1-60 ENDF/B INPUT DATA FILENAME = &nb= sp; Activate

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

2 1-60 ENDF/B OUTPUT DATA FILENAME = &nb= sp; Activate

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

= = &nb= sp; = &nb= sp; = Activate

ANY NUMBER= OF PAIRS OF INPUT LINES MAY BE USED, TO PROCESS ANY Activate

NUMBER OF = ENDF/B TAPES, ONE AFTER ANOTHER. = &nb= sp; Activate

= = &nb= sp; = &nb= sp; Activate

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

------------------- = &nb= sp; = &nb= sp; Activate

PROCESS EN= DF/B TAPES NAMED, TAPE121, TAPE122, AND TAPE123, AND Activate

NAME THE O= UTPUT FILES ACTIVATE121, ACTIVATE122, AND ACTIVATE123. Activate

= &nb= sp; = &nb= sp; = &nb= sp; Activate

IN THIS CA= SE THE FOLLOWING 6 INPUT LINES ARE REQUIRED = Activate

= &nb= sp; = &nb= sp; = &nb= sp; Activate

TAPE121 = &nb= sp; = &nb= sp; = Activate

ACTIVATE121 = &nb= sp; = = &nb= sp; Activate

TAPE122 = &nb= sp; = &nb= sp; = Activate

ACTIVATE122 = &nb= sp; = &nb= sp; = Activate

TAPE123 = &nb= sp; = &nb= sp; = Activate

ACTIVATE123 = &nb= sp; = &nb= sp; = Activate

= &nb= sp; = &nb= sp; = &nb= sp; Activate

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

------------------- = &nb= sp; = &nb= sp; Activate

SAME AS THE ABOVE CASE, EXCEPT THAT IN THIS CASE THE ORIGINAL Activate

3 TAPES AR= E IN A DIRECTORY NAMED \ENDFB6\ORIGINAL, AND THE Activate

RESULTS WI= LL BE WRITTEN INTO A DIRECTORY NAMED \ENDFB6\ACTIVATE. Activate

= &nb= sp; = &nb= sp; = &nb= sp; Activate

IN THIS CA= SE THE FOLLOWING 6 INPUT LINES ARE REQUIRED = Activate

= &nb= sp; = &nb= sp; = Activate

\ENDFB6\ORIGINAL\TAPE121 = &nb= sp; = &nb= sp; Activate

\ENDFB6\ACTIVATE\ACTIVATE121 = &nb= sp; = Activate

\ENDFB6\ORIGINAL\TAPE122 = &nb= sp; = &nb= sp; Activate

\ENDFB6\ACTIVATE\ACTIVATE122 = &nb= sp; = Activate

\ENDFB6\ORIGINAL\TAPE123 = &nb= sp; = &nb= sp; Activate

\ENDFB6\ACTIVATE\ACTIVATE123 = &nb= sp; = Activate

= &nb= sp; = &nb= sp; = &nb= sp; Activate