ML061090482

From kanterella
Jump to navigation Jump to search

M-DSC-411, Rev. 0 - Pressurizer Lower Level Nozzle Welding and Transient Analysis
ML061090482
Person / Time
Site: San Onofre  Southern California Edison icon.png
Issue date: 03/16/2006
From: Rainsberry J
Southern California Edison Co
To: Kalyanam N
NRC/NRR/ADRO/DORL/LPLIV
Kalynanam N, NRR/DORL/LP4, 415-1480
References
TAC MC9434, TAC MD9488 M-DSC-411
Download: ML061090482 (73)


Text

{{#Wiki_filter:I N. Kaly Kalyanam - Re: Fwd: SONGS Unit 2: Relief Request ISI-3-17 Pressurizer instrument line repair TAC MC9434 and 948age 1 From: <rainsbjl B songs.sce.com> To: "N. Kaly Kalyanam" <NXK~nrc.gov> Date: 3/16/06 3:43PM

Subject:

Re: Fwd: SONGS Unit 2: Relief Request ISI-3-17 Pressurizer instrument line repair TAC MC9434 and 9488 They are being boxed now. You may wish to try to intercept them in your mail room (or whereever Fed Ex delivers). We usually hear from Fed Ex that the delivers are made to your offices around 9 or 10 in the morning your time. A LZAUL A"T Ir0I oA .-j*-b-S 4q1

                                                                                  -5oN     :- 2i-   c3 "N. Kaly Kalyanam"
                         <NXK@ nrc.gov>                               To
                                        <rainsbjl @songs.sce.com>

03/i 6/2006 08:32 cc AM Subject Fwd: SONGS Unit 2: Relief Request ISI-3-17 Pressurizer instrument line repair TAC MC9434 and 9488

                                                                                  ]o     Xr=)~&T:       £o              I&
                                                                                                           ~70,-UA        2-Z)A-T 6-,               3 - 2_0--04, Jack,                                                            (I Can you provide the documents John Tsao has identified in the attached email?

Thanks Kaly

              ----- Message from "John Tsao" <JCT~nrc.gov> on Thu, 16 Mar 2006 09:55:01
              -0500-To: "N. Kaly Kalyanam" <NXK.OWGWPOO2.HQGWDO01 @nrc.gov>

cc: "Kimberly Gruss" <KAG1.twf4_po.TWFNDO@nrc.gov> Subjec SONGS Unit 2: Relief Request ISI-3-17 Pressurizer instrument line t: repair TAC MC9434 and 9488 Kaly,

l1N.- Kaly Kalyanam - Re: Fwd: SONGS Unit 2: Relief Request ISI-3-17 Pressurizer instrument line repair TAC MC9434 and 94Bge 2 RE: SONGS Unit 2: Relief Request ISI-3-17 Pressurizer instrument line repair TAC MC9434 and MC9488 I would like the licensee to mail us a copy of the following reports: 1). M-DSC-414, Rev. 0, "SONGS Unit 2 & 3 Pressurizer Lower Level and Thermowell Nozzles J-Weld Fracture Mechanics Evaluation." 2). M-DSC-41 1, Revision 0, "SONGS Unit 2 and 3 Pressurizer Lower Level Nozzle Welding and Transient Analysis." 3). M-DSC-360, Revision 0, "Evaluation of Half Nozzle Repair for PZR and SG INSr. Nozzles under Long-Term Service Conditions -SONGS 2 and 3." I am wondering if the licensee can simply forward a copy of the reports without formal submittal. I will take a look at the reports. If I think the reports need to be on the docket (i.e., if I use the information in my SE) we can put the reports on the docket later. This is to expedite the review process due to the short fuse of the SE. Also I would like SONGS to fedex the reports to us due to the short fuse of the SE. The purpose of reviewing the reports is to confirm what SONGS said in its relief request is acceptable. Also, SONGS relief request contains no numerical values and is sketchy in flaw evaluations.

l ICCN NOJ CALCULATION TITLE PAGE PRELIM. CCN NO. IPAGE -OF. CCN CONVERSION: Calc. No_ QDC4.11 ECP No. & Rev. N / CCN NO. CCN-Subject SONGS UNIT 2 AND 3 PRESSURIZER LOWER LEVEL NOZZLE WELDING AND TRANSIENT ANALYSIS Sheet 1 of 72 SystemNumber/PrimaryStationSystemDesignator 1201/BBB SONGS Unit 2 & 3 O-Class I Tech. SpecJLCS Affecting? 0 NO E YES, Section No. EquipmentTagNo. S2t311201ME087 Site ProgramslProcedure Impact? E NO El YES, AR No. 10CFR50.59Tr2.48 REVIEW CONTROLLED COMPUTER PROGRAM / DATABASE IS THIS CALCULATION REVISION PROGRAM / DATABASE NAME(S) VERSION/ RELEASE NO.(S) BEING ISSUED SOLELY TO 0 PROGRAM INCORPOFATE CCNs? [I ALSO, LISTED BELOW ONO El YES E DATABASE ANSYS 8.0 AR No. 0311 00E 14-39 ACCORDING TO S0123-XXIV-5.1 0 . ._ RECORDS OF ISSUES REV. TOTAL PREPARED BY: APPROVED BY: DISC. DEE CRIPTION SHTS. (Print name/sign/date) (Signature/date) LAST SHT. Initial P0S Block - Requires POS T3EN64 Initial POS Block - Requires PQS T3EN64 0 INITIAL II8SUE 72 _ _ _124 OFRIG.YVb"fHM84"IY'P0SVEA.BY 1I6 lo A-

                                                                                                          ~fA) a E     Y POSVER. BY:   xVY:

L) 72 IRE ) & as VER. BY: i1 Other POS VER. BY:_ ORIG. POS VER. BY:. FLS PS VER. BY: IRE PaS VER. BY: Other PaS VER. BY_ ORIG. POSVER. BY: . FLS POS VER. BY: IRE PaS VER. BY: Other Pas VER. BY:. ORIG. POS VER. BY: FLS POS VER. BY:._ IRE Pas YER. BY: Other POS VER. BY: Space for RPE Stamp. identify use of an alternate calc., and notes as applicable. This calc. was prepar.ed for the identified ISCO ECP. ECP completon and lumover acceptance to be verified by receipt of a memorandum directing ECN Conversion. Upon recelpt, this calc. represents the as-built condition. Memo date _by SCE 26-121-1 REV. 4)0WIREVERENCE. S0123.XXIv.7.1sJ SITE FILE COPY Site File Copy M-DSC-411

                                                                                                                         -- 1 DOMINION ENGINEERING, INC.

11730 PLAZA AMERICA DRIVE #310 RESTON, VIRGINIA 20190

Title:

SONGS Unit 2 and 3 Pressurizer Lower Level Nozzle Welding and Transient Analysis Task No.: 36-77 Calculation No.: C-3677-00-1 Revision No.: 0 Page I of 70 SONGS Unit 2 and 3 Pressurizer Lower Level Nozzle Welding and Transient Analysis The last revision number to reflect any changes for each section of the calculation is shown in the Table of Contents. The last revision numbers to reflect any changes for tables and figures are shown in the List of Tables and the List of Figures. Changes made in the latest revision, except for Rev. 0 and revisions 'which change the: calculation in its entirety, are indicated by a double line in the right hand margin as shown here.

                                                                       .b--D-sc -4/1},            Rev-o Si. 3 M-DSC-4 11

DOMINION ENGINEERING, INC. 11730 PLAZA AMERICA DRIVE #310 RESTON, VIRGINIA 20190

Title:

SONGS Unit 2 and 3 Pressurizer Lower Level Nozzle Welding and Transient Analysis Task No.: 36-77 Calculation No.: C-3677-00-1 Revision No.: 0 Page 2 of 70 Table of Contents Sect. Pare Last Mod. Rev. 1.0 Purpose 5 0 2.0 Smunmary of Results 5 0 3.0 Input Requirements 5 0 4.0 Assumptions 6 0 5.0 Analysis 7 0 6.0 R.-ferences 19 0 List of Tables Table No. Last Mod. Rev. 1 Pressurizer Heatup Transient: Pressure and Temperature Values 0 2 Pressurizer Cooldown with Flooding Transient: Pressure and Temperature Values 0 3 Pressurizer Loading/Unloading & 10% Step Change: Pressure and Temperature Values 0 4 Pressurizer Reactor Trip/Loss of Load/Loss of Flow: Pressure and Temperature Values 0 5 Pressurizer Loss of Secondary Pressure Transient: Pressure and Temperature Values 0 6 Pressurizer Leak Test Transient: Pressure and Temperature Values 0 7 Pressurizer Lower Level Nozzle Transient Analysis: Key Time Steps 0 H-Dsc- 411

                                                                           ¶'.ev. 0 M-DSC-4 11

DOMINION ENGINEERING, INC. 11730 PLAZA AMERICA DRIVE #310 RESTON, VIRGINIA 20190

Title:

SONGS Unit 2 and 3 Pressurizer Lower Level Nozzle Welding and Transient Analysis Task No.: 36-77 Calculation No.: C-3677-00-1 Revision No.: 0 Page 3 of 770 List of Figures Fig. No. Last Mod. Rev. 1 SONGS Pressurizer Outline Showing Lower Level Nozzle Location 0 2 SONGS Pressurizer Lower Level Nozzle Geometry Summary 0 3 Pressurizer Heatup Transient- Pressure and Temperature vs. Time 0 4 Pressurizer Cooldown with Flooding Transient: Pressure and Temperature vs. Time 0 5 Pressurizer Loading/Unloading & 10% Step Change: Pressure and Temperature 0 vs. Time 6 Pressurizer Reactor Trip/Loss of Load/Loss of Flow: Pressure and Temperature 0 vs. Time 7 Pressurizer Loss of Secondary Pressure Transient: Pressure and Temperature vs. Time 0 8 Pressurizer Leak Test Transient: Pressurc and Temperature vs. Time 0 9 SONGS Pressurizer Lower Level Nozzle Node Numbering Scheme 0 10 SONGS Pressurizer Transients Average Hoop Stress Over Weld + Adjacent Nozzle 0 1la SONGS Pressurizer Lower Level Nozzle Welding Residual Hoop Stress - Standard 0 Stress Contours 1 lb SONGS Pressurizer Lower Level Nozzle Welding Residual Hoop Stress - Automatic 0 Stress Contours 12 Hoop Stress and Temperature at Heatup Transient Step 5 (Time = 7,200 s) 0 13 Hoop Stress and Temperature at Heatup Transient Step 14 (Time = 28,800 s) 0 14 Hoop Stress and Temperature at Cooldown Transient Step 13 (Time = 4,428 s) 0 15 Hoop Stress and Temperature at Cooldown Transient Step 23 (Time = 10,309.6 s) 0 16 Hoop Stress and Temperature at L/UL Transient Step 5 (Time = 180 s) 0 17 Hoop Stress and Temperature at L/UL Transient Step 13 (Time = 7,380 s) 0 18 Hoop Stress and Temperature at Trip/LL/LF Transient Step 6 (Time = 50 s) 0 19 Hoop Stress and Temperature at Trip/LL/LF Transient Step 20 (Time = 2,000 s) 0 20 Hoop Stress and Temperature at LOSP Transient Step 13 (Time = 200 s) 0 21 Hoop Stress and Temperature at LOSP Transient Step 21 (Time = 2,000 s) 0 22 Hoop Stress and Temperature at Leak Test Transient Step 8 (Time = 14,400 s) 0 23 Hoop Stress and Temperature at Leak Test Transient Step 20 (Time = 36,000 s) 0 M-DSc-4-11, Rev.u M-DSC-4 11

DOMINION ENGINEERING, INC. 11730 PLAZA AMERICA DRIVE #310 RESTON, VIRGINIA 20190

Title:

- SONGS Unit 2 and 3 PressurizerLowerLevel Nozzle Welding and Transient Analysis Task No.: 36-77 Calculation No.: C-3677-00-1 Revision No.: 0 Page 4 of 7C' List of Attachments Att. No. Last Mod. Rev. 1 File "press.trans.addon.txt" 0 2 File "press.trans.addpost.txt" 0 H- c)sc- 4-11 Rev. o ghni. C M-DSC-4 11

DOMINION ENGINEERING, INC. 11730 PLAZA AMERICA DRIVE #310 RESTON, VIRGINIA 20190

Title:

SONGS Unit 2 and 3 Pressurizer Lower Level Nozzle Welding and Transient Analysis Task No.: 36-77 Calculation No.: C-3677-00-1 Revision No.: 0 Page 5 of 70 D-SC- 41 I, Pe-v, Sh 7 1.0 Purvose The purpose of this calculation is to document the results of finite element stress analyses of the pressurizer lower level nozzle penetration at SONGS Units 2 and 3. In these analyses, the welding residual stresses resulting fiom the fabrication of the nozzle penetration are first calculated, including the effects of removing the lower portion of the nozzle during a repair sequence. The nozzle penetration model is then used to simulate the effects of temperature and pressure variations from the plant design specification transients on the nozzle and weld region. The outputs from these analyses are ANSYS initial stress files that contain 1he combined effects of welding residual and thermal transient stresses. These initial stress files are then used in subsequent fracture mechanics calculations, which are documented in a separate calculation note. 2.0 Summary of Results The residual stresses associated with fabricating the lower level nozzle penetration in the SONGS pressurizer were simulated, as were the thermal and pressure stresses associated with the design specification transients. A summary of the results are as follows: I. The :residual hoop stresses in the model are presented in Figures I1 a and II b. As shown in these figures, the high hoop stresses in the weld and buttering dissipate and turn compressive within a short distance into the head from the butter/head interface.

2. The hoop stresses at the uphill and downhill planes during each of the transients, as !vera2ed across the weld and adjacent nozzle, are presented in Figure 10. These results show that the uphill end downhill planes of the model experience similar average stress values throughout the range of transients. Additionally, the Cooldown with Flooding transient has the largest range of stress as measured by averaging the hoop stress on the face of the weld and adjacent nozzle.
3. Hoop stress distributions and temperature distributions at the maximum and minimum stress points during the transients (listed in Table 7) are presented in Figures 12 through 23.

3.0 Input Requirements The following inputs are used for the generation of the welding residual stress analysis model:

1. The local configuration of the J-groove weld attaching the lower level nozzle to the pressurizer bottom head. The details of this configuration are obtained from SONGS design drawings (2a, _) and are sununarized in Figure 2.
2. Detailed dimensions of the nozzle and head penetration. These are as follows:
a. Nozzle ID = 0.614" (4)

M-DSC-411

DOMINION ENGINEERING, INC. 11730 PLAZA AMERICA DRIVE #310 RESTON, VIRGINIA 20190

Title:

SONGS Unit 2 and 3 Pressurizer Lower Level Nozzle Welding and Transient Analysis Task No.: 36-77 Calculation No.: C-3677-00-1 Revision No.: 0 Page 6 of 70

b. Nozzle OD = 1.062" (4)
c. Pressurizer lower head inside radius (to base metal) = 48-7/16" (4)
d. Pressurizer lower head cladding thickness = 7/16" (2b, Ac)
e. Head penetration hole inside diameter = 1.072" (2b, 2c)
f. Pressurizer lower head shell thickness 7/8" (Lb, 2c, 4)

The following inputs are used for the transient analysis performed on the model:

3. The temperatures and pressures for the SONGS pressurizer design specification transients were taken from (j) and (O. The values for the temperature and pressure taken from the curves in the specification are presented in Tables 1 through 6 and in Figures 3 through 8. The following transients were evaluated for this analysis:
a. Heatup Transient (HU)
b. Cooldown with Flooding Transient (CDF)
c. Loading/Unloading and 10% Step Change Transient, I curve represents both (L/UL)
d. Reactor Trip / Loss of Load / Loss of Flow (Trip/LL/LF)
e. Loss of Secondary Pressure Transient (LOSP)
                £. Leak Test (LT) 4.0   Assumptions The following modeling assumptions were used for the welding residual stress modeling of the lower level nozzle desribed in this calculation:
1. An input to the model is the nozzle yield strength, which is used to generate the multilinear isotropic hardening curve for the nozzle material. For small nozzles such as the pressurizer lower level nozzle, this information is frequently difficult to obtain. Therefore, a nozzle yield strength of 50 ksi assumed, which is a sufficiently representative value for these analyses, given that they primarily are concerned with stresses in the weld and in the head.
2. Based on the nominal dimensions for the head penetration and the nozzle OD, a diametral clearance of 0.0 1" was input to the model.
3. Four passes of welding were performed for the pressurizer lower level penetrations progressing from inside to outside. The model geometry was designed such that each weld pass is approximately the same volume.
4. Based on experimental stress-strain data and certified mill test report data for the materials listed belovw, the following room-temperature and 600'F elastic limit values were used in association with the elastic-perfectly plastic hardening laws described in Section 5.1:

I4-D5c- t1) Re\/v 0 M-DSC-411

DOMINION ENGINEERING, INC. 11730 PLAZA AMERICA DRIVE #310 RESTON, VIRGINIA 20190

Title:

SONGS Unit 2 and 3 Pressurizer Lower Level Nozzle Welding and Transient Analysis TaskNo.: 36-77 CalculationNo.: C-3677-00-1 RevisionNo.: 0 Page 7 of 70 Material 70 0 F 6000 F Alloy 182 Welds (Including Butter) 75.0 ksi 60.0 ksi Low Alloy Steel Shell 70.0 ksi 57.6 ksi Alloy 82 Cladding 75.0 ksi 60.0 ksi The elastic limit values for the base materials (head shell and cladding), which undergo small strains durin3 the analysis, are based on the 0.2% offset yield strength for the material. The elastic limit values for the weld materials, which undergo large strains during the analysis, are based on an average of the reported yield and tensile strengths. The following modeling assumptions were used for the transient analysis work on the lower level nozzle described in this calculation:

5. As described in greater detail in Section 5.3, the transient analyses were performed on the a version of the welding residual stress model that was modified to have only elastic material properties. It is appropriate to assume that the thermal and pressure effects of the transients are within the elastic range of the work-hardened material.
6. During simulation of the thermal transients, the model is loaded using varying bulk temperatures with a convective heat transfer surface (see Section 5.3 for further details). During all transients, a heat transfer coefficient of 500 BTU/hr-ft 2 -F was used to load the vessel inside surface, consistent with previous design basis analyses of the lower head region. During a portion of Loss of Secondary Pressure transient, the liquid turns to steam; for this time period, a heat transfer coefficient of :10 2

BTU/hr-ft?-F was assumed to load the vessel inside surface. This value is consistent with steam convection loads in other pressurizer analyses. 5.0 Analysis 5.1 Finite Element Mode! The SONGS pressurizer is a large cylinder with spherical end caps on each end. There are a number of penetrations in the top and bottom heads, as well as the cylindrical shell wall. Figure 1 presents an outline of the pressurizer, with the location of the lower level nozzle indicated. As shown in Figure 1, the lower level nozzle is a small penetration in the bottom head, about 300 from the center of the surge nozzle at the bottom of the bottom head. ANSYS finite element analyses of the pressurizer lower level nozzle were performed using a model based on work developed for commercial customers and described in a 1994 EPRI report on the subject of PWSCC of Alloy 600 components in PWR primary system service (Ref. D). The model geometry with node numberingisdepictedinFigure9. H..D~c 4do- e . Ghan 9 M-DSC-411

DOMINION ENGINEERING, INC. 11730 PLAZA AMERICA DRIVE #310 RESTON, VIRGINIA 20190

Title:

SONGS Unit 2 and 3 Pressurizer Lower Level Nozzle Welding and Transient Analysis Task No.: 36-77 Calculation No.: C-3677-00-1 Revision No.: 0 Page 8 of 70 5.1.1 Model Descriplion The nozzle was analyzed using a 3D model. The model includes a sector of the alloy steel head with Inconel cladding on the inside surface, the Alloy 600 nozzle, the Inconel buttering layer in the J-groove weld preparation (simulated as a single weld pass for this analysis), and the Inconel weld material divid d into four "passes" of approximately equal volume. The Inconel cladding layer was included in the mod el since this material has a significantly different coefficient of thermal conductivity compared to the low alloy steel vessel head, and therefore influences the weld cooling process. The weld deposition of the Incorel cladding layer was not included in this model (i.e., the cladding was assumed to be stress free at the beginning of the model). The combination of thermal and structural analyses required the use of both thermal and structural finite element types, as follows:

a. Thennal Analysis. For the 3-D thermal analysis, eight-node thermal solids (SOLID70) with no thermal conductivity at the interface between the nozzle and the penetration ID (i.e., the nozzle aad penetration nodes are thermally decoupled). Thermally decoupling the nozzle and head penetration has the effect of limiting heat transfer between the nozzle and head to conduction through the J-groove region. This assumption was made because a clearance fit is specified between the nozzle OD and the head penetration, and thermal communication between these surfaces will be limited to conduction through air or water. Using this assumption generally leads to higher temperature differentials between the nozzle and the head during the transient analyses, and therefore is a conservative assumption.
b. Structural Analysis. Eight-node 3-D isoparametric solid elements (SOLID45) and two-node interface elements (COMBIN40) were used for the 3-D structural analyses. The SOLID45 elements replaced the SQLID70 elements from the thermal analysis and COMBIN40 elements were used to model ihe gap in the penetration region. Degenerate four- and six-node solid elements were not used in areas of high stress gradient since they can lead to significant errors when used in these regions (O). Higher order elements were not used since they provide no greater accuracy for elastic-plastic analyses than the eight-node solids (D. H-sD5c-)-) 1)ReV-O sh- lo M-DSC-4 11

DOMINION ENGINEERING, INC. 11730 PLAZA AMERICA DRIVE t310 RESTON, VIRGINIA 20190

Title:

SONGS Unit 2 and 3 Pressurizer Lower Level Nozzle Welding and Transient Analysis Task No.: 36-77 Calculation No.: C-3677-00-1 Revision No.: 0 Page 9 of 70) The boundary conditions on the conical edge surfaces of the shell are such that only radial deflections in the spherical coordinate system are permitted. These boundary conditions simulate the vessel head stiffness and accura:ely simulate pressure stresses remote from the penetrations. The nozzles are modeled as being installed in holes in the vessel head with a 0.005" radial clearance using gap elements in the penetration region. For load steps where the nozzle OD and head sh ell penetration ID surfaces are not in contact, the interface elements have no stiffness; when these surfaces are in contact, the interface elements are specified to have a very high stiffness. When in contact, the gap elements pennit frictionless sliding in the vertical direction between the nozzle and hole in the vessel head. 5.1.2 Model Refinement andMesh Density It is noted that the finite element model has been improved and refined since it was described in Reference (). Among the improvements over the model described in Reference (L) are the following:

a. While the material properties used for the nozzle material continue to make use of multi-linear isotropic hardening, the material properties for the weld and weld buttering, head shell, and stainless steel cladding are now modeled using elastic-perfectly plastic hardening laws. Experience has shown that using multi-linear hardening properties in the analysis of materials that experience a high degree of plastic strain at elevated temperatures (such as those within the J-groove welds) results in significant work hardening once the material has cooled to lower temperatures. Using elastic-perfectly plastic hardening laws does not allow this artificial work hardening to occur, which yields more realistic stresses in the weld portions of the model.
b. The ability to refine the mesh in the various regions of the model. The model geometry used in this calculation makes use of approximately four times the mesh refinement in the J-groove weld areas as is shown in Reference (1), and uses greater mesh refinement in other areas of the model, such as the nozzle.

5.1.3 Materialsand MaterialProperties Three materials were used in the modeling. The vessel head is alloy steel, the nozzle is Inconel Alloy 600, and the clEdding on the inside surface of the vessel head, the J-groove weld, and the weld buttering layer are Inconel Alloy 82/182. Specific information regarding the properties for these materials is as follows: M-Dsc-4l t t1) RevO.,) sib. /l M-DSC-4 11

DOMINION ENGINEERING, INC. I11730 PLAZA AMERICA DRIVE #310 RESTON, VIRGINIA 20190

Title:

SONGS Unit 2 and 3 Pressurizer Lower Level Nozzle Welding and Transient Analysis Task No.: 36-77 Calculation No.: C-3677-00-1 RevisionNo.: 0 Page 10 of 770

a. Alloa 600 Nozzle. The Alloy 600 nozzle material was assumed to strain-harden isotropically using the von Mises yield criterion with a multilinear input curve. Based on elevated temperature property data for Alloy 600 in Reference (15), the 600'F yield strength value used in defining the hardening curve is 87.7% of the input room temperature value. Material property data were taken from a numb er of sources, including the ASME Boiler and Pressure Vessel Code (9), data provided by EdF for EP]U analyses (10), Inconel product literature (11), and research papers by Rybicki (1) and Karlsson (Ia).

A Poisson's ratio of 0.29 was used; this value was assumed to be invariant with temperature.

b. Alloy 82/182 Cladding. Butter. and J-Groove Weld Metal. The Alloy 82/182 cladding, butter and J-groove weld materials were modeled using elastic-perfectly plastic hardening laws. As noted above, this assumption gives more realistic stresses where a high degree of plastic strain occurs at elevated temperatures, such as within the welds. The elastic limit for these materials is based on an average of the yield and tensile strengths reported in Reference (W). An elastic limit of 75.0 ksi was used at 70TF, and an elastic limit of 60.0 ksi was used at 600° F. A Poisson's ratio of 029 was used; this value was assumed to be invariant with temperature.
c. Low-Alloy Steel Head Shell. The alloy steel vessel head is assumed to be stress free at room temperature at the start of the analysis. Because it undergoes small strains during the analysis, this base material also makes use of elastic-perfectly plastic hardening laws. The elastic limih values for this material is based on the 0.2% offset yield strength for the material. For the low-alloy steel held shell, an elastic limit of 70.0 ksi was used at 70'F, and an elastic limit of 57.6 ksi was used at 600'F.

A Poisson's ratio of 0.29 was used; this value was assumed to be invariant with temperature. 5.1.4 Model Validation In Reference (j), the analytical results of the finite element model were correlated with the experimental and field data that were available at the time. This study showed that the locations of observed cracking correlated well with regions of highest stress in the analytical model. Additionally, the measured ovality at EdF and Ringhals CEDM nozzles was found to correlate well with the analytically predicted ovality for these nozzles. Further details of the correlation between analytical and experimental/field data are available in Reference (W. f-Dsc _L/! R-ev. O Sh6 M-DSC-411 , . .. M

DOMINION ENGINEERING, MNC. 11730 PLAZA AMERICA DRIVE 13310 RESTON, VIRGINIA 20190

Title:

SONGS Unit 2 and 3 Pressurizer Lower Level Nozzle W'elding and Transient Analysis Task No.: 36-77 Calculation No.: C-3677-00-1 Revision No.: 0 Page 11 of 70 N-,DsC-41)U R1ev0, o }tb- 13 5.2 Welding Residulal Stress Analysis The analysis of the lower level nozzle model involves five basic loading steps: (a) welding simulation, (Ib) thermal stress relief, (c) hydrostatic testing, (d) operating conditions, and (e) final residual stress including repair. These processes are simulated as follows:

a. Welding Simulation. A substantial portion of the analytical work in the base model involves the simulation of welding processes. The modeling of the butter weld deposition and the J groove welding make use of the same basic steps to simulate the thermal and mechanical effects of a weld.

The analytical simulation of a welding process consists of combined thermal and structural analyses. The thermal analysis is used to generate nodal temperature distributions at several points in tine during the welding process. These nodal temperatures are then used as loading inputs to the structural analysis, which calculates the thermally induced stresses. This sequence of thermal analyses followed by structural analyses is used for each simulated weld pass. The following is a more detailed description of the welding process used for the analyses: (i) Welding - Thermal Analysis Material comprising each weld pass is assumed to have normal thermal properties and is connected thermally to the surrounding base metal materials. The material comprising subsequent weld passes is included in the model, but is assigned zero thermal conductivity, specific heat, and density during the first welding pass, so that it effectively acts as a vacuum, i.e., it does not absorb or conduct heat. Similarly, for modeling the butter weld deposition, these conditions are applied to the nozzle and J-groove weld material, which do not exist at the time of butter deposition.

  • Heat is rapidly input to the weld pass material, using internal volumetric heat generation, at a rate which raises the peak weld metal temperature to 3,000-3,5000 F and the base metal adjacent to the weld to about 2,000 0 F. These are approximately the temperatures that the weld metal and surrounding base materials reach during welding (14). This rapid heating of the weld material is necessary in order to reach the desired peak weld puddle temperatures without overheating the surrounding base metal. Conversely, if the heat is applied too rapidly, the surrounding base metal materials do not reach a high enough temperature for good fusion. Thermal properties for the materials are specified in the model for temperatures up to 3,500'F; properties at elevated temperatures are estimated or extrapolated from lower temperatures.
  • The internal heat generation is applied to the weld pass over approximately two seconds. After the weld heat input is stopped, the weld pass and surrounding material is allowed to cool for about 30 minutes. Nodal temperatures on the outermost vessel shell nodes are held at 70'F to M-DSC-4 11

DOMINION ENGINEERING, INC. 11730 PLAZA AMERICA DRIVE 11310 RESTON, VIRGINIA 20190

Title:

SONGS Unit 2 and 3 Pressurizer Lower Level Nozzle Welding and Transient Analysis Task No.: 36-77 Calculation No.- C-3677-00-1 Revision No.: 0 Page 12 of 71) simulate the heat sink effect of the surrounding low alloy steel shell, which is not modeled. Heat is assumed to be removed entirely through conduction to the outermost vessel shell nodes. P11 other free surfaces of the model (e.g., head inside radius, nozzle edges, weld edges) are assumed to be adiabatic.

  • This process is repeated for subsequent weld passes, as necessary.

(ii) Welding - Structural Analysis

  • At the start of welding, each weld pass is assigned material properties simulating molten weld metal, i.e., it has greatly reduced stiffness (reduced by a factor of I06) and strength, and a thermal expansion coefficient of zero. This means that the weld material will be essentially stress free at the end of heat input. As in the thermal model, the material comprising subsequent weld passes is included in the model, but is assigned greatly reduced structural properties. In the case of the butter weld deposition, these conditions are applied to the nozzle and J-groove weld material, which do not exist at the time of butter deposition.
  • Each weld pass is heated progressively over several load (time) steps, to the point where the material reaches its maximum temperature and heat input has stopped. The temperature distributions for each time step of the heating process are taken from the temperature file that was created during the thermal analysis. Mechanical properties for the materials are specified in the model for temperatures up to 3,5007F; properties at elevated temperatures are estimated or extrapolated from lower temperatures.
  • Before starting the weld pass cooling load steps, the weld pass elements are assigned normal mechanical and thermal properties. The subsequent weld passes (and, in the case of the weld butter deposition, the nozzle and J groove weld material) retain their reduced properties, so that they effectively have no influence on the stresses in the surrounding materials during the cooling of the ongoing weld pass.
  • As the weld pass elements cool, they contract and gain strength effectively "locking in" some of the thermal expansion which occurred in the base metal during heat-up.
  • This process is repeated for subsequent weld passes, as necessary.
b. Thermal Stress Relief. After completion of the butter deposition, the entire model is uniformly raised to l,I100F then uniformly lowered to room temperature to simulate the effect of the thermal stress relief performed on the vessel head. In order to simulate the stress relaxation caused by a multiple-hour stress relief at 1,1001F, the elastic limit values for the head shell and butter materials are reduced relative to the flow stress of the material at this temperature.

l-Dbsc- 4 I) Revr

                                                                  &hbt-.     /4 M-DSC-4 11

DOMINION ENGINEERING, INC. 11730 PLAZA AMERICA DRIVE #310 RESTON, VIRGINIA 20190

Title:

SONGS Unit 2 and 3 Pressurizer Lower Level Nozzle Welding and Transient Analysis Task No.: 36-77 Calculation No.: C-3677-00-1 Revision No.: 0 Page 13 of 770 In order to account for stress-relief relaxation, elastic limit values consistent with strength reduction due to creep were estimated based on creep data for alloy steels and on rupture strength at temperature data ior Inconel weld material. The estimated elastic limit values at 1,1000 F used in the model are 25.0 Icsi for the head shell material and 30.0 ksi for the weld butter material. These values are closer to the yield strength of the materials at the elevated temperature rather than the flow stress.

c. Hydrostatic Testing. Components are hydrostatically tested to approximately 3,125 psia after manufacturing and again after installation. These operations are included in the analysis since tle applied hydrostatic pressure further yields the Alloy 600 nozzle material and results in a reduction in peak residual tensile stresses as the hydrostatic test pressure is released. In this manner, dfie hydrostatic testing represents a form of "mechanical stress improvement" in areas of high stress.

Aside from applying pressure to all of the wetted internal surfaces, an axial tensile stress is applied to the top end of the nozzle equal to the longitudinal pressure stress in the nozzle wall. This stress is given by the equation: P ri 2 0 C axial = (r0 2 - r12 ) Where, P is the internal pressure and ri and r. are the inside and outside radii of the nozzle respectively.

d. Operating Condition. Operating conditions are simulated by pressurizing the inside surfaces of the model to 2,250 psia and heating all of the material to the uniform operating temperature of 653c'.

Stres;es produced by differential thermal expansion arising from the small temperature gradient within the vessel head and nozzle during the heatup and cooldown transients are neglected for this portion of the analysis Each weld pass, including weld butter deposition, occurs over a time increment of 2,000 seconds. The time at the end of weld butter deposition is 2,000 seconds; the time following stress relief is 3,030 seconds; the time following J-groove welding is 11,000 seconds. Static load steps that do not input thermal loads from the welding simulation use one-second time increments; the time at the application of operating conditions is 11,004 seconds. N-1,sc 4 l} /Rev o Sham. /5 M-DSC-411

DOMINION ENGINEERING, INC. M-DSc-4Ib) Rev.0 11730 PLAZA AMERICA DRIVE #310 RESTON, VIRGINIA 20190 Qh . 16

Title:

SONGS Unit 2 and 3 Pressurizer Lower Level Nozzle Welding and Transient Analysis Task No.: 36-77 Calculation No.: C-3677-00-1 Revision No.: 0 Page 14 of 70

e. Final Residual Stress Including Repair. Following completion of the base model welding residual stress simulation, the effect of the half nozzle repair on the lower level nozzle remnant and the head/weld region was simulated. In doing so, the portion of the nozzle from four clement rows below the weld bottom to the bottom of the nozzle was removed from the model using the ANSYS "EKIL1,"

command. The repair simulation was performed at zero load conditions. As noted below, boundary conditions were adjusted in the transient analysis to account for the new model state, including pressiuizing the annular space between the nozzle remnant and the shell and pressurizing the head penetration hole region. The model time at the completion of repair is 11,006 seconds. 5.3 TransientAnalysis The residual stress state of the model following the repair was written to an ANSYS initial stress file using the "ISWR[TE,ON" command. An initial stress file is a record of the full stress state at each of the Gauss points within each element in the model at the completed SOLVE state. The initial stress file may be read into the model using the ISFILEREAD command provided that the model mesh and element numbering is the same a; recorded in the initial stress file. According to the ANSYS manual (8), the initial stresses are read in as if they are elastic model stresses. The solution step removing the lower portion of the nozzle is the last soluation step using elastic plastic properties in the model. The welding residual stress model (with the lower portion of the nozzle EKILLed) is converted to an elastic-only model by deleting the appropriate material property tables. The post-repair initial stress file and converted elastic model are saved for use as restart files during the transient analyses. The resulting thermal and structural models are used to simulate the effect of thermal and structural transients on the post-repair geometry. 5.3.1 TherralTransients The thermal portion of the pressurizer design specification transients, as defined by the temperature curves in Figures 3 through 8, was simulated by ramping the bulk temperatures on the convection boundary conditions at the wetted surfaces of the model. A heat transfer coefficient of 500 BTU/hr-ft2-°F vwas assumed for the convection surfaces, with the exception of during a portion of the Loss of Secondary Pressure transient. As noted on Figure 7, for a time during the transient, the water in the pressurizer turns entirely to steam, and the heat transfer coefficient is adjusted accordingly to 10 BTU/hr-ft 2 -°F during this time period. All other surfaces in the model were assumed adiabatic. Each of the thermal transients included the use of static cases (TIMINT,OFF) at the first and last load step of the analysis to enforce steady-state solutions. Additionally, the Loading/Unloading and Leak Test transients, each of which is formed by M-DSC-411

w- w- bo DOMINION ENGINEERING, INC. 11730 PLAZA AMERICA DRIVE #310 RESTON, VIRGINiA 20190

Title:

SONGS Unit 2 and 3 Prcssurizer Lower Level Nozzle Welding and Transient Analysis Task No.: 36-77 Calculation No.: C-3677-00-1 Revision No.: 0 Page 15 of 770 combining two independent transients, included a static load step after the first portion of the transient to ensure that the second portion started from uniform conditions. 5.3.2 StrucnuralTransients The results; of the thermal transient analyses were applied as nodal temperature loads to the structural model. The structural model for each transient was a new analysis, starting from the elastic model defined at the end of repair simulation. With the exception of the cooldown with flooding transient (CDF, as described below), the model read in the initial stress results from the end of repair simulation. In this way, the structural analysis for each transient is a separate model starting from the same load condition. Each structural transient begins at Time 20000 seconds. The time steps within each transient are documented in Tables 1 through 6. 5.3.3 Cooldown with Flooding Transient- Special Considerations Unlike the other transients, the cooldown with flooding (CDF) transient is sufficiently severe that it is capable of generating additional plasticity in the weld region. Therefore, for the CDF transient only, an initial step was performed to "shakedown" the elastic-plastic model analysis state prior to its use in the CDF transient simulation. The purpose of this step is to adjust the zero load stress state for the CDF transient model so that it behaves in an elastic manner through the entire range of the transient, as do the other transients. As noted above, this step is applied only for the CDF transient and is not included in the residual stress distributions described in Section 5.4 below. The "shakedown" model is considered separately, aad the results are not kept following the transient analysis. In the case of the CDF transient, the incremental plasticity produces additional "mechanical stress improvement" at the zero load state (70 0 F and zero pressure), similar to that described previously in Section 5.2.c for hydrostatic testing. Initial investigation of the CDF transient demonstrated that after a single application of the transient to the elastic-plastic model, a subsequent application had a less than 1% effect of average weld region hoop stress throughout the transient. Additionally, it was found that the peak stress during the transient was not reduced during the subsequent application of the CDF transient. As noted above, the zero load stress state for the model was essentially adjusted so that the model behaved in an elastic marner through the entire range of the transient. K-Dsc_4-{g,1ev-3h& /b7 M-DSC-411 -

DOMINION ENGINEERING, INC. -sc-4/{ Je%-O 11730 PLAZA AMERICA DRIVE #3310 RESTON, VIRGINIA 20190 sb bI1 :g

Title:

SONGS Unit 2 and 3 Pressurizer Lower Level Nozzle Welding and Transient Analysis Task No.: 36-77 Calculation No.: C-3677-00-1 Revision No.: 0 Page 16 of 70 After completion of the model shakedown, the thermal and structural transient analysis for the CI)F transient was performed elastically as described in Sections 5.3.1 and 5.3.2 above. 5.3.4 Transient Analysis Run Summary The purpos;e of the transient analyses described in this calculation is to produce a set of initial stress files that can be mapped into the fracture mechanics models used to evaluate the effect of the transients on a hypothetical flaw in the nozzle remnant and weld. In order to appropriately simulate the pressure and thermatresidual loads, the initial stress files must be written during a structural simulation of a thermal-olry (i.e., no pressure) transient, since the pressure loads of the transient will be applied to the fracture mechanics model as a live load. However, in order to correctly select the key time steps during the transient, ic is necessary to first run the transient simulation using both pressure and temperature. Therefore, the structural transient was run two different ways in order to accommodate the needs of the fracture mechanics work supported by these analyses. In the first run, both the temperature and pressure loads are input into the structural model. Pressure loading for the appropriate time during the transient, as defined by the pressure curves in Figures 3 through 8, is also applied to the structural model. The results for the full (temperature and pressure) transient analyses are post-processed, then used to identify the key time steps during each of the transients evaluated. These full transient analysis results are described in greater detail in Section 5.4 below. Once the key time steps have been selected, the transient analysis is run a second time, but this time only with temperature loads applied to the model (i.e., no pressure loads). Initial stress results files are written during the thermal-only transient analysis at the key time steps selected from the temperature plus pressure transient results post-processing. Further discussion of the files saved and the timne steps from which they were taken is provided in Sections 5.4 and 5.5 below. 5.4 Analytical Results Summary Figure 10 presents the results of the transient analysis model that includes pressure for all transients considered. This figure displays the hoop stress averaged over the buttering, weld, and adjacent nozzle region (see Figure 9). The results presented in this figure are an estimate of the trends that would be expected for the fracture mechanics analysis of a flaw in the weld and lower nozzle region, since it presents the average load on the crack face over time. Stress results are presented as a function of load step during the transient, rather than time, in order to allow comparison between the relative magnitudes of stresses ,MThc~r.At i1 . - rl-LJ;:>W-s l l

DOMINION ENGINEERING, INC. -DSf /Zev0 0 11730 PLAZA AMERICA DRIVE #310 RESTON, VIRGINIA 20190 S h i- / 't

Title:

SONGS Unit 2 and 3 Pressurizer Lower Level Nozzle Welding and Transient Analysis Task No.: 36-77 Calculation No.: C-3677-00-1 Revision No.: 0 Page 17 of '70 among the various transients. It is noted that any discontinuities in stress values between the transients plotted in Figure 10 are due to each transient starting from its own initial load state (temperature and pressure set), which many times does not correspond to the final load state of the previous transient. Figures lla and 1lb present the hoop stress in the nozzle and weld at the initial time step prior to starting each transient (i.e., the residual stress in the zero-load state). In Figure Ila, the stress contours are consistent with the other stress figures described below for comparison between stress figures. In Figure Ilb, the stress contours are automatically generated, with even contours enforced between maximum and minimum stresses. The stress state at this initial time step represents the condition following the steps described in Sections 5.2.a through 5.2.e, which are as follows: 1) butter simulation followed by stress relief, 2) weld simulation, 3) hydrotest, 4) uniform application of operating conditions, 5) zero load, and 6) nozzle repair cutting. The upper part of the figure shows the stresses in the model along the symmetry plane (uphill/downhill), and the lower part shows the stresses in the model in the plane perpendicular to Ihe symmetry plane (sidehill). As shown in Figures lIa and 1Ib, the high hoop stresses in the weld region dissipate and turn compressive within a short distance into the head from the butter/head interface. Additionally, the sidehill results show the overall stresses in this portion of the model to be bounded by the uphill and downhill results. It is demonstrated in Figure 10 that the Cooldown with Flooding transient has the most severe stress range. It is also demonstrated that the uphill and downhill weld planes have similar average stress values throughoui: the range of transients. Figure 10 and the data used to generate it may also be used to determine the key time steps during each transient. As noted below, the stress information at these time steps vwas saved during a second structural analysis using thermal loads only. Table 7 lists the key time steps used to record initial stresses for each transient. Additionally, Figures 12 through 23 present the hoop stress (top) and temperature (bottom) distributions in the model at each of these key time steps. 5.5 ANSY'SInputListingsand OutputFiles The base welding residual stress analysis, which includes analysis steps detailed previously in Sections 5.2.a through 5.2.d, was performed using an ANSYS input listing file called "cirsc.base," version 2.4.8. This standard input listing was developed by Dominion Engineering, Inc. outside of this scope of work. The input listing file is included in the 36-77 project file and is available for on-site review by SONGS/SCE personnel in our offices. The repair and transient analysis steps were performed using the file M-DSC-411

DOMINION ENGINEERING, INC. "-95c-41J'-' r/e 11730PLAZAAMERICADRIVE #310 RESTON, VIRGINIA 20190 sh &. 2 D

Title:

SONGS Unit 2 and 3 Pressurizer Lower Level Nozzle Welding and Transient Analysis Task No.: 36-77 Calculation No.: C-3677-00-1 Revision No.: 0 Page 18 of 70 "press.tranm.addon.txt," which is included as Attachment I to this calculation. All post-processing was performed using the file "press.trans.addpost.txt," which is included as Attachment 2 to this calculation. ANSYS initial stress files were generated and saved for the thermal-only transient analysis at the time steps listed in Table 7. Each file was named according to the transient and the time step within the transient. The following files were saved, and used as inputs to the fracture mechanics modeling performed for this nozzle geometry: PzBH-30A.transl.7200.ist PzBH-30A.trans4.50.ist PzBH-30A.transl.28800.ist PzBH-30A.trans4.2000.ist PzBH-30A.trans2.4428.ist PzBH-30A.trans5.200.ist PzBH-30A.trans2.10309.6.ist PzBH-30A.trans5.2000.ist PzBH-30A.trans3.180.ist PzBH-30A.trans6.14400.ist PzBH-30A.trans3.7380.ist PzBH-30A.trans6.36000.ist 5.6 QualityAssuranceSoftware Controls The SONGS pressurizer lower level nozzle analyses described in this calculation were performed on an IEP J6700 workstation, under the HP-UX 11.0 operating system and ANSYS Revision 8.0, which is maintained in accordance with the provisions for control of software described in Dominion Engineering, Inc.'s (DEl's) quality assurance (QA) program for safety-related nuclear work (7J.1 In addition to QA controls associated with the procurement and use of the ANSYS software (e.g., maintenance of the ANSYS Inc. as an approved supplier of the software based on formal auditing and surveillance, formal periodic verification of ANSYS software installation), QA controls associated with all ANSYS batch input listings are also carried out 'by DEL. These include independent checks of a batch input listing each time it is used; review of all ANSYS Class 3 error reports and QA notices to assess their potential impact on a batch listing; and independent "check calculations"2 to ensure that the project-specific application of the analysis is appropriate. The review of ANSYS error reports and QA notices as well as the project-specific check calculations fire documented formally in a QA memo to the project file (this project is DEI Task 36-77). XDEl's quality assurance program for safety-related work (DEI-002) commits to applicable requirements of 10 CFR 21, Appendix B of 10 CFR 50, and ASME/ANSI NQA-1. This QA program is independently audited periodically by both NUPIC (the Nuclear Procurement Issues Committee) and NIAC (the Nuclcar Industry Assessment Committee). 2 "Check calculations for a given project may include comparison of model-computed nozzle and reactor vessel head stresses to theoretical closed-form solutions; confirmation that computed weld pass temperatures fall within target temperature ran.;es; and, for ;ymrnmetric (o' nozzle angle) geometry cases, confirmation of the applied pressure loading and results symmetry. M-DSC-4 11

DOMINION ENGINEERING, INC. 11730 PLAZA ANMRICA DRIVE #310 RESTON, VIRGINIA 20190

Title:

SONGS Unit 2 and 3 Pressurizer Lower Level Nozzle Welding and Transient Analysis Task No.: 36-77 Calculation No.: C-3677-00-1 Revision No.: 0 Page 19 of 73 H- osc- 41X Rea 6.0 References 3ht- 21

1. PWSCC ofAlloy 600Materialsin PWR PrimarySystem Penetrations,EPRI TR-103696, July 1994.
2. SONGS Units 2/3 Pressurizer Drawings:
a. SONGS Drawing No. S023-919-2, Rev. 9, Pressurizer Outline, Unit II
b. SONGS Drawing No. S023-919-13, Rev. 1, Bottom Head Welding and Machining, Unit II
c. SONGS Drawing No. S023-919-131, Rev. 0, Bottom Head Welding and Machining, Unit III
d. SONGS Drawing No. S023-919-30, Sheet 1, Rev. 3, Heater Arrangement and Assembly
e. SONGS Drawing No. S023-919-30, Sheet 3, Rev. 0, Heater Arrangement and Assembly
4. SONGTS Pressurizer Design Report, Report No. SS 21986, Rev. 0, p. A-477.
5. SONG3S Specification No. S023-919-4, Rev. 1, "General Specification For A Pressurizer Assembly."
6. SONGS Specification No. S023-919-3, Rev. 8, "Proj ect Specification For A Pressurizer Assembly.'
7. Dominion Engineering,Inc. Quality Assurance Manualfor Safety-Related Nuclear Work, DEI-002, Revision 16.
8. "Modeling and Meshing Guide," ANSYS 8.0 Documentation, ANSYS, Inc.
9. ASME Boiler and Pressure Vessel Code, Section II, Part D, Properties, 2001 Revision.
10. M. H. Duc. "Specification de Calcul de Ma quettes d'adaptateurs." EdF Specification MS-92-090--

GPE: A667M.

11. InconelAlloy 600, Special Metals Corporation Publication No. SMC 027, September 2002.
12. E. F. Rybicki and R. B. Stonesifer, "Computation of Residual Stresses due to Multipass Welds in Piping Systems," Journal of Pressure Vessel Technology, Volume 101, May 1979, pp. 149-154.
13. L. Karlsson, M. Jonsson, L-E. Lindgren, M. Nasstr6m, and L. Troive, "Residual Stresses and Defonmations in a Welded Thin-Walled Pipe.", ASME Pressure Vessels & Piping Conference, Honclulu, Hawaii, USA, July 1989.
14. "Welding Handbook," Volume One, Seventh Edition, p. 94, American Welding Society, 1981.
15. Properties and Selection: Stainless Steels, Tool Materials, and Special-Purpose Metals, A'M Materials Handbook Volume 3, Ninth Edition, p. 218, 1980.

M-DSC-4 11

C-3677-00-1, Revision 0

p. 20 of 70 Table 1 Pressurizer Heatup Transient: Pressure and Temperature Values (Transient #1)

Time Step l Time (s) l Temperature (0 F) l Pressure (psig) I 0.1 70 0 2 1,800 170 0 3 3,600 270 5 4 5,400 370 200 5 7,200 470 500 6 8,640 550 1,000 7 9,432 594 1,500 8 10,080 630 1,950 9 10,494 653 2,235 10 11,394 653 2,235 11 12,294 653 2,235 12 14,094 653 2,235 13 17,694 653 2,235 14 28,800 653 2,235 Ht-D Sc-41.) M-DSC-411

C-3677-00-1, Revision 0 p.21 of 70 Table 2 Pressurizer Cooldown with Flooding Transient: Pressure and Temperature Values (Transient #2) Time Step l Time (s) Temperature (0 F) Presurepsi 1 0.1 653 2,235 2 756 610 1,876 3 1,512 568 1,517 4 2,268 525 1,157 5 3,024 483 798 6 3,780 440 439 7 3,780 440 0 8 3,888 383 0 9 3,996 327 0 10 4,104 270 0 11 4,212 213 0 12 4,320 157 0 13 4,428 100 0 14 5,542 100 0 15 6,657 100 0 16 7,771 100 0 17 8,886 100 0 18 10,000 100 0 19 10,062 135 0 20 10,124 170 0 21 10,186 205 0 22 10,248 240 0 23 10,310 275 0 24 10,310 275 439 25 11,047 234 351 26 11,784 193 263 27 12,521 152 176 28 13,259 111 88 29 13,996 70 0 30 14,497 70 0 31 14,998 70 0 32 15,499 70 0 33 16,000 70 0 M-Dsc- 4 t/ pedl o 3hbL 2z3 M-DSC-411

C-3677-00-1, Revision 0

p. 22 of 70 Table 3 Pressurizer Loadine/Unloadine & 10% Step Change: Pressure and Temnerature Values (Transient #3)

Time Step Time (s) Temperature (0 F) l Pressure (psig) 1 0.1 633 2,135 2 1 653 2,235 3 15 653 2,235 4 60 653 2,235 5 180 653 2,235 6 600 653 2,235 7 1,800 653 2,235 8 3,600 653 2,235 9 7,200 653 2,235 10 7,201 633 2,135 11 7,215 633 2,135 12 7,260 633 2,135 13 7,380 633 2,135 14 7,800 633 2,135 15 9,000 633 2,135 16 10,800 633 2,135 17 14,400 633 2,135 M- Dsc- 4-/1 Qev-o S'hh. is M-DSC-4 11

C-3677-00-1, Revision 0 p.23 of 70 Table 4 Fressurizer Reactor Trip/Loss of Load/Loss of Flow: Pressure and Temperature Values (Transient #4) Time Step 1I Time (s) I Temperature (0 F) I Pressure (psig) 1 0.1 653 2,235 2 10 645 2,295 3 20 637 2,355 4 30 629 2,415 5 40 621 2,475 6 50 613 2,535 7 100 611 1,685 8 150 609.2 1,699 9 200 607.4 1,713 10 300 603.8 1,740 11 400 600.2 1,768 12 500 596.6 1,795 13 600 593 1,823 14 740 599 1,861 15 880 605 1,900 16 1,160 617 1,977 17 1,440 629 2,054 18 1,720 641 2,131 19 1,860 647 2,169 20 2,000 653 2,208 21 2,100 653 2,235 22 2,600 653 2,235 23 3,600 653 2,235 24 5,400 653 2,235 25 7,200 653 2,235 Mt-Dsc- 41/ shb. 2.5 M-DSC-4 11

C-3677-00-1, Revision 0

p. 24 of 70 Table 5 Pressurizer Loss of Secondary Pressure Transient: Pressure and Temperature Values (Transient #5)

Time Step ll Time (s) l Temperature (0 F) l Pressure (psig) 1 0.1 653 2,235 2 6 635 2,173 3 7 632 2,163 4 23 585.5 2,000 5 38 539 1,837 6 54 492.5 1,674 7 69 446 1,511 8 85 399.5 1,348 9 100 353 1,186 10 125 356.75 923 11 150 360.5 660 12 175 364.25 398 13 200 368 135 14 300 380.5 160 15 400 393 185 16 600 408 235 17 800 423 285 18 1,000 433 335 19 1,550 458 434 20 1,551 458 434 21 2,000 473 515 22 2,667 491 622 23 3,333 510 728 24 4,000 528 835 25 6,200 590.5 1,535 26 8,400 653 2,235 27 10,000 653 2,235 mf- Dsc-_ /l Shev6 0 Shit. 2-6 M-DSC-411

C-3677-00-1, Revision 0

p. 25 of 70 Table 6 Pressurizer Leak Test Transient: Pressure and Temperature Values (Transient #6)

Time Step Time (s) Temperature (0 F) (psig) I 0.1 100 385 2 1,800 100 385 3 3,600 100 385 4 5,760 160 385 5 7,920 220 385 6 10,080 280 385 7 12,240 340 385 8 14,400 400 385 9 14,401 400 2,235 10 16,200 400 2,235 11 18,000 400 2,235 12 19,800 400 2,235 13 21,600 400 2,235 14 23,400 400 2,235 15 25,200 400 2,235 16 27,360 340 2,235 17 29,520 280 2,235 18 31,680 220 2,235 19 33,840 160 2,235 20 36,000 100 2,235 21 36,001 100 385 22 37,440 100 385 23 38,880 100 385 24 40,320 100 385 25 41,760 100 385 26 43,200 100 385 shh. 27 M-DSC-4 11

C-3677-00-1, Revision 0

p. 26 of 70 Table 7 Pressurizer Lower Level Nozzle Transient Analysis: Key Time Steps Transient Load Step Time Max/Min

_.eatup 5 7,200 Min 14 28,800 Max Cooldown w/ Flooding 13 4,428 Max 23 10,309.6 Min 5 180 Min Loading/Unloading & Step Change 13 7,380 Max 6 50 Max Trip, Loss of Load, Loss of Flow 20 2,000 Min 13 200 Min Loss of Secondary Pressure 21 2,000 Max Leak Test 8 14,400 Min 20 36,000 Max M -Dsc- 4(1 Rev 0 2ht. 2s M-DSC-411

C-3677-00-1, Revision 0

p. 27 of 70 SONGS Pressurizer Outline Showing Lower Level Nozzle Location Figure 1 H-D-sc- 411I
                                                     &'ht zq M-DSC-4 11

C-3677-00-1, Revision 0

p. 28 of 70 7/16" 1 5/16" R1/2" FEA Mesh for J-Groove shown overlaid in red 1.062"
                                                      .614' SONGS Pressurizer Lower Level Nozzle Geometry Summary Figure 2         M(-Dsc- 411 h       so30 M-DSC-4 11

1--Temp -- Pressure ] 700 2,500 600

                                   /-I                            2,000 500 1,500 'n
        '  400 0.

a-L.. b. E 300 1,000 CL 200 / I ~ 7,S t 500 C) VI' 100 _I C'

     -P                                                                            -.1 lp 0                                                    0 0 5,000   10,000        15,000       20,000 25,000 N)0 Time (s)
                                                                             '0 on W.-

_0 00Oen

1l+Temp -- Pressure l 700 2,500 600 2,000 500 AL 1,500 *S 0 0. E 300 0 1,000 IL 200 500 NornI'tt 100 u; O da a, 0 C0 0 5,000 10,000 15,000

                                                      *~~~    *             .s Time (s)                              tj  I 0 t000
                                                                     *4 CY _.

It n 4--Temp -U-Press I 0 N A1. 655 I _ -- -- 1 2,240 0 Ad *

  • I 0

2,220 650 n 2,200 0 t-t 5I L 645 CD Cb

%T1                                                                              -a 0Z)  0
                                                                         -2,180 .e 1:  ED640 0-.

IQ - 2,160 0 635 w I - 2,140 I EE .Fr lid

 -P                                                                                       0 0

630 2,120 0 2,500 5,000 7,500 10,000 12,500 - - Time (s) 0 -. :

                                                                                    ,-. 0 j00

1-W CA Temp -- Pressure I N a 660 3,000 0 x S2. PU co 650 2,500 0 0 tv 640 0 w 2,000 1 W CD 0 U, CA t4 a. 0 -1,500 ,-ua I-.10 u, W

          -ll 0~t                                                        1,000 CA tI H

'7- C 0 CD g Zr o (A 500 600 0. I

                                                                                   -4 H                                                                         -4 590                                             0              C7%

0 500 1,000 1,500 2,000 CD Time (s) B- w _. CD 0 .

                                                                               -4   o 00 C

1--+Temp - Pressure j 700 2,500

               ~14 t-w0 CA 0        600 En a                                                       2,000 0

500

               '1C CD
                                              ..                     I (A                                                      1,500 'a
                   ° 400 I-I.                                                                    0.

Eu L. to E300 U) 0 1,000 a. I-X0 I w 't ) '17, V) 200 cl- <. It7

                -1 6     (  CD                                                      500 w            I          100 L/?             a.
           -1 CD I

I I 0T

                                                                                     -~4 C)1 0                                            0             -JT O0 CA           0   2,500         5,000         7,500 10,000             C)

Time (s)

                                                                                  ;, I LO 0  4
                                                                                   " 0
                                                                                  -a 00C

i--Temp -U-Pressure ] 450 - 2,500 400 - co 350 ____ ____ ___ 2,000 300 1,500 L W 2 250 -. n 00 E p I0 1,0000E 150-100 D-G-__. 20 *50 WOH 5000 50 7 0 5,000 co 0 10,000 15,000 20,000 25,000 30,000 35,000 40,000 0 Time (s) v

                                                                                                       ) 0D

C-3677-00-1, Revision 0

p. 35 of 70 24 N
                                                                                     'Crack face' hoop stress average 101 80001         'Crack face" hoop stress average 80006 Uphill Plane Nodes are O's Series Downhill Plane Nodes are 80,000's Series Tube Node Ser es: 's at Nozzle ID, 6's at Nozzle 0D Shell Node 5er es: 6s at ShefID (merged w/tube OD) In weld region 7's at Penetration ID above weld region 24's at edge of shell section Node Numbers Increase by 100 up the length of the nozzle and shell Node Numbers Increase by 1 radially through nozzle wall and out to shell edge SONGS Pressurizer Lower Level Nozzle Node Numbering Scheme Figure 9            M- Dc- 743                                   )
                                                                                                  -shS. 37 M-DSC-4 11

as Uphill Flaw 6 Downhill Flaw l 90,000 80,000 70,000 60,000

    ' 0. 50,000 An_                                                                CA u)
     .2   40,000
0. U, 0

co o 30,000 20,000 Q Z 10,000 0 .- _ Reactor Trip 0 Loading/Unloadin Loss of Load Loss of Seconday

                   .leat-Up    Cool-Down wl Flooding  10% Step Change        Loss of Flow            Presspre        Leak Test 09       -10,000                                                                                                                           3Co 1          21                  41               61                   81          101            121           14 1  0 Time Step W       CD m         ~.

0 W.

                                                                                                                                     ",     a lj :3 C: o=

C-3677-00-1, Revision 0

p. 37 of 70 ANSYS 8.0 SEP 16 2005 15:20: 46 PLOT NO. 1 NODAL SOLUTION STEP-135 SUB -3 TIME-11006 SY (AVG)

RSYS-11 PowerGraphics EFACET=1 AVRES-Mat DMX-. 02247 SMN -- 32261 SMX -118649

                -32261

_ -10000 0

             -  10000 20000 30000 En     40000

_ 50000 100000 ANSYS 8.0 SEP 36 2005 15:48:03 PLOT NO. 1 NODAL SOLUTION STEP=135 SUB -3 TIME-11006 SY (AVG) RSYS-11 DMX -. 014727 SMN -- 30702 SMX -79302

                -30702 10000 20000 30000 40000

_ 50000 100000 Figure I a SONGS Pressurizer Lower Level Nozzle Welding Residual Hoop Stress - Standard Stress Contours H1-Dsc- 4/1 she. 3q M-DSC-411

C-3677-00-1, Revision 0

p. 38 of 70 ANSYS 8.0 OCT 18 2005 09:19:39 PLOT NO. 1 NODAL SOLUTION STEP-135 SUB -3 TIME=11006 SY (AVG)

RSYS-11 PowerGraphics EFACET-1 AVRES-Mat DMX -.02247 SMN --32261 SMX -118649

                         -32261

_ -15493

                     -   1275 18042 34810 51578 Fi68346 85113 101881 118649 ANSYS 8.0 OCT 18 2005 09:28:37 PLOT NO.      1 NODAL SOLUTION STEP-135 SUB -3 TIME-11006 SY          (AVG)

RSYS-11 DMX -.014727 SMN --30702 SMX -79302

                        -30702
                        -18479
                        -6257 5

5966 18189 30411 M-1 42634 54856 67079 79302 Figure Ilb SONGS Pressurizer Lower Level Nozzle Welding Residual Hoop Stress - Automatic Stress Contours ___ 2 0 40 SC_

         .0 psig)       hf:       +O M-DSC-411

C-3677-00-1, Revision 0

p. 39 of 70 ANSYS 8.0 SEP 3 2005 12:20:34 PLOT NO. 9 NODAL SOLUTION STEP-5 SUB -1 TIME-27200 SY (AVG)

RSYS-11 PowerGraphics EFACET-1 AVRES-Mat DISX -.147 SMN -- 39220 itiSE -154036

                                  -39220
                                  -10000
                             - 0 10000 20000 30000

__40000 50000 100000 ANSYS 8.0 SEP 3 2005 12:20:34 PLOT NO. 10 NODAL SOLUTION STEP-5 SUB -1 TIME-27200 BFETEMP (AVG) RSYS-1 1 PowerGraphics EFACET=l AVRES-Mat DMX0 -. 147 SMN -415.79 SMX -468.394 m415.79 421.635 427.48 433:325

                          -      439.17 445.014

_ 450.859 456.704 462.549 468.394 _ 11 > :Fizure 12 Hoop Stress and Temperature at Heatup Transient Step 5 (Time = 7,200 s)

                                 @D.shc- 4 1 ShL-. 41 M-DSC-4 11

C-3677-00-1, Revision 0

p. 40 of 70 ANSYS 8.0 SEP 3 2005 12:21:06 PLOT NO. 27 NODAL SOLUTION STEP-14 SUB =1 TIME-48800 SY (AVG)

RSYS-11 PowerGraphics EFACET-1 AVRES-Mat DMX -.258746 SMN --41626 SMX -173432

                    -41626
                    -10000
                 - 010000 20000

___ 30000 r___ 40000 50000 100000 ANSYS 8.0 L. SEP 3 2005 12:21:06 PLOT ND. 28 NODAL SOLUTION STEP-14 SUB -1 TIME-48800 BFTE24P (AVG) RSYS-11 PowerGraphics EFACET-1 AVRES-Mat DMX -.258746 SMN -653 SMX -653 Figure 13 Hoop Stress and Temperature _.at Heatup Transient Step 14 (Time = 28,800 s) M-- Ds~c- 4-ti Rzev - sh4-. *2 M-DSC-4 11

C-3677-00-1, Revision 0

p. 41 of 70 ANSYS 8.0 SEP 3 2005 12:21:55 PLOT NO. 53 NODAL SOLUTION STEP=13 SUB -1 TIME-24428 SY (AVG)

RSYS-11 PowerGraphics EFACET-1 AVPES-Mat DMX -.106689 SMN -- 43062 SMX =199317

                    -43062

_ -10000 0 10000 20000 30000 _ 40000 50000 100000 Is ANSYS 8.0 SEP 3 2005 12:21:56 PLOT NO. 54 NODAL SOLUTION STEP=13 SUB -1 TIME-24428 BFETEMP (AVG) RSYS-l1 PowerGraphics EFACET-1 AVRES-Mat DMX -.106689 SMN -108.211 SMX -405.212 108.211 141.211 174.211 207.211 240.211 273.211 __ 306.211 339.211 372.211 405.212 Figure 14 Hoop Stress and Temperature at Cooldown Transient Step 13 (Time = 4,428 s) H-Dgc- 411 qRev. 0 gh2!' 43 M-DSC-4 11

C-3677-00-1, Revision 0

p. 42 of 70 ANSYS 8.0 SEP 3 2005 12:22:33 PLOT NO. 73 NODAL SOLUTION STEP-23 SUB -1 TIME-30310 SY (AVG)

RSYS=ll PowerGraphics EFACET-1 AVRES-Mat DMX -. 026664 SMN --84382 S.YX -124362

                   -84382
                   -10000
            -      0 10000 20000 30000 40000 50000 100000 Li ANSYS 8.0 SEP 3 2005 12:22:33 PLOT NO. 74 NODAL SOLUTION STEP-23 SUB -1 TIME-30310 BFETEMP     (AVG)

RSYS-11 PowerGraphics EFACET-1 AVRES-Mat DMX -.026664 SMN -111.072 SMX -268.637 111.072 128.5e 146.087 163 594 181.101 M 198.608 216.115 233 623 251.13 268.637 Figure 15 Hoop Stress and Temperature at Cooldown Transient Step 23 (Time= 10,309.6 s) M1-DSC- 14/ Re. o shi%44 M-DSC-411

C-3677-00-1, Revision 0

p. 43 of 70 ANSYS 8.0 SEP 3 2005 12:23:34 PLOT NO. 103 NODAL SOLUTION STEP-5 SUB =1 TIMtE-20180 SY (AVG)

RSYS-ll PowerGraphics EPACET-1 AVPES-Mat DMX -.251957 SMN --41103 SMX -170195

                   -41103
                   -10000 10000
  • 20000

__30000 D 40000 50000

                -   100000 ANSYS 8.0 Ii  SEP 3 2005 12:23:34 PLOT NO. 104 N0ODAL SOLUTION STEP-S SUB -1 TIME-2 0180 BFETEMP (AVG)

RSYS-11 PowerGraphics EFACET-1 AVRES-Mat DMX -.251957 SMN -633.681 SMX -657.619 633.681

              - 636.341 639 641.66 644.32
                  ; 646.98 652.299 654.959 657.619 Figure 16t Hoop Stress and Temperature at L/UL Transient Step 5 (Time =180 s)

M-Dsc- 41i sh& 4-5 M-DSC-411

C-3677-00-1, Revision 0

p. 44 of 70 ANSYS 8.0 SEP 3 2005 12:24:06 PLOTNO. 119 NODAL SOLUTION STEP-13 SUB -1 TZME-27380 SY (AVG)

RSYS-11 PowerGraphics EFACET-1 AVRES-Mat DMX -. 255664 SMN --41976 SMX -176098

                      -41976
                 -    -10000 m - 010000 20000 m    30000 4_0000 50000 100000 II ANSYS 8.0 SEP 3 2005 12:24:06 PLOT NO. 120 NODAL SOLUTION STEP-13 SUB -1 TIME=27380 BFETEMP (AVG)

RSYS=11 PowerGraphic3 EFACET-1 AVRES-Mat DM- -.255664 SMN -629.965 SMX -652.337 629.965 632.451 634.937 637.422 639.908 cm 642.394 644.88 647.366 649.852 652.337 Figure 17 Hoop Stress and Temperature at L/UL Transient Step 13 (Time = 7,380 s) M1-DSC-411 s&. 4-6 M LvLJe~ 1 l J.-

C-3677-00-1, Revision 0

p. 45 of 70 ANSYS 8.0 SEP 3 2005 12:24:49 PLOT NO. 139 NODAL SOLUTION STEP-6 SUB -1 TIME-20050 SY (AVG)

RSYS-11 PowerGraphics EPACET-1 AVRES-Mat DMX -. 259854 SMN -- 42799 SMX -180602

                       -42799
                       -10000 10000 30000 40000 50000
                -      100000 ANSYS 8.0 SEP 3 2005 12:24:49 PLOT NO. 140 NODAL SOLUTION STEP-6 SUB -1 TIME-20050 BFTTE2P 5AVG)

BTSYS-1 ( PowerGraphics EFACET=1 AVCES-Mat DSM -.259854 SDN -617.479 SMK -653 617.479 621.426 625.373 629.319 633.266 637.213 641.26 645.106 649.053 Figure 18 Hoop Stress and Temperature at Trip/LLILF Transient Step 6 (Time = 50 s) Rev- 0 shyt 4.7

                                                - - 1111, MR rC~A  AI   I rl-LJau-e    1 1

C-3677-00-1, Revision 0

p. 4 6 of 70 ANSYS 8.0 SEE 3 2005 12:25:4B PLOT NO. 167 NODAL SOLUTION STEP-20 SUB =1 TIME-22C00 SY (AVG)

RSYS-11 PowerGraphics EFACET-1 AVRES-Mat DMX -.249064 SMN --41280 SMX -168774

                          -41280
                          -10000 0

10000 20000 30000 40000

                      -   100000 I,       ANSYS 8.0 SEP 3 2005 12:25:48 PLOT NO. 168 NODAL SOLUTION STEP=20 SUB -1 TIME-22000 BFETEMP      (AVG)

RSYS-11 PowerGraphics EFACET-1 AVRES-Mat EMX -. 249064 SMN -626.171 SMX -652.029 626.171 629.044 631.917 D 634.79

  • 637.663 640.537 r--6 E46.283 649.156 652.029 Figure 19 Hoop Stress and Temperature at Trip/LULF Transient Step 20 (Time = 2,000 s) 4-_ )&C- 411 Lev. 0 M-DSC-411

C-3677-00-1, Revision 0

p. 47 of 70 ANSYS 8.0 SEP 3 2005 12:27:08 PLOT NO. 203 NODAL SOLUTION STEP-13 SUB -1 TIME=20200 SY (AVG)

RSYS-11 PowerGraphics EFACET-1 AVRES-Mat OlX -. 240395 SMN -- 40006 SMX -163789

                  -40006
              -   -10000 0

_ 10000 20000 30000 40000 _ 50000 100000 ANSYS B.0 SEP 3 2005 12:27:08 PLOT NO. 204 NODAL SOLUTION STEP-13 SUB -1 TIME-20200 BFETEMP (AVG) RSYS-11 PowerGraphics EFACET-1 AVRES-Mat CMX -. 240395 SMN -609.758 SMX -652.529 609.758 614.51 619.262 624.015

              -  628.767 638.272 643 024 652.529 Figure 20 Hoop Stress and Temperature at LOSP Transient Step 13 (Time = 200 s) t--Dsc- 41(

sh&. 'A? M-DSC-4 11

C-3677-00-1, Revision 0

p. 48 of 70 ANSYS a.0 SEP 3 2005 12:27:44 PLOT NO. 219 NODAL SOLUTION STEP:21 SUB -1 TIME-22000 SY (AVG)

RSYS-11 PowerGraphics EFACET-1 AVRES-Mat DMX - .200437 SMN --40947 SMX -180649 _ -40947

                    -10000 m
              -    10000 20000 30000 40000
  • 50000 100000 ANSYS 8.0 SEP 3 2005 12:27:45 PLOT NO. 220 NODAL SOLUTION STEP-2 1 SUB -1 TIMlE22000 SMETDP (AVG)

RSYS-11 PowerGraphi cs EFACET-1 ev. AVRES-Mat VM'0 -. 200437 SNN -474.962 SIMX -580.474 474.962 486.685 VW498.409 510.132 521.856 3

                - 533.579 SNSYS S.0 545.303 557.026 568. 75 560.474
                           -Figure21 Hoop Stress and Temperature at LOSP Transient Step 21 (Time =2,000 s)

I- D o M-DSC-4 11

C-3677-00-1, Revision 0

p. 49 of 70 ANSYS 8.0 SEP 3 2005 12:28:50 PLOT NO. 247 NODAL SOLUTION STEP-B SUB -1 TIME-34400 SY (AVG)

RSYS-11 PowerGraphics EFACET-1 AVRES! at DMX -. 125571 SMN --39375 SMX -158470 _ -39375

                    -10000
             -      0 10000 20000 30000 r-n40000 50000
             -      100000 I- ANSYS 8.0 SEP 3 2005 12:28:50 PLOT NO. 248 NODAL SOLUTION STEP-8 SUB -1 TIME-34400 BFETEMP     (AVG)

P.SYS-11 PowerGraphics EFACET-1 AVRES-Mat DMX -. 125571 SMN -373.179 SMX -399.228 373.179 376.073

               - 378.967 381.862 384.756 387.65 390.545 393.439

_396.333 399.228 Figure 22 Hoop Stress and Temperature at Leak Test Transient Step 8 (Timc 14,400 s) _04-sc_ 4)11 Qev. o sh&. 5 M-DSC-4 11

C-3677-00-1, Revision 0

p. 50 of 70 ANSYS 8.0 SEP 3 2005 12:29:46 PLOT NO. 271 NODAL SOLUTION STEP-20 SUB -1 TIME-56000 SY (AVG)

RSYS-11 PowerGraphics EFACET=1 AVRES-Mat DMX -. 034523 SMN -- 41532 SMX -183924

                  -41532
                   -10000 AD 0 10000 20000 30000
                ' 40000 50000
              -    100000 ANSYS 8.0 SEP 3 2005 12:29:47 PLOT NO. 272 NODAL SOLUTION STEP-20 SUB -1 TIME-56000 BFETEMP      (AVG)

RSYS-11 PowerGraphics EFACET-1 AVRES=Mat DMX -.034523 SMN -100.7 SMX -125.664 100.7 103.474 106.248 109.022 111.795 m 114.569 117.343 120.117 122.89 125.664 Figure 23 Hoop Stress and Temperature at Leak Test Transient Step 20 (Time = 36,000 s) t4-Dsc- 411 R 50 sh -. 5'2.. M-DSC-4 11

C-3677-00-1, Revision 0

p. 51 of 70 Attachment 1: File "press.trans.addon.txt"
          /BATCH, LIST
          /FILN,PzBH-30A RESU,,dbs,../../
          /COM,**      **************************
          /COM,
          /COM,     

Description:

Transient Add-on Code

          /com,
          /com,      This batch listing does the following:
          /corn,       A. Runs cooldown w/ flooding transient to shakedown model
          /com,        B. Solves preliminary static case with nozzle repaired
          /com,
  • Static cases w/nozzle killed (repair): T-70F & P=0 psig at t=36001s
          /com,
  • Writes PzBH-30A.ist file for resuming during elastic transients
          /com,      C. Defines and solves six (6) transient cases, as follows:
         /com,            1. Heatup Transient
         /com,            2. Cooldown Transient w/ Flooding
         /com,            3. Unit loading/unloading / 10% Step Change
         /com,            4. Reactor Trip/Loss of Load/Loss of Flow
         /com,            5. Loss of Secondary Pressure
         /com,            6. Leak Test
         /com,       D. This code creates the following macros:
         /com,            1. tload:    selects appropriate nozzle and RV shell surfaces
         /com,               and applies the specified temperature and convection
         /com,               coefficient boundary conditions
         /com,            2. tload2:    applies h consistent with steam convection conditions
         /com,               tload surfaces
         /com,            3. tplod: selects appropriate nozzle and RV shell surfaces
         /com,               and applies the specified pressure at the specified time
         /com,               and temperature. No nozzle "end cap" force due to repair
         /com,            4. tplod nop: same as tplod but no pressure applied
         /com,            5. plod2: applies pressure only to same surfaces as tplod
         /com,
         /com,       Notes:
         /com,       A. This code does not perform any post-processing. Instead, it
         /ccm,           saves files after each transient is solved to facilitate post-
         /com,           processing with a separate batch listing.
         /com,
         /ccm,       DEI task no:    36-77
         /com,
         /com,       Current Version by:     JEB                      Date:   9/1/2005
         /com,
         !  *******j   ************+************************************************************************,r*****
         /COPY,%FNAME%,dbt,../../,thermal,db                  ! create copy of "*.dbt' and call it "thermal.db"
         /show,trarsplots, grph                        ! send graphical output to transplots.grph
         /out,%FNAYE% .transient,out                   ! create blank *.transient.out file (will write results to it later)
         /out,                                         ! redirect output back to std (command line)        *.out file
         *CREATE,tload                                   ! tload macro: ARGl = bulk temp (F); ARG2 = tine (sec.:
             /NOPR ESEL,S,LIVE NSEL,NONE hcoeffl = 500/1(144*3600)                   ! Head IR h in BTU/sec-in'2-F NSEL,A, ,.,NNUM2,NNUM6,1                    ! Grab shell IR nodes (includes weld underside)
             *REPEAT,ncirc+l, ,,,10000,10000 SF,ALL, ONV,hcoeffl,ARG1                    ! ARGI = temperature (F)       .r-1-Dsc-      411 Rev 0 5h&b 53 Attachment 1: File "press.trans.addon.txt" M-DSC-411

C-3677-00-1, Revision 0

p. 52 of 70
                *IF,TRIMFLAG,GT,0.5,THEN                                   i.e.,        if     nozzle is     trimmed to be flush with RVII NSEL,NONE NSEL,A, ,.,NNtUM1,NNUM2,1
                      'REPEATncirc+l,...10000,                 10000 SF,ALL,CONV,hcoeffl,ARGl                                ! MG1 - temperature (F)
                *ELSE                                                             i.e.,        if nozzle end not trimmed (normal CRDM/CEDM cases)

NSEL,NONE NSELA, , ,l,NRTUBE+l,1  ! grab tube bottom nodes

                      *REPEAT,ncirc+1,,,,10000,10000 NSEL,A, ,.,NRTUBE+1,NNUM2,100                                grab lower tube OR nodes IREPEATncirc+l, ,,10000,10000 SF, ALL,CONV,hcoeffl,ARGl                                I ARG1 = temperature                  (F)
               *ENDIF NSEL,A,NODE,,NNUMI,NNUM17+400,100
               *REPEAr,ncircgl,,,,10000,10000                             Grab nozzle ID in remnant nozzle SF,ALL,CONV,hcoeffl,ARG1                                 ! ARG1 - temperature (F)

NSELALL ESEL,ALL DDELE, ALL,TEMP Deletes temp constraints on all nodes TIME,ARG2 sets the time to ARG2 value when macro is called

               /GOPR                                                      reactivates suppressed printout SOLVE                                                    I solve model at ARGl temp and ARG2 time
          *END
          *CRE:ATE,tload2                                                 tload macro: ARGl = bulk temp (F); ARG2 - time (sec.)
               /NOPR ESEL,S,LIVE NSEL,NONE hcoeffl             10/(144*3600)                     ! Head IR h in BTU/sec-in^2-F NSEL,A,,,NNUM2,NNUM6, 1                                  ! Grab shell IR nodes (includes weld underside)
               *REPEAr,ncirc+1,,,,10000,10000 SF,ALL,CONV,hcoeffl,ARG1                                   ARG1 - temperature                 (F)
               *IF,TRIMFLAG,GT,0.5,THEN                                 ! i.e.,         if    nozzle is     trimmed to be flush with RVH NSEL,NONE NSEL,A,,,NNUM1,NNUM2,1
                     *REPEAT,ncirc+l,,,,10000,10000 SF,ALL,CONV,hcoeffl,ARGl                                I ARC1 - temperature (F)
               *ELSE                                                         ! i.e.,          if nozzle end not trimmed                   (normal CRDMI/CEDV cases)

NSEL,NONE NSEL,A, , ,14,NRTUBE+1,1 I grab tube bottom nodes

                     *REPEAT,ncirc+1,,,,10000,10000 NSEL,A, , ,NRTUBE+1,NNUM2,100                                grab lower tube OR nodes
                    *REPEAT,ncirc+1,,,,10000,10000 SF,.ALL,CONV,hcoeffl,ARGl                                    ARG1 - temperature                (F)
               *ENDIF NSEL,A,NODE,,NNUM1 ,NNUM17+400,100
              *REPEAr,ncirc+1.,,,10000, 10000                             Grab nozzle ID in remnant nozzle SF,ALL,CONV,hcoeffl,ARG1                                 ! ARG1 = temperature (F)

NSEL,ALL ESEL,ALL DDELE,ALL,TEMP Deletes temp constraints on all nodes TIME,ARG2 sets the time to ARG2 value when macro is called

              /GOPR                                                       reactivates suppressed printout SOLVE                                                    I solve model at ARGI temp and ARG2 time
         *END
            *******-**************~*****t***************                        *********t***        ****************t*****************
         /COM,         Create Temperature                & Pressure Loading Macro
         *CREATE,t:plod                                                ! tpload macro: ARG1 - pressure                             (psi); ARG2 - time     (sec.)
              /NOPR                                                                               M-0DC-s-41)                         Rev-O shA.. s4 Attachment 1: File "press.trans.addon.txt" M-DSC-411

C-3677-00-1, Revision 0

p. 53 of 70 ESEL,ALL NSEL,NONE NSEL,A,NODE,,NNUM2,NNUM6,1  ! Grab shell IR nodes (NNUM2+1 node is actually collapsed out)
             *REPEAr,ncirc+l, ,,,10000,10000 NSEL,A,NODE,,NNUM1,NNUM2,1             ! Grab underside of nozzle wall
             *REPEAT,ncirc+l,,.10000,10000 NSEL,A,NODE,,NNUMl5,NNUM15
             *REPEAT,ncirc+1,,,,10000,10000 NSEL,A,NODE,,NNUM15+101,NNUM24,100
             *REPEAI,ncirc+l,,,,10000,10000         ! Grab h ead penetration ID nodes NSEL,A,NODE,,NNUMl,NNUM17+400,100
             *REPEAr,ncirc+l,,,,10000,10000         ! Grab nozzle ID in remnant nozzle NSEL,A,NODE,,NNUM15,NNUM18+400,100
             *REPEA1,ncirc+1,,,,10000,10000         ! Grab n ozzle OD in remnant nozzle NSEL,A,NODE,,NNUM17+400,NNUM18+400,1
             *REPEAT,ncirc+1,,,,10000,10000         ! Grab n ozzle top in remnant nozzle ESEL,S,LIVE SF,ALL,PRES,ARG1                       ! ARGl=p ressure NSEL,ALL ESEL,ALL
             *IF,CYLSHELL,EQ,1,THEN
                 /COM, ***   Apply Vessel axial pressure CSYS,32 NSEL,S,LOC,Z,ZSIZE/Z+0.02,ZSIZE/2-0.02 NSEL,A,LOC,Z,-ZSIZE/2+0.02,-ZSIZE/2-0.02 SF,ALL,PRES,-(SIR**2/(SOR**2-SIR**2))*ARGI CSYS, O
             *ENDIE
             /GOPR NSEL,ALL LDREAD,TEMP,,,ARG2,,,rth                ! read temps (use time rather than loadstep and substep)

TIME,ARG2+20000  ! offset time by 20000 for structural model

            *if,ARG3,EQ,l,THEN ISWRITE,ON solve ISWRITE,OFF
                *GET,NMTMP,ACTIVE,0,JOBNAM
                /RENAMF,%NMTMP%,ist,,%NMTMP%.%ARG2%,ist
            ,else SOLVE
            *endif
         *END
         *CREATE,tplod nop                            tplod rmacro: ARG1 - pressure (psi) (ignored); ARG2 -- time (sec NSELALL ESEL,ALL LDREAE,TEMP,,,ARG2,,,rth               ! read tiemps (use time rather than loadstep and substep)

TIME,ARG2  ! same t.ime for structural model

            *if,APG3,EQ,1,THEN ISWRITE,ON solve ISI'RITE,OFF
                *GET,NMTMP,ACTIVE,0,JOBNAM
                /RENAME,%NMTMP%,ist,,tNMTMP%.%ARG2t,ist
            *else SOIVE
            *endif
         *END Sh4. 55
                               !ANALYZESTATIC CASES WITH AND WITHOUT NOZZLE REMOVED Attachment 1: File "press.trans.addon.txt" M-DSC-411

C-3677-00-1, Revision 0

p. 54 of 70
           !     ******'*********************************4********t*********,**~************,*i****~**********

resu,%FNAIE%,dbs,../../

          /COPY,%FNhME%,emat,../../,%FNAME%,emat
         /COPY,%FNAME%,esav,../../,%FNAME%,esav
         /COPY,plocl,,../../,plod
         /SOLUTION ANTYPE,,_RESTART
         /TITLE,%Tf:l%%TI2%%TI3%%TI4%%TI5%%TI6%%TI7%                                           -   Post Operating (T=70F,P=Opsig)

DELTIM,0.01,0.01,l.0,OFF Icom, Tak:e model down to room temperature and pressure TIME,TO+5  ! set t-7005s (not a transient, so time is arbitrary) BF,ALL,TEMIP,70  ! set T=70F

         *USEplod,0                                                                      ! P=0; use orig "plod" macro (includes solve) since nozzle stil:
         /TITLE,%T::l%%TI2%%TI3%%TI4%%TIS%%TI6%%TI7% - Repair (T=70F,P=0 psig)
         /com,        De"ete upper nozzle (simulate repair) esel,none
         *do,i,O,ncirc-1,1 esela,aelen,,i*10000+nnuml7+400,i*10000+10000,100
              *repeal:,nrtube,,,, 1
         *enddo ekill,all                                                                       ! kills all selected elements, ie, the nozzle esel,all
          ! Apply temperature and pressure to nozzle-free model (T=70F; P-0 psig) sfdele,all,pres DELTIM,0.25,0.25,1.0,OFF TIME,TO+6                                                                      ! set t=7006s BF,ALL,TEMIP,70                                                                ! set T-70F ISWRITE,Ol                                                                     I write solution to *.ist file SOLVE ISWRITE, O!F finish                                                                         ! exit SOLU (back out/up to BEGIN level)

PARSAV;ALL  ! saves parameter values to *.parm file

                                                                                        ! being post-repair at operating temperature and pressare.

save,,dbp  ! save *.dbp for elastic-plastic model use

         /prep7 tbdele,all,all                                                                 ! Remove elastic-plastic mat properties save,,dbe                                                                      I use *.dbe for elastic model restarts, use isfile for init. st:

resu, thermal, db

         /com, Delete upper nozzle (simulate repair) esel,none
         *do,i,0,ncirc-1,1 esela,.elem, ,i*10000+nnuml7+400,i410000+10000,100
             *repeat:,nrtube,,, I
         *enddo ekill,all                                                                      ! kills all selected elements,             ie, the nozzle esel,all save,thermnal,db                                                               ! save thermal model with lower nozzle portion killed finish
         !     *****'*********~*****~******                          ****************************************************                       ****w**,**

ANALYZE THE SERIES OF SPECIFIED TRANSIENTS

         !                                                                                                           i-I- pSC-  411,s QJ          .o Sht.      56 Attachment 1: File "press.trans.addon.txt" M-DSC-411

C-3677-00-1, Revision 0 p.55 of 70

              !  t****t******                   **t             ****** **********,************

Transient 1 Heatup Transient (temperature only)

           /COM, HoF back to thermal model RESU,thermal,db                                                             Resumes.from the file copy we make at beginning
           /FILN,%FNAME%.transl                                                  ! Set filename to "*.transl"
           /SoLU ANTYPE,TRANS,NEW                                                       ! new transient analysis
           /TITLE,%TI1%%TI2%%TI3%%TI4%%TI5%%TI6%%TI7% - %FNAME% - HU Transient OUTPR,BASIC,NONE                                                       I don't print substep results OUTRES,ALL,LAST                                                        ! write solution only for last substep of each load step AUTOTS,ON                                                              ! use automatic time stepping PRED,ON,,ON                                                            ! use predictor, including on first substep
          /COM,
          /COM, Establish initial conditions and do transient TIMINT,OFF,THEEW                                                       ! turn off transient effects for thermal DOFs
          *USE,tload,70,0.1 KBC,O                                                                      Linearly interpolate (ramp) loads for each substep TIMINT,ON,THERM                                                        ! turn on transient effects for thermal DOFs DELTIM,60,60,1800,ON
          *USE,tloai,170,1800
          *USE,tloa1,270,3600
          *USE,tload,370,5400
          *USE,tload,470,7200
          *USE,tloai,550,8640
          *USE,tloaS,594,9432
          *USE,tloal,630,10080
          *USE,tload,653,10494 Time,11391                SSOLVE Time,12291                $SOLVE Time,14092                $SOLVE Time,1769.2               SSOLVE TIMINT,OF:P,THERM                                                     ! turn off transient effects for thermal DOFs DELTIM,28S300-17694,,28800-17694,OFF Time,28800                $SOLVE FINISH SAVE
          !     ***~**-**************************************
          !    Trans:ient 1 : Heatup Transient (temperature and pressure)
         /COM, Hop back to structural model and calc transient T + P's resu,%FNAIIE%,dbe
         /FILN,tFN2ThME%.transl
         /CoM,
         /SOLU ANTYPE,,NE:W
         /TITLE,%T]l.%%TI2%%TI3%%TI4%%TI5%%TI6%%TI7% - %FNAME% - HU Transient AUTOTS,OF-                                                             ! do not use automatic time stepping DELTIM                                                                 I since AUTOTS,OFF and SOLCONTROL not used, defaults to previou:

NSUBST,1 specifies single substep (since effect of pressure is not timf esel,s,type,,l isfile,read,%FNAME%,ist,,l  ! read in residual stress state from welding residual stress moc esel,all

         *USE,tploc,0,0.l
         *USE,tploc.,0,1800
         *USE,tplod.,5,3600
         *USE,tplod,200,5400                                                                      l  -LSc-      L /
         *USE,tplod,500,7200
         *USE,tplod,1000,8640                                                                     Re       O
         *USE,tplod,1500,9432
         *USE,tplod,1950,10080
         *USE,tplod,2235,10494                                                                    3h Attachment 1: File "press.trans.addon.txt" M-DSC-411

C-3677-00-1, Revision 0

p. 56 of 70
            *USE,tplod,2235,11394
            *USE,tplod,2235,12294
            *USE,tplod,2235,14094
            *USE,tplod,2235,1 7694
            *USE,tplod,2235,28800 FINISH PARSAV,ALL SAVE,,dbsl
            !     Transient 3 : Load/Unload / Step Change                                              (temperature only)
            /COM, Hop back to thermal model RESU,thermal,db                                                                      ! Resumes from the file copy we make at beginning
            /FILN,%FNAME%.trans3                                                                ! Set filename to "*.trans3"
            /SOLU ANTYPE,TRANS,NEW
           /TITLE,%TIltTI2%%TI3%%TI4%%TIS%%TI6%%TI7% - %FNAME% - Load/Unload / Step Inc.

OUTPR,BASIC,NONE OUTRES,ALL,LAST AUTOTS,ON PRED,ON,,ON

           /COM,
           /COM, Establish Initial Conditions and do transient TIMINT,OFF,THERM
           *USE,tload,633,0.1 KBC,O                                                                                  linearly interpolate loads TIMINT,ON,THERM                                                                         turn on thermal transient effects
           *USE,tload,653,1 Time,15                    $SOLVE Time,60                    $SOLVE Time,180                   $SOLVE Time,600                   $SOLVE Time,1800                  SSOLVE Time,3600                  $SOLVE TIMINT, OFF, THERM DELTIM,7200-3600,,7200-3600,OFF Time,7200                  $SOLVE TIMINT,ON,THERM                                                                       ! turn on thermal transient effects DELTIM,5,,1800,ON lTSEtload, 633,7201 Time,7215                     $SOLVE Time,7260                    $SOLVE Time,7380                    $SOLVE Time,7800                    $SOLVE Time,9000                     $SOLVE Time,10800                      $SOLVE TIMINT,OFF,THERM DELTIM,14400-10800,,14400-10800,OFF Time,14400                      $SOLVE FINISH SAVE
          !      t*****************~*********t****~***********************************4********

Transient 3 : Load/Unload / Step Change (temperature and pressure)

         /CON,
         /COM, Hop back to structural model and calc transient T + P's resu,%FNA4E%,dbe
         /FILN,%FNNME%.trans3                                                                                    I        s
         /COM,                                                                                                   f,  - S- SC-   4+/
          /SOLU ANTYPE,,NEW                                                                                              Rev o Attachment 1: File "press.trans.addon.txt" M-DSC-411

C-3677-00-1, Revision 0

p. 57 of 70
          /TITLE,%Ttl%%Tl2%%TI3%%TI4%%TI5%%TI6%%TI7% - %FNAME% - Load/Unload / Step Inc.

AUTOTS,OFF  ! do not use automatic time stepping DELTIM  ! since AUTOTS,OFF and SOLCONTROL not used, defaults to previou: NSUBST,1  ! specifies single substep (since effect of pressure is not timn esel, s,ty?e, pi isfile,re3d,%FNAME%,ist,,1  ! read in residual stress state from welding residual stress moc esel,all

          *USE,tploi,2135,0.1
          *USE,tploJ,2235,1
          *USE,tplod,2235,15
          *USE,tplod,12235,60
          *USEtplod,2235,180
          *USE,tploJ,2235,600
          *USE,tploi,2235,1800
          *USE,tplol,2235,3600
          *USE,tplo1,2235,7200
          *USE, tplod,2135,7201
          *USE,tploSi,2135,7215
          *USE,tploS,2135,7260
          *USE,tplo4i,2135,7380
          *USE,tploi,2135,7800
         *USEtplod,2135,9000
          *USE,tploI,2135,10800
          *USE,tploi,2135,14400 FINISH PARSAV,ALL SAVE,,dbs3
            ! ******************t************

Transient 4 : Reactor Trip/Loss of Load/Loss of Flow Transient (temperature only)

         /COM, Hop back to thermal model RESU,thernal,db
         /FILN, %FNME%.trans4
         /SOLU ANTYPE,TRRNS,NEW
         /TITLE,%TI1%TI2%%TI3%%TI4%%TI5&%TI6%%TI7% - %FNAME% - Trip/Loss of Flow/Load OUTPR, BASIC,NONE OUTRES,ALL,LAST AUTOTS,ON PRED,ON,,DN
         /COM,
         /COM, Establish Initial Conditions and do transient TIMINT,OFF,THERM
         *USE,tload,653,0.1 KBC,0                                           ! linearly interpolate loads TIMINT,ON,THER.M                                  turn on thermal transient effects DELTIM,5,1,1800,ON
         *USE,tloaj,645,10
         *USE,tloaf,637,20
         *USE,tloaf,629,30
         *USE,tloaj,621,40
         *USE,tload,613,50 DELTIM,25,1,1800,ON
         *USE,tloaf,611,100
         *USE,tloaf,609.2,150
         *USE,tloaf,607.4,200                                                    Dsc 4
         *USE,tloaf,603.8,300
         *USE,tloai, 600.2,400
         *USE,tload,596.6,500                                               P
         *USEtloaf,593,600
         *USEtload,599,740
         *USE,tload,605,880 Sh ' !5q
         *USE,tload,617,1160 Attachment 1: File "press.trans.addon.txt" M-DSC-411
                                                                                                                                                         .-1 C-3677-00-1, Revision 0 p.58 of 70
           *USE,tlozid,629,1440
           *USE,tlocid,641,1720
           *USE,tload,647,1860
           *USE,tloEld,653,2000 Time,2100               $SOLVE Time,2600               $SOLVE Time, 360U)             SSOLVE Time,5400               $SOLVE TIMINT,OOFF,THERM DELTIM,7200-5400,,7200-5400,OFF Time,7200               $SOLVE FINISH SAVE I    ****s     *******~*******************************~*.*****************4*

i Tran-.ient 4  : Reactor Trip/Loss of Load/Loss of Flow Transient (temperature and pressure;

           /COM,
           /COM, Hop back to structural model and calc transient T + P's resu,%FNfME%,dbe
           /FILN,%FnAME%.trans4
           /COM,
           /SOLU ANTYPE,jEW
           /TITLE,%TI1%%TI2%%TI3%%TI4%%TI5%%TI6%%TI7% - %FNAME% - Trip/Loss of Flow/Load AUTOTS,OE'F                                                                   ! do not use automatic time stepping DELTIM                                                                       ! since AUTOTS,OFF and SOLCONTROL not used, defaults to previou:

NSUBST,1  ! specifies single substep (since effect of pressure is not timc esel,sltipe,,l isfile,read,%FNAME%,ist,,1  ! read in residual stress state from welding residual stress mo( esel,all

           *USE,tplcd,2235,0.1
           *USE,tplcd,2295,10
          *USE,tplcd,2355,20
          *USEtplod,2415,30
          *USEtplod,2475,40
          *USE,tplod,2535,50
          *USE,tplod,1685,100
          *USE,tplod,1698.75,150
          *USE,tplod,1712.5,200
          *USE,tplod,1740,300
         *USE,tplod,1767.5,400
         *USE,tplod,1795,500
         *USE,tplod,1822.5,600
         *USE,tplod,1861,740
         *USE,tplo, 1899.5,680
         *USE,tplo~i,1976.5,1160
         *USE,tploJ,2053.5,1440
         *USE, tploi,2130.5,1720
         *USE,tploi,2169,1860
         *USE,tploi,2207.5,2000
         *USE,tploi, 2235,2100
         *USE,tplod,2235,2600                                                                                    -Dec- 4//
         *USE,tplo,i,2235,3600
         *USE,tploi,2235,5400
         *USE,tplo,i,2235,7200 iRev- o FINISH PARSAV,AL; SAVE,,dbsl l
               *44****#***       * **44***     * ********************************                     * *4* 4***

Transient 5 : Loss of Secondary Pressure (temperature only) Attachment 1: File "press.trans.addon.txt" M-DSC-411

C-3677-00-1, Revision 0

p. 59 of 70
    /COM, Hop back to thermal model RESU, thermil, db
    /FILN,9%FNAME% . trans5
    /SOLU ANTYPE,TRX'IS,NEW
    /TITLE,%TII%%TI2%%TI3%%TI4%%TI5%%TI6%%TI7%     - %FNAME% -  LOSP OUTPR, BASIC, NONE OUTRES,ALL, LAST AUTOTS, ON PRED,ON,,OG
   /COMO
   /COM, Estaolish Initial Conditions and do Transient TIMINT, OFF, THERM USE,tload,653,0.1 KBC, 0                                      ! linearly interpolate loads TIMINT,ON,rHERM                             ! turn on thermal transient effects DELTIM,0.5,0.1,1800,ON sUSE,tload,635,6
   *USE,tload2,632,7
   *USE,tload2,585.5,22.5
  *USE,tload2,539,38
  *USE,tload2,492.5.53.5
  *USE,tload2,446,69
  *USE,tload2,399.5,84.5
  'USE,tload2,353,100
  *USE,tload2,356.75,125
  *USE, tload2,360.5,150
  *USE,tload2,364.25,175
  *USE,tload2,368,200
  *USE,tloac2,380.5,300
  *USE,tloac2,393,400
  *USE,tloac2,408,600
  *USE,tloac2,423,800
  *USE, tloac2,433,1000
 *USE,tloacI2,458,1550
  *USE,tloacl, 458,1551
 *USE,tloacl,473,2000
 *USE, tloacl,491,2667
 *USE, tloact, 510,3333
 'USE, tloacl,528,4000
 *USE,tloacl,590.5,6200
 *USE, tloacl,653,8400 TIMINT, OFI', THERM DELTIM,10(000-8400, ,10000-8400, OFF
*USE,tloacl,653,10000 FINIS5 SAVE
/COM, Transient 5:    Loss of Secondary Pressure (temperature and pressure)

/CON, /COM, Hop back to structural model and calc transient T 4 P's M -DSc_411 resu, %FNAMIE%, dbe /FILN, %FNAME% . trans5 kev-o /S~OLU h 61/ ANTTYPE, , NEW /TITLE,%T:r1%%TI2%%TI3%%TI4%%TI5%%TI6%%TI7% - %FNAME% - LOSP AUTOTS, OF?  ! do not use automatic time stepping DELTIM  ! since AUTOTS,OFF and SOLCONTROL not used, defaults to previou: NSUBST,1  ! specifies single substep (since effect of pressure is not timn esel, s, type,,1 Attachment 1: File "press.trans.addon.txt"

C-3677-00-1, Revision 0

p. 60 of 70 isfile,read,%FNAME%,ist,,1 I read in residual stress state from welding residual stress mo esel,all
              *USE,tplod,2235,0.1
              *USE,tplod,2173,6
              *USE,tplod,2163,7
              *USE,tplod,2000,22.5
              *USE,tplod,le37,38
              *USE,tplod,1674,53.5
              *USE,tplod,1511,69
              *USE,tplod,1348,84.5
              *USE,tplod, 11e6,100
              *USE,tplod,923,125
              *USE,tplod,660,150
              *USE,tplod,398,175
              *USE,tplod,135,200
              *USE,tplod,160,300
              *USE,tplod,185,400
              *USE,tplod,235,600
              *USE,tplod,285, 800
              *USE,tplod,335,1000
              *USE,tplod,434,1550
              *USE,tplod,434.18,1551
              *USE,tplod,515,2000
              *USE,tplod,622,2667
              *USE,tplod,728,3333
              *USE,tplod,835,4000
              *USE,tplod.,1535,6200
              *USE,tplod.,2235,8400
              *USE,tplod.,2235,10000 FINISH PARSAV,ALL SAVE,,dbs'
              !   *****t******   *****.***************.*************.*+***********t*

Transient 6 : Leak Test (temperature only)

              /COM, Hop back to thermal model RESU,thermal,db                                                     ! Resumes from the file cop y we make at beginning
             /FILN,%FN7ME%.trans6                                                ! Set filename to '*.trans6
             /SOLU ANTYPE,TR7NS,NEW
             /TITLE,%TI1%%TI2%%TI3%%TI4%%TIS%%TI6%%TI7% - %FNAME% - Leak Test OUTPR,BAS]:C,NONE OUTRES,AL',LAST AUTOTS, ON PRED, ON, ,ON ICOM,
             /COM, Establish Initial Conditions and do transient TIMINT,OFE',THERM
             *USE,tloacl,100,0.1 KBC,O                                                                   linearly interpolate load       s TIMINT,ON,THERM                                                         turn on thermal transient effects
             *USE,tloaci,100,1800
             *USE,tloacl,100,3600
             *USE,tloacf,160,5760
             *USE,tloadl,220,7920
             'USE,tload,280,10080                                                         /l.- Dsc -. 4l
             *USE,tloacl,340,12240
             'USE,tloaci,400,14400 Time,1440:.       $SOLVE                                                      I Time,'1620(       $SOLVE Time,18000        $SOLVE                                                        h      6h-2 Time,1980t)       $SOLVE TIMINT, OFF, THERM DELTIM,21600-19800,,21600-19800,OFF Attachment 1: File "press.trans.addon.txt" M..rlco.A I 1

C-3677-00-1, Revision 0

p. 61 of 70 Time,21600 SSOLVE TIMINT, ON, THERM  ! turn on thermal transient effects DELTIM,5,,1800, ON
                 *USE,tload,400,23400
                 *USE, tload,400,25200
                 *USE, tload,340,27360
                 *USE, tload,280,29520
                 *IJSE, tload,220,31680
                 *USE, tload,160,33840 USE, tload,100,36000 Time,36001                 $SOLVE Time,374q0                 $SOLVE Time, 38880               $SOLVE Time,40320                 $SOLVE Time,41760                 $SOLVE TIMINT, OFF, THERM DELTIM,43200-41760,,43200-41760,OFF Time,43200                 SSOLVE FINISH SAVE
                    !   *********.*********************************.****f***,*****                        ************k***      **

Transient 6: Leak Test (temperature and pressure)

                /COM,
                /COM, Hop back to structural model and calc transient T 4 P's zesu, %FNAV..E%, dbe
                /FILN, %FNhME%.trans6
                /COM,
                /SOLU ANTYPE, ,NE.W
                /TITLE,%TI1%%TI2%%TI3%%TI4%%TI5%%TI6%%TI7%                             - %FNAME% - Leak Test AUTOTS,OFF                                                          ! do not use automatic time stepping DELTIM                                                              ! since AUTOTS,OFF and SOLCONTROL not used, defaults to previou:

NSUBST,1  ! specifies single substep (since effect of pressure is not timf esels, tyF'e, , isfile,rea.d, %FNAME%, ist, ,1  ! read in residual stress state from welding residual. stress at(o esel, all

                *USE,tploct,385,0.1
                *USE, tplocl,385,1800
                *USE, tplocl,385,3600
                *USE, tplocl, 385,5760
               *USE, tplocl,385,7920
               *USE,tplocl,385,10080
               *USE, tplocl,3B5,12240
               *USE,tplocl,385,14400
               *USE, tplocl,2235,14401
               *USE, tplocl,2235,16200 h-osc-4/t
               *USE, tplocl,2235,18000
               *USE, tplocl,2235,19800
               *USE,tplocl,2235,21600                                              PIev- o
               *USE, tplocl,2235,23400
               *USE,tploci,2235,25200
               *USE, tplocl,2235,27360
               *USE, tploC,2235,29520
                                                                                     ,Sh6- 63
               *USE, tplocl,2235,31680
               *USE,tplocd,2235,33840
               *USE, tplocl,2235,36000
               *USE,tplocl,385,36001
               *USE, tplodl,385,37440
               *USE,tplod,385,38880
               *USE,tplod,385,40320
               *USE, tplod,385,41760
               *USE, tploci,385,43200 Attachment 1: File "press.trans.addon.txt"

?m4Th~C'..A 1 1

I C-3677-00-1, Revision 0

p. 62 of 70 FINISH PARSAV,ALL SAVE,, dbs S i *****'****~********************+****s*************~**** ,**************.*******,*******

SHAKEDOWN ELASTIC-PLASTIC MODEL USING COOLDOWN W/ FLOODING TRANSIENT THIS SET OF INITIAL STRESSES IS ONLY FOR USE WITH THE CDF TRANSIENT! i *************************+ * ***** * ** * ** * ** ** *** * ** * ** * ** *

              ;*****.e***~**************t************                        ******************       *****t*

TransLent 0 : Cooldown w/ flooding transient (temperature only)

           /COM, Hop back to thermal model RESU,thernal,db
           /filn,%FN;%ME%.cdf
           /SOLU ANTYPE, T&;NS, NEW
           /TITLE,%Trl%%TI2%%TI3%%TI4%%TIS%%TI6%%TI7% - %FNAME% - CD w/ Flooding OUTPR,BASIC,NONE OUTRES,ALL,LAST AUTOTS,ON                                                         ! use automatic time stepping PRED,ON,,ON                                                       ! use predictor, including on first substep
           /COM,
           /COM, Establish Initial Conditions and do transient TIMINT,OF:?,THERM                                                 ! turn off transient effects for thermal DOFs
           *USE,tload,653,0.1 EBC,O                                                             ! Linearly interpolate (ranp) loads for each substep TIMINT,ON.THERM                                                   ! turn on transient effects for thermal DOFs DELTIM,60,60,1800,ON
           *USE,tload,610,756
           'USE,tload1,568,1512
           *USE,tload,525,2268
           *USE,tloali,483,3024
           *USE,tload,440,3780
          'USE,tload,440,3780.1
          *USE,tload,383,3888
          *USE,tload,327,3996
          *USEtload, 270,4104
          *USE,tload1,213,4212 M -2Dsc- 4L1
          *USE,tloadi,157,4320
          *USE,tload,100,4428                                                     RewV            O Time,5542                    SSOLVE Time,6657                    $SOLVE Time,7771                    $SOLVE Time,8886                    $SOLVE                                      ThI          _   /

Time,10000 $SOLVE

          *USE,tload,135,10062
          *USEtload,170, 10124
          *USEtload, 205, 10186
          *USE,tload,240,10248
          *USE,tloaci,275,10309.6
          *USE,tloaci,275,10309.7
          *USE,tload,234,11047
          *USE,tloacd,193,11784
          *USE,tloacd,152,12521
          *USE,tload,111,13259
          *USE,tload,70,13996 Time,14497                     $SOLVE Time,149913                    $SOLVE Time,15499                     SSOLVE TIMINT,OFIF,THERM                                                  ! turn off transient effects for thermal DOFs Attachment 1: File "press.trans.addon.txt" M-DSC-4 11

C-3677-00-1, Revision 0

p. 63 of 70 DELTIM,16000-15499,,16000-15499,OFF Time,16000 $SOLVE FINISH
          /COM,
           !               ******,*******************7            *************+********

Transient 0 : Cooldown w/ flooding transient: temperature and pressure resu,%FNAYLE%,dbp  ! resume from elastic-plastic model

          /COPY,%FNPME%,emat,,%FNAME%.cdf,emat                          ! restart analysis from post-repair analysis mode:.
          /COPY,%FNPME%,esav,,%FNAME%.cdf,esav
          /SOLU ANTYPE,,RE.START
          /TITLE,%TIl%%TI21%TI3%%TI4%%TI5%%TI6%%TI7% - %FNAME% - CD w/ Flooding PRED,ON,,ON                                            ! use predictor, including on first    substep AUTOTS,ON                                               ! use automatic time stepping DELTIM,(2C'000-TO)/10,(20000-TO)/40,20000-TO
          *USE,tplocl,2235,0.1 AUTOTS,OFI'                                             ! do not use automatic time stepping DELTIM                                                 ! since AUTOTS,OFF and SOLCONTROL not used, defaults to previou:

NSUBST,1  ! specifies single substep (since effect of pressure i;3 not timn

          *USE,tplod,1875.8,756
          *USE,tplocl 1516.6,1512
          *USE,tplocl, 1157.4,2268
          *USE,tplocd,798.2,3024
          'USE,tploci,439,3780
          *USE,tplocd,0,3780.1
          *USE,tplod,0,3888
          *USE,tplotl,0,3996
          *USEtploc, 0,4104
          *USE,tplod,0,4212
          *USE,tplod,0,4320
          *USE,tplod,0,4428
         *USE,tplod,0,5542
          *USE,tplod,0,6657
         *USE,tplod,0,7771                                                    D           1+11
         *USE, tploi,0,8886
         *USEtplod,0,10000
         *USE, tplo, 0,10062
         *USE,tplod,0,10124
         *USE,tplod, 0,10186
         *USE,tplod, 0,10248
         *USE,tplod, 0,10309.6
         *USE,tplod,439,10309.7 hb b            S'
         *USE,tplo,J 351.2,11047
         *USE,tplodl,263.4,11784 USE, tplo, 175.6,12522
         *USE,tplod,87.8,13259
         *USE,tplod,0,13996
         *USE,tplod,0,14497
         *USE, tplod,0,14998
         *USE,tploi,0,15499 ISWRITE,a                                               !qwrite shaken down solution to *.cdf.ist fi.le
         *USEtplod,0,16000 ISWRITE,OFF finish Jsys, rm *.cdf.rst                                            ! Delete unneeded *.cdf.rst file
         /RENAME,%FNAME%.cdf,rth,,%FNAME%.trans2,rth                      ! No need to re-run thermal model
         !     **2*************n*********************i*********                ******:

r a

         !     Transient 2 : Cooldown w/ flooding transient: temperature and pressure Attachment 1: File "press.trans.addon.txt" M-DSC-411

C-3677-00-1, Revision 0 p.64 of 70

          /COM,
           /COM, Hop back to structural model and calc transient T + P's resu,%FNX1E%,dbe
           /FILN,%FNAME%.trans2
          /COM,
          /SOLU ANTYPE,,N1:W
          /TITLE,%T::l%%TI2%%TI3%%TI4%%TI5%%TI6%%TI7% - %FNAME% - CD w/ Flooding AUTOTS,OF]                                 ! do not use automatic time stepping DELTIM                                     ! since AUTOTS,OFF and SOLCONTROL not used, defaults to previou:

NSUBST,1  ! specifies single substep (since effect of pressure i.3 not timt esel,s,type,,l isfile,read,%FNAME%.cdf,ist,,l  ! read in shaken down residual stress state from welding residue esel,all

          *USEtplodc,2235, 0.1
          *USE,tplodi,1S75.8,756
          'USE,tplod,1516.6,1512
          *USE,tplod,1157.4,2268
          *USE,tplod,798.2,3024
          *USEtplod,439,3780
          *USE,tplod1,0,3780.1
          *USE,tplod,0,3888
          *USE,tplod,0,3996
          *USE,tplod,0,4104
          *USE, tplod, 0,4212
          *USE,tplod,0,4320
          *USE,tplod,0,4428
          *USE,tplod,0,5542
          *USE,tploi, 0,6657
          *USE,tplod,0,7771
          *USE, tploi,0,8886
          *USE,tplo1,0,10000
          *USE,tploj,0,10062
          *USE,tploi,0,10124
          *USE,tplod,0,10186 M- Dsc- 4l/
          *USE,tploj,0,10248
          *USE,tploj,0,10309.6
          *USE,tplod,439,10309.7
          *USE,tplod,351.2,11047 9'evr     0
          *USE,tplod,263.4,11784
          *USE,tplod,175.6,12521
          *USE,tplod,87.8,13259
          *USE,tplod,0,13996
          *USE,tplod,0,14497
         *USE,tplod,0,1499B
         *USE,tplod,0,15499
         *USE,tplod,0,16000 FINISH PARSAV,ALL SAVE,,dbs2 END OF ANALYSIS OF WESTINGHOUSE-DEFINED CASES
         !   file cleanup!
         /SYS, rm *.BCS
         /SYS, rm *.PVTS
         /SYS,   rm *.osav
         /SYS, rm *.full
         /SYS, rm *.trans?.esav
         /SYS,   rm.*.trans?.emat
         /SYS,   rm *.trans?.osav Attachment 1: File "press.trans.addon.txt" M-DSC-411

C-3677-00-1, Revision 0

p. 65 of 70
           /sys, rm I.trans?.rth
           /sYs, rM *.trans?.tri IsysM rM I.trans?.stat
           /sys, rm 4.trans?.db
           /sYs, rm tload
           /sYs, rm t~plod
           /inp,presv.trans.addpost,txt v- DEC- 4/

R~ev O sh&- 67 Attachment 1: File "press.trans.addon.t"t" I I M-DSC-411

l C-3677-00-1, Revision 0

p. 66 of 70 Attachment 2: File "press.trans.addpost.txt"
            /BATCH,LIST                    t4-D.5*-***
            /com,
            /com,    

Description:

press.trans.addpost.txt

            /com,
            /com,       This batch listing does the following:
            /com,           A. Performs post-processing of results which are computed by press.trans.addon file.
            /com,                - Post-processing is done by 'reaching into" files press.transl.dbsl through
            /com,                   press.trans6.dbs6 and writing select results to press.addpost.out
            /com,       Notes:
            /com,           A. All results are written to *.addpost.out
            /com,           B. This file creates the following macros:
            /com,                1. TRANSPLOTS    -  generates stress and stress intensity plots
            /com,                2. NODEPOP       -  populates an array with nodes of interest
            /com,                3. TRANSPOST     -  writes stress and temperature results for transient case's)
            /com,                4. writedata     -  writes out data to Sec5data.out
            /com,
            /com,     CEI task no:    30-10
            /com,
            /com,     Current Version by:    JEB                                      Date:  7/11/05
            /com,
            /PAGE,,,,240                                set page width to widest possible setting
            /com, Icom, CPEATE OUTPUT FILES TO WHICH RESULTS WILL BE WRITTEN (these are cleared each time press:.trans.ad
            /com,
            /out,%FNPME%.addpost,out                         I create/"re-set" blank file called "*.addpost.out"
            /out,
           /out,%FNPME%.Sec5data,out                         ! create/"re-set" blank file called "*.Sec5data.out:"
            /out,
           /com,    "IRANSPLOTS"    MACRO:  Creates SY,  SZ, and SINT stress  plots
           /com,
           /com,     This macro is called within the NONTRANSPOST and TRANSPOST macros
           /com,     Pxguments: ARG1 - CASE NUMBER
           /com,
           *CREATE,7RANSPLOTS                            ! TRANSPLOTS macro
               /show,transplots,grph                     ! send graphical output to transplots.grph
               /page,,,10000,132                         ! define page size: 10000 lines/page; 132 chars/line
               /view,l,l                                 ! set view direction from the x-axis
               /ang,l,vang                               ! vang is defined in cirse.base
               /type,1,4                                 ! set (window 1) display type as precise hidden"
               /edge,l,l                                 ! set (window 1) display to show only edges
               /dsc,l,off                                ! remove displacement scaling
               /DIST,1,1.5*2.75*TOR                      ! specify viewing distance
               /FOCUS,l,-8.02,Y,NZ(NNUMl7)           ! specify focus point
               /CVAL,1,-10000,0,10000,20000,30000,40000,50000,100000                ! establish stress contours
               /graphics,power                           ! activate power graphics (speeds up displays) esel,x,live                               ! reselect set of els from current set that are alive nsle                                      ! select nodes associated with selected elements rsys,11                                     activate cylindrical CS for results printout/display plns,s,y                                  ! plot hoop stress (y-component)
               /cval,l plns,lXfe,temp ESEL,S,LIVE                               ! select live elements NSLE                                      ! select nodes associated with selected (live) els
               /GRAPEICS,FULL                            ! display all model geometry and results (full: data averaging Attachment 2: File "press.trans.addpost.txt" l M-DSC-411

C-3677-00-1, Revision 0

p. 67 of 70 includes interior and surface results)

NSEL,AL:'! select all nodes ESEL,AL:L I select all elements (need to have all nodes first)

          *END                    gd~Dc4I                        u-'                hb.6 icom,    'NODEPOP" MACRO:       Creates/populates SNODEAR and TNODEAR arrays of node numbers
          /com,
          /com,     Arguments: There are no variable arguments required to use this macro Icom,
         *CREATE,NODE POP
              /NOPR SNodes=6
              *DIMSNODEARARRAYSNodes                            !dim   array for nodes of interest (stress)

U/com, POPULATE SNODEAR array SNODEAR(l)-NNUMl+NAWELD/2*100  ! Node at Nozzle ID at mid-height of weld SNODEAR(2)=NNUM2+NAWELD/2*l00 I Node at Nozzle OD at mid-height of weld SN0DEAP(3)-NNUM3+NAWELD/2*l0O  ! Node at center of weld (radial and height directions) SNODEAP.(4)=ncirc*10000+NNUMl+NAWELD/2*100 Node at Nozzle ID at mid-height of weld SNODEAP.(5)=ncirc*10000+NNUM2+NAWELD/2*100  ! Node at Nozzle OD at mid-height of weld SNODEAF.(6)-ncirc*10000+NNUM3+NAWELD/2*100 Node at center of weld (radial and height directions) TNodes=6

              -DIM,Tn;ODEAR,ARRAY,TNodes                        ! dim array for surface nodes of interest        (temperature)

I/com, POPULATE TNODEAR array for temperature monitoring TNODEAPF.(l)-NNUMl6+1+NRWELD/2  ! Node halfway along "top" of buttering TNODEA:(2)-NNUMl9  ! Node at buttering corner TNODEAU:(3)=NNUM13  ! Node halfway along "side" of buttering TNODEAx:(4)=NCIRC*10000+NNUM18+1+NRWELD/2  ! Node halfway along "top" of buttering TNODEAiT(5)-NCIRC10000+NNUMl9  ! Node-at buttering corner TNODEA1:(6)=NCIRC*O0000+NNUM13  ! Node halfway along "side' of buttering

         *END
           !                                                          ****    *****       *****     ****      ***'F  *****1************************
         /com,     "TRANSPOST" MACRO: POST-PROCESSING TO FILL TRANSIENT RESULTS ARRAYS
         /com,      Notes:      This macro writes hoop and axial stress results for transient cases.
         /com,      Arguments for this macro are as follows:
         /com,      ARGi:   Transient no. (e.g., 1, 2, 3);
         *CREATE,TIRANSPOST
             *USE,NODEPOP                                          ! fill NODEAR array of node nos
             *DIM,NJI,ARRAY,l00,SNODES                     2-D array of hoop stresses in weld
             *D1M,%,AR.RAY, 100, SNODES                 I 2-D array of axial stresses in weld
             `DIM,NTrARRAY, 100,TNODES                     dimension the NTEM (nodal temperatures) array DIM,TIMECNT,ARRAY,100                       1-D array of time (at each time step of a given transient)
             *dim,aavg sy,array,100,2                   I Array containing avg hoop for all transient steps nsel,nDne nsel,a,node,,nnunl,nnum5
             *repeat,naweld+nrbutt+l, ,,,0,100          l  Select weld/butter nodes and adjacent nozzle
             *get,max num,node,O,num,max                   Get max node number Idim,nod syl,arraymax num,1                   Dimension array for node axial stress Idim, nod maskl, array,max num, 1             Dimension mask for nodes
             *vget,nod maskl(l),node,l,nsel                Set mask if node selected nsel,all nsel,none nsel,a,node,,ncirc*10000+nnuml,ncirc*10000+nnun5S
             *repeat,naweld+nrbutt+l,,,,10,100 ! Select weld/butter nodes and adjacent nozzle
             *get,max num,node,O,num,max               ! Get max node number
             *dim,nod sy2,array,max num,1               ! Dimension array for node axial stress
             *dim,nod mask2,array,max num,1             ! Dimension mask for nodes
             *vget,nod mask2(1),node,l,nsel             ! Set mask if node selected Attachment 2: File "press.trans.addpost.txt" M-DSC-411

r D£s cL+,c- zv.o C-3677-00-1, Revision 0 p.68 of 70 sh&. 70 nsel, all SET,FFI:RST  ! read the first data set (ignore lo ad step and sub-step nos)

              *GET,I:qD1,ACTIVE,,SET,LSTP                 grab current (first) load step nuap ber (call it "INDl")

SET,LA3T  ! read the last data set (ignore boa d step and sub-step nos)

              *GET,I:ID2,ACTIVE,,SET,LSTP               ! grab current (last) load step numb er (call it "IND2")
              *DO,J,1,IND2-(INDl-l),l                   ! do loop from first   to last sub-ste]p #; shift J back to start i SET,INDl+(J-1)                          set to appropriate load step beforee grabbing results
                   *GEr,TIMECNT(J),ACTIVE,,SET,TIME     ! grab time associated w/given load step (+ transient); call it NST.SP = IND2-INDl+l RSYSll                                ! set results coordinate sys. to noz zle cylindrical sys.
                  /out,%FNAIE%.addpost,out,,append
                  /NOPR
                  /PA3E,,,20000,100                    ! sets the page parameters to displa:   y all data in one shot
                  /CO04, NSEL,S,NODE,,1,10000 NSEL,A,NODE,,ncirc*1000041,ncirc*IOOOD+10000
                  /GOPR
                  /COM,    *ts STRESSES FOR TRANSIENT CASE %ARGl% (%NSTEP% LOAD STEPS)
  • PRNSOL,S,COMP
                  /NOPR                                ! suppress output (so only requested data are written to file)

NSEL,NONE NSEL,ALL ESEL,ALL

                  /com,
                   !Extract stresses and store in arrays NH, NA
                  /com,
                  *DO,I,l,SNodes,l                            ! loop through nodes of intere!        a it
                      *GET,NH(JI),NODE,SNODEAR(I),S,Y         ! extract hoop stresses
                      -GET,NA(J,I),NODE,SNODEAR(l),S,Z        ! extract axial (parallel to n(Dozzle axis) strestes
                  *ENDDO
                  *DO,I,1,TNodes,l
                      *GET,NT(J,I),NODE,TNODEAR(I),BFE,TEMP
                  *ENDDO
                  !Extract and calculate average hoop stress
                   *DC,I,1,2,1
                      *vmask,nod mask%I%(l)                      ! Apply mask
                      *vget,nod sy%I%%(1),node,l,s,y             ! Get hoop stress for selected
                      *vmask,nod-mask%I%(1)                      ! Apply mask
                      *vscfun,avgsy(J,I),mean,nod sy%% (1 )      ! Calculate average of hoop stress and store i.n avg sy i
                 *ENDDO
                  *USE,TRANSPLOTS,ARG1                           create-stress plots for each time step
             *ENDDC
            *USE,uritedata,ARGl
             !   Erase large node stress arrays by re-dimming 4dim,nod syl,array,max num, 1            ! Dimension   array for node axial stress
            *dim,nod maskl,array,jnax _num, 1        ! Dimension   mask for nodes
            *dim,nod sy2,arraymax naum,              ! Dimension   array for node axial stress dim,nod-mask2,array,max _num, 1        ! Dimension   mask for nodes
         'END
         'create,writedata                    ! ARGI = transient number
            *do,i,l,SNodes NOEE%I% = SNODEAR(I)
            *enddc
            *do,i,l,TNodes TNCDE%I% = TNODEAR(I)
            *enddc
            /NOPR
            /out,1FNAME%.Sec5data,ou t,,APPEND Attachment 2: File "press.trans.addpost.txt" M-DSC-411

C-3677-00-1, Revision 0

p. 69 of 70
                 /COM,            ----- ______________________
                 /com,                       Transient %ARG1% - %NSTEP% TIMS STEPS
                 /COM ,- --------------- -----------------                                            -----------------
                 /COM,
                 /COM- ---------------------------------------------------
                 /com,                                         Selected Node Hoop Stresses
                 /COMt- ----------------                                     ~---~--~~--------------------------

ICOM,

                 *vwrits,NODElNODE2,NODE3,NODE4,NODE5,NODE6 (12X,6(F6.0,'Hp',3x),' UHAvg.Hp','                                                DHAvg.Hp')
                 *VLEN, NSTEP
                 *vwrite~,SEQU,NIH(l,l),NH(1,2),NH(1,3),NH(1,4),NH(1,5),NH(1,6),avg_ syll,l),avg sy(l,2)

('Step: ',F3.0,8Fl1.O)

                 /COM,
                 /out,
                 /out,%:;NAME%.Sec5data,out,,APPEND
                 /COM,- ---------------------------------------------------
                 /com,                                        Selected Node Axial Stresses
                 /COM,- ----------------------------------------------------
                 /COM,
                 *vwrite,NODEl,NODE2,NODE3,NODE4,NODE5,NODE6 (12X,4(F6.0,'Ax',3x,F6.0,'Ax',3x))
                 *VLEN,NSTEP
                 *vwriteB,SEQU,NA(l,l),NA(1,2),NA(1,3),NA(1,4),NA(1,5),NA(1,6)

('Step: ',F3.0,6Fl1.O)

                 /COM,
                 /out, lout,%FNAME%.Sec5data,out,,APPEND
                /COM, -         ----    _--------              ---       --     ---   --  ---   ---    -- ---  --   --- --
                /com,                                         Node Temperatures
                /COM,----- _____________________
                /COM,
                *vwrite,TNODE1,TNODE2,TNODE3,TNODE4,TNODES,TNODE6 (12X,6(F6.0,'T',2x))
                *VLEN,:qSTEP
                *vwrite,SEQU,NT(l,l),NT(1,2),NT(1,3),NT(1,4),NT(1,5),NT(1,6)

('Step: ',F3.0,6F9.0)

                /com,
                /com,                                                                                                          t4- oscC-41/
                /out,
                /GOPR
          *end
                                                  !-r(L-
                                                                                                                                .erbAn   -- 7/ '4

{

            !.*************************,*****~******t.*********.**************~*****                                                       ***~***.**************~**~***
3ND OF MACRO GENERATION - START POSTPROCESSING FILES
          ! *******          rk*
  • W T SE SA***************

N TEMPERATURES FORTRANSIENTS ICON, R3TRIEVE & WRITE STRESSES AND TEMPERATURES FOR TRANSIENTS

         /filn,%FR4ME%.transl RESU,,dbsl                                                                               ! resume from database file associated with first transient
         /POST1                                                                                   ! Enter post-processing
         *USE,TRANSPOST,1                                                                         ! Post-process and write 1st transient results
         /com, finish                                                                                   ! exit out of POST module as exit macro
         /NOPR PARSAV, ALL
         /filn,%FNAMEt.trans2 RESU,,dbs2                                                                               ! resume from database file associated with first transient
         /POST1                                                                                   ! Enter post-processing
         *USE,TRANSPOST,2                                                                         ! Post-process and fill     transient results arrays Attachment 2: File "press.trans.addpost.txt" M-DSC-411

C-3677-00-1, Revision 0

p. 70 of 70
           /com, finish                                                                       ! exit out of POST module as exit macro
           /NOPR PARSAV,ALL,
           /fin,%FNAMEt.trans3 RESU, ,dbs3                                                                  ! resume from data:base file associated with first transient
           /POST1                                                                       ! Enter post-proceE3sing
           *USE,TRAN.SPOST,3                                                            ! Post-process and fill transient results arrays
           /com, finish                                                                        ! exit out of POST module as exit macro
           /NOPR PARSAV,AUL
          /filn, %FN.VME%.trans4 RESU,,dbs4                                                                    ! resume from database file associated with first transient
          /POSTI                                                                        ! Enter post-processing
          *USE,TRANSPOST,4                                                              ! Post-process and fill transient results arrays
          /con, finish                                                                        ! exit out of POST module as exit macro
          /NOPR PARSAV,ALL
          /filn,%FNkME%.trans5 RESU,,dbs5                                                                    ! resume from database file associated with first transient
          /POST1                                                                        I Enter post-processing
          *USETRANSPOST,5                                                               ! Post-process and fill transient results arrays
          /com, finish                                                                        I exit out of POST module as exit macro
          /NOPR PARSAV,ALL
          /filn,%FNAME%.trans6 RESU,,dbs6                                                                     ! resume from database file associated with first trarnsient
          /POSTI                                                                        ! Enter post-processing
          *USE,TRANSPOST,6                                                              ! Post-process and fill  transient results arrays
          /com, finish                                                                         ! exit out of POST module as exit macro
         /NOR PARSAV,ALL
          ! ************+**********~*****************+************************************~*********                                     *****,,*********,

File cleanup after all necessary post-processing has been done

          !SYS,     =    TRANSPLOTS
         /SYS,      rm   TRANSPOST
         /SYS,      rm   NODE POP
         /SYS,      rm   writedata
         /EXIT, NOSAV M_ LSc- ll1 Agtbt m 272 :7 Fa Attachment 2: File "press.trans.addpost~txt" M-DSC-411}}