JAERI -M ~AER 84-162...JAERI-M 84-162 COOLOD : Thermal and Hydraulic Analysis Code for Research...
109
JAERI -M 84-162 Uft^KAtUfa- K—COOLOD H * I ? * » * 3f Japan Atomic Energy Research Institute 1-M 84-162 板状燃料を使用する研究炉の | 熱水力計算コード -COOLOD 1984 年 9 月 渡辺終吉 日本原子力研究所 Japan Atomic EnergyReseo ， :rch Institute
Transcript of JAERI -M ~AER 84-162...JAERI-M 84-162 COOLOD : Thermal and Hydraulic Analysis Code for Research...
JAERI -M 84-162
Uft^KAtUfa- K—COOLOD
H * I ? * » * 3f Japan Atomic Energy Research Institute
~AER 1-M
84-162
板状燃料を使用する研究炉の |
熱水力計算コード-COOLOD
198 4年 9月
渡辺終吉
日本原子力研究所Japan Atomic Energy Reseo，:rch Institute
JAERI.M vX- r l i , a*w.?i}wmm<T-'m.miz£nix^z,fif%m jgmvt,
JAERI-M reports are issued irregularly. Inquiries about availability of the reports should be addressed to Information Section, Division
of Technical Information, Japan Atomic Energy Research Institute, Tokai-mura, Naka-gun, Ibaraki-ken 319-11, Japan.
©Japan Atomic Energy Research Institute, 1984 «**58ff B * ) ? . ? # jjf ft Br 9) « • v> tf fc S ft « 88
JAERI・Mレポートは.日本原子力研究所が不定期に公刊している研究報告書です。
入手の間会わせは，日本原子力研究所技術情報部情報資料課(干'319-11茨繊県郡河郡東
海村}あて.お申しこしください。なお.このほかに財団法人原子力弘済会資料センター
(干319-i1茨繊県那珂郡東海村日本原子力研究所内)で俊写による実費頒布をおこなって
お.)ます。
JAERI-M回 por匂 a開 issuedirregularly.
Inquiries about availability of the reports should be addressed to Information Section. Division
of Technical Information， Japan Atomic Energy Research Institute， Tokai‘mura， Naka-gun.
Ibaraki-ken 319-11， Japan.
。JapanAtom記 EnergyResearch Jnstitute. 1984
編集兼発行 日本原子力研究所
印 刷 い I:!ら き 印 刷 附
JAERI-M 84-162
-COOLOD-
m. a & s
(1984 ^ 8 M 13 B g S )
&#»&ffl5£3?i!t*#ftfiE3 - K- COOLOD l±. fl^0&&aff£fflH-*«li C»»*P«.
« . JRR-4ltS^it^(CJ;5fflSffli©lt^it^lCJ;i9T'c5J^mS-C :-at-Sf:i*i«ifet.nT
i
JAERI -M 84-162
板状燃料を使用する研究炉の熱水力計算コード
-COOLOD--
日本原子力研究所東海研究所研究炉管理部
渡辺 終吉
(抑制年 8月13日受理)
板状燃料の定常熱水力計算コ}ドー COOLODは.研究炉の燃料温度分布計算をはじめ冷却塔.
熱交繰器などの冷却系統も含めた熱計算が行える。本コードは，研究炉燃料の濃縮度低減化計画
及びJRR-3改造炉などの定常熱水力解析用として開発され，種々の研究炉11:適合できるよう配
慮されている。また燃料要素内各部の圧力分布，飽初混度.沸騰開始温度.パーンアウト熱流束
など安全評価の目安となる諸数値について詳細な情報が得られるよう配慮されている。本コード
は. ]RR-4計装燃料による測定値との比較計算により完分な精度で一致する乙とが確められて
いる。
JAERI-M 84-162
COOLOD : Thermal and Hydraulic Analysis Code for Research Reactors with Plate Type Fuel Elements
Shukichi WATANABE '
Department of Research Reactor
Tokai Research Establishment, JAERI
( Received August 13, 1984 ) The COOLOD code has been developed for thermal.and
hydraulic analysis in research reactors with plate type fuel elements.
The code is able to calculate not only temperature distribution in fuel elements but also heat transfer in a heat exchanger and heat removal by a cooling tower. The code provides detailed information of various parameters for safety evaluation, e.g. pressure distribution, saturation temperatures, boiling temperatures and burn-out heat fluxes at various point in a fuel element.
The calculated results by the code are satisfactorily agreed with the measured values by an instrumented fuel.
Keywords : Computer Code, Thermal Analysis, Hydraulic Analysis, Fuel Plate, Research Reactor, Temperature Distribution
ii
JAERI-M 84-162
COOLOD Thermal and Hydrau1ic Ana1ysis Code
for Research Reactors with P1ate Type Fue1
Elements
Sliukichi WATANABE
Depar七mentof Research Reactor
Tokai Research Establishment， JAERI
( Received August 13， 1984 )
The COOLOD code has been deve10ped for thermal.and
hydraulic analysis in research reactors with plate type fue1
e1ements.
The code is able to calculate not only temperature
distribution in fue1 elements but a1so heat transfer in a
heat exchanger and heat remova1 by a cooling tower. The
code provides detailed information of various parameters
for safety eva1uation， e.g・pressuredistribution， saturation
temperatures， boi1ing temperatures and burn-out heat f1uxes
at various point in a fuel element.
The calculatp.d results by the code are satisfactori1y
agreed with the measured va1ues by an instrumented fue1.
Keywords Computer Code， Thermal Analysis，
Hydrau1ic Ana1ysis， Fuel Pla七e，Research Reactor，
Temperature Distribution
11
JAERI-M84- 162
@ ifc
1. F¥ 1 2. * a - KO#® 1 3. g # f t g S • •• 3
3.i jommtttn; • ' 3 3.2 totem*-?* 5
3.2.1 mmmft%mmm&m 6 3.2.2 mm&i%&m 7 3.2.3 &»mmmv 8 3.2.4 &«K®tt(2) 9 3.2.5 DNB Mffi.%. 9
3.3 Exm&im • 10 3.4 }§wm 13 3.5 &£&§§ 15
4. -fa >f? AOflJsS 17 4.1 3 - K 8 ) 7 a - f t - h 17
5. A7j7--*fflffr£ 34 5.1 Ki}f -^ffriRi:®®*^ 34 5.2 Atir-f omen 35
6. J R R - 4 if&mmaufct&toit&ftw- 43 6.1 J R R - 4 ftgrnnomw 43 6.2 tmmm&gLitincm^-fzAtir-? 43 6.3 $mmnic£.zmm&BL<Dftf& 44 6.4 ttgfilK • 45
7. &m 52 mm 52 # * X « • 52
PttA. tefflLfc«Jt!l:tS*CO^T 54 PtfB. yn<r?&>) zb 58 mc. AJir-fm 94 WD. mum 96
Hi
JAERI-M84 -162
目次
1.序.~ ~.・ H ・....・ H ・...
2. 本コードの特徴・H ・H ・'"
3. 基本計算式…...・ H ・...・ H ・.........・H ・'"・ H ・....・H ・'.… H ・H ・.....・H ・.........・ H ・.，…H ・H ・'"・H ・..….. 3
3. 1 燃料温度分布....・H ・....…………....・H ・......・M ・'"・H ・-……・・ H ・H ・-…・....・H ・-…・・ H ・H ・.，・ 3
3.2 熱伝達モデル…....・H ・....・ H ・...・ H ・..…....・ H ・.....・ H ・H ・H ・.....・ H ・.....・ H ・............・H ・"…. 5
3.2.1 単相流強制対流熱伝達… H ・H ・......・H ・..…....・H ・'"…….........………………・…… 6
3.2.2 沸膚開始温度...・H ・.....・H ・-…...・ H ・...・ H ・......・H ・'"・ H ・'"・H ・...・H ・....・H ・..........… 7
3.2.3 抜梯属領域(1)・H ・H ・.....・ H ・....・ H ・...・ H ・.....・H ・....・ H ・.......・H ・....・ H ・-………H ・H ・.. 8
3.2.4 核沸騰領域(2)...・H ・....・ H ・.....・ H ・....・H ・...・ H ・.....・ H ・...・H ・........・H ・....…………・ 9
3.2.5 DNB熱流東…...・ H ・.....・ H ・.....・ H ・....・ H ・...…...・ H ・...・H ・....・ H ・-… H ・H ・..…...・H ・. 9
3.3 圧力損失詐覧.~..'" ......…....・H ・........・ H ・........・ H ・...・ H ・-い H ・H ・....・H ・........・ H ・...・H ・..10
3.4 冷却培・ H ・H ・...・H ・..……...・H ・H ・H ・...…...・ H ・..…...・ H ・...… H ・H ・....・H ・..……H ・H ・...・H ・.13
3.5 熱交換器…・・H ・H ・-・・H ・H ・....….....・ H ・........・ H ・-…..，・H ・-…....・H ・...・ H ・.....・ H ・.....・ H ・...15
4. プログラムの構成…"...・ H ・..…・ H ・H ・.....・ H ・.....・H ・..……...・H ・-・…...・ H ・.....・H ・H ・H ・..…… 17
4.1 コードのフローチャート…...・H ・.....・ H ・...........・ H ・..…...・ H ・.....・ H ・..…H ・H ・......・H ・..17
5. 入力データの作成….，.・H ・......・ H ・....・ H ・-・・…… H ・H ・......・ H ・.....・H ・.....・ H ・....・H ・......・ H ・-・… 34
5. 1 入力データ作成上の留意点H ・H ・...・H ・..……・H ・H ・."・H ・H ・..…H ・H ・...・H ・."・ H ・...… H ・H ・34
5.2 入力データの説明… H ・H ・...……...・H ・...……...・V ・..，・ H ・.....・ H ・......・H ・....・ H ・...……… 35
6. ]RR-4 討議倣料測定値との比絞計算…...・H・...・H ・.....・H ・.....・H ・~..，.・ H ・...……H ・H ・..… 43
6.1 JRR-4計装燃料の額要・…....・ H ・...・ H ・....・ H ・.....・H ・-……H ・H ・-……'"・H ・.....・H ・-…・ 43
6.2 計装燃料温度計算IC用いた入力データ… H ・H ・...・ H ・....・H ・-………………H ・H ・-…・…・ 43
6.3 計装燃料による測定温度の評価…...・ H ・..…...・H ・.....・H ・..… H ・H ・...・H ・....・ H ・......・H ・..44
6.4 計算結果…・ H ・H ・-…....・H ・....・H ・-…・・H ・H ・...・ H ・...・ H ・.....・H ・...・H ・-……....・ H ・...・H ・..45
7. 結語….....・H ・.....…...・H ・-・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・ 52
謝辞・…....・ H ・........・ H ・...・ H ・.....・ H ・.......・ H ・.....・ H ・-…......・ H ・-…...・H ・-・・ H ・H ・e...・H ・....・ H ・.52
参考文献...・ H ・...・H ・.......・H ・...…・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・ 52
附A.使用した物性値について…… H ・H ・...・ H ・H ・..… H ・H ・..........・ H ・...・...……'"・H ・..…...・ H ・..54
附B.プログラムリスト..，・ H ・.......・e・..………・..................・H ・'"・H ・.....・H ・...・ H ・.....・ H ・.....・ H ・...58
附C. 入力データ例...・H ・.....・H ・...・H ・....・H ・H ・H ・.....・ H ・....・ H ・....・ H ・...・ H ・...・ H ・...・H ・.~..・ H ・..... 94
附D.出力例・H ・H ・H ・H ・........・H ・..
111
JAERI-M84- 162
CONTENTS 1. Introduction 1 2.. Features of the Computer Code 1 3. Equations for Calculation 3 3.1 Fuel Temperature Distribution 3 3.2 Heat Transfer Model 5 3.2.1 Heat Transfer in Forced Convection single-phase Flow .... 6 3.2.2 Onset Temperature of Nucleate Boiling . 7 3.2.3 Heat Transfer in Nucleate Boiling (1) 8 3.2.4 Heat Transfer in Nucleate Boiling (2) 9 3.2.5 DNB Heat Flux 9
3.3 Pressure Drop Calculation 10 3.4 Heat Removal by Cooling Tower 13 3.5 Heat Transfer in Heat Exchanger 15 4. Program Structure 17 4.1 Flow Chart of the Code 17 5. Input data 34 5.1 Remarks for the Input Data 34 5.2 Description of the Input Data 35
6. Comparison of the Calculated and the Measured Temperature on the JRR-4 Instrumented Fuel Element 43
6.1 Outline of JRR-4 Instrumented Fuel Element 43 6.2 Input Data specified for the Instrumented Fuel
Temperature Calculation 43 6.3 Evaluation of the Measured Temperature • • 44 6.4 Results of the Calculation 45
7. Conclusion 52 8. Acknowledgments 52 9. References 52 Appendix A. Physical Properties • 54 Appendix B. Program List 58 Appendix C. Sample of the Input Data • 94 Appendix D. Sample of the Output 96
IV
JAERI -M 84 -162
α:m宮司3
1 . Introduction -・・・・・・・・・・・・・・・・・・・・・・...，....'.....・・..，.....'.
2. Featur旬 ofthe C咽削除rCode
3. Equations for Calculation ••.••• •• . • . • . . . • • . . • • . . . . • . •• • • . • • . • 3 3. t Fuel T，岨peratureDistribution •• • • • . • • • • • • . • • . . • . • • • . . • . . . • . 3 3.2 Heat Transfer肱)(fel .. • • • .• •• • •• . •. . • . . . • . . • • • • • . . • • . . • . . • • . 5 3.2.1 Heat Transfer in Foro剖白柳田tionsingle-phase Flow .• . . 6 3.2.2 or国et1唱団関ratureof Nucl伺 teBoiling • • • . • . . . 0 • • • • • • • • • • 7 3.2.3 Heat Transfer in Nucl舗 teBoiling (t) ・・・・・・・・・・・・・・・・・・・ 8 3.2.4 Heat Transfer in Nucl舗 teBoi1ing (2) • . . .. . .. ... . . • ... •. 9 3.2.5 Il也恥atFlux .，.. . . . D. • • • • • • • • • • • • • • • • •• • • • • • .事......... 9
3.3 pr回 sureDrCJP白 lculation • • . . . . . • • . . . . .. . • . • . . . . . . . . . . • . . .. 10 3.4 Heat R個 ovalby C∞ling Tower ••..•.........•...•........... 13 3.5 Heat Transfer in H舘 tExc'hanger ... .. .. .. .. .. .. .. .. . .. . .. ... 15
4. Progi"dDI Structure • • . . • . . . • . . . . • • . . . • • . • . . • • . • . . . • • . . • • . • • . . .• 17 4.1 Flow Chart of the Code ..........................・・・・・・・・・..17
5. Input data • • . • • • • • . • • • . . .. • • . • . . . . . . • . . . . . . . . . • . . • • . • • • . . . . • .. 34 5.1 R，伺.arksfor the Input Data •..• . . . • . • • . . • . • • • . . • . . . • . . • ， . . .. 34 5.2 Description of the Input. Data .............................. 35
6. C咽開risonof the Calcula1c.ed副 dthe Measured T，岨peratureon the J問 -4InstrUl聞は回FuelEl個伺t •..•••••.••...••.••..•. 43
6.1 Outline of JRR-4 Instru鵬 ntedFuel El岨削t ••.••......•...•• 43 6.2 Input Data sp民 ifiedfor t~e Instrum叩 tedFuel
T個開ratureCaloulatioll •...• • • . .• • • . • •• . . . . .. . • . . . . . •• . • • .• 43 6.3 勘 aluationof the H国 EJuredTes略国erature ・."..................44 6.4 R個 ultsof the白 lculati棚 ・・・・・・・・・・・・・・・・・...... .......... 45
7. Conclusion . • . • • • . • • . . • • . . . . . . • . • . . . . . . • . . . • . • • . . . . . . . . . • • . • •. 52
8. Acknowled伊創出...... .. . .. . .. . .. . . .. . . . .... . . .， • •• • •. • • .• •..• 52
9. Refer倒 C回....................................................52
Appendix A.円lysi伺 1Properti回... • .. . . .• '" . . . . . . .. ... .... ... '" 5~ Ap開 ndixB. Progr岨 List ........................ー...............58 Ap開 ndixC.晶 mpleof thc Input Data ..................，........ • 94 Ap開 ndixD. Sample of the Output ......................“.......... 96
Iv
JAERI-M84-162
1. ff
J B J f a - K i L r . '&&. ±ICjRR-47?ffiff l$nr§fc='-K.COOLOD«-«-^lC*^L-3S
*¥«E*i9?»i5J;9«,ff l t t«-fefc-a-SJ;-pEfl[t3nT^5 0 * f c # * P « , »£*ggtt«!f©&S)
^&8i5fflSS*«it;i6. *5£M£fiffi£#. £frSEftil&. *»§8tefiK, ><-vr*> hftftJK
*«itt, t © 3 - K o ^ s t st^^-iS. A#^-*©fft&E^ilitt£«eoi>T#^fcfc©-e. J R R - 4 J t K « W K « f c * i | J © W t o J t t t l H | [ * m ^ . * © I S * t e o ^ T f e * W L f c o
2 . * 3 - K « « f i
COOLOD a~ Ktt. «#*S*fflffl*sw§fcffliI^<o i . 2atf&i|j&*-£<tr*tfttt*jm •T5fc«>KBa«$ftfc3-KT?*So ^ & © ^ f t j m t f W f f i ^ f t * t t . ^n-eniMBiK:. **<,>ttffl&-B-Tff'5t£*<-*?#. *©*S3l;£:KWS'ffclJ-SC £#-£••#*0 It**J&©«l&ttJyT ©aotr-*5o
(1) jK^MKltJ*
5 0 «)|El-ll3g(*9©SJIl«^K©^«iSgffi*^ni:5ii^Jf>*n«-(i$ir^SPW^gS©B^. ftifltt «EJS**Stt5«fc-5tt#*fffc&*P£#Koi>Tfc£TO&©SK#ft##a6bn3o * * : | H M F
(2) ftSP^SRlt* -(Sic. mimm:r-fp<Dt*&. mTtp-efk&ifzmzmmtzctimi. m%*&Ruft
- i -
JAERI-M84-162
1.序
現在.研究炉用燃料の漉縮度低減化及びJRR-3の改造計画がすすめられている。とのなかで.
各炉で使用する各種の解析コードは可能な限り統一するという乙とが合意され.定常時の熱水力
解析コードとして.従来.主に ]RR-4で使用されてきたコードCOOLODを各炉に適合しうる
よう墜備し，使用するととになった。
本コードは乙のような経鈍から.冷却材として経水及び重水.冷却材の流向も上昇流.下向流，
水平流が取扱えるよう汎用性をもたせるよう配慮されている。また冷却塔，熱交換器などの冷却
系各部の温度をはじめ.燃料板温度分布.炉心部圧力損失，務腿開始温度，パーンアウト熱流東
などを計算し.定常時の熱水力特性IC関するほとんどの情報が得られ~ようになっている。さら
に燃料温度の計算は.燃料板をはさむ流路の冷却条件が異なる非対称冷却についても取飯う乙と
ができる。 ζれにより従来の多くの熱計算コードが単独の燃料仮の温度分布計算しか行えなかっ
たのに対し，本コードでは燃料要素内の幾層'Cも重なる各燃料板の温度分布を計算する ζとがで
きるようになっている。
本稿は.乙のコードの特徴，計算手法，入力データの作成手順なと、について述べたもので.
JRR-1計装燃料による測定温度との比絞計算を行い，その結果についても検討した。
2. 本コードの特徴
COOLODコードは.仮状燃料を使用する研究用原子炉の 1.2次冷却系を含む熱特性を計算
するために開発されたコードである。冷却系の温度計算及び燃料仮海度計算は.それぞれ単独に.
あるいは組合せて行うととができ.その結果を図形化するととができる。計算内容の概略は以下
の通りである。
llJ 燃料仮温度計算
燃料仮の温度計算は，燃料板内の厚み方向の発熱分布をー織とし. 1次元のみの熱伝導を考
慮して計算する。舶方向の温度分布は.冷却材温度上昇及び紬方向発熱密度分布から求められ
る。燃料要素内の各燃料板の発熱密度が異なる揖合やそれをはさむ冷却材、伊路の形状.冷却材
流速が異なるような非対称冷却条件についても各燃料板の温度分布が求められる。また同一炉
心に異なる形状の板状燃料要素が挿入されているような場合でも，発熱分布係数等を入力する
ことにより，それぞれの鍛料要素内の温度分布を計算することができる。
燃料君、材は. UAI合金燃料及びUAfx 分散型燃料について取級う ζとができる。 1次冷
却材は.続水及び重水について.それぞれが週択でき J ようになっている。
(2)冷却系温度計算
一般に.研究周原子炉の場合，原子炉で発生した熱を利用する乙とはなく.熱交換器及び冷
却場を介して大気中IC放出される。燃料板温度は.冷却材の温度に依存し.冷却材温度は熱交
- 1 -
JAERI-M84- 162
teSJ^OSffiftiHi. 1 . 2 & & E ^ , S»£«38^i&>&©!Rffl&tf£^LTJ}»&-Oi5o
.*£«§§(*. iRlStEM. afi«a!SafU?Wa!S»3g»3g©J:'5<s:PfilJm^^'WIB02m^^»3g
(3) EEflJI*. ONBzgg. DNB Syftlfiftir W3£ffllH^pfflifi£. £«SB£li$K:;fo^-c£ffi»Ri£tfstti^tii^ffl^-IRWtt^-l^-e
< a S i L T O N B (Onset of Nucleate Boiling) «• S3S112>—S9©3^^.^***5 0
*fc»»g|4&aS(i , * 4 K « i » K j : « t H i l S o ^ K S t t * * t f * » ® f c J 6 T ' ! e - f LfcflW H3B©££t t f f l f f i l l«^k©Tt t t t^£LTDNB S&aESM^S-SSHCi 5^*.:Sfe<&.£„ * 3 -? -*?« . S£JB0r©gg£ft3lS*tlfflK. ONBSS. DNB » « E m K ^ T * n e f t : f c
(4) tt»ife^©7°o. y h mnm/g&. jamas. oNBas^&TO^ityn.;, h-rsctAi-ess,, s^^g-
•5K. JRR-4©Itg*B^-C !©ai|^M£JtR$n. SfcEStifc,,
- 2 -
JAE随一M84 -162
換器や冷却塔の性能等によって決まる。
冷却系の温度計算は. 1. 2次系配管，熱交換器等からの熱の遊げを無視して求めている。
冷却塔は.向流型冷却塔について取扱える。
熱交換器は，向流型，並7t.~盟及び U字管型熱交換器のような胴側mパス・管側 2mパス熱交
換器を取扱う乙とができ~。
(3) 圧力損失.ONB温度. DNB熱流束計算
研究用原子炉の場合.定常運転時において表面沸臆を許さないというのが一般的な考え方で
あるn しかし，具体的な表面温度を何度まで許容するのかという点については，単純に冷却材
の飽和温度を基準とするものと強制対流サプクール水の掲合の梯鵬開始温度は飽和温度より高
くなるとしてONB(Onset of Nucleate Boi1ing)を基準とする二週りの考え方がある。
また沸勝開始温度は.ボイド発生等による計測器の不安定性をさける等のためで必ずしも燃料
要素の安全性の限界を示すものではないとしてDNB熱流束等を基準にとる考え方もある。本
コードでは，安全解析の目安となる飽拘温度.ONB温度. DNB熱流束についてそれぞれ求
める乙とができる。圧力損失は.冷却材の局所圧力を求め，それを基塑IL飽和温度等を求める
ために計算され，流量分布等の計算には用いられていない。流れの方向は，上昇流，下向流及
び水平流について取扱える。
ω) 計算結果のプロット
燃料坂温度.飽如温度.ONB温度等を各燃料板毎ILプロットするととができる。また必要
に応じて，各燃料叡温度を 1枚の図面11:重ね書きし.それぞれ比較検討する ζ ともできる。
本コードの特徴の主な点は以上であるが，本コードの妥当性については，第6章でのべるよ
うに.JRR-4の計装燃料での測定値と比較され，検証された。
- 2ー
J A E R I - M 8 4 - 162
3. 3 S * #f-g £
3.1 JKtttUKfttr
« * * & © a & # ; f i i i . W^ fa - t r o fga f tS -J^ - t L , l ^ o . ^ o s a f e * ^ * . . H 3 . 1 0 J ;
SKIS 2
H 3. l # * m ; # £ P « m « 2 l S f t * * f *
(1) «R*4.-S»«^Sffi ( T u 0 ) T „ o = T B u l + /?5- ( Q o / 2 - ? m l ) - X a l
2
= T B u 2 + ^ - ( Q o / 2 ^ m 2 ) - X a 2
2
(2> amsttuffi ( * X K D a s CTBU») T B U I = TOBI + ^ 4 - ( Q 0 ' X a l / / « B 1 ) - X B
T B u 2 = T 0 B 2 + 04 * ( Q o - X a 2 / - ? B 2 ) - X B
o) &mttm. ( T 0 B X )
T O B I = T 0 , + 03 • (Qo • X . i / J a t ) * X 0
TCB2— T02 + 03 * (Qo * X l 2 / ^ 0 2 ) ' Xo
(4) S a S E S K ( T 0 s )
To, = T w l + 0 2 • (Qo • X . , ) / ! ! ,
(3.1)
(3.2)
(3.3)
(3.4)
(3.5)
(3.6)
- 3 -
JAE随一M84 -162
3. 基本計算式
3.1 燃料温度分布
燃料仮の温度分布は.厚み方向での発熱を均ーとし次元のみの熱伝導を考え，図 3.1のよ
うに然科板をはさむ2つの流路の冷却条件が異なるいわゆる非対称冷却の場合を考えると，各部
の温度は以 Fのようになる。
流路 1
冷却水
ポンド層
燃料ミ1-ト
ポンド眉
被覆 2水
路
却
till--v
流
冷被覆
T"'l x。 B Xa1 Xa2 IXBI
図3.1 非対称冷却燃料根温度計算モデル
(1) 燃料芯材最高温度 (Tuo )
Tuo = TBu1 + 115・(Qo/2Am1)・Xa12
=TBu2 + 115・(Qo/2Am2)・X.22 ( 3.1 )
(2) 燃料芯材表面(ポンド層)温度 (TBux )
TSu1 =T 口BI+ 114・(Qo・X.1/'AB1)・XB
TBu2= TOB2 +ん・ (Qo・X.2/ AB2)・XB
(3.2 )
(3.3 )
(8) 披覆材温度 (TOBx)
TOB1=T，口1+ fl3 ・(Qo・X.I/AOI)・ XO
Taz= T02 + s3 ・(Qo・X'Z/A02)・XO
( 3.4 )
( 3.5)
(砂被覆表面温度 ( TO.)
T01 = Tw1 + flz・(Qo ・Xal )/h1 ( 3.6)
- 3 -
JAERI-M84- 162
T 0 2 = T w 2 + / 3 2 . ( Q 0 . X a 2 ) / h 2
(5) &Sfl**gS . ( T „ )
Twi = T w 0 + 0, •-£• f Q , ( z ) dz " 1 Jo
T„i = T w O + 0 1 . — [ Q 2 ( z ) ( k w i J 0
(3.7)
(3.8)
(3.9)
5* (3.1) *>S5t (3.7) «r*ia6TBa-T5i
T r a „ = T W I + ^ 2 S i x - + / 9 3 Q 2 x i i . X C + ^ Q ^ Qoju "01
U2 + P2 +&, ] + P 4 ~ ^ 'XB+PS—T 2
2 *m2
2 ^ i
( 3.10 ) 2
£te3o t i t ? •
Q i = = Qo X . i
q 2 = = Qo • x a 2
Xa0 =xa ,+x »2
Qo = = q i + Q 2 = =Q. •x.,
1
Ui = t>z
1 \- r 3
Xo ( A ^Bl
A X a i 2 ^ m ,
1 — a. 1 ft Xo A J^H -fir X a 2
U 2 h 2 ^02 ^B2 ^ m2
i ^ S L , S (3.10) ~ (3.17) £P< £
q i =
q 2 =
U j + U 2
u2
u,+u2
(q 0 +U 2 ( T w 2 - T w j ) }
{ q 0 + u , ( T W I - T W 2 ) }
(3.11)
(3.12)
(3.13)
(3.14)
(3.15)
( 3.16 )
( 3.17 )
( 3.18 )
( 3.19 )
£&--5o cc-e. X. X c
h X
Qo
mn^mffifrt>Mn$;M&mm.*-e<o!m (cm) ttfltttVS (cm) »easp ( cal /cm2 • sec • "C) 3»e*^ (cal /cm • sec • "C)
mm&mmmm (cai /cm5 • sec)
- 4 -
JAE随一M84-le2
T02 = TW2 + s 2・ (Qo ・Xa2)/h2
(5) 冷却水温度 (Twx
)
( 3.7)
丸 I=Two+s1・W1f:い )dz (3.8 )
じ2=T"o+s1・す〔 Qz(Z)ゐ (3.9 )
式 (3.け か ら 式 (3.7)をまとめて整理すると
Tmo = T"I + s2竿己 +s3生存・Xc+ s4虫記・XR+ム日4"1 縄
01 ，(BI
-• 2 Aml
( 3.10)
=T，日2そX.2 +ん生存+s4年!.!.. XB + s5包ぷ
112 "02 "B2 .•
2Am2
(3.11 ) となる。乙乙で，
ql=C!O・X.l ( 3.12)
( 3.13 )
(3.14 )
( 3.15)
Q2=QO・X.2
X.O =X.J +X.2
QO=QJ+Q2=QO・X.O
Xn XA X.， --=ん一一+ら一二ー+んーニ+{Js ~-:. UJ
. • h J
. "A
01 ••
ABJ • " 2 Aml
( 3.16)
Xn 文R X.2 一一=んー一+んーーと+ん +ss .:-:. U2
• • h 2
• 0
.102 ・AB2. •
2 Am2
( 3.17 )
と定義し，式(3.1 0) - (3.1 7)を解くと
、，JW
T
'e w
T
，z・、，，“
U
1T Ru n-
目
。
&一U町一+一U
nuz
(3.18 )
2=-EL {qo+UI(TwE-Twz)} UJ+U2 ・
( 3.19 )
となる。ととで，
X. 燃料芯凋表面から燃料芯材最高温度までの距離(cm)
Xc 被覆材厚さ (cm)
h 熱伝逮寧 (ca1/αrl• sec ・"C)A 熱伝導率(caI/cm ・sec・"C)
QO 燃料仮内発熱密度(伺1/四 /・ sec )
- 4 -
JAERI-M84- 162
q
W
G
C P
ft
h
(cal /em 2 • sec ) ,. Q 2 ( I ) ;*ffigSS«3 ©«»*«*> &^a*^OfeS»« (cal /cm-sec ) * S » (ca]/sec •°C)=G»C P
fi«ffi* (g / sec) 5£Ett,lft ( c a l / g - ' C )
* (JBS&SMlEJi^a?) ft
1 ; * +• > * ; n ffiij
2 ; •? + >*^2(BiJ m ; SW C ; $ S # B ; df v Kg w ; ^SP*
[ l i , f t y * * i ao f2T?* * i ^ *nH- *L fc *8»S* tJB i l 5aS*^L< / j :S * Y , iC (3.18) ~ ( 3 . 1 9 ) K J : 5 e * l * © S » ^ < i j iSt- C tic J; -?T#J6 b*XS<,
it, X„, = £**¥)?£ LTit (3.1)~(3.9) © 1 7 + : '*^©**tt*-r3t£K«fcoTMMIUc
- £ . «S*4gsg£&K#§L*:«£. Sttf4K<D)&K. SkUtM ( ^ ^ f i ^ ) **»«->fc
•f^T^fcfWSiP (*-KF52©KMX = 2) £ L , «**«"N » ffl«EK(2) ±JB**ffi" N + 1 " ©
•jmim>iftt>tltcm&&. OUTPUT© l *<-i?IC" COOLANT TEMP. - (MIXED • MODEL)" iftfiHISn. Zrmte^m&li" (SEPARATED MODEL)" £ t t3„ " (SEPARATED MODEL)" ©J§£. £«***&&§£ I*. RfflflmSStfteaflttSKiaiBSfli K («EKtt*ffl*/t»«8*«Hc»^»sftTi^£SS-x) ft t lSfiSo
3.2 Jfcfiii^T^U
- 5 -
]AE町一M84-162
q 熱流束 (cal/cnf・sec)
Q，(z). Q2(z) 単位長さ当りの燃料板から冷却水への伝熱量(cal/crn・sec)
w 水当量 (cal/sec・.C)=G・Cp
G 重量流量(g/sed
Cp 定圧比熱(cal/g・.C)β ホットチャンネル係数(冷却材パルク狙度上昇因子)
ん " ，，(フィルム温度上昇因子)
ん " "被覆材温度上昇因子)
s4
s5
(添字)
チャンネル 1仮tl
2 チャンネノレ2側
11 (ポンド層温度上昇因子)
(燃料芯材温度上昇因子)"
m 芯材
C 被覆材
B ボンド層
w 冷却水
z 燃料芯材土端(入口)からの距離
燃料板各部の温度は，チャンネル 1及び2でそれぞれ計算した燃料芯材鼠高温度が等しくなる
まで，式(3.18) - (3.19)による伝熱量の配分をくり返す乙とによって求められる。
以上は，燃料板をはさむ流路の冷却条件が異なる非対称冷却の場合であるが.対称冷却の掲合
は.X.，芯材半厚として式 (3.1)-(3.9)の 1チャンネルのみを計算する乙とによって簡単に
求められる。
一方，燃料要素全体Ir.着目した場合，各燃料板の形状，発熱量〈ウラン含有量等)が異なった
り.あるいは流路の形状.流速が無視できない程度に異なる場合がある。 ζのような場合，各燃
料板からの熱移動量は，共有する流路を介して相lilζ影響を及ぼし合う。本コードでは，流路の
冷却材温度を計算するにあたって両側の燃料板からの熱伝還を考慮する乙とにより，燃料要素内
各燃料板の温度分布を求める ζとができる。 ζのような計算を行うには，各燃料板の冷却条件を
すべて非対祢冷却(カード F52のKMX=2)とし，燃料板"N"の流路{幼と燃料板 U N + 1 .の
流路(l)のデータ(カード F53)がすべての燃料板について一致していなければならなし、。乙のよ
うな計算が行われた喝合は. OUTPUTの1ページIr.'電 COOLAHTTEMP.…(MIXED
M:OfJEL) .と印刷され.そうでない場合は鴎 (SEPARATEDMODEU.となる。
" (SEPARATED MODEL)'の場合.各燃料板温度は，隣の燃料板及び冷却材温度と無関係
に(流路はその中心線を墳に断熱されていると考え)計算される。
3.2 熱伝遺モデル
熱伝達棺関式は.単相流の強制対流熱伝遥から強制対流サプクール沸fft熱伝達まで取扱え.そ
の関係は，図::..2に示されるようになっている。
ED
JAERI-M84- 16?
*t
i x l O 7 -
5 x i o s -
kcal /
irf.hr 1 x 106 -
5 x10 s -
1 x 105
5 10 A T S A t (deg. -C)
13.2 &®&mmM&e>m& /&ti= 1.8 kg/cm2• a , Tsat= 116.3 °C > \ffiM= 1 m/sec ft£P*'f.'i/?zaK50oC£ LTH-g/
3.2.1 #ffi*KafflttfflR&S
0 D
Nu = H 1 * ( R e
A - H 2 ) * P r
B * [ l . 0 + H 3 ( - ) ] * ( - — ) (3-20)
Re : L"f /vi/X3$
d ; *:*J^W*SSfi& (cm) z ;ffiKAa*>e.fflffif« (cm)
- 6 -
jAERI-M 84 -16?
1 X ]01
熱
流 5x 10'
束
Q
kcal /
rrf.hr )
1 x 10' ・ー
5'>( 105
ONB Point
(BERGLES-ROHSENOW CORRELATION)
1 X l(l'
5 10 50 100
{:， T SAt (deg. 'C)
図3.2 各熱伝達相関式の関係
(圧力=1.8 kμm2.a. Tsat=附℃ )
流速=1 m/sec 冷却水パルク温度 50.Cとして計算/
3.2.1 単相流強制対流熱伝達
単相流の強制対流熱伝達相関式は.一般にレイノルズ数R.とプラントル数P，の関数として与
えられている。本コードでは，相関式を次のように表わしている。
Nu=H1#(Rf-H2) 持 P~* [1.0吋;)ロト(合)D (320)
Nu ヌッセルト数
Re レイノルズ数
P，プラントル数
d 水力学的相当直径 (cm)
z 流路入口からの距離 (cm)
- 6 -
JAERI-M84- 162
pb ; &&%% mw^^mmmm) (g/cm -sec) t>„ ; " " (SBSfiS^P) (g/cm*sec)
S; (3.20) CDHi~H2&0'A~D(i-f vf-j h-CffitlC^XbtlSo
a) i t l?/l©fiSK&tt3t/tti l£ffl^3*siifK (a) Colburn fflS
N„,= 0.023R e f°'8 P r f ^ (3.21)
(b) Modified Colburn © S
N„, = 0.023 R e f ° - 8 P r f ° - 3 (3.22)
(2) ^ ^ 7 S K < C * > ^ 5 ^ t t M * f f l ^ « f f i l i S ;
(c) Dittus -BoelterffliC
N u b = 0.023 R e b ° ' 8 P r b
M ( 3.23 )
(d) Sieder -TafeOiS
0.14
N u b = 0.027 R e b ° ' 8 P 2 A (— ) ( 3.24 )
(e) Hausen © i t
N, 3/5
= 0.116 C R e b x ^ - 1 2 5 j Pr ta^ [ l + ( ~ ) l ( ^ ) (3.25)
£:£*;&** So Si (3.25) (4 . R e =2300~6000 ©Jlffirt>£&ffi©«f£<Ii$Tkj£«):&c>£a::n
S (3 .21)~ (3.25) © g s ^ f (4, » 4 M & £ S f t £ L T t i J ? J l c O S S - £ , b f i M ^ V t ^ S S * i 5 o * 3 - KT?<4, t f f f l !©g38iSgK-3l>T, -Y y7°y h#-KT?jgJRT-§.SJ:-5JEtt ^ T I ^ S (5 .2A^7x-^ f f l i ^a^ , CARD<Ei>#BS) „
3. 2. 2 «
®f f iW^TT0$$; i»§ i§&«mt4Berg less -Rohsenow f C ^ T f e S T ' ^ v L ^ t t S o ^
- 7 -
JAERI -M 84 -162
へ;粘性係数(流体パノレク温度基準) (g /cm • sec )
ん N If 壁面温度基準) (g /cm. sec)
式(3.20)のH，-H2及びA-Dはインプットで任意に与えられる。
Re数などの無次元量を決定する物性値は温度によって変化する。したがって.原子炉のよう
な温度変化の大きい伝熱過程を取扱う場合，物性値を決定する温度をどのように選ぶかが重要に
なって〈る。乙のような観点から熱伝達相関式を大別す~と
(1) 境界層の温度における物性値を用いる相関式
(a) Colburnの式
Nur= 0.023 Re/.8 Prr凶
lb) Modified Colburnの式
Nuf=0.023Ref0.8Prf0.3
(2) パJレ7温度におげる物性値を用いる相関式
lc) Dittvs -Boe1terの式
0.8 _ 0.4 NUb = 0.023 Reb-'. P rb-'
(d) Sieder -Tafeの式
NUb = 0.027 R
(e) Hausenの式
(3.21 )
( 3.22 )
( 3.23 )
(3.24 )
roll6〔Ref-1251Pペ1+(;)1(f)4(削
などがある。式 (3.25)は.R e = 2300-6000の局流から乱流の遷移領域でも成り立つとされ
ている。
式(3.21 ) "-(3.25)の添字 fは，物性値決定温度として境界層の温度を. b は流体ノぜノレ7温
度をとる。本コードでは，物性値の基準温度について，インプットカードで選択できるようにな
っている (5.2入力データの説明， CARD<EI>参照)。
乙れら相関式の選定にあたっては.(イ)相関式の実験範囲が設計条件に適合しているかど唱うか.
{ロ民全側の評価を与えているかどうかを充分見極める必要がある。各々の相関式の比較において
も，流速，流体温度，壁面温度，熱流束等が異なれば，ある湯合は高めに.あるいは低い熱伝達率
を示す乙とがある。従って，熱設計にあたっては，いくつかの相関式を用いて相互比較す~とと
も必要であろうと思われる。
3.2.2 沸勝開始温度 TONB
強制対流下での絞沸勝開始熱流束はBergless-Rohsenow によって次式で与えられる。1)
- 7 -
JAERI-M84- 162
1; = 0025293 P U 5 6 j | ( T C - T M | ) | 2.1615/P0.02M
(3.26)
( cal /cirf • sec • °0 E.U ( k g / c i r f a )
fiSIOSS (°C)
cc-e, q, p
I sat'
i f' q(z) T c { 2 ) = T m o + — j Q(z )dz+ — ( 3.27 )
C C t , J-OlQ
W
Q h
q
z
#£P7kAa^K (°c) * S » ( c a l / s e c t ) HfflTj^K ( c a l / c m ' s e c ) l i f f i ^ f i i i ^ (cal/cm 2 • sec • °C) S&ZSfESg ( c a l / c m 2 ' s e c ) * * » & & * • MB *»&«>£• Ccm)
• C * 5 o «•;£«> 5 fctt, S ( 3 2 6 ) , (3.27) O q , R C K q ( z ) # 3 ? L < ttS J; 9*
i g L I t g f c f T O c
3.2.3 ® *
C C T ,
q c = 0.023 (^ /D e )R e ° - 8 P°- 4 ( J T s a t + J T s u b )
P/20 36 q b = 4 . 5 0 e ' J T s a l ' / 3 6 0 0 0
q, ; &uttmmm»m®£fmffi (cai/orf • sec) q c : #$»l$©*t«t i f t f t?5 ( c a l / o r ? • sec ) q b ; W H i l f t ^ ( c a l / c m 2 -sec )
* ; »fc<Z>j!&£#sp ( cal / c m • sec • °C)
O e : * * j 5 S W « 3 i a S (cm)
J T . . , : a f t K CO J T ^ ; i c ^ - ' J y^* CO P ;E"/3 (kg/cm 2 a)
(3.28)
(3.29)
( 3.30 )
- £ * 3 o
- 8 -
JAERI -M 84 -162
a-Y 3
2
nu
nHV
PE. /
同制ー"。1
0& 、，E
ErEJ、Jt
a
s
T
C
T
，，‘、9
一5
r『，‘，，、
aO EU --
P 円。
nu
nru EU
。，unHN nu 一一i
nuz (3.26 )
ζ乙で qj 沸旗開始熱流東(cal / crrr • sec・"C)
p 圧力 (kg/crrra )
Tc 被覆表面温度 (OC)
Tsat:飽和温度 (.C)
である。
また，局所被覆表面温度は，冷却水温度及び熱流束から次のように求められる。
r< _. .. q (z) Tc(z)=T曲。+石10Qlz)dz+τ- ( 3.27)
乙ζで T印。;冷却水入口温度 (OC)
w 水当量 (ca!/sec・OC)
Q 線出力密度 (cal/cm• sec)
h 単相流熱伝達率 (cal/cm~ ・ sec ・ .C)
q 熱流束 (ca!/cm2・sec)
z 燃料芯材入口端からの距雌 (cm)
である。
沸臆開始温度TONBを求めるには，式 (326 ). (3.27)のqj及びq(z)が等しくなるよう縄
返し計算を行う。
3.2.3 核沸騰領域(1)
被覆表面温度がTONB を越えると沸臆が開始する。単栢流熱伝達から沸騰熱伝達への移行に連
続性をもたせるために.核沸勝の初期の段階は.強制対流と沸雌熱伝達を加味した次の佐藤・松
村の式)で計算される。
q¥ =q 'qb
qc = 0β23 (.VD.) R~.8 Pケ(4Tsat+ JTsub
(3.28 )
( 3.29)
qb=4.50eF/20dTsatち36000 (3.30 )
乙乙で qt 強制対流表面沸騰の全熱負荷(cal / crrr • sec )
qc 非沸勝時の対流熱負荷(cal/crrr ・sec)
qb 沸雌熱負荷 (cal/crrr• sec )
ー ;流体の熱伝導率(cal /cm • sec・.C)
u. 水力学的相当直径(cm)
.JT.at;過熱度 ("C)
dT.ub:サプクーリング(てD
p 圧力 (kg/cm2a)
である。
- 8 -
JAERI-M84-162
3. 2.4
mMLftmmmomm&SMmat. jENs-LOTTEso^^^ffifflsnso (ts^, m& it, 3.2.3 (CJ LJ)
JT,at = 11.2951 q ,°-25 e" P / 6 3 ° ( 3.31)
3.2. 5 DNB mffi.5%
- ?7? -A^JST?©DNB mmm:z:fmt?>fci6<D&m3.i±^<-ofr&5fr, m%&<D&?u
•So 4)
(1) Mirshak, Durant and Towell <DA q B 0 = 478800 ( 1 + 0.0365 v ) ( 1 + 0.00507 J T s u b ) x ( I + 0.0131 P)
( 3.32 ) CCV, qBo ; DNBSSifgjf! ( B t u / f t V h )
v ; SEi$ ( f t / s e c ) P ; E # (ps i a )
(2) BernathOS; 5
/ D v \ q B 0 = I 10890 — + 48 - ~ -M B 0 V D+P„/ff D0-6 /
x (102.6 4 P -97.2 j ^ - ~ + 32 - (T B ) B 0 ) ( 3.33 )
cc-e, D ;*^j^Wffl^iiS (ft ) p h ; Va$mtoti&*>&3 (ft )
(TB)BO ; ^-yy-o n i ; i T O ^ * i S (°F)
6) (3) Labuntsov ©S;
q B 0 = 145.4 0(p) (1 +2.5 v 2 / ^ D*4
0 ( P) = 0.99531P (1 - P / P c ) ^ ( 3.35 ) a t , q B 0 ; DNBlMJg (w/ci r f )
P ; S.tl (bar ) P c ; « » £ E * J ( b a r ) v ; 2SJS (m/sec ) C P ;5£EJfc$ ( K J / k g ° C )
- 9 -
JAERI-M 84 ，-162
3.2.4 核沸勝領域(2)2)
発達した桜沸IIIの表面温度計算には. JENS-LOTT鴎の式が使用される。(記号，単位
は. 3.2.31ζ同じ)
dTsat=112951 qto.25e-F/即 (3.31 )
3.2.5 DNB熱流束
熱伝遥が紘梯勝から腹沸勝へ移行する時点の熱掠束を限界熱流集とする。本コードでは膜梯膚
熱伝遣は取扱っていないので.DNB熱流束を越える熱伝遥は，本コードの適用外である。
サプクール領域での DNB熱流東を予測するための盤理式はいくつかあるが，研究炉のような
低圧力，低流量条件下で適用できる実験式として.本コードでは，次の 3式について計算してい
るo
(1) Mirshak. Durant and Towel1の式
qBO = 478800 (1 + 0.0365 v ) ( 1 + 0.00507 4 T sub ) X ( 1 + 0.0131 P)
乙乙で q目。:DNB熱流東 CBt u/ ft 2 /h)
v 流速(ft/sec)
P 圧力 Cpsia)
LlT sub ;サプクーリング(OF)
ある。
(2) Bernathの式 J
I Dv ¥ QRO = (10890一一一一一+48寸'6J
IlU ¥ -----D+Ph/ 7r υ>.. /
(3.32 )
{ 1"' V ¥
x ( 102.6 IilP -97.2 ;::-ー一一一一+32一(TBho' (3.33) ¥ - '..- p + 15 2.22 . - --I
ととで o 水力学的相当直径 ((t)
Ph ; 11日熱部ぬれぷち長さ(ft)
(Ts)so ;パーンアウト位置での冷却水温度(ヤ)
である。
(8) LabuntsDvの式的
QBO= 145.4 (J (P) ( 1 + 2.5 v2 / (Jσ) )凶
I Cp JT...h ¥ xll+15.l一二一一=三=-}¥ - - .!.!T J
。(F)20.99531pbd(I-P/Pc)中4
ととで qBO;DNB熱流束 (w/crrf)
P 圧力 Cbar)
Pc 臨界圧力 Cbar)
v 流速 (m/sec)
Cp 定圧比熱 (KJ/kg.C)
- 9ー
(3.34 )
(3.35 )
JAERI-M84- 162
3.3 BE*a*tmc
•^gSffl^«S* tt&j£t?S*> 5 ft 5 o
(3.36) j p i = C i 2g
ccx. <z ; mm&tfi&m r -.mwoitm (g/arf) V fltft©iiK (cm/sec)
g ' 3&301X6&&. (cm/sec 2 )
t-fcBms&a * P f , =
£ r v 2
d 2g
7?gt>$tlZ0 CI .7-. £ M8§fi (cm) d , «fKO*^^Wffl3iIS (cm) J ; rnrnm®.
"tl'db %>o
ffVSffittitt. Blasius ©K
-1=0.3 164 R : 0 2 5
(3.37)
( 3.38 )
St^Kdnnan • Nikuradse ffl^;7)
-7=== 2.0 4bg» (Re </T) - 0.8 (3.39)
^a^L-c tmc-css .
- 1 0 -
JAERI-M 84 -162
A 蒸発の潜熱 (KJ/kg)
4Tsuh:サプクーリング("C)
である。但し，本コードでは. .4T.Ub = 0として計算を行っている。
3.3 圧力鍋失計算
炉心の熱特性は冷却材の流れの挙動IC強く依存する。流体力学的挙動解析の重要な側面として，
冷却材の流量分布と炉心圧力損失の計算がある。
コードでは.各燃料要素及び燃料板間流路の流量配分は入力カードで与え.圧力損失の変動に
よる流量再配分等は考慮していない。
圧力償失及'(1)流路内各点の圧力分布の計算結果は.飽拘温度及び絞沸腸開始温度などの決定の
ために用いられる。
一般に圧力損失は，流路の形状変化に伴う損失 4PL及び摩擦による損失4Pfrとに大別される。
流路の形状損失は次式で表わされる。
ζζで.
_ ..2 TV
4PL =r.L -2g
r.L :局所抵抗係数
r 流体の比重 (g/clJil)
V 流体の速度(cm/sec)
g 重力の加速度 (cm/sec2)
また摩擦損失は
f r v2
.:IP，. = Aー .ι一ーd 2g
で表わSれる。乙 ζで，
f 流路長 (cm)
d 流路の水力学的相当直径 (cm)
A 管摩擦係数
である。
管摩擦係数』は. Blasiusの式
A = 0.31崎64R;切
及ぴKa口ruinド.Nikur悶adseの式7η}
オ==2.0 tbglO (R...[r)-聞
を選択して計算できる。
-10 -
(3.36 )
(3.37 )
<3.38 )
(3.39 )
JAERI-M84-162
^BfD&tsm^MfmiSJilii., 0 3 . 3 0 J ; o « * 7 ^ £ ^ ; i 5 £ B r F f f l . f c 9 l c £ S o
U) * f i S * A a f f ^ J i ^ a a f A P E ^
J P , = < C > ~ (3.40) 2g
P i = P i n - 4 P , + - ^ - ( V i ^ - v j 2 ) (3.41)
(2) JTO®AP£^©gjg»^tfJifftE#
JPa=i<J^.>llL. ' ( 3 . 4 2 )
Pa = P , - J P i 2 ± r < JHi > ( 3.43 )
r v , 2
JPa = H23-—- (3.44) 2g
C a = 0 . 5 ^ 1 - ^ - ) (3.45)
P 3 = P2-4P23+-^- (vi-v,2 ) (3.46)
2g
(4) «S*HRHOI»«a*atf^Bfff*
jp^K^Ul (3.47) d f 2g
P4 = P 3 - J P 3 4 ± r < 4 H f > (3.48)
(5) «HWdiDT?©ffiaiB*affJBBr,E;&
2g
\ V [ /
rv . 2
4P« = C4s • - i — L ( 3.49 )
(3.50)
Ps = P4 - JPK +-?- (v , 2 - v 2
2 ) ( 3.51 ) 2g
(6) «mffimn*>67 ,7^AP*-c !0*«5ffl^ao'E*
* P . - i < ^ > ^ (3.52)
d2 2g
P«=P 5 -4Pa±r<^H2 > (3.53)
(7) 79 ^APTfeDE^ftfeacfJUBfE*
- 1 1 -
JAERI-M 84 -162
各郁の圧力損失及び局所圧力は，図3.3のようなモデルを考えると以下のようになる。f H ヴ
(1)健料要素人口圧力鋼失及び入口圧力
4P.=くC.>Tvf 2g
(3.40 )
PI= P;n -4PI +~ (V ;n2 _V，2 ) 1= Pjロ-4PI+一一 (Vj: -vi 2g
(3.41 )
(2) 燃料板入口までの摩擦損失及び局所圧力
4P12 =A< -.-->一一L- J ddH， r V2 1 宮g
(3.42 )
P2 = P.-dP.2甘く d泊> (3.43 )
(8) 燃料板入口での急縮少による領失及び局所圧力
r vf (3.44 ) .tP23 = C23一一一
2g
c23=刈-::) (3.45 )
T (3.46) P3 = P2 -4P23+ーー (vt-v，' )
2g
(4) 燃料板聞の摩擦損失及び局所圧力
dPu=A<工dHム!...>ーTVよf 2g
(3.47 )
P. = P3 -dPu土rく4Hr> (3.48 )
(5) 燃料板出口での圧力損失及び局所圧力
r v『2.tP.s = C.s・一一一
2g (3.49 )
E45={k1-v z
r (3.50 )
r2 2〉Ps =P. -.tPn +ーー (V/ -V2
2g (3.51 )
(6) 燃料仮出口からプラグ入口までの摩擦領失及び圧力
d匝 TV/(3.52 ) .tP騎 =Aく一一>一一一
d2 -
2g
P6 =Ps-dP騎士T<d匝> (3.53 )
(句プラグ入口での圧力損失及び局所圧力
-11-
( 1 A H I A H ,
C AHi ' AH,
C
Pin
£
Pi
PI
Pi
AP AP„
Pi
11 AP,
P«
AP
P« P. P7
AP 5, ^ AP„
P.
AP
Pt
H £
( friction ) ( friction) (friction) (friction)
win • >
( friction ) ( friction) (friction) (friction)
win • >
di Pi
A,
d.
(friction)
win • >
di Pi
A, a, , v,, A ,
a 3
: » i 03 ^» »out di Pi
A,
a 3
: » i 03
di Pi
A, : A, rtS
di Pi
A, : A, | | I s 2 1
*. *4 S * E RB
iSfE A fi5 7" U - / . K IB Na 1 «s *m m. «s « KfSllta2 K R3 Na 3. 26 En %
AH: ffi«*gS^ P : l&i
A:
13.3 E*«*W-W*y*-
冨阿包1区宮l同町同
c， 6H. 6Hf 6H. ムH，
P‘ p， p， P. p， P， P7 P. P， P. 6Plu 6P
sAPE-A PS7 6PI.，
6PII ムP， 6P，・( friction ) (friction) ( friction) (friction)
d. dl d.
11. df • IIf・Af 1/1 11. -事~ '1/叩t
A. Aa As
C1 c.
15l
斗間区素要料懲
ト流出倒
プレナム3 1(}. 間区続領援燃ふ料間 H且区
流入側
プレナム
p:圧力
C:形状樋失係数
11:涜速
tiH:位置水頭豊島
ムp:圧力也失
d:水力学的直径
A:涜路断面積
圧力損失計算モデル図3.3
JAERI-M84-162
APa=<C»>L-Li- (3.54) 2g
P 7 = P 6 - 4Ps7 + - ^ (v.a*-v3
2 ) (3.55) 2g
(s) -f? ygfieommmx&umwiBEn
JPi. = * < — > — (3.56) d 3 2g
P 8 = P 7 - J P 7 8 ± r < 4 H 3 > (3.57) (9) JWR»*taairoffi*a*»CFJSBrE^
2g rv 3
2
4 P 8 9 = < C 3 > i - L (3.58)
P 9 = P 8 - J P » + ( v 3
2 - v o u f ) (3.59) 2g
C C t ' , p ; &$nmmEJ] U g / a r f a ) JP Jffflilfc (kg/cirf) 4H : {4@*SM (cm) C : « ! * « » (81Ko^Tli3!:«t8)#)B) d JTk^^WfflaiiS (cm) v ; iSl^JiS (cm/sec )
-eab£„ j$ (3.40)~ (3.59) o-p-6" < >"-£<< btitzB^lt. fiJffl#^A^J-T'5 feffl-T
3.4 ^mm
SftSo
Gdi=K, ( i ( a - i ) d V (3.60) G :^.%Mm. (kg ' /h r ) (kg ' l iS i9Sm*©ff i§sm©fi««-^^) i : S l f f l i y ^ ^ f ( k c a l / k g ' ) Ka i i ^ f S W g a U r a i s P (kcal /m 3 • hr • d\) i * ^ ^ t o i l B l t J S S f f l i a i f D S f t O i ^ ^ ^ t " (kca l /kg ' ) V ; &£pi§®Stt (irf)
•CfcSo Smi*^»SS«- r5* i l& . 8 « V o | « T ? t t K 1 * t - 3 £ T * * i L , T a (3.60) £ « #
tnti. - 1 3 -
2
dP67 =くら〉ιヱL2g
JAERI-M 134 -162
P7 =Ps-dP町 +iL(vJ-V22)ー可 2g
(8) プラグ部の摩擦損失及び局所圧力
dfも fdP18= Aく一一ー〉ー一ー
d3' 2g
P8 =P7-dP78土rくd砧 >
。) 燃料要素出口での圧力損失及び局所圧力
乙乙で.
dPsg=くも〉己三ー 2g
p，=Pe-dpa+i-fvJ-vnuf〉2g
P 各部局所圧力 (kg/crrr a )
dP :圧力損失(kg/cnr)
dH:位置水頭差(cm)
r: 形状損失係数(数値について俗文献8)参照}
d 水力学的相当直径(cm)
V 流体速度 (cm/sec)
( 3.日〉
(3.55 )
(3.56 )
(3.57 )
(3.58 )
( 3.59)
である。式(3.40 ) - (3.59)のうち"< >"でくくられた記号は.利用者が入力するもので
あるが.それ以外はコード内で計算する。
3.4 冷却婿
冷却塔における空気と水の単位時間当りの交換熱量はエンタルピ差11:比例し，次のように表わ
される。
と乙で，
Gdi= K. ci“一i)dV (3.60 )
G 空気流量 (kg'/hr)(kg'は湿り空気中の乾き空気の重貨を示す〉
;空気のエンタルピ (kcal/kg')
K. エンタルピ基準総容積伝逮率 (kcal/ni'. hr • di)
i曲;水温t曲と同じ温度の飽和空気のエンタルピ (kcal/kg')
v 冷却塔の容積 (rd)
である。空気と水が熱交換する場合.容積Vの聞ではK.が一定であるとして式 (3.60)を船予
すれば，
-13-
JAERI-M84-162
G Jj ia , - i (3.61)
S « 3 £ S © t - i «SlLtlcgI3.4©<*;aic. fgfflAPSfUi <fcfflP*St ««£©££«• 1 . tB
dt« G ( 3.62 )
ttlZ0 Lfc**-3TSl3.4©*fStS!12 ttigifg-e*£*>3ft. * f f l«#Ui#SSUfcN K lBS- fS . C J l - e L t t * © ^ * ( k g / h r ) T f *«o 3? (3.62) £SC (3.61) I t t t A - t S i
i f t S o
KaV _ r2 - d t . L J, i«,-i
u = f^L^f" z**:
t » 2 t«i|
Sfltt (t«)lC
!3.4 t - i * S H ± © ^ t
(3.63)
(3.64)
- 1 4 -
JAERI -M 84 -162
主主V=lE di G . J
1 曲一i(3.61 )
の関係がある。 ζの右辺は.水と空気の状態変化だけによってあらわされる積分で.無次元であ
り.ζれを交換係数Uという。
湿り空気のt-i線図上位図3.4のように.塔の入ロ空気i1と出ロ水温tωzとの交点を 1.出
口空気 i，と入口水温tQJJ との交点を2:とし.乙れを結」弘、線を操作線と呼び.水の蒸発量が空気
量tζ比べて少ないので.無視すれば，
N 一一
L
一G」「
出一仇
(3.62 )
となる。したがって図3.4の操作線 12は直線であらわされ.その傾斜は水空気比N.1:相当するa
乙乙で Lは水の流量 (kg/hr)である。式 (3.62)を式(3.61) 11:代入すると
EF』 j:でラ (3.63 )
出一山
r・1J
N
」「
d一
山
戸‘，... d 一一U
(3.64 )
となる。
、同居¥【咽昆
旬、突相、内川円
t圃曲目
温度 t(t剖)"C
国3.4 t -i線図上の変化
-14-
JAERI-M84- 162
5J;o«l igLtt*^fT^ff iAn*a«-^J65o tttetBAD^TkaoSg-iaiHi LT8:^ 9 )«-ffl
N ( - + — 1 = ^ ; Ct„m —11' 3 Ct „»» +11'-9.488)+.0.0835 Jt«, \ 2 U/ Ma
( 3.65 )
C f P . to*,; ¥ ^ * S (°C) 4to,: l iJAnSKg (°C) t , ' : Afifi t tSK (°C)
-£••*> 3 0
3.5 » £ » »
El 3.5 lOjrf+. ^ icflffifl; AfeJ; C5BAi|fe32SSSrtf»^«l^5«^. t, - t*
E A = " t i - T ,
A©fiflSIWEAli.
(3.66)
10)
11, t» ; «£(* AOAn. tbPfiS (°C) Ti. T2 ;«iE(*BoAa, tfjnilK CO
flttfB
03 .5 |ft£ife&ic*itf«tt£a
tfc«E*Ac07kS« («E»xJtSR) w£ff i#Bffl#^*JtWiff lJ t£*S*itR A £«¥#. &
A W
Mtm ffitt (NTU) wkxxfemztiZo
- 1 5 -
( 3.67 )
JAE則一M84 -162
図3.4において，外気温涼温度tf.水空気比N及び冷却塔の特性値K.文はUが与えられた
とき.繕の出入口水温を任意に選定し.式 (3.64)の計算値及び碁単となる交倹係数Uが一致す
るよう繰返し計算を行い出入口水温を求めるbなお出入口平均水温の第一近似として次式"を用
いている。
(1 10回54-)=ー (t.，m -t 1 ') (t畑叫-9ル 0.0835Jt由
2 UI Jt由
!
j
i
b
-
、site-htj
(3.65 )
t蜘;平均水温 (OC)
Jt.，:出入口温度差 (OC)
t.' 外気温球温度 (OC)
ととで.
である。
熱交換器3:5
図3.51C示すように流体AおよびBが熱交換器内で熱交換する場合.流体Aの温度効率EA は，
(3.66 ) E. = tl -t， =----t 1一T1
で定義される。10) ととで.
t I • t 2 流体 Aの入口.出口温度 (OC)
TI. T2 流体Bの入口，出口温度("C)
である。
t.流
体A
流体BT1ーーーー ー--・T宮
熱交換器における熱交換
また流体Aの水当量(流量X比熱) wと流体Bの水当量比Wとの比を水当量比RA と呼び.次
式で表わす。
図3.5
(3.67 ) RA=3 勲移動単位数 (NTU)は次式で定義される。
-15-
JAERI-M84-i62
( N T U ) A - ^ - ^ (3.68) w
u ; ms&mmm amnmm') (kcai /irf • h r ••c) A :fe^H8t(ir?)
l±PJ.T<D£'jlCt£%>0
(1) fSjflftS3S£«S§
E ' - £ X P C - ( N T U ) A - ( 1 - R A ) 3 A 1 - R A - E X P ( - ( N T U ) A - ( 1 - R A ) ]
(2) 36«iSSS»3?*S
1-EXP C - ( N T U ) A ( 1 + R A ) ) E A " f ^
(3) fI(8Jm>*x • mm2m^*»£«!§ ( U ? t S » 3 2 « I S § ) M) m = l f f l £ £
2
( 3.70 )
a ( l + R A ) + v / l + RA
2 • Cl + EXP ( - D ] / C ( 1 - E X P C - D J
( 3.71) J lC-e . / , = ( N T U ) A V / l + RA
(a) m ^ 2 f f l i i / l - E . . R A y V 1 - E a /
E A = - — - (3.72)
C C f , E J , l im=lffl i:#fflf ia:«!l*'C : *5o
t ,=Ti+—— (3.73) E»
tz = t , — J t (3.74)
- 1 6 -
ととで，
である。
U.A (NTU)... ="， ~一一一
w
JAER1-M 84 -162
U 総括伝熱係数(熱貫流率) ( kcal / rJ . h r・OC)
A 伝熱面積 (rrr)
( 3.1倒)
各読体の流量，比熱及び総括伝熱係数を一定とし，相変化がな〈系外への熱損失を無視した場
合.流休Bの水温及び熱交換器の性能値を既知とすれば，各種熱交換器の流体Aの温度効率E...
は以下のようになる。
。)向流型熱交換器
E・-EXP (ー (NTU)...・ (1-R...))
l-RA • EXP (ー (NTU)...・ (I-RA))
(2) 並流型熱交換器
E. = ~-EXP Cー (NTU>A(I+RA))
1+ R ...
(3) 胴側m'-I'ス・管側 2mバス熱交換器 (U字管型熱交復器)
{イ) m=1のとき
2
(3.59 )
(3.70 )
EF(14)+FEY-〔1+EP付))/((l-EXP(-r))
ととで.r= (NTU);"jiτζ
{ロ) m二三 2のとき
(官庁-1
E. = “(ロd 主)田-R...
l-E.
とζで.E.はm=1のときの温度効率である。
温度効率が決まれば.流体Aの入口，出口温度は以下のように表わされる。
dt t.=T. +E.
12 =t.-dt
-16-
(3.71 )
(3.72 )
( 3.73)
(3.74 )
JAERI-M 84 - 162
4. 7u?7A.<nmm 4.1 3 - K © 7 D - ? t - h
1. MAIN ( START ) r
CALL WRINPT
KEY(ir*»^NO(<0)
YES(Sl)
CALL TOWER
X CALL EXCHG 1 , 2&Km%$i&& smAoaKtm&tf
CALL QDNB DNB*iSffi«fflH-H[
CALL OUT immmof)-yb^ij
CALL CPCOT iHMs»«>Bi»aa
JAE阻-M84;"'162
4. プログラムの構成-
4. 1 コードのフローチャート
本コードの主要部分は.入出力部.冷却塔及び熱交換器の熱計算.燃料温度計算事図形処理11:
大別される。プログラムのフローチャ』ト及UFUNCTIONのリストを，以下に示す。
1. MA 1 N
算
照
計
晶
'
蹴
け
料
チ嫌
-は
ロ
細
フ
鮮
の「141』
JAERI-M 84 - 162
2. *«fll;fl«©7 0-f + - h
1 m®mmm®mftn
*ifo)§®± LfcJ§£©*i«tt*
# & PS &. S Twz CD I t *
CALL PRESS
FUNCTION TSATH te ft] fi S Tsat O It *
* ffl jffi HA. £ 3 $ ho O I t * iiaSETcOft*
CALL TONB1 smegmas TONB i t *
YES 1
CALL BOIL
K 9 S I SffiTcift * X
* « * t . # y K » , «*4 5 - h fiffi CTu) © f t *
N0(=1) KMAX It * . » ii © f? E #
YES(=2) fu, =Tur
f t ^ * l , 2 NO
- 1 8 -
JAER!-M 84 -162
a織料温度計算のフロ』チャート
燃料 板 発 熱 密 度 計 算
対称冷却とした場合の熱流束計算
冷却材温度 Twz の計算
単 相流熱伝達率 hoの計算hoを用いた被覆表面温度Tcの計算
CAll臥JlL沸属舶伝達相関式による被覆表面温度Tc計算
被覆材.ポンド層，燃料ミート温度 (TU) の計算
-18-
チャンネル 1，2の熱パランス計算，熱負荷再配分
JAERI-M84-162
3. WRINPT (INPUT DATAffla*C*SCXr'J vh.)
C SUB. WRINPT )
NO (.<. o) / ram. m%m?-f> I
I mmmm& ^ mh- c * y/ t
DO 30 N= 1 , NMAX
* 7 7
DO 23 NP= 1 . NPMAX
ff#«&it#-f'-/ may
- 1 9 -
1
1
j
JAERI-M 84 -162
3. WRINPT (INPUT DATAの読みとみ及びプリント.>
タイト Jレ，コントロ -Jレカード
読みζみ，プリント出力
燃料板サプタイトル E読み乙み
燃料仮データ Jプリント
プカ
み出
ζ
ト
みン
読
リ、トJ
タ
タ
一一タデ
デ
一
算
法
デ
計
寸
法
失
板寸領
料
路
力
燃
流
圧
一19-
JAERI-M84-162
4. OUT ( t tW^ao^ ' J v Vs)
( SUB. OUT )
YES
oNBseyj^b
C RETURN ")
- 2 0 -
JAERI-M 84 -162
4. OUT (計算結果のプリント〉
-20一
JAERI-M84- 162
5. TOWER (#£fligfcUAP*&®ft#)
C SUB. TOWER )
© f t *
ffilg§t*lt «fc S
TWM «fc 5 « ft & * ft J£
n m it * ic j ; 5 U'ffl If
YES
'' ^4P« f± iADza(« i t *
¥ ^ * a TWM n i t *
C RET URN }
- 2 1 -
]AERI-M 84 -162
5. TOWER (冷却塔出入口水温の計算)
粗略計算による
平崎水温 TWMの計算
TWMより録作線を決定
詳細計算による
U'の 計 算
冷却塔出入口温度計算
-21-
NO
JAERI-M 84 - 162
6. EXCHG mz&HstiiAaumiDttn)
C SUB. EXCHG )
i , 2 R ^ * a « w P > ws
S t f t t i A P f i S g b T l t * 1 * s i t Jt R <D It «
a s % $ it g S « 2* * It *
P(B|M'->'*-1SI2M
fi Jt 54 * i t *
i»3!E«ISaAPSffitt»
c RETURN J
- 2 2 -
}AE則一M84 -162
6. EXCHG (熱交換器出入口温度の計算)
1， 2次系水当量 Wp，Ws 及び出入口温度差 DT計算
水当量比 R の計 算
熱移動単位数 NTUの計算
-22一
J A E R I - M 8 4 - 162
7. CONST 1 ( 6 * . M:
( SUB. C O N S T l )
: * ( = i )
6 * ( = 0 ) T
XX (NN, N) IC XX (NN, N ) K .
I , = I 0 + 1
1 = T > ^ - ^ Y E S » « i t t « " ©H-* [06 = 1 ^ - ^ * » « i t t « " ©H-* ID1 =
or ID6 =
ID2 =
NO
D 2 = l - ^ Y E S
^ e » * ^ ® i + * D 2 = l ^ e » * ^ ® i + *
1
I D 3 = 1 YES
Jt S r © It *
NO
NO
D 4 - 1 • ^ Y E S
«EJfc* tC P ©ft* «EJfc* tC P ©ft*
NO
D 5 _ 1 > ^ Y E S
ttWffiSt ii i n i t K r
ID6 = 1 YES
RETURN J - 2 3 -
角、、ー
1
JAE則一M84 -162
7. CONST 1 (軽水，霊水の温度依存物性値の計算)
NO
YES
-23-
JAERI-M84 - 162
8. 0UTF11 (7°n, y t - f - ? * ? - ^ •7T4*tzWHi*6)
7 7 - 1 ;ntteijft V^ y
YES
^ RETURN )
- 2 4 -
JAE町一M84 -162
a OUTF 11 (プロットデータをワーク・ファイルに繕鋪する}
-24-
JAERI-M 84 - 162
9. PRESS (EE7J«£, mm&nnw)
(_ SUB. PRESS )
^-TV>--. N 0
YES
*t?©E*»3fc. ©BfE^it» t
mmwi A • , j = i ©
M m « J = 2~JMAX $ T~
< > J ! YES
^ v . NO < > J ! YES
•
& E il II * ft *
£ RETU RN ")
2 5 -
JAERI-M 84 -162
9. PRES'5 (圧力損失，局所圧力計釦
羽~
餓 料 板 J=2-J拙 X までの圧力損失，局所圧力計算
NO
強料仮出口から要素出口までの圧力損失，局所圧力計算
全 圧 力 損 失 計 算
-25-
燃料要素人口から織料板までの圧力損失，局所圧力計算
億料仮入口 J の圧力損失，局所圧力計算
JAERI-M 84 - 162
10. FRIC vsmmmomsi. it*)
( SUB. F R I C ^
U"f V^Xt tRe t t J*
RE> 3000
YES
NO
Karman - Nikuradse
£ S t * (REGURA-FALSIffi;
Blasius O S
C RETURN ^
- 2 6 -
JAERI-M 84-162
10. FRIC (管摩擦係数の選択，計算)
-26-
JAERI-M84-162
11. TONBI (»»M*§fiKfflH-*)
C SUB. TONB 1 )
O N B * « * q ' K t f f i K t '
Bergles - Rohsenow ©SC *> b ONB S S TONB fcit)*
YES
TONB = (i&fDfi»)
TONB fcfli^TONB JRiifEmif*
^ RETURN )
- 2 7
]AERI-M 84 -162
11. TONB 1 (湧虜開始温度の計算}
BergJes -Rohsenowの式
から ONB温度TONBを計算
TONBを用いてONB鮪涜来計算
NO
-27ー
単相流熱伝渇.を用いて
q'及び t'を求める
JAERI-M84-162
i2. BOIL a&mm&*mM&K.z&vmmmmsnt)
Q sua BCIL )
1
& » , « « © a T? I t l ^ i l K TCBI ft-DC
Jens-Lottos © S T? ftliiSI TCB2 Sf*
TCB2 <TOBl
•ffiS
NO
Ogffi&S) =TOBZ
-•{ ToNB=fc«B§S&jgff
(^saa)=Too
catsas) = TONB
(&®Sffi) = ToBi
» e i f * i n
( RETURN J
- 2 8 -
JAERl-M 84 -162
12. 回 IL (梯鵬熱伝逮相関式による被覆表面温度計算〉
佐..鈴村の式でiUI表面温度 TCUl計算
-28-
[Tco=輔鵬瀞による表面温度
T側 B=梯属開始温度
JAERI-M 84 - 162
13. QDNB (.Dmm&matmr
( SUB. QDNB ^
DO 50 K= l.KMAX
DO 40 J = 1, JMAX
Labuntsov Correlation icts DNB mrnmm
Mirshak et al. Correlation
Bernath Correlation ict* DNB mmmm
DNBjftffimSt*
NO K = KMAX
YES
| Q RETURN ^
- 2 9 -
JAERI-M84 -:-162
13. QDNB (DNB熱誠東の肘算)
Labuntsov Correlation による DNB熱流東計算
Mirshak et al. Correlation による DNB熱流束計算
Bernath Correlation による DNB熱流東肘算
最悪条件におげる
DNB嫡流束計算
一29-
JAERI-M84-162
i4. CPLOT m^aas)
f SUB CPLOT)
6. EUEN-jSf-i'SE****
DolOOOIC=l.ICMAX
<z 0 M m m
SUB. XYDATA •fa-, \-<?-9&7T4 JiffrZ>£.frCtt
SUB . PTCNTL & m m
YES
SUB. STOP
f S T O P )
- 3 0 -
JAE悶-M84-162
14. CPLOT (図形処理}
-30--
JAERI-M 84 - 162
15. PTCNTL (XY?-*'7'o,, (.)
C SUB. PTCNTL )
IPLT= 0 YES
(NEW PAGE)
NO («*>»£)
DO 10011=1.5
YES
r iDPLon i )=^*u*a* " asanas* " (4)=tafnfi0E " (5)=ONBS«
YES ITEMP= 1
SUB. CONV
I SUB. PTLINE
SUB. PTSMBL
YES IDPLOT<6|=ff^
IPRES=1
| | SUB. CONV ||
SUB. PTLINE
I SUB. PTSMBL
- 3 1 -
JAERI-M 84 -162
15. PTCNTL はYデータプロット)
Y回(NEW PAGE)
‘2
rIDPIβI1I)=特却水温度
一一一一一一一"(2ド被覆表面温度" 13)=芯材最高温度" (4)=飽和温度
YES '- " (5}=ONB温度
NO
-31-
温度座練軸プロットlTEMP= 1
IDPLσI'(6)=圧力
JAERI-M84-162
15. PTCNTL C-o-o**)
YES CIDPLOTCT) = ftflEJlC
<^IDPL0T(7)= 0
NOT
< = ^ - ^ W i IFLUX^, ~^.N0
<^IDPL0T(7)= 0
NOT
< = ^ - ^ W i IFLUX^, * • '
YES IFLUX=1
1
SUB. CONV
i SUB. PTLINE II
l » « S f - ^ B -J V | |
* SUB. PTSMBL
( RETURN )
- 3 2 -
JAERI-M 84 -162
15. PTCNTLくつづき〉
ー『一ーー一.[IDPLOT(7) =熱流束
-32-
JAE£I-M84-162
16. FUNCTION LIST (1) ETA (2) RA (3) RAMUAL (4) RAMAL (5) RAMBOD (6) RAMF1 (7) RAMF2 (8) TSATH (9) HFG
A£<om&mm
wmmmk (Biasiuso^K^-s),
» '/ (Ka'rman-Nikuradse ffl^;ici:£)
6 * . fi* ©*££§*
- 3 3 -
JAEjU-M84 -162
16. FUNCTJON LI ST
(1) ETA 飽和湿り空気のエンタルピ
(2) RA かわき空気の比重
(3) RAMUAL UAf合金.UAfx分散型燃料芯材の熱伝導率
(4) RAMAL Afの熱伝導率
(5) RAMBOD ボンド層の熱伝導率
(6) RAMFl 管摩擦係数(Blasiusの式による〉
(7) RAMF2 11 11 (Karman-Nikuradseの式による)
(8) TSATH 軽水，重水の飽和温度
(9) HFG 軽水，重水の蒸発熱
-33-
JAERI-M84- 162
5. A * 7 * - ^ ^ # ^
5,1 A^7 f - ^ f t *S±0D»* iS
(5.1)
r u « M W M « M ^ (&«£BHKrtagM«) xFRATEN OJP'MTO:*^)
(5.2) i L T I t ^ S t l - S o eid-PFRATENa. JaTlelSiWSftSA^f-^OCARD<F 2 > T ?
(5.3)
<tfcS„ S^SSfflffiii^SH? (CARD<F53>© FRATEC) (£, CO" m^ffiM" t (DitT~&iO . Bii^fflFRATENiSti*!64Stt5C0T?ajg*S-r5o
lyTcA^x-rs-oiftB^-efi, *-r*-KS-^*^sn. m^rmwi^txtimtm^ti s„ &«e& *fc©f»i9JiW*3ns#. ^<oiE)|ftt. r gfcgj ngsj rtss j i 4 , t ^ So r^^j tit. aDmm&zmmfr&m&fow&Tiktbere, mmt
( i ) = K » S (R) =m.w. (A) = X ^ i !
- 3 4 -
]AERI -M 84 -162
5. 入力データの作成
5.1 入力データ作成よの留.点
本コードの入力データは，大別しては)熱水力データ， ω図形処理データ 11:わけ，.''1る。図形処
理データは，プロットする必要がなければ.入力しなくてよい。
入力データを作成するにあたって，留意すべき点を以下iζ述べる。
(1) 平均発熱密度の計算は，燃料要素単位で行われる。従って発熱部の体穫が異なる燃料要素
が何種類か炉心』ζ存在する場合Kは，平均発熱密度は，燃料要素の種類によって異なってく
る。具体的には，平均発熱暗度は次式のように計算され.乙の値11:種々の発熱因子が附加さ
れる。
(原子炉熱出力)(N型燃料要素内平均発熱密度
(炉心内燃料本数) X (N型燃料発熱部体積)
( 5.1 )
聞 各燃料要素内通過流量の算出も問機の考え方で行われている。具体的には，
(全燃料要素内通過流量) x FRATEN (N型燃料要素内通過流霊)=
(炉心内燃料本数)
(5.2 )
として計算される。乙乙でFRATENは.以下に説明される入力データのCARD<F2>で
入力する流量分布図子である。またN型燃料要素内平均流速は，
(N型燃料要素内通過流量)(N型燃料要素内平均流速) z ，一一一『
(N型燃料要素内金流路断面積フ
(5.3 )
となる。各流路の流速決定因子 (CARDくF53>の FRATEC)は.乙の"平均流速"と
の比であり.前述の FRATENと意味が異なるので注意を要する。
以下の入力データの説明では，まずカード番号が示され.続いて変数名と入力順が示され
る。次に各変数の説明が示されるが，その順序は. r変数名Jr形式J r説明Jとなってい
る。 r形式」とは，その変数が実数型か墜数型か等を示すもので.記号は
(1)=整数型
(R) =実数型
(A) =文字型
となっている。
-34-
JAERI-M84- 162
5,2 A ^ - ^ f f l & B S
CARD < A > 9 -f V K ' t) - K TITL TITL ;
C A R D < B >
(A 72)
p — ;l/ • A — K IAMAX, IMAX, JMAX. NMAX NPLOT. KEY(l). KEY (2), KEY (3) IAMAX IMAX JMAX NMAX NPLOT
KEY (1)
KEY (2)
KEY (3)
imr-xWl. ( # - K < C > a n d / o r < D > 0 t f c T \ ft^lOfCO
* 8 ; £ t r t l l £ | S | « & a ( f t * 20tf#T21gi5£)
its;-r5^iNtS^ (JEM*. tB^j^J^^^snss) CD@S CSAS)
= 0 7°n-y h Ltt i^ = 1 T ' D j b f S
; (I) }%%gfcS.BmW-<D* 7° •> a y
< 0 tf&pig, IS3?«l3lffl^P*tfiSffl*ltWL. «S$Hgfi«ft3?liUi:i.\, C cDif£ CARD < E, >JfilTti*g<.
< o Tisiafs = 0 7K5P'«E
;> I ±#a (coJiSic*^*3t.-r, tt#|fi]gi5£#5f J (i. S!tAffliJ J = i i L . din £J=JMAX£LT{&-3)
;(I) l&ft£pft®?g;£ (2&#£Ptf{i. C(Ofg^ic*>*»t)t)-r. &*co$itt{l£ ffi-5)
= 0 g7K
= l S T K
CARD<C> mfrtimfr?'--9 QRR. PFLOW, .IN, DT. JAMX CCOii-V'kt, KEY (1)^0 CDi § . ftcoCARD<D > i i f , E IAMAXffii&g-p*»?.
KEY U)S l O i t l i , CARD<C > © * IAMAX &AJ]tZ>B
QRR ;(R) \%?&mtiitl (MW) PFLOW ;(R) Hfc f tWf l t f i ( i r f / m i n ) TIN ; (R) KEY(1)^1 C D £ # - & # W J & [ l > A P S S (°C) T a b 0 , KEY (1)^0<D
- 3 5 -
]AERI-M 84 -162
5.2 入力データの説明
カ
一
題
一
標
タ一
A
>一A
一<一ごJ
D
一T一T
組一目一司
c-
一
CARD<B> コントロール・カード
l IAMAX. IMAX. JMAX. NMAX. NPLOT. KEY(札 KEY(2).KEY(3)
IAMAX ; (I)計算ケース数(カード<C>and/or<D>の数で，最大 10まで)
IMAX ; (I)燃料芯材内半径方向節点数(節点は等間隔で分割し，最大5まで)
JMAX ; (I)燃料芯材軸方向節点数(最大 20等分で21節点)
NMAX ;(I) 計算する燃料要素(形状，出力分布等が異なる)の種類(最大 5)
NPLOT ; (I) 燃料温度等の計算結果をプロットするかどうかのオプション
=0 プロットしない
=1 プロットする
KEY (1) : (I) 冷却系温度計算のオプション
<0 冷却塔，熱交換器の冷却材温度のみ計算し，燃料仮温度計算はしない。
との場合CARD<E1>以下は不要。
=0 冷却材温度を計算し，その値を用いて燃料板温度を計算する。
二三 1 炉心人口冷却材温度を入力し.燃料仮温度を計算する。
KEY 悶 ; (1) 冷却材の流れの方向を指定するカード。
<0 下向流
=0 水平流
二三 1 上昇流
(との指定にかかわらず，軸方向節点番号Jは.流入側を}=1とし，出口
をJ=JMAXとして扱う)
KEY (3) ; (I) 1次冷却材の指定 (2次冷却材は，との指定にかかわらず，軽水の物性値を
使う)
=0 軽水
=1 重水
CARD<C> 熱水力基本データ
|QRR. PFLOW. '~IN. DT. ]AMX
とのカードは. KEY (1)ζ0のとき，次のCARn<n>とともに IAMAX紹必要で・あり.
KEY (1)~1 のときは. CARD<C>のみ IAMAX枚入力する。
QRR : IRJ 原子炉熱出力 (MW)
PFLOW ;(悶一次冷却材流量 (rrf/min )
TIN : (悶 KEY (1)2: 1のとき一次冷却材炉心入口撮度 ("C)であり. KEY (1)ζOの
F司令。
JAERI-M84 - 162
DT ; (fi) - TIN " CDUm.Mtt®. Cdeg. "C ) JAMX ;(R) ^ i C » A P S S * f c t t ^ m S » S f f i * T i n l e t i L f c i § . T i n l e t = T I N +
DT* ( JAMX-1) -t?JS3ft3<*)>ILtfc. fflX-WT, KEYU)=1. TIN = 30.0 , DT=5.0 , JAMX = 3 i Lfc i§£ . &foknMM& 30.0 . 35.0 , 40.0 <D3T-xic-ol>T«RiHSSK*ltSE-t-S„
CARD<D> » * P « . &£&3l#t$ 7-9 SFLOW, AFLOW, CTKI HEKI , SSCT, ZCT, SSHE, IHE
KEYUKO © £ £ © & , CARD<C>£ffl#*>tfTIAMAX ffiATrfSo KEYUJ^l ffli
: (R) 2 *#£P*tffi« ( irf / m i n ) ; (R) #JP*g FAN H a (irf / m i n )
: (R) # £ p i g i > ? ^ t°gip*g:g«feiisp (kcal / i r f • hr • J i )
. (R) j»£«gSftKflgg5 ( kcal / r r f • hr • °C) : (R) ^4fll§^#a»fE« (rrf ) :(R) #£pigSi8t;iS$ (m) :(R) M£«8££;R@tt (nf )
=-i (sjffin = o mm
SFLOW AFLOW CTKI HEKI SSCT ZCT SSHE IHE
= m HfJ VD><7S , S i J 2 m ^ « !
CARD<E > m eafflnscffl^K! H,. H j , Hs. A B, C, D. ITWC
m&mm^Mt. •<k&x%t>ztix^z><Dx, a - H j A~D «-vfnkR*4 7°) ics^ft <i«-A^"^5o
0 N u = H i * (R e
A -Ifc) * P r % L O + H J - ^ S - * ( / • „ / f t , ) " z
N u ; * », -fe A- MSfc R e ; t//f /AXJ& P r ; -fyv \>JI*WL
z ;AP*> 'pOIEi l
ft, : ttttffift (&*«* '« * * *SB3M»
- 3 6 -
JAERI-M 84 -162
場合は.冷却塔外気温球温度 (.C)となる。
DT ; IRJ • TIN .の温度増分値 (deg..C )
JAMX ; (R) 炉心入口温度または外気湿球温度を Tinletとした場合.Tinlet = TIN+
DT* (JAMX-l)で示されるくり返し数。例えば. KEY(1)= 1. TIN
= 30.0. DT=5.0. JAMX =3とした場合.炉心入口温度が 30.0.35.0 .
40.0の3ケースについて燃料板温度を計算する。
CARD<D> 冷却塔，熱交換器特性データ
|SFL刊 AFLOW叩 HEKI お CT.Z侃 SSHEIHE ~ KEY(1)ζ0のときのみ. CARD<C>と組合わせて IAMAX組入力する。 KEY(1)ミ1のと
きは不要。
SFLOW ;(悶 2次冷却材流量 (rd/叫 n)
AFLOW ;(R) 冷却塔FAN風量 (rd/min)
CTKI ;(悶 冷却塔エンタルピ基準総容積伝達率 (kcal/nf.hr • 4i)
HEKI パ悶 熱交換器熱貫流率 (kcal/rrf・hr・.C)
SSCT ; IR) 冷却塔全有効断面積 (rrr) ZCT ; (R) 冷却塔充損物高さ (m)
SSHE ;(悶 熱交換器全伝熱面積(nT)
IHE ; (I) 熱交換器の型式指定
=-1 向流型
o 並流型
=m 胴側mパス，管側 2mパス型
(注)流量及び形状寸法の面積11:関するデータは，数基の冷却塔，熱交換器を使用している場
合，全体を合計した値を入力する。
CARD<El > 熱伝達相関式の係数
l H1 • 出，民. A. B. C. D.ηWC
熱伝遥相関式は，次式で表わされているので. s-Jも A-D (いずれも Rタイプ)に適当な
値を入力する。
ロB U_ n
Nu = 同 特 (R~ 一路)発 P ，-* 1.0+施工土 特(flb/ι)"
Nu ヌッセ Jレト数
Re レイノルズ数
P，プラントル数
De 水力学的相当直径
z 入口からの距離
z
flb 粘性係数(冷却材バルク水温度基準)
-36-
JAERI-M 84 - 162
A. : ttt£« cmmsLssm ITWC ;(I) mp#OSffi«##Ittfi[0SifiSffi (TWC) fflSS?
= 0 TWC(0)= f (WiADiSfi) + (HiDSS) 1/2.0 = i TWC 0 ) = *&;£is]z 0agic*;w-5^a]«cDt9Tazi^¥^iJiffi = 2 TWC ( 2 ) = {Twc(oj + ( t t a ^ s s a o o > / 2.0 = 3 TWC ( 3 ) = (TWC ( 1 ) + mmmm&soM 1 / 2.0
CARD<E2 > ^^(OyKtl^mr--? FRATE, VIN, VOUT, PRESIN, IRAMF FRATE ;(R) FRATE = (£:TCg^l*3iIi!*ft*) /PFLOW (JUKKTC) VIN ; (R) A P M-7 \s-i-** ftOmffim ( cm/sec ) VOUT ;(R) ffia#j:/^A##JMffi§ (cm/sec > PRESIN ;(R) ADij7°u-^-A^£)JME^ (kg/cm? • abs ) IRAMF ; (Ri a i i i c f s m m m m . £ . o r > * ?•> a >
= 0 Blasius ©i t = 1 Ka'rman • Nikuradse ©Si
CARD < Fi > mnmm? A *>**- Y
C A R D < F , > ~ < F « > t-z-iDti-vit. 1 mmomumm^imiri®&&m-e<!bz>o $ o T . NMAXgg©i**4g5£©§+Ji:£:iT'5J§£, C A R D < F i > ~ < F 9 > ^ N M A X *I*A^)
TITLN TITLN (A 40) tim%-M<D?4 bJU
CARD<F2> J K i R S ^ S * ^ ? ^ - ^ NPMX. NFUEL. MA, UDENST. POROTY. IDPMX. IDCMX. EAREA, FRATEN NPMX (i) un-t&mmmcomm (c<DmcMmL-cc.^u (Fs) «-NPMX*IA^J-#-
5 0 S*15) NFUEL ;(R) C tDm&®)mg%<0tPib!£ffi®L MA ;(I) W&fctfflfflai
= 0 UA^r&SM = 1 UA^x » » S S * t
UDENST : (R) » & * * © * 7 y « ( g /cirf ) v
POROTY ;(R) »KS«©.-iM K^ CtefcS;} IDPMX ;(D c<DMngmz%tuzmW'^mm0mt£zimm<Dwm (CARD<F6>
4<an
- 3 7 -
JAERI-M84 -162
ι ;粘性係数(壁面温度基準)
ITWC ; (IJ 冷却材の温度依存物性値の基準温度 (TWC)の選択
= 0 TWC(Q) = ( (燃料板入口温度)+ (出口温度))/2.0
= 1 TWC(!)=軸方向zの位置における冷却材の断面混合平均掘度
= 2 TWC(2) = (TWC(o) + (被覆表面温度)(z)) /2ρ
= 3 TWC(3) = (TWC(l) + (被覆表面温度)ω)/2.0
なお.DキOのとき. ITWCの指定にかかわらず.ιの基準温度は被覆表
面温度がとられる。
CARD<E2> 炉心の水力学的データ
「予RATE.VIN. VOUT. PRESIN. IRAMF
FRATE ; (R) FRATE = (全燃料要素内通過流量)/PFLOW (無次元)
VIN ;(悶 入口側プレナム冷却材流速<cm/sec )
VOUT ; (R) 出口側プレナム冷却材流速 (cm/sec)
PRESIN ; (R) 入口側プレナム冷却材圧力 (kg./;αd・abs)
IRAMF ;(R) 乱流領域の管摩擦係数計算式のオプション
= 0 Blasiusの式
= 1 KaI'm如・ Nikuradseの式
CARD<日〉 燃料要素タイトルカード
CARD< F1 >-< Fa >までのカードは. 1種類の燃料要素に対して 1組み必要である。従
って. NMAX種類例燃料要素の計算を行う場合.CARD<Fl>-くれ>をNMAX紐み入力
する。
ηTLN____ ~ TITLN ; (A 40 ) 燃料要素のタイトル
CARD<Fz> 燃料要素基本パラメータ
~型X.NFUEL. MA. UDENST. POROTY. 1即 MX.1 D~;MX. EAREA， FRATEN
NPMX ;(1)計算する燃料絞の種類(乙の数に対応してCARD(F5)をNPMX組入力す
る。最大15)
NFUEL ; (R) 乙の型式の燃料要素の炉心装荷数
MA ; (I) 燃料芯材の積額
=0 UAi合金芯材
=1 UAix分散型芯材
UDENST ; (R) 燃料芯材のウラン密度 (g/crrr) 位。
POROTY ; (R) 燃料芯材のボイド率(無次元〉
IDPMX : (1) 乙の燃料要素iζ含まれる形状・寸法等の異なる燃料板の種類 (CARDくれ〉位以
の枚数 ヲ
-37-
JAERI-M84-I62
IDCMX ;(I) C0*8»SSgK^fft5^tt 'Tfffi^fflSttS«EBffl«a (CARD<F7 > ©lfc»)
EAREA ;(B 'jHR8S3Ert «8K»rffi8l(cir?) FRATEN ;(R) ( 5.2) •WSS*i«««»«H ;F' (*H»S£)
C£l) UDENSTRiJPOROTY it, im&tt&lJA£xJimWZtt<DMeitc<D&im-e<!r»
(a2) NPMXiIDPMX©ggSo *Ri|BSSSrt©Flux»;flj#*.5Ji&. ^ t t ^ A i H t t f * oTfe. FLOC(CARD52) fflffi££;LT&»i|£©i^*ft#-eit S„ Z<D®&, NPMXK(iSKIt3»£ff ? » * & © & £ At l , IDPMXieffiJ#fB&CARD< F 6 >ffl teSt^A^-TSo IDCMX lco^r-fc|S|«©SSiL^rJ:^o
CARD< F 3 > * ^ f t ^ * frQkW.1i - K FR. FCOOL. FFILM. FCLAD, FBOND. FMEAT FR :(H) ¥a#f i t tB:&»*B? FCOOL ;(R) Mtfflttfi«±#ltKhJ--5I^&-)* •* h * + v*^ffi t t FFILM ; UR) ^ i f l * t - S a « ® S S ± . # i i : g a t - 5 l ^ W * •* h * + v*-n/flJUr FCLAD ;(R) i£a«fl©?S«±#Kgg-t3I^lf l*-y \~**s%fr<m FBOND ;(R) * v KS©SK±#McR|-f- .&I3*M*»^t >*^ff ia FMEAT ; IR) «!**S*t©aR±#lcgg^-SI^6«I* v ^ t v ^ ^ ^ f t
CARD<F<> i a^ |5 ]@f l^^^B? F z
F, ;(R) «)^(S]©^^$J^S?X'JMAX«cA^-r5o
CARD<F5 1> mm.9 AVfrb- K CARD<Fsi>~CARD<Fs3>«— » i L , NPMX *B*A#a-5. TITLP TITLP : (A20) «&**&©* 4 h;i/I3*E ~
CARD<F52> mnmzMtzr-* I NPLATE. FLOC, IDPL. KMX, IPLOT, IOUT
NPLATE ;(R) imBXl*tett*ti*£mfflltRCDto FLOC ;(RJ mmmmpitDtiitittttm&Lv, smmmmttt-fz £-**?&& IDPL ;(I) S«i l»WEOJ^ff ig»#. *IW^tt7j-»*4. CARD<R>T?JSS-f**«,
KMX 5(1) « 4 « KM •*-*&£]]&#© JgS = 1 *tft$tf& I T i t * = 2 # « * » » £ L T H *
- 3 8 -
J~RJ-M84 -162
IDCMX ;(J) ζの燃料要素IC含まれる形状・寸法等の異なる流路の種類 (CARD<F7> の枚数〉
EAREA ;(関燃料要素内全涜路断面積 (crrr)
FRATEN ;(Rl 式(5.2)で示される流量分布因子(無次元)
(注1) UDENST及びPO.ROTYは，燃料芯材がUAfx分散型芯材の場合にのみ有効であ
る。
{注2) NPMXとIDPMXの関連。燃料要素内のFI四分布がある場合.形状等が同じであ
つでも. FLOC (CARD 52 )の値を変えて各燃料板の温度を計算できる。との編合.
NPMXには温度計算を行う燃料板の数を入れ. IDPMXに形状記述CARDくれ〉の
枚数を入力する。 IDCMXについても問機の考え方でよい。
CARD<F3 > ホットチャンネル係数カード
FR. FCOOL. FFILM. FCLAD. FBOND.FMEAT コFR ;IRl 半径方向出力分布因子
FCOOL ; IR) 冷却材温度上昇に関する工学的ホットチャンネル係数
FFILM ;IRI 冷却材一被覆表面温度上昇に関する工学的ホットチャンネル係数
FCLAD ;IR) 被覆材内の温度上昇に関する工学的ホヴトチャンネル係数
FBOND ; (R) ポンド層の温度上昇IC関する工学的ホットチャンネル係数
FMEAT ;(R) 燃料芯材の温度上昇に関する工学的ホットチャンネル係数
CARD くれ> 紬方向の発熱分布因子
はこF z ; (RJ 軸方向の発熱分布因子で]MAX枚入力する。
CARD<Fs1> 燃料板タイトルカード
CARD<FsI > -CARD<F日>を一組みとし. NPMX組み入力する。
口旦ETITLP ; (A20) 燃料板のタイトル記述
CARD<F52 > 燃料仮に関するデータ
l N乱 ATE.FLOC. 1即'L.KMX， 1乱 OT.IOUT
NPLATE ; (RJ 燃料要素 1体IC含まれる当該燃料仮の数
FLOC ;(RJ 燃料要素内の出力分布係数で，当該燃料援に対するピーキング係数
IDPL : fIJ 当該燃料板の形状指定番号。燃料板形状寸法は.CARD<F6>で指定する治主
当該燃料板がその n番目に対応する場合，その番号を入力する。
KMX ; /IJ燃料板に関する冷却条件の指定
=1 対称冷却として計算
=2 非対称冷却として計算
-38-
JAERI-M84- 162
IPLOT ;(I) 3Ki!8»iR<OH-S^^*BHBffi^-rS*»i*-5*><oa»?o CARD<B> © NPLOT=0©*1£. C© IPLOT ©fl5E4If;*£;Sft.5o
= 1 «EK i i j o i t ^ s m ^ - / D , h t 5 „
= 3 StKlSi^2©It^ie^ ;£7°o.y h-t-So KMX=1©*§£, IPLOT ©fflfil i * « $ t l ^ 0
IOUT ;d) %mm*wz%t?>Et>, oNB.DNBm<Dtm%mz7<)yi>t&frzo
^©StR
= 1 y j v h t S o
CARD<F53> ^ J f l M K I c m - r a x - ^ ICHLU), NHEAT(1). FRATECU), ICHL(2). NHEAT(2). FRATEC(2)
CCOii-Vii, mPrWL^i^ts^im^cmt^r-d'^m^.-t£&©-?. K M X = l © i # li«J8&(l)<0:f'-*©*•??.£ (-\,
ICHL ;(I) S^ffiESOrBWfg^S^o ^S§©fl5«St>'E^JI^7!'-:5'(iCARD<F70> ~<F73> -emmtsv. %mm.msjt(D{s!®Bicttfc-?5frzm%.tZo
NHEAT :(R) aE&AOfciPWOiSnSRli&frCjgJE
= 1.0 #*p*mjt(fflff l*K**£;fc"fcto>^M^ftS (fi-fl9#Tyi/ i &©£-5 fc *§£)
=• 2.0 &£P*f fiffi fiiJoMS^ £ MS S n 5 o FRATEC ;(R) «8£&rt?J3t t>g OtftHBD K*tt-*«»rtspJ%*aw>tt m&7t)
FRATEC = C^fSrt¥^J^S) / (g&rt¥i$ffi§)
CARD <F6 > «t**«ffl0tt^ffiKBaifS f - * XA, XB. XC. YA. HA. HB. HC C f f l * - K t t . IDPMXt?fg£LfcMfrita&g -C !*.5<, C O n f i © * - K # , IDPL = n IC
XA ;(R) «#*&**©%m (cm)
XB ; (R) mn&tttpfofr i,#v h'mtfiom&Jsftatm ( cm) XC ;(R) «^,-SW«»i:^t.Mai*<fftSS-C !fflii^^fSj0«g«l (cm) YA ;(R) » m t * a (cm) HA ;(R) «^^©^40MffiAS-(SlAnO>t»^^,-g*<rfflAD(giJJS^t-zr©«6Bi(cnj) HB MR) «&**&£#©& 3 (cm)
HC ;(R) ^aiMtJiafflij®*8)(sf,-E*«^^t.*Rif£f«tba^^-effl«B* (cm)
- 3 9 -
JAERI-M 84 -]62
IPLOT ; (I) 当該燃料板の計算結果を図形出力するかどうかの選択。 CARDくB>の
NPLOT=Oの場合 .ζのIPLOTの指定値は無視される。
=0 プロットしない
=1 流路1側の計算結果をプロットするo
=2 流路2側の計算結果をプロットする。
=3 流路 1及び 2の計算結果をプロットする。
KMX=lの場合. IPLOTの値は 1とみなされる。
IOUT ; (I) 当該燃料板11:関する圧力. ONB. DNB等の計算結果をプリントするかどう
かの選択
=0 プリントしない。
=1 プリントする。
CARD <F 53> 冷却流路に関するデータ
|ICHL(1). NHEAT(1). FRATECll). ICHU2). NHEATω. FRAT配倒
，、
流路(1)のデータ 流路(2)のデータ
二ゴ
とのカードは，燃料仮をはさむ冷却流路に関するデータを指定するもので. KMX= 1のとき
は流路(1)のデータのみでよい。
IC田:(1) 当該流路の形状指定番号。流路の形状及び圧力損失データはCARD<F7o>
-<F73>で指定するが，当該流路がその何組自に対応するかを指定する。
NHEAT ;(R) 流路内の冷却材の加熱条件の指定
= 1.0 冷却材は片側の燃料仮だけから加熱される(片側がアルミ仮のような
場合)
=2.0 冷却材は両側の燃料板から加熱され答。
FRATEC ; IR) 燃料要素内平均流速(燃料叡聞)に対する流路内平均流速の比(無次元)
FRATEC= (流路内平均流速)/ (要素内平均流速)
CARD <F6> 燃料板の形状寸法に関するデータ
|XA.XB.XC. YA. HA.HB.HC
乙のカードは. IDPMXで指定した枚数が必要である。とのn番目のカードが. IDPL =nl1:
対応する。
XA
XB
XC
YA
HA
HB
HC
: (R)
:(RJ
; (RJ
; (R)
; (RJ ; (RJ
; (RJ
燃料芯材の半厚(cm)
燃料芯材中心からボンド屑までの厚み方向の距離(cm)
燃料芯材中心から被覆材表面までの厚み方向の距離 (cm)
燃料芯材幅(cm)
燃料板の冷却材流入方向入口端から燃料芯材の入口側端点までの距離(仰〉
燃料仮芯材の長さ(cm)
冷却材出口側の燃料芯材端点から燃料仮出口端までの距厳 (cm)
-39-
JAERI-M84-162
CARD <F70> mttffl&OBVrt&mtZT-9 XCHI, YCHI CARD<F70>~<F73>fct. IDCMX *BA2rr5 0 CCDnffllO* - K*J, ICHL(K)= n
XCHT ;(R) m%<om2 (cm) YCHI ;(R) ffig§0»i (cm)
CARD<F71> MS&<D&DM%;tf&7>-J>[l) gfiai 0«*y^Aafr6*SSHEAP*-e. g]3.3 #83) ZETAU), DHd). HDE(l), AR(1) ZETA ;(Ri mmmmAaromim DH(1) ;(R) Jt t |5W%\Q*>&Jtt8^n£7<Dgtt (cm) HDE(l) ;(R) *&S%AnBM0;]cft$AMl£iSS (cm) AR (1) ; (R) JMSBSXACI BMOffifiai ( cm*)
CARD<F72> ffit8(0E.t)m£MM7-*®
ZETA(2). DH(2). HDE(2). AR(2) ZETA(2) ;(R) 7 - 5 ^ (KF33) APTPOffitS^tt DH(2) MR) KF^2CDI6K (cm) HDE(2) ;(R) Klg|2<D*#¥tiMS£iag (cm) AR (2) ; (R) KRS 2 o«rffi» (cm)
CARD<F72> « f f l t t # f f l & l t # f - * ( 3 ) gH3 <.zf?<rKDfr<btm%mmf?,> ZETA (3). DH(3). HDE(3). AR(3) ZETA (3) ;(R) IBttSiKttlCI-VtDffiffiffft DH (3) ; (R) Efsl 3 Oft* (cm) HDE (3) ; (R) KFsl 3 ©*^Wff l ^ @ g (cm) AR (3) ; (R) EFtB 3 ffl»ffflgk ( cirf)
CARD<P1> mm^m=>> h a - ; i / . ^ - K WITHX. WITHY, TMIN, TMAX. PMIN. PMAX, HMN, HMAX C A R D < P l > ~ < P 4 > l i . N P L O T = 0 O t ^ l i ^ S T & S o CARD<P1>«, H£ffl<&.
fg5£tf-*ltfJ:t.*#. CARD<P2>~<P4>«, El®|ii#$ICJEL;T (CARD<F52>© IPL0T©fii5£ffcffl&It) A^-TSo
WITHX ;(R) XttfflgS (max. 200 mm) WITHY ;(R) Yttfflgj* (max. 230mm)
- 4 0 -
JAERI-M 84 -162
CARD <F70>衿却材読路の形状寸法に関するデータ
|XC阻.YC凹
CARDくF70>-くF73>は. 1配 MX組入力する。とのn組自のカードが. ICHLI同 n
に対応する。
XCF宜 ; (Rl流路の厚さ(cm)
YCHI ; IR) 流路の偏(cm)
CARD<F71> 流路の圧力鍋失計算データ(1)
区間 1(燃料要素人口から燃料仮入口まで。図3.3参照〉
ZETA(1). DH(1). HDE(1). AR(l)
ZETA ; IRl 燃料要素人口での抵抗係数
DH(1) ; IRl 燃料要梁入口から燃料板入口までの距離(cm)
HDE (1) ; IR) 然将要素人口区間の水力学的相当直径(cm)
AR (1) ; IRl 燃料要素人口区間の断面積 (αrO
CARDくF72> 流路の圧力損失計算データ仰
区間2(燃料板出口からプラグ入口まで〉
ZETA(2). DH(2). HDE(2). AR(2)
ZETA(2) ; (R) プラグ(区間3)入口での抵抗係数
DH (2) ; (R) 区間2の距離(cm)
HDE(2) ; (R) 区間 2の水力学的相当直径(cm)
AR(2) ;(悶区間2の断面積 (cm)
CARD<F72>流路の圧力損失計算データ(S)
区間3(プラグ入口から燃料要素出口まで)
ZETA ω. DH (8). HDE (8). AR (3)
ZETA ω; IRl 燃料要素出口での抵抗係数
D日間 ; /Rl 区間3の距雌 (cm)
HDE(8) : IRl 区間3の水力学的相当直径(cm)
AR(3) :1悶区間3の断面積 (crrt)
CARDくPl> 図形寸法コントロール・カード
lWIT邸 .WI叩 Y.TMIN. TMAX. PMIN. PMAX. HMIN. HMAX 一一一」CARDくPl>-くP4>は. NPLOT=Oのときは不要である。 CARD<Pl>は.1枚のみ
指定すればよいが.CARD<P2>-<P4 >は，図形出力数に応じて (CARD<F52>の
IPLOTの指定数の合計〉入力する。
WITHX :(R) X舶の長さ (max.2∞mm)
WITHY :(Rl Y舶の長さ (max.230mm)
-40-
JAERI-M 84 - 162
TMN ; (R) Sff i&£©ft /h i t CO TMAX ; (R) ummmomxm ro PMIN ; (R) S.JjmmojM/m (kg/cirf a ) PMAX ; (R) E f l l i O f e * : ! (kg/cirf a ) HMIN ;(R) j « i £ ^ 0 S / M i (W/cirf) HMAX ; (R) &«ftli<^gl0S*:<l ( W / «rf) (ft) &m®mi, IDPLOT ICfc^TSS, EE?J. ^giim©^D'y h#fgj£§fttttttttfiffi
CARD<P2> HUB^an y [ . D - * . * - K NEWI NEWI : CA4)^g«*i|sfSo!tWS* ;£«fLi,^-^IC7 pa. y t-tZfrt'ofrOMVlo lfcc
= "OLD" f j®^7 yicMtaWZt5o
CARD<P3> Hfl5^"f YfrU- V TITLE TITLE :
CARD<P4>
CA20) mfZV>9 4 h ^ o CARD<P2>#
•rt-K
"OLD" O J i & l i ^ o
IDPL0TQM7). NSMBL(1)~(7) 1 1
(1) m (2) (3) «ms;ttei@saK (4) s&fafis (5) ONBfflS (6) *&*fj£# (7) sat # usayfcjg c* » h f t y * »m&&m £ tzw
IDPLOT ;(I) « a - i - * t m t e « * 7 ' n y h t * * > ^ ^ * » . * / = » < " * " Ot tR*»j fe t So
= 0 7 ° O y h L « ^ = 11-15 ^«S-t?7°o.y h t S c J$fil i6*^:§<tt5S4 , «a*<ttSo = 21-25 JS«ST?7"O „ (.-TSo $ ® * £ t t 11-15 lc*ffi5^50
NSMBL ;(I) m±IZ&^>£:ffi<frififr®M&!.0
= 0 | 2 ^ « * > ^ n « ^ o = 1 O'CfftMUilcJIK
- 4 1 -
JAERI-M 84 -162
TMlN : (R) 温度座標の最小値 (OC)
TMAX : (R) 温度座績の最大値("C)
PMIN ; (Rl 圧力座標の最小値 (kg/cnta)
PMAX ;制圧力座績の最大値 (kg/crrra)
HMrN ; IRl 熱流束座標の最小値 (W/cnf)
HMAX :(Rl 熱流東座標の最大値 (W/crrr)
(注)各座標舶は. ~OPLOT において温度，圧力，熱流束のプロットが指定されなければ描
かれないが，何らかの値を入力しておかな砂ればならない。
CARO<P2> 図形処理コントロール・カード
凶担NEWI : (A4)当該燃料板の計算結果を新しいページ11:プロットするかどうかの選択。 1蚊
自の図形の栂合.必ず<<NEW.を指定する。
="NEW.新しいページ11:プロットする。
="OLO"前のグラフ11:重ね書きする。
CARO<P3> 図形タイトルカード
巴豆TITLE 仏20)図形のタイトル。 CARD<P2>が "OLD"の場合は不要。
CARD<P4> 図形出力コントロール・カード
|I即 LOT(1ト(7)， NSMBLω-(η
描かれる計算結果は 7種額で(l減益ら閉まで次のように対応している。
ω 冷却材温度
ゆ被覆材表面温度
(3) 燃料芯材最高温度
(4) 飽和温度
(砂 ONB温度
(6) 絶対圧力
(η 被.材表面熱流束(ホットチャンネル係数を乗じた値)
ID見 OT : (I) 該当する計算結果をプロットするかどうか.また描く"線"の種類を指定す
る。
=0 プロットしない
= 11-15 実線でプロットする。数値が大きくなるほど線は太くなる。
= 21-25 破線でプロットする。線の太さは 11-15に対応する。
NSMBL ; (l)線上11:記号を摘くかどうかの選択。
=0 記号はかかれない。
=1 (!)Ia号を線上11:錨〈
-41-
JAERI-M84-162
= 2 Aet*J|±Kji<
= 4 xl2^^«6±icJS< =11 *aZ^%®±Kffi<
- 4 2 -
JAERI-M84-162
=2 企記号を線上11:描〈
=3 +記号を線上に描〈
=4 x記号を線上11:摘〈
=11 発記号を線上に摘〈
-42-
JAERI-M84-I62
6.1 JRR-4tf-£«m<D«SS
jRR-4 8t^*K^(i. mmmimftzti, m&mp<®*&wz%m'imtLx<,zmmxtt.m
imcmmmjtn;t°ti6*'3-z>migix&<!), g a a i ^ s ! * ^ ^ ^ ^ ^ (SPND) i*wmtt
Lxftmm*m<Dft®\t,&mtmMmmtte®mnizm. nKwm<t>mm.ifiM& <o >pts.^ ct& t>fritz0 JRR-4©»fgiSm. ^•fflm^iJ«SifStMfflU-235«^l^(g«*4K0I4ICtt5cfc-5 mm^zn (Bmm®g%t^v , jRR-4©5£t&atfjti. m%}5i^wniz2.5MWfrt> 3.5MWfC!itfLL#$*i;to -
6.2 tt&mwsmttxicm^izt.iiT-i'
tmmnic<fc5jgffiffliJS«. JRR-40ffi^±#JaHt[0«itb^ 2.5 MW. 1 &&8fe*5.4irf/ min i l ^ ^ f t T - t i i ^ ' f r b n T I . ' ' * , , 3B#©JRR-4 ©S*K&ft&t^tg«!t*4lcJ;SS!]5£ tt0-0!l*S 6.1 itTFto JRR -4 ffl^t»EBa. El 6.2 JC*3-J; r> icft ->Tfc 0 St8*R**li E - 5 K * S 3 f r n * f c . fclcA^f-* £ L -Cf iH^IS*»*^»S0f7K^¥W^»[ l co^ r« f-hTSo A^f-^ffllfffllco^-tJiPftC. A f i f - ^ J S ^ l l L T f a L W
(1) gtS»ffl§gS&#ft#& JRR - 4 ra^iWi20#©*!**g$-c'lilK3tlTfc 0 . C ©«&©&^&©¥*9««»iPtti!&
8»B.U-e*3 0 COJ; -3« i lp^©**aiE- 5 (cffJ8S*4«-#ALfc*i^ffl^|ft«lco^T, B ^ * t ! f f # * 3 6 W « t t » = » - K S ' X 5 l A rSRACj M \ ? tUH-*£ , $ r « © ¥ & # | S ] #&Hl#ffi«£ LT L42il '$tt**8&nfco t t » « H © » £ . * 5 : " £ « « * A£4K8&ft
fto&mmfomommifi&mt. ia6.3ic*ii-j;-5ft{i-c;&5o ftcif-8jiB&£x<Dft«*t Wfi«Bft«o«llft»:*flH»**fi< ft •»Ti»S#. cfttt. tMttffStfCUMtfURD 2.6 £fc fcft-)Tl>«fci6, S f i»Wlc^^^ i^EL*t t ; f f f l ^b*^^5J f t f c J6 i . e ibn5o
w*'iflj©ss»»ffi^»ii. HSIPsi*pio^©ai/j±^mft^Kffl!iSLfcfii*ffl^fco
(2) ffftgJiFkDffift. ttiSOIfttt
tF>b%mmmA%nZ8fiSM(0Kl:&miz. *16mm©fi:tf«35ffl, W9m7*ar-<D# - 4 3 -
JAE悶-M84-162
6. ]RR・4計装燃料測定値との比較計算
6.1 JRR-4針装燃料の概要
]RR-4計装燃料は，昭和48年に製作Sれ，板状燃料の本格的な計装燃料としては原研では初
めてのものであった。その構造は，図6.111:示されるようなもので中心燃料板及び外側燃料板各
1枚に熱電対がそれぞれ6本づっ装着しであり.自己出力型中性子検出器 (SPND)1本が取付
けられている。当時のJRRー4燃料要素 (A型燃料要素という)は各燃料板の U-235量が等し
く配分されており，計装燃料の場合も問機であった。との計装燃料による温度視，IJ定の結果.表
6. 111:示すように中心燃料板に比べ外側燃料板の温度が極端に高いととが判明した。その原因と
して外側燃料叡の冷却に必要な燃料要素と燃料要素に狭まれた流路の流量がかなり少ない乙とが
わかった。 JRR-4の燃料要素は，その後外側燃料仮の U-235量を内側燃料仮の勾になるよう
設計変更され (B型燃料要素という) ， JRR-4の定格出力は，昭和 51年 10月11:2.5MWから
3.5 MWIC出力上昇された。
6.2 肘装燃料温度計算に用いた入力データ
計装燃料による狙度額IJ定は.JRR-4の出力上昇以前の熱出力 2.5MW. 1次系流量5.4rrr/
minという条件でほとんど行われている。当時の JRR-4の運転条件及び計装燃料による測定
値の一例を表6.1 11:示す。 ]RR-4の炉心配置は.図 6.211:示すようになっており計装燃料はE
-511:装荷されていた。次に入力データとして重要な発熱分布係数及び水力学的係数について検
討する。入力データの詳細については附C.入力データ例を診照してほしい。
(1) 計装燃料の発熱分布係数
JRR-4の炉心は20本の燃料要素で構成されており.乙の鳩合の燃料要素の平均燃焼~は約
B%B.Uである。 ζのような炉心の中央部E-511:新燃料を挿入した場合の発熱量について，
原研熱中性子炉体系標準骸計算コードシステム「SRAC」U}で計算すると，新燃料の半径方向
発熱分布係数として1.42という値が得られた。計醤燃料の編合.ウラン装荷量は A型燃料と同
じであり.新燃料とみなしてよいので.半径方向発熱分布係数として1.42を用いる。燃料要素
内の各燃料板毎の発熱分布係数は.図 6.3に示すような値である。特11:計装燃料要素の熱電対
取付燃料板の発熱分布係数が低くなっているが.とれは.被覆材厚さが棟準燃料板の 2.6倍に
もなっているため，部分的に減速材が不足し中性子の熱化が不充分なためと思われる。
制方向の発熱分布係数は，昭和 51年 10月の出力上昇試験時に測定した値を用いたo
(2)計装燃料の流量.流速の検討
JRR-4炉心部は.図 6.211:示すように B行8列の絡子状11:炉，C;器禁.照射筒が配置されて
いる。炉心要素は下部プラグを格子仮に挿入し.自立する構造になっている。 F の格子厳には，
炉心要索Z容が婦人される 8行8列の穴とは別11:， o 15 nunの穴が35個，制御機フォロアーのガ
-43-
JAERI-M84- 162
©9l£l i . lK#&#ffi«©ft82#<fcl>S<I;&i*§&ftTI.->5o « K M « J I » H S * r t a i « * K o i ^ T t t l « - * . tt««»o«MsHRIB«BBrffi»i. 38.44
c n f - e * 0 , Al!JBSl(Etg^cD40.41 c i r f lCl t - i . ^ 5 « M i J > U r ^ 5 o f fcflSKSfe 0.41 cm*> & 0.39cm K « - , T ^ 5 o SSflOEfflflMftS-^* L . fr8*#rtaj§S£*<<S-r5 i . AS! JBS*4J:f3iS52.5««fl>-rSilr^fe**t»&nfco
SfsK©St>§tt, a^ f f i ^ f f l ^BT^gs ic / j s t j t s i j sn^o (3) S»fi)lfiS8SICo^T
JRR-4^iC»(0^]*«Ea«ifi<. H / ; • / * » « : LT3.000~20.000 gS7T*5 0 Cfflfi
12)
(3.25) fflHausenfflS^fiSOfioisnT^So f fcclCD^fi, ORNLfcfcH-SJSBffiBS©
|Cfc^TfeHausen©S;*Jiffl Lfco
6.3 ttgftf*(=£SMEjUEeMi
JRR-4itS«S*4lcBJfttf&ftfcJ»«»tt. 06.4ffl»B¥Klc&£*l5i-3lc&a**rtlcS£ 4Ka»c4ftT^**>»fett<. *•»*<•)»*. ff*RfSS-rs«ia-e**. f*-»T. ft mttm&^&'&m'&wfceiiMtiicfszztizctim^tf. sa## £*«**. #*.&©* n^n©PB1li:«i*ij0.05mmgKfflHiP^*«3. *ClcjJ<a sA<3C*Sffi»***1gJj|K«oT^5 qTIBtttf&S. ffi-sTttSfe&JKDttfltt (SfcttttS&ffi) S K 4 f f l S * W 6 * » K L r * < c ittffiS-C*5o
Itg*Rif4S0iSgE»^P*frt, 'ft'KgfcSci&ffi^fcjBUS*. S»ie*»»f3 - K FEATSM>ic«fc
offofco *ffltrt)ce*o-w*Bi6.5icst. A*'f-**iiiiBft,r*fc». ffA«ttiro»
wmimtommk*'*?* -9 tin* - xfrvmn&fi^. n^mn^oimMfp^smtm C©*S». ^ m * t * i t ^ f f i ( i , **©»«8ffigffi«fc»}fciB<tt«3. -&©^<i. &«*«£&#
IS)
FEATS KJcatfWJCfcfttf. ItS«B^«l**tffi^Sffitt. J*WStfrt*m#l*&ftT^ttl*j»** feiSffiilSJ;^. ifrbttfWVtt 1240 ( « • • £ & - < ? « * ) . W\mm-t:m2.3% &<.ts;Z
- 4 4 -
JAE随一M84-162
イド穴などがあり.それぞれに冷却水が流れ.燃料要素の外側燃料板や反射体要素などを冷却
する構造になっている。従って. 1次冷却水は.全て燃料要素内を通過する訳ではない。 JRR
-4実物大モックア y プ装置を用いて行った流水試験の結果によれば，燃料要素内全通過流量
の割合は. 1 次冷却水流量の約 82~杉という値が得られている。
次IC:計装燃料要素内通過流量について検討する。計装燃料の燃料板間流路断面積は， 38.44
crrrであり .A型燃料要素の40.41crrr に比べ.約5%減少している。また流路厚も 0.41cmか
ら0.39cmIC:減っている。各部の圧損係数を考慮し.計装燃料内通過流量を計算すると .A型
燃料より約2.5%減少するという結果が得られた。
計装燃料板をはさむ流路は.通常燃斜緩をはさむ流路のそれより.流入.流出時の形状損失
係数がかわるため流速分布も通常の渇合と異なってくる。計算によれば，計装燃料板をはさむ
流路の流速は，通常流跨の約87%程度になると推測された。
(3) 熱伝遥相関式について
JRR-4炉心の冷却水流速は低<.レイノルズ数にして3，000-20.000程度である。 ζの領
域は.屑流から乱流の遷移領域を含んでいる。 ζの領域における熱伝遥相関式としては.式ロ}
(3.25 )の Ha田 enの式が成り立つとされている。また乙の式は.ORNLにおける矩形流路の
熱伝達率に関するGambil1らの実験でもよく一致すると報告されている。 13)従って今回の計算
においてもHausenの式を適用した。
6.3 計装燃料による測定温度の僻価
JRR-4計装燃料に取付けられた熱電対は.図6.4の断面写真にみられるように被覆材内に完
全に埋めとまれているわけでな<.被覆材をくりぬき，押え板で固定する構造である。従って.熱
電対感温部が・直銭・冷却水の流れにさらされる乙とはないが.被覆本体と熱電対.押え板のそ
れぞれの聞には約0.05mm程度の隙聞があり.そ乙Ic:水が入り乙み温度分布が複雑になっている
可能性がある。従って測定値と真の被覆材(または被覆表面〉温度との差を明らかにしておく乙
とは重要で・ある。
3十装燃料板の温度分布解析は.有限要素法を用いた熱応力，熱伝導解析コード FEATS14)によ
り行った。その計算結果の一例を図6.5に示す。入力データを簡略化するため，押え板などの形
状が異なっているが.熱的には克分模擬できていると考えられる。計算は，板の両側の熱伝達E札
燃料芯材の発勲震をパラメータとし何ケースかの計算を行い，計装燃料板の熱電対中心温度と熱
電対及び押え板部分が被覆材で埋められていた場合の燃料板表面温度を比較した。
乙の結果.熱電対中心温度は，本来の被覆表面温度よりも低〈なり，その差は，冷却水流速が
早くなり熱伝通事がよくはるほど大きくなる乙とがわかった。燃料板表面温度IC:対する熱電対指
示温度と冷却水流速の関係において.冷却水流速が増大するに従い誤差が大きくなる乙とは京大
炉の実験においても報告されている。15)
FEATS による解析によれば.It裟織料勲竃対指示温度は.熱電対が取付けられていない燃料
仮表面温度より.中心燃料仮で約 12.4必{墳膜温度差で倹算).外側燃料板で約2.3%低くなる
という結果が得られた。表6.1の目十袋燃料測定温度において"補正混度"の欄IC:記された値は.
-44-
JAERI-M84-162
6.4 ff-JWMl
H&6K*«*BBfiBE©ttJHS»RtflilE'Lfc«g|l*S+o BWy-*!*. "WD. tftfJAJ" IC^St lTtr 'So
•fn, £Vf.tb\ciB:?¥-mtetix^z>k><Dtm.t>tiz>a c*i36*ffiEsnntf(ft3&iRj©aK»*tt
JRR-4 ttsJKAicj:zmmmt<Diwftn<D&&ii, ##2 &TC**Hi*3 t^vfttMss
- 4 5 -
JAERl-M 84 -162
ζの補正を行った温度である。
8.... 計算結果
図6.61C.被覆表面温度の計算結果及び補正した測定値を示す。詳細データは附D.出力例・
IC示されてb喝。
計算値と測定値にわずかな差異はあるが.比較的良い一致を示している。軸方向の温度の不一
致は.計算IC.使用した軸方向の発熱分布係数がBuinUpが進んでいない炉心での値を用いてい
るためで.計装燃料温度測定時の発熱分布は骨量~IIJ棒の引抜き位置から考えて.入口側にピークが
ずれ，全体的に若干平坦化寄れているものと恩われる。 ζれが補正されれば働方向の温度分布は
さらによ〈一致するはずである。
JRR-4計装燃料による測定値との比較計算の結果は.本来2次元あるいは3次元解析が必要
な非対称冷却条件においても，夜状燃料の揖合は，本コードが充分適用可能である乙とを示した。
-45-
JAERI-M84-162
2ikmmm
iik&lp>bAai 1 ft^^t-tbpg
st 6. i JRR -4 Mft3k¥¥&mmmmm%Lg. 2,500 kW 5.4m3/min 7.2m3 /min 20*
(•3 • & » « * » 1*3 S 27.2 °C S 34.1 °C
« R « - - h ± « * < & * ! * * « n- K m n $L « R « - - h ± «
ZllgiSK fiHESS*' mfe&m SE-sef1
5 cm 365 °C 37.6 °C 45.0 °C 45.4 "C
15 cm 44B°C 46J8"C 60.8 °C 61.5 °C
25 cm 56.0 °C 59.3 °C 81.0 °C 82.2 °C
35 cm 65.0 °C 69.1 "C 99S°C 101.3 "C
45 cm 655 °C 69.6 °C 98.0 °C 99.5 °C
55 cm 60.0 °C 62.9 °C 87.0 °C 88.1 °C
*1 "6.3h&9mizJ:&ffl&m&<0&f&" (1974^5^24 6 Wife)
4 6 -
原子炉熱出力-
l次系流量
2次系流盤
燃料装荷本数
JAERI -M 84 -162
表6.1 JRR-4運転条件及び計装燃料測定温度
2，500kW
5.4m3/nnn
7.2rrr /min
20本
(うち計装燃料1本)
1次系炉心入口温度 27.2'C
1次系炉心出口温度 34.l"C
計装燃料測定温度
燃料ミート上端 中心燃料板 外側燃料板
からの距離 測定温度 補正温度制 測定温度
5cm 36.5 'c 37.6 'C 45.0 'c 15 cm 44.8 'c 46.8 'c 60.8 'c 25cm 56.0'C 59.3 'c 81.0 'c 35cm 65.0.C 69.1 .C 99.8 .C
45cm 65.8 .C 69.6"1じ 98.0.C
55cm 60.0.C 62.9 "c 87.0 "c
持1 ・， 6.3 a ，I.i燃料による測定温度の評価"参照
(1974年 5月24日測定〉
-46-
補正温ぽ1
45.4 "c
61.5"1じ
82.2.C
lO1.3.C
88.1 .C
JAE
RI-M
84-162
hi»
09"i
i will* duns
st^z
if 10 I
-r
S9"ez , '(6/911 "C
:E
V r
8 '!
• I In
I !
i0l L-J_
2 ° O
to •O
10 s 1 as
—'
-CM
*
* S
I* Km
rap-
ft-$ -
CM ro w
m ID
c-10 01 o -
r in •
L L«
-JTC. 1
1
--I —r
u-sk
i ii_
TUB
&
-1
^
m --;»
-„.
iilio
I « 6
CO
I C
D
-4
7-
一ーで合-;;;:';:一一一
2 『
TF
'吉;r-{
'& II色、同.:9
』
自10
』〉開
mHー玄∞品
l-ON
EE'
肉zb o
o
円M
胃4叫•
6
s
lA植叫
l
Id2-3-4 民Ju-av-，，
揖慮対吋践洞訳書手縮図
(4) 3
自
-9-ω
一HJRR-4計装燃料要素図 6.1
五翌五一断ciiB-B
A^reRBHC5/.)
6 » -
fi^-WifcirTia 8-1 ROOL SIDE
16. 2 JRR- 4 WiiMM. ( 1974 5^B#) S t f f t^M&mft lKt t l l i , |£ '*<*»1
B*«*»BJCM
*,3RI?-4- ^ _ ..-,.- ,-;. " • • « ' • • • - - J 1 '
MB-
』〉開白
i玄室l】自問
-，-
J
て一一一一て--"""C， f r \\-~ (~
1 、，_.せ匹 、1電、 、一、注_l-ー噌...L
一一B 苦H浮S国t.~~
s 『冨!!
'3l _';~1 三 ~J.I
s
ーーーーーー-・，...，-ーーー-' r、.
Lμ 畠可
--' -
日G R E D c B A
8
7
4
3
5
6
&
内十阻止、一 一¥斗
苦手唱~;:r取町田
~
巴ao!...SlDE
2
担-1
JRR-4炉心配置(1974年当時)及び計装燃料熱電対取付図図6.2
JAERI-M84 - 162
s
tpfcmnm 0.995
\HmmmiR m 0.995
(2) 0.996
(3) 0.997
(4) 0.998
(5) 1.001
(6) 1.005
* « * 4 * K 1.013
#'M$m«
[(1)
(2)
(3)
(4)
(5)
(6)
0.816
rtffiy*m« [(1)
(2)
(3)
(4)
(5)
(6)
1.016
tf
[(1)
(2)
(3)
(4)
(5)
(6)
1.019
»
[(1)
(2)
(3)
(4)
(5)
(6)
1.021
//
[(1)
(2)
(3)
(4)
(5)
(6)
1.022
//
[(1)
(2)
(3)
(4)
(5)
(6)
1.024
//
[(1)
(2)
(3)
(4)
(5)
(6) 1.025
#MB*4#
[(1)
(2)
(3)
(4)
(5)
(6)
0.827
JRR-4 Kwm^mmwa^'m, immmmm^Mm^t>%m. m a 3 A $M*&&em ftgSrtftiKkftftftft
16. 4 tt««»/fc«ttBtft«©Krffl2?K (x 20)
- 4 9 -
JAERI-M 84 -162
中心燃料板 0.816
中心燃料板 0.995
内側燃料板(1) 0.995 冨一日(2) 0.996
"(3)1 1.021 (3) 0.997
(必! 1.022 (4) 0.998
(5) I 1. 024 (5) 1.001
" (6)1 1. 025 (6) 1. 005
外面IJ燃料板 1. 013 外側燃料板 0.827
'--ーーー・・圃園晒圃
JRR-4 A型燃料要素内発熱分布係数 計装燃料要素内廷熱分布係数
図6.3 A型燃料及び計装燃料要素内発熱分布係数
図 6目 4 計装燃料熱電対取付部の断面写真 (x20)
-49-
mm® mnaftam
i en
> S i S
5.50 CENTRAL FUEL PLATE ( WITH THERMOMETER ) TEMPERATURE DISTRIBUTION
me.5 tf$HR¥HE<z>&£#ffitf#
』〉何回出
lZE--四回
~
「一
熱電対
g
(Ego-H
〉
本副題
0.55
N
5.50 4.95
DISTRIBUTION
計装燃料板の温度分布計算
TE門PER円TURETHER門日門ETER
図 6.5
WITH FUEL PLRTE CENTR円L
JAERI-M84 - 162
qo.oo 10.00 20.00 30.00 40.00 50.00 6o.oq 1 I I I l_: I I I I I I
Clad Surface Temperature Center Fuel Plate Outer Fuel Plate
Calculated Measured O
o o
• 0
o a
0-00 10.00 20.00 FUEL PLRTE LENGTH (CM)
—1 1 1 1 1 1— 30.00 40.00 50.00 60.00"
INSTRUMENTED FUEL ELEMENT i & 6 JRR- 4 %mmwm.w&fetitiMt
- 5 1 -
JAERI-M 84 -162
o 60.0旬。
σ3
5U.00 40.00 30.00 20.00 10.00 eコ司 .00Eコσ，
00.0剖【
Measured Calculated Clad Surface Temperature
Center Fuel Plate
00.口剖【
00.0--
。企Fuel Plate Outer
00.ロ円【
00.00【
〔
U
DO-om
00.ロォ
凶区コ↑江区凶仏
zu↑
0
0
.
D
C
O
D
-
O
F
ロロ.0ω
00
・D凶
~，..--、、、，司， 】 、
i 、，、i 、，、，、， 、
a 、J'¥。J1 、，_.ノ 、，、，J¥，ノ， ， ，
， ， ， ， ， ， ， / ，
/
ダ， ， ， ， ，
， ， ， / ，
(!)/ ， ， 、..-，'
00.00-
00.0白
{U
00.0由
00.0F
凶区コ』・江区
UALZω」γ
00
・0凶
00.D旧
ロ0.0ぜ
o Cコ
o
60.0官50.00 20.00 30.00 40.00
FUEL PLATE LENGTH (C門}
10.00
o Eコ
o 的0.0。
ELE門ENT
JRR-4計装燃料温度測定値と計算値
----EO
FUEL IN5TRU門ENTEO
図 6.6
JAER1-M84- 162
7. 85 an
#=>- h-tofflwc&r), mkM®z&mtzw%mmi-fc<n&tAJEt'<x\zmeiX%z>'£.i?;
,-ew. $t.(C'>y*-r vmw££<D&vm&m&m*<Dm%fflmm#>$>hx%x^z>a t w c
m »
*=i-h'<DmM(*. jRR-4&.mam (mi m%m KwmLxftzn-tzx&mikR mwi
^.^^mmtmmsn, }RR-Ai\*&mwz&%um\fe^tm&Lx^<ufrx-wG.<»ko / j l a -KiLtMSft t t fco S o t , *3-KCD|3«K«, *^K*>fc« JRR -4 WSPtfi ffl^^fflKifc6i*ofcC<t*Wi5Lrte<0 #fi*£ £to£ie*;/=oTt>ilfl1IJRR-4ifS^
ia&. JRR -3 ©afeitttii*« bto. ef^'F^^ffl$ 7 xgjssfi«{tft®^-#-r«)sn-cv
K ££ t to s ic is L x fe®f3SMJ^^©S«^*^Sftast>'i;±#*ii]±ffW5Sfiic^*^©
24XIK
1) A.E. Bergles and W.H. Rohsenow, The Determination of Forced-Convection Surface-Boiling Heat Transfers, Transactions of the ASME86 (Series C - Journal of Heat Transfer), 365-371 (Aug. 1964)
2) &ffi#. ftftfilA. fl^8£fi»B®M£a£o^T. B*a«^#fS3t^H2g|5 (%£. •S195f-). 1542-1550. (88*0 37.11)
3) W.H. Jens and P.A. Lottes, Analysis of Heat Transfer, Burnout, Pressure Drop and Density Data for High Pressure Water, ANL-4627 (1951)
4) S. Mirshak, W.S. Durant and R.K. Towell, Heat Flux at Burnout, DP-355 (1959)
5) L. Bernath, A Theory of Local Boiling Burnout and its Application to Existing Data, Chem. Eng. Prog. Symp. Series, 56, No.30, (1960)
- 5 2 -
JAERl-M84 -162
7. 結 一語
本コードの開発により，板状燃料を使用する研究用原子炉のほとんどすべてに適合できる定常
熱水力解析コードの開発という当初の目的はほて連成できたと考えられる。
研究炉用燃料の濃縮度低減化計画により研究炉周の燃料は U-Af合金から UAfx-Af分散型
芯材.さらにシリサイド燃料などのより高密度な燃料の研究開発が進められてきているo 乙れiと
ともない熱水力解析もより厳密な解が要求されてきている。今後の改良点としては.各流路の流
量配分の計算，自然対流熱伝達計算の追加などを考慮している。また，沸隣開始温度なと'1;::ついて
は.諸外国の実験データとの検証を深め，信頼性を高めていきたいと考えている。
鮒 辞
本コードの原型は. ]RR-4改造計画(1967年当時)に関連して作られた大西信秋氏(現研究
炉開発室)のコード“ CT-2"であり，その後，岡島正直氏(現フジタ工業)により冷却塔，熱
交換器の計算が附加芯れ. JRR-4計装燃料による温度測定値と照合していく樗かで現在のよう
なコードとして整備芯れてきた。従って.本コードの開発には，永年にわたる ]RR-4管理課員
の多大の貢献があった乙とを明記しておく。本稿をまとめるにあたっても両角実]RR-4管理課
長をはじめとして多大の御助言と御協力を載いた。
現在.JRR-3の改造計画をはじめ.研究炉燃料のウラン濃縮度低減化計画がすすめられてい
る。本コードもとれら研究炉の安全解析に使用されるなかで一層の改良が行われてきた。本コー
ドをまとめるに際しでも研究炉開発室の安藤弘栄課長代理及び数土幸夫副主任研究員に熱水力の
専門的な立楊から貴重な助言を載いた。
参考文献
1) A.E. Berg1es and W.H. Rohsenow， The Determination of Forced-Convection Surface-Boi1ing Heat Transfers， Transactions of the
ASME86 (Series C -Journa1 of Heat Transfer)， 365-371 (Aug. 1964)
2)佐藤俊，必材陣久，強制対流表面勝腐の熱伝達について.日本機械学会論文集第2部 (28巻.
第 195号) . 1542ー1550. (昭和 37.11 )
3) W.H. Jens and P.A. Lottes， Ana1ysis of Heat Transfer， Burnout，
Pressure Drop and Density Data for High Pressure Water， ANL-4627 (1951)
4) S. Mirshak， W.S. Durant and R.H. Towe11， Heat F1ux at Burnout，
DP-355 (1959)
5) L. Bernath， A Theory of Local Boi1ing Burnout and its App1ication
to Existing Data， Chem. Eng. prog. Symp. Series， 56， No.30. (1960)
-52-
JAERI-M 84 - 162
6) D.A. Labuntsov, Critical Thermal Loads in Forced Motion of Water Which is Heated to a Temperature below the Saturation Temperature, Soviet Journal of Atomic Energy (English Translation) 10, (1961)
7) B*WM¥&m. WMXi&UL. 8-16 (1977) 8) I.E. Idel'chik, Handbook of Hydraulic Resistance, AEC-tr-6630 9) Rffljfft. m><)m%£i%ta%. &mit. (1963)
10) mm®, J R g f i i l S K i t ^ v v ? y 9 , I^EWfla&feM. (1977) 11) K. Tsuchihashi e t a l . , SRAC : JAERI Thermal Reactor Standard Code
System for Reactor Design and Analys i s , JAER1-1285 (Jan. 1983)
12) £ * * * « « . m?'fpT.¥®m5 -mjim-m&mt. %mm. (1972) 13) W.R. Gambill and R.D. Bundy, HFIR Heat-Transfer Studies of Turbulent
Water Flow in Thin Reatangular Channels, ORNL-3079 14) J.A. Swanson, FEATS - A Computer Program for the Finite Element
Thermal Stress Analysis of Plane or Axisymmetric Solids, WANL-TME-1888
15) mxmsitik, jm&mmumomfe, ram 43^11?#^#^#11^31 16) J.E. Houghtaling, Alain Sola and A.H. Spano, Transient Temperature
Distribution in the SPERT1D-12/25 Fuel Plates during Short-Period Power Excursions, ID016884, (1964)
17) Y.S. Touloukian and other, Thermophysical Properties of Hatter, Vol.1, Thermal Conductivity, (1970)
18) S. Nazare, G. Ondracek and F. ThUmmler, Investigation on UAlx-Al Dispersion Fuels for High-Flux Reactors, Journal of Nuclear Materials 56, 251-259 (1975)
19) Y.S. Touloukian and other, Thermophysical Properties of Matter, Vol.3, Thermal Conductivity, 288-289 (1970)
20) B * « * * & . fining** (ewrsiaiR) (1976) 21) J.N. Elliott, Tables of the Thermodynamic Properties of Heavy Water,
AECL-1673 (Jan. 1963)
- 5 3 -
JAE悶 -M84-162
6) D.A. Labuntsov， Critica1 Therma1 Loads in F~rced Motion of Water Which is Heated to a Temperature be10w the Saturation Temperature， Soviet Journal of Atomic Energy (Eng1ish Translation) 10， (1961)
7)日本機械学会編，機械工学便覧. 8-16 (1977)
8) I.E. Ide1・chik.Handbook of Hydraulic Resistance. AEC-tr-6630
9)内田秀雄.湿り空気と冷却塔.裳華堂. (1963)
10)尾花英朗，熱交換器設計ハンドプック，工学図書株式会社. (1977)
11) K. Tsuchihashi et a1.， SRAC JAERI Therma1 Reactor Standard Code
System for Reactor Design and Ana1ysis， JAERI-1285 (Jan. 1983)
12)石森富太郎編，原子炉工学構座5一熱工学・構造設計，培嵐館. (1972)
13) W.R. Gambi11 and R.D. Bundy， HFIR Heat-Transfer Studies of Turbu1ent Water F10w in Thin Reatangular Channe1s， ORNL-3079
14) J .A. Swanson， FEATS -A Computer program for the Fin:i.te E1ement
Therma1 Stress Ana1ysis of P1ane o~ Axisymmetric S01:1.ds， WANL-T阻，
1888
15)荒木康丞他，燃料板表面温度の甑IJ定，昭如 43年原子力学会年会要旨集
16) J.E. Houghta1ing. A1ain S01a and A.H. Spano. Transient T四 perature
Distribution in the SPERT1D・12/25Fue1 P1ates during Short-Period
Power Excursions， 10016884， (1964) 17) Y.S. Tou10ukian and other， Thermophysical Properties of Matter，
V01.1. Therma1 Conductivity， (1970) 18) S. Nazar邑. G. Ondracek and F. ThUmm1er， 1nvestigation on UA1x田 A1
Dispersion Fue1s for High-F1ux.Reactors， Journa1 of Nuc1ear Materia1s ‘
56， 251圃 259(1975)
19) Y.S. Tou1oukian and other， Thermophysical Properties of Matter.
Vo1.3， Thermal Conductivity， 288-289 (1970) 20) 日本機械学会，伝熱工学資料(改訂第3版) (1976)
21) J.N. E11iott， Tab1es of the Thermodynamic Properties of Heavy Water， AECL-1.673 (Jan. 1963)
-53-
JAERI-M84- 162
wfA. mmtt:®&mz~D\,>x
A.l ttttStteMrig**
16) (1) UA^ ^rMff l -coff t fe^ *„ ( c a l / c m - s e c ° C )
*„= 0.415-1.0 X!0""# ( 2 0 ^ 0^64O°C) * „ = 0.135 0 640*0
# ; &R CC) (2) UA^x a f f c S a m o j f t g * * -J ( W / c m « ° K ) 1 7 )
-»'=2.16546-2.7625 x
^ ; U A £ ^ < D J » g # i f S ( W / c m ' ° K )
0.8P +2.7 ( 1 - P )
P : UA*x &***«)* y vffiffi ( g / c i r f ) P ;m?UP
18)
^ = ^ ' ( i - p )
A. 2 A e&mW<Dmnm®K) l K t ( cal / cm • sec • °K ) A*#«f f l*M2*?! t t , ftfflcfc 9 ttfiK«#©W«5*C-e?*fc3 * I T ^ S 0
^ = 0.390 +2.22 x 10"4 0 -3.76x 10~7 02
+ 2.42 x 10"w e3 ( 20 ^ 0 <, 649 °C ) ^ = 0 . 1 7 0 Cff> 649*0
19) A.3 . f y K S f f l j S e * * J„ ( ca l / cm-sec • °K)
£f£«©#H^Xe 0 » e * ^ © « t ^ f f l l , ^ „ ^B = 0.123804 x 10 ~* + 0.593796 x lO~ r0
- 0.37228 x lO" 1 0 e" ( 18 £ 0 520 " O
- 5 4 -
JAE悶一M84 -162
附A. 使用した物性値について
A.l 燃料芯材の熱伝導率
現在.研究炉用燃料の芯材として使用され，又は開発中のものは.UAf合金燃料及びUAfx
分散型燃料である。
(1) UAf合金燃料の熱伝導率九 (cal/cm.sec ・.C)同
ん=0.415ー1.0x 10-4 (1 ( 20:5二 (1:5二640.C)
九=0.135 (> 640 "c )
。; 温度 ("C)
ω UAfx分散型燃料の熱伝導率』 (W/cmJK)}
A' = 2.16546 -2.7625 x
A'j UAi合金の熱伝導率 (W/cm.oK)
x ウランの重量割合
、冒JPA
r
、
P一幻一
+-ar
-oD
-AU --
x
p ; UAfx芯材中のウラン密度 (g/crrr)
P 気孔率
A'を求める回帰式は UAf合金芯材のものである。分散型燃料の場合，ポイドを8%前後含
む。従って多孔質材料に対する熱伝導率の補正を次式で・行っているf}争岳
A=A' (I-P)
A・2 Af被覆材の熱伝導率16)』A4E(cal/cm ・回c・OK)
Ai被覆の熱伝導率は.次のような温度依存の関数式で表わされている。
AA.t = 0.390 + 2.22 x 10-4 (J -3.76 x 10 -7 02
+2A2XI0・10(13 (20:5二(J:5二649.C)
AA.t = 0.170 (0 > 649 "C)
A.3 ポンド層の熱伝導率的Ao(cal/cm ・鴎c・。K)
仮状燃料の場合，芯材と Ai被覆は圧着成形されるので，ポンド層の存在は無視できる。しか
し.COOLODでは.結合欠陥等のポンド届を考慮した計算も行えるようになっている。ボンド
層内のガスは，燃焼が進むとともに依分裂生成物で占められる。ポンド層の熱伝導串としては.
生成量の多い Xe の熱伝導~の値を用いる。
Ao = 0.123804 x 10吋+0.593796 x 10-1(1
-0.37228 x 10-10 (J2 ( 18 s: 0ζ520.C)
-54 -
JAER1-M84- 162
A.4 6#&i?S# 201 21)
*&m&. sm&m&. mmmtmmtmsm^co^-^JutLxSUBROUTINE CONSTI
uimmmt. umo^ntLx^mm&u^ti. FUNCTION TSATH R^HFCJCIR*^ nx^2>„
- 5 5 -
JAERI-M 84 -162
A.4 経水及び重水20)， 21) ー
経水及び重水の物性値 を表A.l及びA.2IC不す。乙のうち比重量.比熱.動粘性係数.
熱伝導率.温度伝導率.粘性係数は温度と物性値のテープルとしてSUBROUTINECONST 1
IC用意されている。飽和圧力を関数としたときの飽和温度及び飽狗水と飽和蒸気のエンタルピ並
びに蒸発熱は.温度の関教として多項式近似され.FUNCTION TSATH及びHFGに収めら
れている。
-55-
JAE
RI-M
84-162
o o *
bo
\ u ^^
!u -\ H
UK K 8
^en •>• co c
- oo
^P oq co
to So.
t-: T
-H c
o
o
^i*
OJ
O
O
»-H *-«
LO
<D
C
O
CD
C
D
CO
C
O
CO
tO
C
O
i-H cp, "cj; •$» co
a
i co
t-' rn iri
H
N
N
CO
CO
C
O
CO
C
O
CO
CD
639.15 646.31 652.78 658.43
\ 663.10
o in
o
--* as co e
- co as
o
IO
00
Oi
N
^ .C
D
CO
C
O
CO
CO
C
O
CO
C
O
CD
CD
t-
CO
P. ^ b
- i
n
in ^
1 C
O
CO
bo
\ u ^^
!u -\ H
O
Q
^ W
o
co co
fH en
o
o
CD
o
en
o o
o
o
oS
i-H
C
O
CO
CO
O
CO
lO
C
O *-H
C
O
S
C*
O)
CO
en en
en en
o
en en
en en
o
Tj<
IT)
tO
C
* C
ft
CO
»
-l lO
^
C-
en T-i o
co co
©
, C
O
C-;
CO
, C
M
CD
O
C
D
»-! C
O
O
N
^ (
OC
O
T-1
T-1 T
H
T"H t-H
in m
c> to ^
* 0
0 O
S
CM
£•
T-I
LO
C
O
00
O,
T4
» m
'»
N
Hi
o
O.
OJ
^ J
> O
S
CM
C
M
CM
CM
CM
<-< c—
CO
C
O
CM,
CO
« 6
co co
1.1.1 B
t±3
X)
00
CO
C
O
*-H •**
N
rt W
l
OO
C
O
tO
CO
C
O C
O
CO
C
O
CO
C
O C
O
CD
«
-H C
O
^f
C-
o o
o
o
o
o
o
o
o
o
CO
C
O
tO
^
rt t*
H
o
en en
U
) C
O
l>
N
^ N
O
Hf
lO
H
»-i C
O
CO
-
^ O
; O
OO
OO
CO
C
O
CO
O
L
O
CO
V
lO
C
*3 ^
CO
NC
OO
N
©
O
CO
C
O C
O
»-» C
O
CO
C
O C
D
m
co co
os co
in
LC5 co co
oo
cq co —
< co •*
m
co •» i> id
"-"
CM
C
O
^ C
O
CM
C
M
CO
»
-J t
^ i
n
00
•-•
» \
S
is j?
Cft
CO
C
O
CO
CD
W
C
O «
rt |
> 0
0 C
O
O
Op
CO
i-i
r-i ^
H
O
O
en
CM
co to
co
(A
CO
<
-* (
D
N
Lq j» *p
co co
o
oo
oo
os c- in
CM
, C
M
»-i
T-*
TI
00
06
6
t— in
in cp
oo
co
CM
T-I S
g>
T—1
T—1 T
-H
T-1
O
66
0'
6C
)
T—
CO
0 0
CO
7
1* to
^ oo
•*»* oo
co
o q
?j
^ •*&
to
to to
to
en co LO
co I-H
in. C
-; oQ en
o
L
O
tO
lO
LO
CO
go co >-i C
M in
p
T
-I CM
CM,
CM,
CD
C
D
CD
C
O C
O
rt00H[*
tO
—; cs cq
in, CM
, co in
m in
in
C~
CM
t
- T
-1
m* A
S
os to oo
*-< £2 ob o
—
* co •*
^ji
to
L
O
lO
ID
o o
o
o
o
N
W
H
CO
CO
ifl
» C
* C
* C
O
LO
LO
L
O
LO
LO
, O
OO
OO
CD
0
> O
O
CO
0
0 O
O
00
00
00
C-
in, in m
to in
o
o" o
o
' o
00
TJ
i t—
c—
CO
fo
m co
«-i os in
in, in
m •<*
00
66
6
SS3 O
O
^ >
(0 H
lis O
) ~*
O
O
<5
C-
CO
O
O
O
CO
*-i
—1
»-H
©
O
LO
O
N
C
O C
O
to co
H
3 eo
If)
V
^f
CO
CO
o o
o
o
o
t*
N
CO
(
O
00
0)M
<0
00 3
CM, CM, OS -H
rt o
oo
oo
in co
os co 00
m
-cc co co
C
M
T-1
T-*
T-)
T-1 I—
1
6 6
6 6 6
co co
T-1
T-1
6 6
B. P
O
£ *
\ * 1
o o
oS
oS
<J> f-«
•-• ©
©'
O
Cft
O
~* C
O
tO
SS
SS
8 S
SS co S
Q
Q
O
. Q
Q
in <M
co 00
0 c*- 0
co 00 in
C
j "
I rt
-I
f^ C
O
•»*
CO,
LO
en. c* c\| r» co,
CD en co
to co
en $
$ en
en
en en en
o> en
T-H CM
. cq og co,
mn
N
HU
) qS op t-
t— co
as as os as os
<|
Hr
l l
OO
) 0
0 C
O
CO
t".' C
O
U)
«N
OO
O
OS
OS
O
S
OS
0
0
e». co
TP
d
«
TJ
I
rt
10 s
1-1 0
0 10
00 0
0 00
c~ c
~ C
M C
—
T-1 C
O
t~ to \
si c
oo
oo
o H
W
C
O
'f
o o
o
g
©
in
co t-
oo 35
ON
°I
O§
1-1 T—
1 T
-t T
-H T
-1
oo
oo
o O
C
M
Til
CO
0
0 C
M
CM
C
M
CM
CM
O
C
M
CO
C
O
-5
6-
』〉切河同
1富
田
品
l】由同
制 0.01"Cの値
軽水の物性値
温度 比重量 r 比熱 Cp 動粘性係数ν 熱伝導率』
温度rrf伝/X導h1率0a.1ll 粘性係数ρ飽和圧力 エンタルピ(kca)/kg)
ぞむ) kg/rrr kcal/kg"C rrr/s kcal/mhOC !;g・sec/ni kg/cni 飽和水 飽初蒸気
X 10-6 X 10-4
。 999.9 1.慌l8 1.79 0.489 4.85 1.829 O.∞6228 0.00 *1 597.49*1 10 叩9.7 1.1凹2 1.31 0.505 5.04 1.336 0.012512 10.030 601.87 20 駅到82 。思9 1.00 0.518 5.08 1.022 0.023826 20.030 606.23 30 995.7 0.9旬 0.8回 0.531 5.34 0.816 0.043251 30.014 610.57 40 992.3 0.9錦 0.6旬 0.543 5.48 0.676 0.075204 39.995 614.88
50 鈎8.1 0.'明9 0.555 0.552 5.59 0.559 0.12578 49.980 619.13 60 9832 1.0∞ O絹 O 0.562 5.72 0.482 0.20313 59.972 623.32 70 977.8 1.1凹1 0.417 0.571 5.85 0.416 0.31776 69.975 627.43 80 971.8 1.003 0.3飽 0.578 5.93 0.365 0.48294 79.993 631.45 90 965.3 1，凹5 0.328 0.5邸 6.01 0.323 0.71491 卯.031 635お
1∞ 958.4 1，叩7 0.297 0.586 6，回 0.2ω 1.03323 100.092 639.15 120 943.1 1.014 0247 0.589 6.16 0.238 2.0246 120.311 646.31 1.;0 926.1 1.023 0.209 0.5田 621 0.197 3.6850 140.705 652.78 160 907.3 1.037 0.186 0.585 6.22 臥172 6.3025 161.334 658.43 180 回6.9 1.054 0.1飽 0.578 6.25 0.152 10.224 182.267 ¥筋3.10
200 864.7 1.075 0.155 0.568 6.11 0.137 15.855 203.585 666.60 220 白0.3 1.102 0.146 0.554 5.98 0.125 23.656 225.393 668.75 240 814 1.136 0.139 0.537 5.81 0.115 34.138 247.827 669.30 260 784 1.183 0.133 0.517 5.57 0.106 47.869 271.076 667.91 280 751 1250 0.128 0.493 5.25 0.098 65.486 295.414 664.09
3∞ 712 1.36 0.13 0.462 4.77 OD91 87.621 321261 657.07 320 667 1.臼 0.13 0.423 4.12 0，伺3 115.12 349.337 645.76
表A.l
l
g
l
JAE
RI-M
84 - 162
m Q
P
Jg C
O C
O C—
tO
to
c~
oo
oo
oo,
•^ to
o
•*
co
in
m
to
to to
in
in
m
H
I is
oo o
e~ t—
co
t"; to
CO, Q tO
, N
t
og ^
t
-u
) m
Si
sS
MO
»O
IO
in CO
CM
46 s in CO
43
620 623 623 623
en
T—1
to
612 598
*3 o
co
go
c
-o
c—
c* c
o t~
«
«
(i) •
»
^
»•"» to
to (O
to
"H
CM
C
O
•** C
M CO
O C
O
Cft O
S t— ^
C
ft ^
» T
f ^
^J
C
O
to
to to
to
to
^ lO
(O N
CO
H
Cft t-i t
o
C-
co ,co
to
co
co
co.
i-j p
p
c<9
to* to
to
to to
co
*-i
co
in
t~
co
to w
oo
5
0
CO
-H
OO
CO C
O
oq o
en
co
P
to
o
o o
i C
M
£;
eft *-«
co
to co
«-l
CM
CM
CM C
M
SO
to
t~ CCJ
CM
O
co co
m I •s's * * * x x
^
•n
s
N
o
w.to
to
CM
co
C
ft p
O
00 t
-io i
w m
to
So
2
o
*-i CO
CA
Q
b
•-» o
o a
> t
o o
o
« ~
W
W
ID
o
o
o
o
o
i-H
^<
t-H
tO
§00
^
S
CM
en
to
CM
, C
M
Hr
tr
iU
JO
N
S
«
t«
«
en
cq
m
-a<
c
o
SS3 553 8
5 $ '
\ S
S x
m
to
» * i £
28
83 5§ P
« CO
w
OJ r
-O
«-* *-H
d
d
to
o
oo
CM
en
H
W
5
0)
^t
to
in
^
co
co
o
o
o
o
o
Tf
CM tO
i-«
CO
•-H
tO
CM O
0
0
CO
CM, CM
, CM
T-I
00
00
0 0
00
00
£3
«—«
I—I
d
d
(8
\ 8
* (D
fl«
W
rt
Tji
to
to H
m
tr-CM, c
o in
. to c
-**
^j *3
* ! «tj*
in
m
to
o-
05
00
§>
t— in
CM
05
q
q
rt c
s T
f*
U)
U) U
)
Cft CO
L.
- _ _
C
\) OCj
V
^
pq
in
in
in
in in
en to
o
o
CM
«
«i
o
to c
o *-H
CM
a) *j<
CM
en
to CM
, t>-
H
to
in
rt" ^
131 cj
co
CM
gait •«*
-a; u5
in in
. d
o
d
d
©
o
T* co
t-
00
to
eft o>
co
to
to
rf
•»
10
in
in
1^ in
in
. in
d
o
d
0 o
Ut
-N
O
51
00
00
^
c-
in
m
m
in
•** co
in, in
in
1/5
m
o
o
d
o
o
3?
o) <=>
a
v"
H
t«;
CM. —
J OS C
-, O
r-<
"H O
O
Tf
U) U
) TfC
O
CO O
O
to
CO
SH
<• CO
V
m
•
* co. co
. 0
o
o
o
o
ui
4
u; n
n
SCO
CM
tO
tO
in
CM
01 t
-CO. CM
CM. 1
—
O
OO
OO
H
o>
Oo
o
a
©
o>
*
$
Sg
co
^
333 CM
d
p.
p
* \
*3 §
.Hil
His
s 5
; O
O
CO
O
V
N«
t»
3^
^ "*
* a
m
in
in
co
00
00
§§11©:
CM ^
< •
* co
r-j
to •
* CM O
00
O
OO
OO
tp, <-J
f*
o
O
Cft CO
C—
C*»
00* lO
Mr
t C
BS
en
en
03
00
00
CO i-J
0
^c
*>• o
©
©
o
•1
CM CO
"tf
SO
O
O
CM
-tC
tO
CM
CM
CM
CM
S
cM
CO
CO
-57
-
MKF伺包
lZE--s
普150Cの値
重水の物性値
温度 比重量 F 比熱 Cp 動粘性係数ν 熱伝導率』 温度伝導事a 粘性係数p 飽和圧力 エYタルピ (kcal/kg)℃ kg/rri k回 l/kg't rr1/s kcal/mh"C rr1 /h kg ・sec/nf kg/cni 飽和水 飽和蒸気
X 10-6 X 10-4 X 10-4
4 1105 1.015 0.7.剖4 0.4782 4.266 0.7556 6.954X1O3 1.201'ド1 554.65'判
10 1105 1.012 1.278 0.4882 4.3臼 1.319 1.063XI0-2 6.270 556.73
20 1105 1.1∞9 1.135 O.回31 4.515 1.168 2.067 " 16.373 560.83 30 1103 1.1∞6 0.9044 0.5159 4.651 0.928 3.827 " 26.4謁 564.87 40 1100 1.003 0.7却7 0.52鵠 4.774 0.746 6.7，ωm 36.477 568.86
関 1096 1.凹1 0.6034 0.5360 4朗 5 0.616 0.1153 46.494 572.78 印 1091 0.9991 0.5105 0.5434 4，部5 0.520 0.1890 56.492 576.60 70 1085 0;叩74 0.4405 0.5493 5.076 0.448 0.2994 66.473 国0.37回 1078 0;四59 。調印 0.5537 5.157 0.392 0.4ωo 76.440 国4.07切 1071 0;姐46 0.34羽 0.5弱8 5.229 0.349 0.6871 86.393 587.68
100 1062 0，伺37 0.3095 0.5586 5.291 0.314 1.∞1 96.331 591.22 120 1044 0:四32 0.2国4 0.5587 5.387 0.262 1.9倒 116.189 598.∞ 140 1024 0;叩59 0.22お 0.5547 5.4謁 0.226 3刷1 136.061 604.38 160 1∞3 1.003 0.1由3 0.5470 5.434 0.201 6.2印 156.036 610.28 180 981.5 1.018 0.1765 0.5359 5.361 0.183 10.22 176.237 615.65
2∞ 959.6 1.044 0.1611 0.5216 5.209 0.172 15.92 196.833 620.35 220 938.1 1瓜~ 0.1489 0.5叫4 4.966 0.164 23剖 218.016 623.27 240 917.1 1.140 0.1390 0却 41 4.630 0.144 34.51 239.985 623.46 260 897.0 1.220 0.1308 0.4607 4.210 0.163 48.47 262.938 623.01 280 878.0 1.328 0.1239 0.4339 3.722 0.168 66.31 287.036 619.85
3回 8印3 1.470 0.1180 0.4034 3.191 0.177 回.72 312.704 612.14 320 844.1 1.652 0.1129 0.36飽 2.645 0.1ω 116.50 340.860 598.43
表A.2
lm一『
l
JAERI-M84-162
KTB. " / u ^ A U X h tikifltititia •aaaaaaaaaaa
PROGRAM UPOATE (NAY.
C00L0D <• IS, 19.84) IV SH.VAIANA8E
aaaaaaaaaaaaaaOOOOOOlO aaaaaaaaaaaaa00000020 aaaaaaaaaaaaa000OO03O
00000040 COMPUTER PROGRAM FOR COOLANT SYSTEM ANO ETR TYPE FUEl ELEMENT C
1) CALCULATION OF CODLING TOMER CHARACTERISTICS C 2) CALCULATION OF. HEAT EXCHANGER CHARACTERISTICS C 3> ETR IYPE FUEl TEMPERATURE CALCULATION C
( SYMMETRIC COOLING ) C ( ASYMMETRIC COOLING) C
000001 000002
000003 000004 00000S 000006
000007
oooooa 000009
Caaaaaav«saaaaaaaaaaaaaaaaa«aauaaaaaaaaaaaaa«**aaaaaaaaaaaaaaaa*aaaa«a« C
HEAL NFUEL,NPLATE,NHEAI DIMENSION 0LX<2),QO(21),DX(2>,DXA<2,5>,UU<2),U<2),WUVC2>,
1 VE(5),AK<2),BK(2),Ct:<2>,Zt/<15>,TXK(2> COMMON IHHOI JHAX,KEY<3> COMMON /MN1/ C0ATE<2>,NPAGE COMMON /NN2/ 1AMAX,JMAX,JAMAX,NPL0T,JTWC,KMX(.5,15> COHMON IHHSI H1,K2,H3,A,B,C,D,FRATE,TIN(10>,DT(10),JAHX(10),
1 XB<5,15),YACS,1S>,HA<5,15),H8(5,15>,HC(5,1S>, 2 FRATEC<5,15,2>.NHEAT<5,15,2),FHATEH<5),FL0Cl<5,15>, 3 FR(5),FC00L(S>,FFILH<5>,FCIA0<5),FB0HD(5>,FMEAT<5>, 4 2ETA<S,15,3),DH(S,15,3>,H0E(5,15,3>, 5 AH(5,1S,3>,ICHLCS,15,2> COMMON /HN4/ HHAX,NPHXCS),HFUEL<5),EAREA<S>,NPLATE(5,15>, 1 XA<5,15>,:tC(5,tS>,XCH<5,15,2),YCH<5,lS,2>,F2<5,21>
00000050 00000060 00000070 ooooooao 00000090 00000100 00000110 00000120 00000130 00000140 00000150 00000160 00000170 00000180 00000190 00000200 00000210 00000220 00000230 00000240 00000250 00000260
COMMON /NH5/ J1,J2,aAVE<5>,08(21),XAA(2,21,15),T8U<2,21>,KITE(5),00000270 1 TCH2,21>,YAVE(S>,S,TFUEL<ICNAX,PH1N(2) COHHON /HH6/ <IA(2,21,1»>,HZF<2,21>,TC2<2,21),TW2(2,21,1S>,ZF<5>, 1 TU<2,5,21),T0NB<2,22),TSAT<2,22)
000010 COMMON /HH7/ «RR<10),PFLO¥(10> 000011 COMMON /HNS/ TWPI,TWPO,OTP 000012 COHMON /UAL/ HA(5>,U0ENST<5>,POR0IY(5> 000013 COMMON /CT1/ TVC,RH0,CP,ANU,AMU,RAN0A,PRN,RAM0 000014 COMMON /PLT/ 1PTC,1PL0T«5,15> 000015 COHHON /PS3/ 7ETAP<2,3),DHP<2,3),H0EP<2,3> 000016 COHMON /PS4/ PA<2,10),VVV<2,3> 000017 COMMON /PS5/ PAF<2,21) 000018 COHHON /CHI/ RE<2),0E(2),VELCTY(2>,PERI<2> 000019 COHHON /OBI/ O0NB<2,22> 000020 NPAGE-1 000021 EEH • 0.1E-4 000022 IPTC " 0 000023 CALL VR1NPT
000024 KEY3 » KEY<3> Q00025 1FC KEY(1> .LI . 0 ) GO TO 40 000026 IF(HPLOT.Ea.O) GO TO 10 000027 REWIND 11 000026 10 IHX-IHAX-1 000029 JHX-JHAX-1 000030 JMAX1-JHAXM 000031 IFUEL-0.0 000032 VM"0.0 000033 S'0.0 000034 UPDN - 1.0 000035 IF(KEY(2).E0.-1) UPON - -1.0 000036 IF<KEY(2).EQ.O) UPON ° 0.0 000037 DO 30 dM,HMAX 000038 VF.(H) (1.0 000039 NPHAX"NPMX<N> 000040 TFUELMIUELtNFUEKH) 000041 DO 20 NP»1,NPMAX 000042 20 VE<H)<-VE<N)«NPLATE(N,NP>aNe«N,NP)aYA(N,NP)aXA<N,NP)a2, .0 000043 S>SiEAREA<H)aNFUEL(N> 000044 VM'VH»VE<H)»NFUEI.(H> 000045 JO COHIINUli 000046 40 IA»0 000047 50 IA=IAM 000048 aR£A*0.2388Et6«0RR<IA> 00004 9 IK KEYCI) .1 T . 0 > GO 10 95 000050 0tlM°ORIA/IFUEL 000051 FEI.H-PFLOW(IA) •FRA1E/IFUEL 00005? 00 90 N'1,NHAX 000053 QAVt(N)-OHH/Vr.(N) onnuVi VAVI<N) t r 1 H» 1 .666/1. <4aFRArEH(N)/EARL'A(N>
00000280 00000290 00000300 00000310 00000320 00000330 00000340 00000350 00000360 00000370 00000380 00000390 00000400 00000410 00000420 00000430 00C00440 00000450 00000460 00000470 00000480 00000490 00000500 00000510 00000520 00000530 O00OOS4O 00000550 00000560 00000570 00000580 00000590 00000600 00000610 00000620 00000630 00000640 00000650 00000660 00000670 00000680 00000690 00000700 00000710 00000720 00000730 00000740 00000750 00000/60
- 5 8 -
JAERI-M 84 -162
附B. プログラムリストc..............・・・・・・・・・・・・・・・・・・・・・・u・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・00000010c ・・.....・g・..PI白G園内" .. CODLOD ‘・ ..・...・・・・s・・00000020c ・・・・a・・J・・・・・ UPO~Tf (M~Y. 11. ，...) ・Y SH.W~l~M~BE .......・・8・・・00000030C 000000‘o C COKPUTfR PROGR~M fOR COOL~NT SVSTfM /‘"0 fT骨 TYPffUEιEιfMfHT C 00000050
1) C~ιCUL~JlON OF COOLI圃G JOWf圃 CH~R~CTERI&TICS C 00000060 2) CALCULMI日NOf. HE~J EX ClI~NGER CII~R~CJERI5 T1 CS C 00000070 J) ETR lVPE FUft TE"PER~TUAf CALCUL~TIßH C 00000080
( SYHHETRIC C日OLlNG ) C 00000090 ( ASYHHETRIC COOLINGI C OOOOu¥OO
c.......・・・・事・・・・8・事・・・...・g・-也・・・.......・・翠・....歯車......翠・・・・・・....・・・ 00000110 00000120
000001 HEAL HFUfL ， HPLATE ， HHE~T 00000130 000002 DIHEMSIOM DLX(2).QO(211.DX(2)，DXA(2，51，UU(2)，W(2)，WWW(官)， 000001‘。
Vf(51.1I1((宮1，8K<宮I，CI((宮)，lW(151，TXX(2) 000~0150
0日0003 COHHOH IMMOI JM~X ， KEV (3) 00000160 00000‘ CsHMOH /HM1I COATE(2)，NPAGf 000001官0000005 COHHOH IHM21 IAHAX ， J"IIX ， J~HAX ， HPLOT ， JTWC ， KH x('5 ， 15) 00000180 000006 COHHOH IMM3/ HI，H2，H3，A，8，C，0，FRATE，TIN(10)，DT(10)，JAMX(10)， 00000190
IÐ(5 ， 15) ， YA(5 ， 151 ， H~(5 ， 15) ， HB(5 ， 15) ， HC(5 ， 15) ， 00000200 自~rEC(5 ， 15 ， 2).NHE~r(5 ， 15 ， 2) ， f白~TEN(5)，FL日CL(5，15)， 000白0210自 (5) ， FCOOL(5) ， fFIL"(5) ， FCLAO(5) ， FBOND(5) ， FME~T(5) ， 00000220
‘ ZET~(5 ， 15 ， 3) ， DH(5 ， 15 ， 3) ， HOf(5 ， 15 ，])， 000002]0 ~圃 (5 ， 15 ，])， ICHL(5 ， 15 ， 2) 000002‘0
000007 COHHOH IMH‘1 NH~X ， NPHI(5) ， NFUEL(5) ， f~Rf~(5) ， NPL尚 f[(5 ， 15) ， 00000250 U(5， 15)， ~C (5， 15) ，ICH<'5， 15， 2)， YCH( 5， 15，2) ，F Z<5， 21) 000002・8
000008 CO""OH IMM51 JI ， J2 ， Q~YE(S) ， QQ(21) ， I~~(2 ， 21 ， 15) ， TØU(2 ， 21) ， klrE(5) ， 00000270 TCI(2，21>，YIIYE(5)，S，TFUEL，KHIIX，PHIH(21 00000280
000009 COHMOM IHM61 Q~(2 ， 21 ， 15) ， HlF(2 ， 21) ， TC2(2 ， 21) ， TWl(2，宮 1 ， 15~ ， lF(5) ， 00000290
rU(2，5，21)，TON8(2，22)，T5尚H2，22) 00000300 000010 COHHOH IH~71 QRR<lO)，PfLOW<lO) 00000310 000011 COMH日H IHH81 TWPl， TWPO，DTP 00000320 000012 'COHHON IU~LI HA(5)，UDEMSH5)，POROlY(5) 00000330 000013 COHHOH ICT1I TWC ， RIIO ， CP ， ~MU ， ~HU ， R~HDA ， PRMiRAHO 000003・白
00001‘ CO""OH IPLTI lPTC，JPLOTC5，H) 00000150 000015 CO""OM IP531 lE1AP(2，3)，DHP(2，31，HOEP(2，3) 00000360 000016 &O""OM IP5‘1 PII(2，10)，YYV(2，3) 000001官DQQQOI7 COHHUH IPS5I l'ilF(2，宮Il 00000380 000018 CO"HOM ICHII RE(2)，OE(2)，YELCTY(宮)，PER1(2) 00000390
000白19 CO"HO" 10811 QONB(2，22) 00000‘00 000020 HP~GE.' 00000410
000021 EEH 掴 0.1E
-58-
JAERI-M 84 - 162
000055 00005* 000057 000054 000059 000060 000061 000062 000063 000064 0C0065 000066 000067 000068 000069 000070 000071 000072 000073 000074 000075 000076 000077 000073 000079 000080 000081 000082 000083 000084 000OS5 000086 000087 000088
000089 000090 000091 000092 000093 000034 000095 000096 000097 000098 000099 000100 000101 000102 000103 000104 000105 000106 000107 000)08 000109 000110 000111 000112 000113 000114 000115 000116 000117 000118 000119 000120 000121 000122 000123 000124 000125 000126 000127 000128 000129 000U0
ICITEOD • 0 00000770 CO 18 HP" 1, UMAX 00000780 1F<KHI<N,NP).LE.1> CO TO S* 00000790 If(HP.CQ.I) GO TO 17 00000800
. IF<FRAUC(N,NP-1,?> .HE. FRATECCN,NP,1>> CO TO 89 00000810 IF<ICHL<N,HP-1,2> .HE. ICHKN,NP,1>> GO TO 89 00000820
87 KITE<N> - KIIE(N) * 1 00000830 88 CONTINUE 00000840
GO TO 90 00000850 89 K1TE(H) = 0 00000860 90 CONTINUE 00000870 95 JA • 0 C0000880
JAMAH = JAMX(IA) 00000890 100 JA«JA»1 00000900
J1=0 00000910 m = TlNUA)*FLQAT(JA-1)>DTUA> 00000920 1F(KEY<1>.GE.1) GO TO 105 ' 00000930 TVBM1X 00000940 CALL T0VER<IA,TWB> 00000950 CALL EXCHG<IA,JA,TWB> 00000960 IF ( KEYU) .LT. 0 ) GO TO 900 00000970 GO TO 120 00000980
105 TWPI-TIX 00000990 TVC'TVPI 00001000 IERR1 • 0 00001010
110 CALL C0NSTKKEY3,0,0,1,1,0,0) 00001020 VEP*-RHO»CP*PFLOW(IA)«1.E»6/60.0 00001030 DTP-BREA/VEP 00001040 TWXMVC 00001050 TWC°TWPl«DTP/2.0 00001060 CALL ERR0R(IWX,TyC,EEH,lERR1,H10,tll5) 00001070 GO TO 119 ~ 00001080
115 WRITE<6,116> 1A,JA,TWX,TVC,1ERR1,EEH 00001090 116 F0RHATO2X,'HAlN COOLANT INLET TEHP. ITERATION ERROR'/ 00001100
« 5X,'iA'',I2,2X,'JA=',]2/ 00001110 • 5X,'Tyx=',E12.5,2X,'TWC=',E12.5,2X,'lERRl"M4,2X,'EEH»',£12.5> 00001120 IERR1 • 0 00001130
119 TWP0"TWP1*DTP 000M14O 120 CONTINUE 00001150
H°0 00001160 130 N"N*1 00001170
J 2=0 00001180 JWO 00001190 ITE-0 00001200
NPMAX-NPHXCN) 00001210 138 DO 140 HP-1,NPHAX 00001220
ZV(HP)-FR<N>>FCOOLCN)«FLOCL<N,KP> 00001230 00 140 K-1,2 00001240 TW^(K,1,HP> - TWPI 00001250
140 CONTINUE OOOOmO IERR10 • 0 00001270
150 HP"0 00001280 160 HP'NP<1 00001290
02>HB<N,NP>/FL0AT(JNX> 00001300 HCO-HC(H,HP) 00001310 XCC-XC<H,NP)-XB(N,NP) 00001320
200 KMAX°KHX(N,HP> 00001330 IFCJ2.HE.0) GO TO 210 00001340 DO 205 1-1,5 00001350
205 ZF<L)«1.0 00001360 KHAX-1 00001370 GO 10 215 000O13B0
210 2F(1)>FR(N)*FC00L(N)*FL0CL(N>NP) 00001390 2FC2)*FH(N)«FFILH(H)»FL0CL(N,NP> 00001400 2F(3)-FR(N>aFCLAO(N)*FLOCL<N,NP> 00001410 2F<4)°FR<N)«FB0ND<N)»F10CL<N,NP> 00001420 2F<5>°Ffl<M>»FHEAKN>*FL0CL(N,NP> 00001430
215 CONTINUE 00001440 00 220 K"1,KHAX 00001450
220 PHIN(K) " 1.E+10 00001460 00 230 J°1,JMAX 00001470 OQ<J)=OAV[<N)«F;(N/J) oooouao 00(J)-Oa(J>»'l>.0«XA(N>NP> 00001490
230 CONIINUE 00001500 00 240 K-1,KMAX 00001510 0CCKW.0»XCII<N,HI>,K)»YCII(H,HP.K>MXCII(H,NP,IO«YCH<H,NP,K>> 00001520 PENI<K>-2.0>(XCII(N,NP,K>»YI:H(N,HP/K)> 00001530 OI.X<K)'XCII(N,NP,K)/NlltAl(N/NP/K) 00001540
- 5 9 -
000055
00005‘ 000051
00005・000059
0000・0000061 000062 000063
00006‘ 000065 000066 000067 000068 000069 000070 000071 000ij72 000073 000074 000075 000076
000077 000078 000079 000080 000081 000032 000083
00008‘ 0000115 000011品。00087000088
000089 000090 000091 000092 000093
0000)‘ 000095 000096 000097 000098 000099 000100 000101 000102 000103 00010. 000105 000106 000101 000108 000109 000110 000111 0ロ0112000113
00011・000115 000116 000117 000118 000119 000120 000121 000122 000官23
00012・000125 000126 000121 000128 000129 OOOIJO
JAE悶-M84-]62
UJE(闘B・0I!O 18 111"1，圃F開局ZlF (ItMIC圃，聞".Lf.l)00 '0 .， lf(IIP.f晶.1) 00 10 11 If(fR~lEt(II ，"P-I.2) .IIE. fR~'Etl輔 .111'.1)) 00 lD 89 JfεJCIIL<N.WI'-I.21 .刷E. ItHl(M.Mp.l)) OD TO 89
87 U TEIH) 田 K!JE(Jll・188 COHTlHUE
GO TO 90 89 KJTE(H) 0
90 CDNTlNUE 95 JA 0
JAHAk = JAHk (lA)
100 JA=JA・1JI=O TU=TlHClA)令flOAT(JA・1)oOTC JA) IF(KEY(I).GE.I) GO TO 105
TWO=T1X CAll TOWER(IA.TWOl CAlιHCIIG(IA，JA. TWO) If ( KEY(1l .LT. 0) 00 TO 900
GO TO 120 105 TWpl-T lX
"'Ic-rwpJ IERR1・0
110 CAll COHSTI(KEYl.0.0.l.1.0，0) IIEp-RHO・CP・pflOW(11¥)・I.E・‘160.0DTp-曲目EAlI/Ep
1I/X'TIIC TI/C=TI/P1+DTPI2.0 CAll ERROR(TI/X.TWC.EEH.1ERR1.畠官官。，畠1151
GO TO 119 115 WR1TE(6.116) IA.JA，TWX.TIIC.IERR1.EEH 116 FORHAT(12X.'HAIN COOlANT IH1ET TEHp. 1TEAATION ERROR'I
・ 5X ， 'IA~' ， !2 ， 2X ， 'JAc~ ， 121
・ 5~ ， 'TWXc' ， E12.5 ， 2X ， 'TWC:I ， Et2.5 ，世1.'IERR1 冒 '~I~ ， 2X ， 'EEH:I ， Et2.5)IERRI 0 0
119 TWPO回 TWP1+0TP120 COHTlHUE
M因。130 HoH令t
J2目。JW'O 11E-0
HPHAX・NP"I(H)138 00 1‘o HP'I.NPHAI
lWCHp)-fA(H)・fCOOl(側3・flOCl<N， HPl
00 I‘o K-l，2 TWlCK，I.HP)・TWPI
t‘o CDNTl側UElERR10 • 0
150 Hp-O
160 HP'Hp・1。l-HD(H.HP)IFlOAT(JHXIHCO・HCCH.HP)XCC.XC(H，Hp)-XBCN，HPI
200 KHAX・KHX(H.Np)IF (J官.NE.O) GO T日 官100日 205l.，.5
205 lf(l)=1.0 KHX'1 00 10 215
210 lF(I).fRIH)・FtoOl(H)・flOCL<H.HP)1f(官)cFO(H) OFf IlH(N)・fLOCL<H， HP) lF(3)=FA(H).FClAO(NI・HOCl(H.HP) lf(4)-fA(H)OF目。NO(側3・flOCL<H.HP)lf(5)'fA(H)・fHEAJ(N 1 ofl OCL (N. HP)
215 COHTJNUE 00 220 K回 I，KHAX
220 pH1H(K) ロ I.E+IO
00 230 J白 I.JHAX自由(J)cQ且VE(N)OFl(H，JI 。O(JI眉 QQ(J)O?O・XA(H，HIリ
230 CUNI1HUE
00 2・oK"I，KHX DE(K)固 2.0・XCHCH，HP，K)・VCH(N.HP，K)/(XCH(N.HP，K)+VCH(N.NP.K))pEHI (K)・ 7.0・(XCH(N.HP.K).YCH(H.Hp.K))
UI.X(K).xt“(H，HI'，KI IHllf1 (H.HI'，K)
-59ー
00000770 00000780 00000790 00000800 OOOGG810 0白00082000000830
000008‘0 00000850 00000860 00000870 00000800 00000890 00000900 00000910 00000920 00000930
000009‘0 00000950 00000960 00G00970 00000980 00000唖9000001000 00001010 00001020 00001030
000010・000001050 00001060 00001070 00001080 00001090 00001100 00001110 00001120 00001130 OOO(l II~O
00001150 00001160 00001170 00001180 00001190 00001200 00001210 00001220 00001230
000012‘0 00001250 000017¥0 00001270 00001280 00001290 00001300 OC001JtD 00001320 00001JJO 0000IJ~0
00001350 00001360 00001370 00001300 00001390
00001‘00 00001410 00001420 00001430 OOOOIHO OOOOIHO
00001‘60 0000U70 00001命8000001490 00001500 00001510 00001520 0000lS30 0000lS40
JAERI-M84- 162
000131 VELCIV(K>"VAVE(N>*FRATEC(N,NP,K>«FRATEN(N) 000132 1FU2.E0.0) VEICTY(K>=VAVE<H> 000133 WVV<K> = VELCTY(K)«YCH<N,NP,K>«DLX(K) 000134 II * ICHL(N,NP,K) 000135 DO 240 IS ' 1,3 000136 ZE'AP<K,IS> = 2ETA<K,II,IS) 000137 DNP(K,1S> - 0H<N,II,1S> 000138 HOEP(K,IS) = H0E(N,1I,IS) 000139 VVV(K,1S) ' <EAREA<N)/AR(N,11,1S))*VELCTY(K> 000140 240 CONTINUE
000141 000142 000143 000144 000145 000146 000147 000148 000149 0001 SO 000151 000152 000153 000154 000155 000156 000157 000158 000159 000160 000161 000162 000163 000164 000165 000166 000167 000168 000169
000170 000171 000172
000173 000174 000175 000176 000177 000178 000179 000180 000181 000182 000183 000184
000186 000181* 0001 BR 000189 000190 000191 ooo i n 00019.1 000194
« FUEL 1EMPERATURE CALCULATION «
»»<« COOLANT TEMPERATURE RISE •«««
J»0 250 J»J»1
IERR9 * 0 2LL=HA(N,NPH02«FLOAT<J-1> 2Y = 0?*FL0ATU-1)*YA<N,HP> 1FCJV.GE.1) GO TO 300 DO 290 KM,KMAX I F ( J - I ) 260,260,270
260 XAA(K,J,NP)<XA(N,HP> GO TO 280
270 XAACK,J,NP)*XAA(K,J-1,NP> 280 OA(K,J,NP)'aQ(J)«XAA(K,J,NP) 290 CONTINUE
JVW = 0 IERR5 • 0
300 K=0 320 K'Ktl
l F ( J . L E . I ) GO 10 360 [UC=TWZ(K,J-1,NP) IFUERR9.GE.1) TWC-(TW2<I!, J,NP)»Ty2(K,J-1,NP))/2.0 TKX"TUC 1ERR2 • 0
325 CALL C0NST1(KEY3,0,0,1,1,O,O> W(K) - CP»RH0»WWW(K> lF(JW.EQ.O) GO TO 340 IF(NP.EQ.1.ANO.K.EQ.1.0R.NP.EQ.NPHAX.AND.K.EO.KMAX> GO TO 340 H-2/K lFCK.EO.KMAX) GO TO 330
0AX=<(0A(K,J,NP>«aA(l;,J-1,NP>)»2W<NP)*(«A<H,J,NP-1)»aA<H,J-1,NP-l l)*ZV(NP-1>>/4.0 TW2(K,J,K?)°TW2(K,J 1,Hr)»D2»<<YA(H,NP)«YA<H,NP-1))/2.0)«QAX/W<K) GO TO 350
330 0AX=<(QA(t/J,NP)*0A(K,J-1,NP))»2U(HP)»(QA(H,J,NP»1)*QA(M,Jl,NP<1 1>*7W(NP*l))/4.0 lW2(K,J,NP)<TW7(K,J-l,HP>«D2*((YA(N,NP>«YA<N,NP*1>>/2.0>>eAX/W(K> GO TO 350
340 aAX"<0ACK,.l,NPU0A<K,J-1,NP>>>2F<1W2.0 TV2(K,J,NP)'TV2(K,J-1,NP>*D2«YA(N,NP)>aAX/V<K)
350 TVP=TUX IWX»1«/2<K.,J,NP> TWH • (TWP • 1WXJ/2.0 TWC • (TWH • TW2<K,J-1,NP))/2.0 CALL ERROR <IWX,TWP,EEH,IERR2,132S,*355> GO TO 360
355 WHITE <6,356) IA,JA,N,HP,J,K,IVX,IWP,1ERR2,EEH 356 F0RHA1(/2X,'HAIN COOLANT TEHP. (TW2 CAL.) ITERATION ERR0R'/5X,
• '1A"',I2,2X;,JA=',I2,2X,'N"',I2,2X,'HP-',I2,2X,'J",I2,2X,'|;='/11 • 5X,'l«/X»',E12.5,2X,'TVP"',E12.5,2X,'l£RR2=',14,2X,'E£M'=',t12.5> IERR2 ' 0
» « PRliSURE ORflP CALCUIA1I0N »*«
360 m < 0 - I U / U , J , N P > IFRR3 - 0
565 TXY ivi<K,j,mn • IWC ( IW2(K,1,NI '>t |w/(K,J,NP)>r2.0
CAII C0NSI1<KCY3,1,0,1,0,0,0> RIIU1 • HMO AHDI • MIO M<J.II.JMAX) on in 380 IUC ' IW2(K,J,NP>
00001550 00001560 00001570 00001580 00001590 00001600 00001610 00001620 00001630 00001640 00001650 00001660 00001670 00001680 00001690 00001700 00001710 00001720 00001730 00001740 00001750 00001760 00001770 00001780 00001790 00001800 00001810 00001820 00001830 00001840 00001850 00001860 00001870 00001880 00001890 00001900 00001910 00001920 00001930 00001940 00001950 00001960 00001970 00001980 00001990 100002000 00002010 00002020 00002030 100002040 00002050 00002060 00002070 00002080 00002090 00002100 00002110 00002120 00002130 00002140 00002150 00002160 00002170 /00002180 00002190 00002200 00002210 00002220 00002230 00002240 00002250 00002260 00002270 00002280 00002290 00002300 00002310 00002320
- 6 0 -
OD0l11
000132
000133
00013‘ 000135 000136 000137
000138
0001J9
0001‘。
1)001亀10001亀2000143
0001亀命
000145
000146
000141 0001命S。00149000150
000151
000152
OOOISJ 0001)4
000155 000156
000157
000158
000159
000160 000161
000162
000163
00016~
000165
000166
000167 000168
000169
000170
000171
000172
000173
。0017・000175
000176
000177
000118 000119 。00180000181
000182
000183
000184
00018~
E
E
E
000186
001118' 000188
001118リ
0001'/0
OODI~I
OOOI~2 01101切S
00019・
JAERI-MB4 -162
OOoon50
oooonoo
00001570
oooon80 00001590 00001600 00001610
00001620
00001630
00001640
00001650 00001660 00001670
00001680
00001690
00001700
00001710
J.O 00001720
250 J'J・ 00001730lERR9 0 00001740
1LL=IIA(H，NP)・D1.flOAT<Jー1> 00001750
1V 01・fLOAT<J-1>・VA(H;HP) 00001760
lF (JW.GE.1> GO 10 300 00001770
00 290 K;I，kHAX 00001780
IFu-1l 2晶0，2晶0，270 00001790 260 XM(K，J，HP).III(N，NP) 00001800
GU 10 280 00001810
270 II¥A(K，J，HP).XAA(K，J'I，HP) 00001820
280 QA(K，J，HP);OQ(J)・IAA(K，J，HP) 00001830
290 CON11NUE 00001840 」旬W 0 00001850
1ERR5 ' 0 00001860 300 K同o 00001810
320 K<K+l 00001880
1F(J.LE.I) GO 10 3晶o 00001890
rWC'IW1(且，J・I，HP) 00001900 1F(IERR9.GE.I) lWC=(IW1(K，J，HP)・lW1(K，J-l，HP))/2.0 00001910
lWX'IWC 00001920 1ERR2 • 0 00001930
325 CALL CONS11(KEY3，O，O，I，I，O，O> 000019亀OW(K) • CP.RHO・WWW(K) 00001950
1F(JW.EO.0) GO 10 J‘o 00001960 lF(NP.fO.1.ANO.k.EO.1.0R.HP.EQ.NP附AX.AHO.K.EO.KHAX) GO 10 3‘o 00001970
"回世IK 00001980
1F(K.EQ.KHAI) GO 1白 JJO 00001990 OAX' ((OA (K， J， HP)・OA(K，J-1，NP>>・ZW(制P)+ (QII(H，J， NP-1>・OA(H，J-1，NP-1)000020001>・1W(NP-1>)/4.0 00002010 11/1 (K，J ，~~)包lW l< K ， J I，Hf')φOZ.((YA(M，NP)φYA(N，NP-1))/2.0).OAX/W(k) 00002020 60 10 350 00002030
330 QAX.((QA(K，J，NP)φOA(K，J-'，HP))・ZI/(MP)・(QA(H，J，HPφ1)φOA(H，J-1，HP・1>000020‘。1>・lW(HP・1>)14.0 00002050 1旬l(K，J，HP)・lWl(K，J-I，HP)+DZ.((YA(刷，HP)・VA(H，HP+!>)12.0)・OAXIW(K) 00002060
GO 10 350 00002070
340 OAX.(OA(K，J，NP)φOA(K，J-1，HP))・ZF(1)12.0 00002080
II/HK，J，NP)・lWHK，J-I，HP)φ01・YA(H，NP).OAX/W(k) 00002090
350 II/P'IWX 00002100
I‘iX'1Wl<K，J，HP) 00002110 T句H • <TWPφ1~X)12.0 00002120
T旬C • (1WH・lwHK，J・I，HP))/2.0 00002130 CALL ERROR (IWX，1WP，EEH，IERR2，&325，晶355) 00002140
GO r日 360 00002150
3;5 WRllE(6，356) 1，JA，H，HP，J，K，IWX，IWP，IERR2，EEH 00002160
356 rORHAr(12X，'HAIN COOL Hl lEHP. (IW1 CAL.) 11ERA110N ERROR'/5X， 00002170
・，lA"'， 12 ， 2X~ 'JA=' ，12，21(， 'H"" ，1'2，21， 'NPII' ，12，?X，'J'" ，12，2"， 'K"" ， 11/00002180 ・ 5X ， 'IWX~' ， E12.5 ， 2 1(， 'TWP 回'， E12.~ ， 2X ， 'IERR2=' ， 1 ‘， 2X ， 'EéH 畠'， [12 ， 51 00002190 1 fRR2 0 00002200
00002210
00002220
000022JO
00002240
000022S0 OOOO'nbO OOOO'lUO
00002180
0000官官90
00002300
00002JI0
00001320
E
U-R t
u-
-
，
，
.
M聞
伊
L
E
L
U
R
E
E
F
E
u
-
-
，
、
，
.
・同
M
恥
、
，
箇
"
，
‘
、
，
，，
.
A
F
-
----・昼
、，
o
'
'
R
-
-
-
-
a
'
'
l
pFK
，
M
H
，
M
，，‘nr
、，，.‘
"
E
N
E
E
H
，‘u
'
'
g
a
.
、，ed-a伺
FI--"凶伺
'ea--.
，，
g&"
，，、
EAE--
，、，
VE2
“nE
且
'
'
且
M開
・"、，Ftw
，.A-a
，‘
O岡
V
R
U
E
M
開
'a
，‘"
F
E
・4
，HE
・V.
、，
A
H，‘。局
、，VEV
恥、，
T
，，‘FEa"
"EtkEHBE
，‘・a-uz''a
，‘huun
，、
EETP
，
vvEHtaιss
a"
・L
，
V》
EM圃
3
3
A
H
W
M
，，‘
FB
、，
E
-
L
S
I
}
S〉
M恥
nu--u四
'a'FBE--FSFE
，‘r
E
F
L
V
民
-A'・aHU
M
-
-
、，，a白
u
，‘，V
邑円，M開
''agM恥企唱。rv邑R
，‘νh-a
pb
・d，.、a内
eaun
，、ar
，‘，，
BL
，.、“曹一-arrtu--M阿
rEpvb
・-ahUFaunhUM--nu
b--且
h--a白
U
、a白
uu"MVFEM
AU
4
内，‘
..竃軍事竃$事・・..軍軍軍事...・2・2・2・2・・・・・....・....FUEL IE阿PERA1URE CAlCULAT10H ...包..............*.:1:........・・........
•••• COOLANl lEHPERAIURE RlSE ••••
••• rHl~SUR! OHOP CALCULAI10N •••
160 lXX(且1.r旬1(民，J，NP)
IfRR.I -。56~ rxvωI (K，J，NII)
rwt ‘rWl‘K，t，HI') tl旬I(K，J，Nr)) 11.0 tAlI COHSr 1‘KfY諸，1，0，1，0，0，0)制IUI ・HIIU
AHUI ・IIHUIflJ.t1.JHAlI 611 10 JSO ・Wf • IWlCK，J，MP)
一回一
JAERI-M84-162
000195 000196 000197 000198 000199 000200 000201 000202 000203 000204 000205 000206 000207
000208 000209
000210 000211 000212 000213 000214 000215 000216 000217 000218 000219 000220 000221 000222 000223 000224 000225 000226 000227 000228 000229 000230 000231 000232 000233 000234 000235 000236 000237 000238 000239 000240
000241 000242 000243 000244 000245 000246 000247 000248 000249 000250 0002J t 000252 000253 000754 000255
000256 000757
CALL CONST1CKEV3,1,0,1,0,0,0> RH02 = RHO ANU2 - ANU
380 CALL PR£SS<J,K,UPDN,RH01,AHUI,flH02,ANU2,2LL,HCO> PPP - PAF<K,J> PHI IK K> * AHIN!<PN]N<K),PPP> TSAT(K,J> • TSAIH(PPP) lFUXX<K>.GE.TSAr<K,J)) TW2(K.J,HP> = TSAT(K,J> W - TV7(K,J,NP) CALL ERR0R(TXY,TWY,EEH,IERR3,(365,8385)
GO TO 390 385 WRITE<6,386> IA,JA,N,NP,J,K,TXY,TVY,IERR3,E£H 386 F0RHAT</2X,'HAIN PRESSURE CAL. ITERATION ERR0R'/5X,
«'1A=',I2,2X,'JA=',I2,2X,'N=',12,2X,'NP=',12,2X,'.I*',12,2X,'I: = • 5X,'TXY=',E12.5,2X,'TWY=',E12.5,2X,'IERR3-',I4,2X,'£EH=',E12 IERR3 - 0 ' • ,
390 IF(KHAX-K) 400,400,320 C C «•»« FILM IEHPERATURE RISE «»»« : 400 K=0 405 K=K*1
JERR4 = 0 TWP=TW2CK,J,HP) TWJMAX - m<K,J ,HP> IF<J.NE.JHAX.ANO.JW.EQ.O) TVJMAX - TWZ(K,J,NP)
410 IFUTVC.EQ.O) THEN lWC=<TW2<K,1,NP>*TVJHAX)/2.0 ELSEIFUTWC.E8.1) THEN
TWC=TW2(K,J,NP> ELS£lF(ITUC.Efi.2> THEN
TWC=<<TW2(K,1,NP>tTWJHAX>/2.O+TVP>/2.0 ELSEIF<1TWC.E0.3) THEN
tilC=<TW2(K,J,HPmWP>/2.0 ENOIF CALL C0NST1<KEY3,1,1,0,0,1,1)
TWC1 - JVC AHUX=AHll RE(K>-DECK>»VELCTY<K)/ANU HKX-RAH0A/0E(K> .r(H3.HE.0.0.OR.CHE.0.0) HH3"H3» (DECK)/ZLL)«C HHA-H1«<RE<K)»A-H2>*PRN»*8><t.0»HH3> IF(HHA.LE.O.O) HHA-H1»PRN»*B«<1.0*KH3> lF(D.EQ.O.O) GO TO 415 TWC-TWP CALL C0NST1CKEY3,0,0,0,0,1,0> H4-AHUX/ANU GO TO 420
415 H4-1.0 420 HZF(K,J)-HHA*H4»D*HHX
TC2«,J>»<0/Hi;,J,NP>/H7F(K,J>>«7F<2>tT¥m,J,HP) ««»» ONB TEHP. CALCULATION «»««
421 PPP = PAF(CJ) CALL T0NB1(K,J,JHAXI,NP.PPP) IF(J.LT.JHAX) GO TO 430 PN1N<K) " AH1N1(PHIN(K>,PA(K,4>) PHN > PHINCIO ISAT<K,JHAXI> = TSATH(PNN) CALL T0NB1(K,JMAX1,JHAX1,NP,PHH>
430 IF(TC2(K,J).LE.T0N0(K,J)) GO TO 435 CALL 001L(K,J,NP,PPP,KEY3)
435 TWX-TWP TWP"TC2<K,J> CALL ERR0R(TUX,rvP,EEN,IERR4,*410,t436>
GO TO 438 436 WRITE<6,437) 1A,JA,N,HP,J,K,TWX,7WP,IERR4,£EM 437 F0RHAT</2X,'MAIN FILH 1EHP. RISE (ONB) UERAT10N ERR0R'/5X,
• ' 1 A = ' , I ? , 2 X , ' J A = ' , 1 2 , 2 X , ' N < = ' , I 2 , 2 X , ' N P = ' , I 2 , 2 X , ' J = M 2 , 2 X , ' K = ' • SX , 'TVX>" ,E12 .S ,2X , 'TVP» ' ,E12 .5 ,Z 'X , ' IEKR4- ' , I 4 ,?X , 'EEK' ' , f l 2 .
1ERR4 * 0 438 IF(KHAXK) 440,440,405
>••> CLADDING TEHHERAIURE RISE •»«
000258 000259
440 K-0 IERR6
00004330 00002340 00002350 00002360 00002370 00002380 00002390 00002400 00002410 00002420 00002430 00002440 00002450
',11/00002460 .5) 00002470
00002480 00002490 00002500 00002510 00002520 00002530 00002540 00002550 00002560 00002S70 00002580 00002590 00002600 00002610 00002620 00002630 00002640 00002650 00002660 00002670 00002680 00002690 00002700 00002710 00002720 00002730 00002740 00002750 00002760 00002770 000027.80 00002790 00002800 00002810 00002820 00002830 00002840 00002850 00002860 00002870 00002880 00002890 00002900 00002910 00002920 00002930 00002940 00002950 00002960 00002970 00002980 00002990 00003000 00003010
,11/00003020 5) 00003030
00003040 00003050 00003060 00003070 00003080 00003090 00003100
-61-
000195 000196 000191 000198 000199 000200 000201 000202 000203 000204 00020~ 000206 000207
JAERI-M 84 -162
C~LL CONST1(KEYJ，I，O，I，O，O，O) RH02 = RHO ANU2・ANU
380 CALL PRfSS(J ， K ， OPDN ， RH01 ， ~NUI ， AH目官，ANU2 ， ZLL ， HCO)PPP・PAF(K，J)PHJ/lCK) • AHINI (PHJN(K)，PPP) TS~T(K ， J) • TS~IH(PPP)
JF (J耳X(K).GE.TSAT(K，J)) TWZCK，J，NP) -TS~TCK ， J)
lVY • TWICK，J，HP) CALL ERROR<TXY， TWY ，EEH，lERR3，晶365，畠385)
60 TO 39。385 WRJTEC6，386) IA ， JA ， N ， NP ， J~K ， TXy ， TWV ， IERR3 ， EEH 386 FORH~ T< 12X，・HAIN PRESSURE CAL. ITERATIO刷 ERROR'I5X，
00000¥1330 00002340 00002350 00002360 00002370 00002380 00002390 00002400 00002・1000002・2000002430 00002HO 00002450
.' JA=' ，12，2X， 'JA='， 12，2X， 'N=-'， J 2，2X， 'NP='， 12，2X，.'J"，' ，1212X， 'K=" ，11/00002460 ・5X，'TXY"，EI2.5，2X，'rWY"，EI2.5，2X，'IERR3-'，14.2X，'EEH='，EI2.5) 00002470 000208 1E RR3・o 00002480 000209 390 lF(KHAX-K)‘00，400，320 00002490
00002500 •••• FILH TEHPERATURE RISE 事・s・ 00002510
00002520
000210 ・00K圃o 00002530 000211 ‘05 X-X+l 00002540 000212 JERR4 • CI 00002550 000213 TWP'TWZ(X.J ， ~P) 00002560 00021・ TWJHAX • TW1(K，J，NP) 00002570 000215 IF (J .NE.J例且X.ANO.JW.EQ.O) TWJHAX • TWZ(K，J・，N，.) 00002580 000216 ‘10 lF(ITWC.EQ.O) THEN 00002590 000217 lWC'(TWlCK ， I ， NP)+TWJN~X)/2.0 00002600 000218 ElSEIFClrWC.EQ.I) THEN 00002610 000219 TWC-TW1(K，J，HP) 00002620 000220 ElSElfCITWC.EQ.2) THEN 00002630 000221 lWC.CCTWlCK，I，HP)tTWJHAX)/2.0tTWP)/2.0 00002640 000222 ELSEIFCITWC.EQ.3) THEN 00002650 000223 .，WC. <TWZlK， J， HP) tTWP)/ 2.0 00002660 00022‘ EHOIF 00002610 000225 CALL COHST1(KEV3，1，1，0，0，1，1) 00002680 000226 rll&1 • TWC 00002690 000227 AHUX'且HO 00002700 000228 RE(X)-OE(K)・VELCTY(K)11同 00002710000229 H“X-RAHOAlOE (K> 00002720 000230 ~f(Hl.HE.O.O.OR.C.HE.O.O) HH3oH3・(DEUO/ZLL>・・ 00002730000231 HHA-Hl ・ CRE( K> "~-H2)・PRN..Ø.<1.0tHH3) 00002740 000232 IFCHH~.LE.O.O) HHA-HI・PRHUO'・(1.0tHH31 00002750 000233 1F(O.EQ.O.O) GO TO 415 00002760 000234 TWC回 TWP 00002770 000235 CALL CONSTI<KEYJ，O，O，O，O，I，Or 000027.哩0000236 H4・AHOX/AHU 00002790 000231 GO 10‘20 00002800 000238 415 H4田 1.0 0000世810000239. 420 HlF(K，J)'HHA・H4・・0・HHX 00002820 000240 TC2CK，J).(QA(K，J，NP)/HIFCK，J))・lf(2)tTIIZ(K，J，NP) 00002830
00002840 ・...ON日 TEHP. CAL CUL且1I0N ...・ 0000285000002860
000241 ‘21 ppp • PAFCK，J) 00002870 000242 CALL TOH81(K，J，JHAXI，HP，PPP) 00002880 0002・3 If(J.Lr.JHAX) GO TO‘30 00002890 000244 PHINCK) 固 AHIH1(PHIN(K) ， P~(K ， 4)) 00002900 0002・ PHH • PHIH(K) 00002910 0002・6 TSATCX，JHAXI) -TSATH(PHN) 00002920 000247 CALL TOHBI(K，JHAXI，JHAXI，HP，PHH) 00002930 000248 ‘30 Jf(IC2(K，J).LE.TONO(K，J)) GO 10・35 00002940 0002.9 CALL日0ILIK，J，HP，PPP，KEY3) 00002950 000250 ‘35 lWX-TWP 00002960 0002H TWPoTt2(K，J) 00002970 000苦52 CALL EAAOACTWX，rwP，EEH，IERR‘，&‘10，ι436) 00002980 000253 60 TO 436 00002990 000254 436 WRJTE(6，437) JA，JA，H，HP，J，K，TIIX，TWP，JERR4，fEH 00003000 00025~ 437 fORHAT(/2X，'HA1N flLH IE例P. RlSE 10NO) 11ERTIOH ERHOR'/5X， 00003010
・ 'lA~' ， J~ ， 2X/'JA=' ， 12 ， 2X ，'制ー，，12，2x， 'NP='，
-61-
JAERI-M84-162
000260 000261 000262 000263 000264 000265 000266 000261' 000268 000269
000270 0002 71
000272 000273 000274 000275 000276 000277 000278 000279 000280 000281 000282 000283 000284 000285 000286 900287
000288 000289
000290 000291 000292 000293 000294 000295 000296 000297 000298 000299 000300 000301 000302 000303 000304 000305 000306 000307 000308 000309 000310
000311 000312 000313 000314
000315 000316 000317 000318 U00319 00032ft
1)00.421
460 K=K«1 TCC«TC2«,J)
470 CK<K)*RAHAKICC) TC1(K,J)-(aA<ls,J /NP)»Xr.C/CK(K>)«2F<3>fTC2(K /J) io=rcc TCC=<TC1<K,J>tTC2<K,J>>/2.0 CALL ERRUR<TCX,TCC,EEH,IERR6,t4 70,t4 75> GO TO 480
475 WRUE<6,4/6) IA,JA,N,NP,J,K,ICX,TCC,IERR6,EtM 476 f0RHA7</2*,'NAlN CLADDING TEMP. ITERATION EBR0R'/5X,
« ' I A » ' , I 2 , 2 X , ' J A « ' , 1 2 , 2 X , ' N = ' , 1 2 , 2 X , ' N P » ' , 1 2 , 2 X , ' J = ' , 1 2 , 2 X , ' K « 5X, 'TCX=',£12.5,2X, 'TCC=',E12.5,2X, '1ERR6=',14,2X, 'EEH"=',E12
IERR6 - 0 480 1F<KMAX-K>500,500,460
»s*x CONTACT BONDING TEHPERATURE RISE • * • • -
500 K,=0 XBB=XB<H,NP>-XA<N,NP> ' IERR7 - 0
510 K=K»1 IF(XBB) 515,515,520
515 TBUCK,J)=TCl(i:,J) GO TO 540
520 IBC=TC1(K,J> 530 BK<K>=RAH800<TBC)
TBU<K,J> = <QA(K,J,NP>«X8B/BK«>>»ZF<4>»TCKK,J> TBX=TBC FBC=<TBU<K,J)*TCt<K,J>>/2.0 CALL £RROR<rBX,rBC,EEM,IERR7,«530,«545> GO 10 540
545 WRITE<6,546) 1A,JA,N,NP,i,K,TBX,TBC,1ERR7,EEH 546 F0RMAH/2X,'HAJN BONDING TEMP. ITERATION EHR0R-/5X,
•'IA=',12,2X,'JA='/12/2X,'N=',I2/2X,'NP='/I2,2X,'J=',12,2X,'K= « 5X,'TBX=-,E12.5,2X,'TBC=',E12.5,2X,'IERR?-',14,2X,'EEH"',E12 I ERR? •= 0 ,,
540 IF<KMAX-K) 550,550,510
<>*« FUEL HEAT TEHPERATURE DISTRIBUTION ««»
550 K=0 IERR8 = 0
5 5 5 K-K+1 TUC=TBU(K,J) BXA(K,1)=0.0 DX(K>=XAA(K,J,NP)/FLOAT(IHAX> 1 = 0
S60 1=1*1 1F(1-1) 565,565,570
S65 m = 0 . 0 GO TO 580
570 DXA<K,1>=0XA<K,1-1)+DX(K> XXX=0XA<K,I>**2
580 AK<K> = 2.0*RAHUAKN,TUC> TU(K.,l,J>«<0<l<J>«UAA<K,J,NP>*»2-XXX>/AK(K>>»ZF<5>*TBU<K /J> TUX=TUC TUC'( lU(K, I ,J)«TBU(K,J>>/2.0 CALL ERR0R(TUX,TUC,EEH,IERR8,t580,(585) GO TO 589
585 WRIIE<6,586> IA,JA,N,NP,J,K,TUX,TUC,1ERR8,EEH 586 F0RHAM/2X,'HA1N HEAT TEHP. ITERATION ERR0R'/5X,
« ' I A = ' , I 2 , 2 X , ' J A ^ ' , I 2 , 2 X , ' N = ' , 1 2 , 2 X , ' H P = ' , 1 2 , 2 X , ' J = ' , 1 2 , ? X , ' | ; = « S X , ' t U X = ' , £ 1 2 . 5 , ? X , ' r U C = ' , C t 2 . 5 , 2 X , ' l E R R 8 - ' , l 4 , 2 X , ' f E M » ' , E l 2 ,
1ERK8 = 0 589 I F ( I H A X I ) 590,590,560 590 If(KHAX.F0.1) GO TO 700
IF<KHAX-K> 600,600,555
»••« ASYMMETRIC COOIINU HEAT BALANCE *«>•
600 IU1 - IU (1 ,1 , )> IU2-1U<2,1,J) CALL rHHOH(rU1,IU2,ftH,IERR9,1610,4605) GO 10 700
605 VK1U (6,606) IA,JA,N,NP,J,1ERR9,EEH WRITE(6,607) (K, IV<X,1,J) ,0A(I ( ,J ,NP>,>AA(K,J,NP), IV7(K,J,NP>,
«IPII(K),II/I (K,J) ,K 1,2) 1.06 I0RHAI(/2X,'HAIN HI AI HAX ILHP. IUKAI I0N EHRUH'/iX,
. 00003110 00003120 00003130 00003140 00003150 00003160 00003170 00003180 00003190 00003200
,11/00003210 .5) 00003220
00003230 00003240 00003250 00003260 00003270 00003280 00003290 00003300 00003310 00003320 00003330 00003340 00003350 00003360 000033 70 00003380 00003390 00003400 00003410 00003420 00003430
,11/00003440 .5) 00003450
00003460 00003470 00003480 00003490 00003500 00003510 00003520 00003530 00003540 00003550 00003560 00003570 00003580 00003590 00003600 00003610 00003620 00003630 00003640 00003650 00003660 00003670 00003680 00003690 00003700 00003710
,11/00003720 5) 00003730
00003740 00003750 00003760 00003770 00003780 00003790 00003800 00003810 00003820 00003830 00003840 00003850 00003860 00003870 00003880
- 6 2 -
000260
000261
000262
000263
00026~
000265 000266
000267
000168
000169
000270 0002"11
E
E E
000212
000273
00027‘ 0002H
000276
000277
000278
000279 000280
000281
000282
000283
000284
000285 000286
000287
000288
000289
000290
000291
000292
000293
00029‘ 000295
000296
000297
000298
000299
000300 000301 000302
000303
00030‘ 000305
000306
000307 00030畠000309
000310
000311
000312 00031J
0003U
JAERI-M 84 -162
nuAUAυaununununu内
UnuAUnununuauaunuaunununuAUAUAU《
UAUnuauaunu
唱Eqe'sh司区Jιuqfoo“ヲ
nu-ana
，aA
句EJao
，，aoovau--nz'S&句巴J
，。，・000vaυ
唱目.‘a---a
・・・・・・5
・.，a
。，‘司eqeq，bq，bnaqea4qen，‘，s's'a's's'a's'a's'saaマ
's's
，a's's'sva's'J's's's
，a，a，a，a，a，a's
，a's's
，a，a's
，a，a，a，a's
aUAUaununuaυnuAUAυ白
U白
uaυnunuAUAUAHWAUAUAUAU白
uaunuaununununuaυ
nuAUAUAUnunununuAUAU白
U白
ununuaυAU《
UAUAUAunuaunuauaununuauaunu
nuAUaunuAUnunuaυaυaυ白
unununuaυAU《
UAUAUAUAUAunuaυnuaunuaυaυnu
nuAUaunununuaqaυaυaυaυnununuaυAuaunu《
UAUAUAUAUAUnununuAU白
unu
I
1
・
1
2'5
•. ι2
釘
-n
・E
'
E
，， uan
，
2E
，M円
2
E
'lE
νA
，，
区
J''
Izx
'J2
n
n
'
'
nu
，a勾
3
自
E
l
-
-
ω
M
円
nu伺
na'
'
f
E
F
E
，，
K
E
2
2
，
、
，
un--ao
均，‘
&U的
u
，m関
E
H
』
'
R
，.、，
nunz'aFE
'
a
J
F
E
a
内
nv-a
、，，，
EanMmM開，
Z
4
，E，，
，‘
.. pbv''曽
A
F
'
E
I
Z
2
2
4
n
u
'
y
n
a
'
-
r
，.，5
‘，
a崎哲
Anrnz
・
、，
e
・PLM何・且。，‘
v
-
n
'
z
・rι
'
・a
f
b
'
I
'
E
v
-
n
n
u
n
M
n
v
h
z
'
pb
・nMn'PHVM刊，
''ηerE
・dM開'
E
E
f
I
，』
'E
F
・旬、，，
hrbuwa司炉、
切命、，u
n
M同
白
U叫
4T'
--JE
，A
，，
O
B
'
E
H
L
2
'
6
p
k
'
'
E
l
z
a
M町，‘F
b
a
M
"
'
n
4
'
'
2
E
J
，，。
〉
J
E
I
'
H
=
5
0
E
'
I
'
A
I
A
・
5
E
K
A
T
E
-
A
J
2
'
，，，‘、，F
L
M
m
'
・an
u
、，，、‘an
・dT，、，，，F
E
n
u
J
t
o
'
4
6
'
x
'
s
'a内，、断-na冊子
EUZ内句，h
，、，
vhnM円
z
，‘nUAU&句司，‘，znuv-n
《
A
3
1
H
a
'
J
2
x
-
2白
JEER464EE--x
E
z
'
E
I
E
t
I
'
I
A
唱ZT，、，M邑RT，，‘
AurE員同
'
'
a
u
M円
-
a
v
h
，‘==-LT'''M円
z'nMnv-n
v‘RFL
，、‘.、zapL
・t
・-a白
K
A門曽
AnMn
，、
毘
FLV邑Rpbp・-FLA門
Aun時“
u
'且
EJrErv
KIE--TEGMWF，
E
E
-
S
A
U
A
U
E
J
a
目
nu
&u
，
，
、
r
，rO
0
4
4
4
4
4
•••• CONTACT 80NOING TEHPERATURE RISE •••• 500 K=O
X88=XD(H，NP)・XA(N，NP)lf官官7 ~ 0
SlO K'K・1IF(X8B) 5¥5，5¥5，520
515 JBU(K，J).tcI<K，J) GO 10 540
520 TUC.JCI<K，J) 530日KCK)=RAH白OD<J8C)
TBU(K，J)=(QA(K，J，HP)軍X8BI白K(K))・lF(‘).JCI(K，J)TBX=T8C T8C=(T8U(K，J)'TC¥(K，J))/2.0 CALL ERR日R(T8X，T8C，fEH，IERR7，&530，C545)GO '0 540 00003‘10
545 WRllE(6，546) lA，JA，N，HP ，J ，K， JBX， T8C， IERN7 ，EEH 00003420
546 FOHHAr(/2X，'HAJH BOHOING TEHP. JTERATIOH E~ROR'/5X ， 00003430 .'IA='IT2 ， 2k ， tJA=' ， 12 ， 2X ， /N=' ， 12 ， 2X ， 'NP=~ ， 12 ， 2l ， 'J=' ， 1 2 ， 2X ， /K=' ， 11/00003~40 • 5X，'TOX='，EI2.5，2X，'JOC='，EI2.5，2X，'IERR1='，14，2X，'EEH園，，EI2. 5) IERRl • 0 ・..
540 lf(KHAX-K) 550，550，510
00003450
00003460
00003470
00003480
00003490 00003500
00003510
00003520
00003530
00003540
00003550 00003560
00003510
00003580
00003590
00003600
0000361~ 00003620
00003630 00003640
00003650
00003660
00003670
00003680
00003690 00003700
000037¥0
..・・ FUEl HEAT TEHPERATURE DISTRIOUTIO側 ....11 550 1(=0
IERR8 0
555 1(=1('1 TUC=TBU(K，J) OXA"(K，1).O.O OX(K)=XAA(K，J，HP)/FLOAT(IHAX) 1冨。
560 1巨 1+1
IF(I-l) 565，565，570 565 XXX=O.O
GO TO 580 570 DXACK，I)=OXA(K，I-¥)+OX(K)
XU=OXACK， J)..2 580 AK(K)=2.0・RAHUAL(N，TUC)
TU(K，I，J)'(也Q(J)・(XAA(K，J，NPI，'2-XXX)/AK(K))・IF(5)'TOU(K，J)TUX=TUC TUC=(TU(K，I，J)'THU(K，J))/2.0 CALL ERROR(TUX， TUC，EEH，IERR8，畠580，晶585)
GO TO 589 585 WRITH6，586) IA，JA，H，NP，J，K，TUX，TUC，IERR8，EEH ~ß6 fOHHAI(/2X，'HIH HEAT TEHP. ITENATIOH ERROH'/5X，
.' IA;.1 ，J2，2I(， 'JA=-' ，11，21(， 'N=' ，12，2X，'NP=' ，12，2X ，'J=' ，12，?X，'k=' ，11/00003720 ・日"IUド.， [12.5 ，宮 x ， 'rUC" ， fI2.~ ， 2X ， '/ERR8" ， /4 ， 2X ，'f: EH=' ， EI2.5) 00003730
¥ERN8 0 00003740
~89 ¥F<lHAX-() 590，590，560 00003750 ~90 IF(KHAX.fQ.I) GO JO 700 00003760
IF (K制AX-K) 600 ， 600 ， 5~5 00003770 00003780
・・・・ ASYHHElHIC 1:001IN6 IIF.AT HAL HC正 ・..・ 00003790 00003800
00031) 600 IUI.IUCI，1，J) 00003810 OOOHh ¥U1.1U(2，I，JI 00003820 000311 CAll rHHON(IU1，IU1，[(H，IERR9，C610，Ch051 00003830
000J18 GU 10 700 00003840
OOOH9 bO~ 句HITf(6 ， 6061 IA，JA，N，HP，J.IEHR9.EEH 00003850 000，110 W骨/1((6，607> (K，IU(凪.I，J).QA(且，J.HPI，XAA(K，J，HP)，IVllK，J，HP)， 00003860 ・IIII1K)，1111 (K，J)，K"I，?) 00003810
IIOO，i11 I.OoIIIHH((/'/X，'HAIH HII HAX Il H~. IIlNAIIOH fNHO制"与X， 00003880
-62-
J A E R I - M 8 4 - 162
000322
000323 000324 000325 000326 000327 000328 000329 000330 000331 000332 000333 000334 000335 000336 000337 000338 000339 000340 000341 000342 000343 000344 000345 000346 000347 000348 000349 000350 000351 000352 000353 000354 000355 000356
000357
000358 000359 000360 000361 000362 000363 000364 000365 000366 000367 000368 000369 000370 000371 0003 72
«'1A=',12,2X,'JA=',I2,2X,'N=',I2,2X,'NP=',I2,2X,'J=',12, « 2X,-1ERR9=',14,2X,'EEM=',E12.5//SX,'(MEAT MAX. TEMP)', « !X,'(IIEAT FLUX)',3X,'( XAA )',3X,'(WATER TEMP)',3X, ' < UU >'/8X, « '(TRNSFER COEF.)')
607 F0RHAT(1X,'K=',I1,4X,F8.3,7X,E12.5,3X,F8.5,3X,F8.3,5X,E12.5,3X, » E12.5) 1ERR9 = 0 GO TO 700
610 K-0 620 K=K*1
1F(XBB> 630,630,640 630 UUB-0.0
GO TO 650 640 UUB = XBBaZF(4)/BUK> 650 UUX=ZF(2)/HZF(K,J>*XCC»ZF<3)/«(IO*UUB»XAA<K,J,HP)«ZF{5)/A)!(K>
UU(K)=1.0/UUX IF(2-K) 660,660,620
660 CONTINUE MINUS = 0 00 680 K=1,2 H-2/K UUA • UU(KW(UU(0+UU(H)> 0T7 = TWZ(M,J,NP)-TW2(K,J,NP) UUB = QO<J)tUU(H)«DTZ QA(K,J,NP>= UUA'UUB 1F(QA(K,J,NP).LE.0.0> MINUS = K XAA<K,J,NP>=QA<K,J,NP)/Qa(J>
680 CONTINUE IF(HINUS.EU.O) GO TO 300 H = 2/HINUS OA(HINUS,J,NP) = 1.0E-30 XAA<NINUS,J,NP) = 8A(MINUS,J,NP)/QQ(J) QA<H,J,NP> - 80<J)-1.0E-30 XAACM,J,NP> = aA<M,J,NPWQO(J) GO TO 300
700 lF(J.LT.JMAX) GO TO 250 lF(<J2.HE.0.AN0.ITE.Ea.0).AND.KlTE(N>.GE.l> GO TO 720 IF(J1 .E«. 0) GO TO 710 CALL aOHB(HP)
710 CONTINUE C s*»aa»aaaaaaaaaaaa*aaa*aasaa»»»aa»sa«aa C * PRINT OF CALCULATED RESULTS « C aaaaaaaaaaaasaaaaaaaaaaaaaaaaassaxaaaaa
CALL 0UTC1A,JA,N,NP) C aaaaaaoaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa C « STORE THE PLOT DATA ON FILE 11 » C Basaaaaaa*»»aaaaaa«aaa>K»s>««aaxssss>as
1F(IPL0T(N,NP).LT.l.OR.J2.E0.0) GO TO 720 CALL 0UTF1)(IA,JA,N,NP,DZ>
720 1FCJ2) 750,750,770 750 J2=1
GO TO 200 770 lF(NPMAXNP) 800,800,160 800 Jtl'JUU
IFUITE(N).LE.O.OR.ITE.EO.I) GO TO 850 EEEM = 0.1E-4 TW1 ' TW<2,JMAX,NPMAX-1> TW2 = TUZ<1,JMAX,NPMAX> CALL £RR0R(TW1,rV2,EEEN,IERR10,1150,1835)
GO TO 840 835 HBI1£<6,836> IA,JA,N,IW1,IW2,1ERR10,EEEH B36 F0RMAT(/2X,'HA1N COOLANT(NPNAX-1 S NPHAX) ITERATION ERROR'/SX,
»'IA=',J2,2X,'JA=',I2,2X,'N=',I2/ £12.5,2X,
000373 0003 74 000375 000376 000377 000378 000379
000380 000381 001382
,E12.5,2X,'TV2=' a5X,'TW1 IERR10 - 0
840 ITS = 1 GO TO 150
850 IF(NMAX-N) 900,900,130 900 1FUAHAX JA> 950,950,100 950 IFUA.LT. IAMAX) GO TO 50
IF(NPLOI.EQ.O) GO 10 1000 C aaa»»aa*ssx***»a*»*aa»»«aa»*«s«*aaa*aaa C a PtOI 01 CALCULATED RESUI1S a C aaaaaa«a»»**»*aa»a»»aaaa««a*aaw««aaaaaa
CALl CPLOT 1000 STOP
fNO
!ERR10«',I4,2X, 'EEEM-' ,E1 2. 5)
00003890 00003900 00003910 00003920 00003930 00003940 00003950 00003960 00003970 00003980 00003990 00004000 00004810 00004020 00004030 00004040 00004050 00004060 00004070 0000408C 0000409(1 0000410) 00004110 00004150 000041.JO 00004140 00004150 00004)60 00004 .70 00004 180 00004190 00004200 00004 210 O000'i220 00001230 00004240 00004250 00004260 000(14270 000D4280 00034290 00004300 00004310 00(104320 00004330 00004340 00004350 00004360 00004370 00004380 00004390 00004400 00004410 00004420 00004430 00004440 00004450 00004460 00004470 00004480 00004490 00004S00 00004510 00004520 00004530 00004S40 00004550 00004560 00004 5 70 00004580 00004590 00004600 00004610 000046 20 00004630 00004640 00004650
- 6 3 -
000322
000323 000324 000325
000326 000327
000328
000329
000330
000331
000332
000333
000334
000335
000336
000337
000lJ8
000lJ9
000340
000341
000342
000343
000344
000345
000346
000347
000348
000349
000350
000351
000352
000353
000354
000355
000356
E
じ
E
000357 E
E
E
000358
000359
000360
000361
000362
000363
000364
000365
000366
000367
000368
000369
000370
000371
000372
JAERI一M84 -162
，
x
'
-ovA
，守
J
，
，
》
ラ
-
MU
内，Z
H
u
-
-
'
'
E
2'《
，
l》
'
x
'
p
'
s
'MRM-
同，
a
E
3
3
・e，，，.
a
'
a
o
'・3
F
E
X
P
，
内
4
a同
M円
MA
'M円
E巴
va
2
1
'
l
I
S
，A伺
nR
・
'
E
E
a
---M円
v'rv
nr
，‘.“円，
M伺
'
M
・M-同
，，《
3
，VA
，
，
zs・3
2
t
x
-
'
'
3
2
q，島長
J'
唱
a
I
・，
E
，内，‘‘，，
，.av-m
z
E
A
F
M
同，a
内，
，，V
A
'
J
'
=
-
MA"《
8
2
E
，
kr
，E
，，
2
'
x
x
e--，を.“、，A『
'z'''
'
F，
》
1
z
，‘，.，a
a伺
A・V
・-内Er
，
JIUE，
，，SLnuz
''rrpLVA
X--
，
29TR
，
'n阿
aunrEVAAυnU
2
H
E
F
t
o
lE"S《
》
=7
'1《
"
I
5
'
'
'
n
関
aun-n
，nu
=''『'Mm内
d
n肘
Y'
aunUAM-
同，、nm4an問
-a
内，‘，、，，nuFEFEnu
，
F
I
G
-----B--r
nυ 6
610 ~.O
620 K=K+l
IFIXBBJ 630，630，640 630 UUB=O.O
60 10 650
640 UUB=XBD.ZFI4J/DKIKJ 650 UUK= lf C 2) I Hlf (K， J) +XCC'Zf (3) ICK IK)叫IUO+XAAIK，J，HPJ・1FISJ/AKI民》
UUI~l= 1. 0/UUX
IF 1 2・KJ 660，660，620 660 CONTiNuE
例INUS = 0
00 6BO K司 1，2H-2/K UUA = UUCKI I CUUCKI+UUIHl l
OTl = TW1CH ， J ， NP)'TWZ<~， J ， NPI
UUB QOCJJ・UUCHJ・OT1
QAC~ ， J ， NPJ' UUA'UU8
IF CQA【K，J，NPJ.LE.O.OJ HINUS
KAAIK，J，NPJ=QACK，J，NP)/QQ【J)
680 COHT I HUE IFIHINUS.EY.O> GO TO 300
H 2/HINUS QAIHINUS，J，NPJ 1.0E-30
XAACNINUS，J，HPI QAIHINUS，J，NPI/QQCJJ QACH，J，NPI QOCJJー1.0E-30
XAAIH，J，HPJ QAIH，J，NPI/QQIJl GO TO 300
700 lFCJ.LT.JHAXJ GO 10 250 IfCCJ2.Nf.0.AHO.11E-fQ.OJ.AHD.K1TECHI.GE.IJ GO TO 720
IFIJI .EQ. OJ GO 10 710
CALL QOHBCNPJ
710 COHTiHUE 車率....・・...............・・..・・・・...・.....• PRINT OF CALCULATED RESULTS
....・...........・a・・・・s・・・.・.・・・..ヨE・・..・a・CALL OUTCIA，JA，H，HPJ ....・・.0........・g・・・・・・・・・.・.・.....・...
STORE THE PLOT D血T血 OH F IlE 11 ................・・・・・・・・.....・....・・.・..IFIIPLOTCN，NPI.lT.I.0R.J2.EQ.OJ GO TO 720 CALL OuTFIICJA，JA，H，HP，DIJ
720 IFIJ2J 750，750，770 750 J2-1
GO TO 200
770 lFCHPHAX-HPJ 800，800，160 800 JII=JII'I
lF(~[TEIHJ.LE.0.OR.11 E. EQ.1J GO TO B50
EEEH 0.1[.‘
00003890
00003900
00003910 00003920
00003930
00003940
00003950
00003960
00003970
000039BO
00003990
00004000
00004010
00004020
00004030
0000‘。‘00000‘050 0000‘060 0000‘070 0000‘06C 0000‘0911 0000‘10') 00004110
000041~0
000041.)0
00004110
00004150
0000‘ ~60 0000‘'.70 00004180 0000‘190 0000~.200
0000'1210
0000，，220
0000-1230 00004240
00004250
0001:，4260
00004270
000')‘280 000~4290
00004300
00C'04310
00CI04320
00f.'f04330
00/1)04340
00')04350
0000‘360 0('004370
01:1004380 0り004390
01)004400 OD004410
00004420
00004430
00004440 AUAυAυAυnuaununuauaυ
に
Jau'ga
。n，Aυ
噌
a
内，‘，J
A司
4444452555
4444444444
nuAυAυAυnUAυnunuAυAu
nuAUAυAυnUAυnununuAu
nuauaUAυAυAυnu
“uAυAυ
AW内リ
AUnununuAυnuAυAυ
》S
，
.
X
2
E
J
4
a
l
E
，
，
nMn
，
nυ-5
nMnM何
nMnFC
E
E
FC
M阿
，
nu
，
l
k
T
E
a州，
n
R
L噌
E
I
T
，
l
'
=
、，、，
nυ
5
2
2
'sunaunan
倫
M
u
r
t
M円
an
-
-
E
P
E
'
E
N
t
n
u
'
'
E
O
B
，
1
1
x
s
R
1
2
'
R
一
f
，
O
E
X
2
3
4aaaan『
A
n
n
w
n
'
M円
，
内
z
n
R
n
4
n
r
S
4
・
rEHMWM開
EEE
》
1
1
《
N
，
1
'
'
T
，，
h-BM円
-aH刊
avE-
MAMa同
FEHMWA内
MA内Z
A的
風
向
rE
冒，・L
句
4
M
・
M円
M円
rE
，ou'VE
pp'N02'
M
同M
町内，‘，FL
・-.，
'
'
u
w
a
伺
'VA
X
X『
J
'
z
a尚昆
品
n
'
'
M
同
Z'
MnMn・
』
命
崎
'aa崎区
a，
auaduw-aa
内・d
・
，，『
"'2
2
1《
〉
''1
〈
〈
Rte'XE
，，b，，bA
U
'
a相
anqe'nu
b-uR082''
TIR4
，J2zz1
FCa
。au
，‘，a4E
一-
z
，、v
・'Hwnuz
・ιnuzEA
内，，E-a
12LTIHz'RE
M-u'n"'snRA内
'nR
，.
v
・7EFLnununUEιMAFEEa
G
M
F
，S
I
---
え
J
‘uA
υ
3
3
4
倫
Mua目白
MU
3
4
rr
3
3
白
VAυ
Aunv
nuAυ 000375 GO TO 150
000376 850 IFlNHAX'HI 900，900，130 000371 900 IF IJAHAX' JAl 950， 9~0 ， 100
00037B 950 lFOA.l1.IAHAO GO TO 50
000319 IfINPlOf.fO.Dl GO 10 1000 ........・...._.・a・・・・・・・・・z・1.....・..・.. PlOI 01' CAlCUlAlEO RESUllS
000.180 CAlI CPlOI
000381 1000 SfOP
-・・・・..・・‘..・・"....・........・・..・・......oonjß~ fNO
-63-
00004550
00004560
00004570
00004~80
00004590
00004600
00004610
00004620
00004630
00004640
00004650
J A E R I - M 8 4 - 162
Ca»««aaaaaaaaaaaaaaaaaaaaaa*aaaaa***«a»*a»a*****a*aaaaaaaaaaaaaaaaaaaa SU0ROUI1NE WRINPT
IMAX -
JHAX '
NHAX NPLOT * KEY(1>=
KEV(2)-
REAU AND WHllf. aaa INITIAL INPUT DATA »«»
aaaaaaa»xxaaassaasxaaxa*asaaats*aaaaaaa*a»KKsaaaxas«sxaaaaaaasa»aasa: • ••INPUT CARDS INF0RMA1I0N»««
CARO-A IDENTIFICATION-ANY DESIRED TITLE Oil DESCRIPTION (A72) CARD-B CONTROL CARD (FREE FORHAI)
1AHAX - ENTER THE NUMBER OF CALCULATION CASES ENTER THE NUHBER OF CALCULATION POINTS IN FUEL NEAT R-COORDINATE ENTER THE NUHBER OF CALCULATION POINTS IN FUEL HEAT 2-C00RD1NATE ENTER THE NUHBER OF DIFFERENT FUEL ELEHENTS 1 PLOT OF CALCULATION OATA 0 COOLING TOWER,HEAT EXCHANSER AND FUEL TEHP. CAL. 1 FUEL TEMPERATURE SOLUTION ONLY (INPUT OATA (TIN) REOUIRED FOR CALCULATION) -1 FUEL TEHP. CAl. SKIP 1 DOWN FLOW
= 0 HORIZONTAL FLOW - -1 UP FLOW
KEY(3>= COOLANT IDENTIFICATION " 0 H20 = I 020
C A R O L IHERMAL HYDRAULIC PARAMETER (FREE FORMAT) QRR ' REACTOR THERMAL POWER (MW> PFLOV - PRIMARY COOLANT FLOW RATE (H3/HIN) TIN ' REACTOR INLET TEMPERATURE OF COOLANT <'C>--KEY<1)=1
OR WET BULB TEMPERATURE ('C> - - K E Y C D - O , -1 ENTER THE INCREHENT OF INPUT TEHPERATURE C O CALCULATION TIMES FOR INP'UT TEMPERATURFCC)
CARD-D COOLING TOWER AND K:.".T EXCHANGER (FREE FORHAT) SFLOU » SECONDARY COOLANT FLOW RATE (H3/HIN)
AIR FLOW RATE OF (HE COOLING TOWER CH3/MIN) OVERALL HEAT TRANSFER COEFF. OF THE COOLING TOWER
(KCAL/H3.HR.D1) HEAT TRANSPORTATION COEFF. OF THE HEAT EXCHANGER
<KCAL/M2.HR.'C) CROSS SECTION AREA OF THE COOLING TOWER <H2) H1GHT OF THE COOLING TOWER (H) HEAT TRANSFER AREA OF H.E (H2) HEAT EXCHANGER TYPE
= 1 (COUNTER FLOW TYPE) •= 0 (PARALLEL FLOW TYPE) « M (SHELL SIDE H-PASS AND TUBE SIDE 2«H-PASS TYPE)
CAR0-E1 HEAT TRANSFER CORRELATION (FREE FORHAT) H1,H?,H3,A,B,C,0,ITWC
NU = IM«(RE«aA-H2)aPRaaBa(lt|l3«(DE/?>aaC) •(MU'BULK/MU'CLAD)a«D
IIWC - TWC ; PHYSICAL PROPERTY TEMPERATURE 0 ' r W C = ( T I N M 0 U T ) / 2 1 - fWC-TWATER(Z) •I - I U C ~ ( i a A 0 C 2 ) * ( I l N < 1 0 U I W 2 > / ? 3 • 1WC -1 I CI A D ( Z ) U W A T E R ( ? ) ) / 2
»«« D.NF..0 • » » MU'CLAD - - • CLAD TEHP. CARD E2 CORE FLOW CONDITION (FREE FORHAI)
FRA1I •-• ( 1 0 I A L FUEL tLEHENTS FLOW RATE) / (PRIMARY FLOW RATE V I N UPPER PLtNUH VE10C1TY (CM/SEC) VOUI - KIWER PIEHIIH VLL0C1 TY(CH/SEC) PRESIN ' ENTRANCE COOLANT PRESSURE (KG/CM.ABS) IRAHF' WALL LOSS COEFFICIENT
- 0 EOUAI10N Or ULAS1US - 1 EQUATION OF KALHAN NIKULAUZE
H I E l ELEMENT S P E C I F I C A l I O N (A40> I I I L N - S U B l l l l . t ( IVPF OF l l l f l ELEMENT)
(FREE FOHHAI) NPHX • HIIHULII III DIFFFREN) I HE I PLATES Nl U l l ( RFAI NUMBFR >
' HUMIIIII I I I FUEL tLEHENIS ( TYPE N)
01 JAMX
AFLOW CTKI
IIEKI
SSCT 2CT SSHE IHE
CARD I CARDF1
CARDF2
a 00004660 PP004670 00004680 00004690 00004700
« 00004710 00004720 00004730 00004740 00004750 00004760 00004770 00004780 00004790 00004800 00004810 00004820 00004830 00004 840 00004850 00004860 00004870 00004880 00004890 00004 900 00004910 00004920 00004930 00004940 00004950 00004960 00004970 00004980 00004990 00005000 00005010 00005020 00005030 00005040 00005050 00005060 00005070 00005080 00005090 00005100 00005110 00005120 00005130 00005140 00005150 00005160 00005170 00005180 00005190 00005200 00005210 00005220 00005230 00005240 )00005250 00005260 00005270 00005280 00005290 00005300 00005310 00005320 00005330 00005340 00005350 00005360 000053 70 00005380
- 6 4 -
JAERI-M 84 -162
c.......... ・・・g・........・・・・f.'...・・・・..抱..a........，.・.........畠a・・・・・・ 0000命660
000001 SUUROU11HE VR!伺Pl PPQ04670 u0004680
IllAD AHD IIH 1 H ・・・ IHJT!AL lHPUl OA1A .・ 0000469000004700
C"・・・・E・・......率車率率車車窓..率車....軍事z・・・・S率・・・・.....率...窓車庫奮.宮古車摩...監事事事5・00004710
・・rNPUI CARDS INfORHAI!OH率率率 00004720 00004730
CAHD-A IDENllfICAIIOH-AHY D[SIRED 111ιE Oll DESCRIPIIOH CA72) 00004740
CARO-8 CON1HOL CARO CFREE fORHAI) 00004750
IAHAX ロ ENIER IHE NUH8ER Of CALCULAI10N CASES 00004760
IHAX EH1ER IHE HUHBER Of CALCULAIIOH P日IHIS 00004770
IH FUEL HEAI R-CDORDIHAIE 00004780
JHAX ユ ENIER IHE NUHOER Of CALCULAIION POIHTS 00004790
IH FUEL HEAT l-COORDINATE 00004800
HHAX - ENIER THE NUHBER DF OIFFEREHT fUfl-ElEHEHTS 00004810
NPLOI “ PLOI OF CAlCUlAllON OATA OOOO~820 KEY(I)= 0 COOllHG TOWER.HEAI EXCHAHGER AHD fUEl TEHP. CAl. 00004830
1 fUEl TEHPERATURE SOlUTI0N ONlY 00004840
CIHPUT OAIA (1IH) HE由UIRED FOR CAlCUlATI0H) 0000‘850 -1 FUEl lEHP. CAl. SKIP 00004860
KEY(2). 1 OOWN FlOW
o HORllOHTAL fLOW
-1 UP FlOII KEY(3)= COOLANT !OENIIFICAIION
o 1120
D20
CARD-[ IHERHAL-HYORAULI[ PARAHETER (FREf FORHAT)
QRRτREACT日R THERHAl POWER (HW)
PFLO' -PR1HARY COOLAHI FlO切 RATE (H3/HIH)
IIN REACTOR IHlET IEHPERATURE OF COOlAHI ('C)ー-HY(t>=1
日目制ET BUlB TEHP.fRATURE ('C)--KEY(t)=O.司 1
Dl ENTER THE INCREMEHT OF JNPUT TEMPERATURE ('0
JAHX CALCUlATJON IIMfS fOR INPUT TEHPER自TURF('C)
COOLl NG 1日制ER ANO ~~~T EXCHAHGEA (FREE fORHAT)
SFlDW SECONDARY COOLA目1 FlOW RATE (N3IMIN) AFLOW AIR FlO初日ATE OF ;~E COOlING TOWER (H3/HIN)
CTKI = OVERAll HEAT TRAHSFER COEfF. OF THE COOlIMG TOWER (KCAlIH3.HR.DI>
HEKI HfAT TRAHSPORTATION COEff. Of THE HEAT EXCHANGER
(KCAlIH2. HR. • C)
SSCT = CROSS Sf.CTION AREA OF THE COOlIHG TOVER (H2) lCT = H1GHT OF THE COOllHG TOωER (M)
SSHE HEAT TRANSFER AREA OF H.E (M2)
lHE HEAT EXCHAHGER TYPE
-1 (COUHTER FlOW TYPE> o (PAAAllEL FlOW TYPE)
H (SHEll SIOE H-P自SS AHU TUBE SJOE 2'H-PASS IYPE)
D
B
n間島内F-h
FLPLPLFLFL
〉T' A内un
H
nu F
E
rE R
“
rr t
u" のul
T
A伺aL
E
H
R
nu p--DR
E
E-ed
M開
A伺nk
I
I
R内FE
a--E
nu nR
A伺E
C
E
C
C
C
E
E
E
C
E
111，'t2，H3，A，8，C，O，JT切EHU "HI-(RE..A-H2l・PR・・B-(1・IIl-COE/ll"O
琢 CHU'BUlK/HU'CLAO)・・0
1 rwt - IWC PHYSICAL PROPERTY TEHPERAIURE
0' rWf.=(IIN・lOUI】121 - rW[=TWATERCll
00004870
00004B80
00004890
0000‘900 00004910
0000‘920 00004930
00004940
00004950
00004960
00004970
00004980
00004990
00005000
00005010
00005020
00005030
00005040
00005050
00005060
00005070
00005080
00005090
00005100
00005110
00005120
00005130
000051‘0 00005150
00005160
00005170
00005180
00005190
00005200
nuaunυnunununununυnunυnυ
唱』
q423A吻
RJaロヲ'"。nM，nu-aqe
f
2
2
2
2
2
2
2
2
3
3
3
555555555535
nuAunυAuaυaυAununυnυAuaυ
nυAUAυaυnU司
ununυnυnυnvnu
nυnunυAunUAununυAunυAUAU
nunυnuaυnυnuaunυnυAUAUau
3
rE I
aa円nk u' nu l
F
v
nn
a伺M
円、，
E
A
P
-
-
n
w
n
白目
b
p
A
何
{
・
E
E
J
H
Z
，E
、，
p
b
H
U
Y
E
j
A
''nuTI
、，
p
u
-
L
、，
aunA川FL
、，v
h
M
u
t
t
-
R
r
t
E
《
K
I
j
c
E
E
l
‘，、，
uw
，，F
a
r
t
M開
，，、，、，aυM円
''nk
Hu，，ι一，，aLPLM円
MU
。u，‘一魚川rv
，、pbpapa
-
H
H
〈
S
U
N
-EORSVVEL--A
N
I
A
o
-
-
I
R
N
S
M
M
ZE-A伺・
krFM刊
ESEE-向
rrEA内・
LnU
I
U
E
E
E
C
-
L
A
I
t
-
，E
"
o
o
I
E
H
K
T
・-U
E
E
-
-
N
I
A
》
》
"
H
L
E
t
A
F
I
F
E
，‘，，ιrrEEuvu--aErvnunu-a
〈
t--《
O
E
F
白"。uE'BMnu"
“unuMHM阿『
-
A伺
AnErLMUN"FLF-ununupL
t
t
N
U
N
H
I
l
t
rbEOOFtEESI『
P
I
l
-
-
L
I
E
B
A
A
S
，目、，‘ZETa-Lnrhru問。
UHU
“"
4
N
I
A
A
1
0
0
1
E
i
-
B
I
R
R
H
E
E
"
HwuwbUM阿川
urErE'・・t
r
E
EE
，，“u''nrHM'M阿
a
L
M
円
-
E〈
p
o
t
A
E
-
-
M
U
a‘
u-nu--'且
-
a
u
w
r
E
AUi--M同
z-4
ν
3
t
t
I
F
t
rr，
『
冒
Epa“円
rE
aa円
M岡
HUrEaanHU
EEnKEEnυbko"zr
n“，，M
・M-nr
，，
nu 仁句
4E
a
『
t
，
l
l
H
"
A
伺
風
向
E
C
L
E
E
E
CAN f)~ 1 CMO>
3
M伺
'
s
f
E
E
"
T
h
r
&LA川
v-
M円
aL
曹'
E
P
-
《
t
t
t
s
t
i
t
-
z
t
a
'
M周
t
E
a
，司・
u"
"
r
L
'
E
L
aunk
‘E
EL t'〉
l
P
E
r
-
v
I
H
U
I
D
F
F
t
H
s'Mnrt
touu
a
h
M同
I
N
H
I
-
-
t
，，、，uuaH"u
HUE-M円
EEM円
Hua"“"白岡
MU
に““"“"“開
“"'‘
旨
白
"eι一-
rr
N
l
ltxt
''rEM円
HU
B--uH凶
r-E
'・ι'M同
M"
《qz F
nu R
An t
-64一
00005330
0000531.0
00005350
OOOO~J60
00005HO
0000~j80
J A E R I - M 8 4 - 162
c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c
MA -- FUEL MEA) MATERIALS 00005390 • 0 U-AL ALLOY 00005400 « 1 U-ALX DISPERSION 00005410 URAN OENSIIV (GtCHl) 00005420 PROSITY OF UALX DISPERSION (D1HENSIOHLESS) 00005430 NUMBER OF OIFFERENT PLATE D1MENSI0H(N0. OF CARUF4)00005440 NUMBER OF DIFFERENT CHANNEL OIHENSION(NO.OFCAROF5>00005450 FLOW AREA IN A FUEL ELEMENT (CH2) 00005460
(l)COOLANT <2>FILM (3)CLA0 (4>80ND (5>MEAT
UOENST' POROTY-IDPH X •• 10CMX • EAREA • FRAT£N= (ELEMENT FLOW RATE) / (AVERAGE
CARDF3 HOI CHANNEL FACTOR (FREE FORMAT) FR * RADIAL POWER RATIO FCOOL = ENGINEERING HUT CHANNEL FACTOR FFILH -FCLAO = FBOND ~-FHEAI •
CAHDF4 (FREE FORMAT) F l -" POWER DISTRIBUTION FACTOR OF AXIAL LOCATION 7
CARDF51 (A20> TITLP = SUBTITLE (TYPE OF FUEL PLAIE)
CAR0F52 (FREE FORMAT) HPLAIE ( REAL NUMBER )
- NUMBER OF FUEL PLATES FLOC • LOCAL PEAKING FACTOR IDPL •= PLATE SPEC. ID NUMBER KKX = (1) SYMMETRIC COOLING
(2>ASYHMETRIC COOLING IPLOT = PLOT OF CALCULATION RESULT
' 0 ID PLOT SIDE PLOT SIDE PLOT AND 2 SIDE PLOT PRESSUPE , ONB t ONB CAL. RESULT IOUT
CAR0F53
I 2 I
CAR0F6
1 CHANNEL 1 2 CHANNEL 2 3 CHANNEL 1 PRINT OUT OF 0 NO PRINT 1 PRINT 0U1
FORMAT) = CHANNEL (1) SPEC. ID NUHBER ( REAL NUHBER )
= 1.0 COOLANT IS HEATED BY ONE FUEL PLATE = 2.0 COOLANT IS HEATED BY BOTH FUEL PLATES = ( CHANNEL VELOCITY / AVERAGE ELEHNT VELOCITY ) = CHANNEL (1) SPEC. ID NUHBER ( REAL NUMBER > v
= 1.0 COOLANT IS HEATED BY ONE FUEL PLATE - 2.0 COOLANT IS HEATED BY BOTH FUEL PLATES
- FRATEI* ( CHAHHEL VELOCITY / AVERAGE ELEHNT VELOCITY ) SPECIFICATION OF FUEL PLATE (FREE FORHAT)
(FREE ICHL NIIEA1
FRATEI ICHL NHEAT
CAR0F7O
CARDF71
CARP: r?
CAR0F73 • »*
ELEHENT FLOW RATE) 00005470 00005480 00005490 00005500 00005510 00005520 00005530 00005540 00005550 00005560 00005570 00005580 00005590 00005600 00005610 00005620 00005630 00005640 00005650 00005660 00005670 00005680 00005690 00005700 00005710 00005720 00005730 00005740 00005750 00005 760 00005770 00005780 00005790 00005800 00005810 00005820 00005830 00005840 00005850 00005860 00005870 00005880 00005890 00005900 00005910 00005920 00005930 00005940 00005950 0000S960 00005970 00005980 00005990 00006000
XA * HALF-THICKNESS OF FUEL HEAT (CM) XB = LENGTH BETWEEN MEAT CENTER
ANO CLAD INNER SURFACE (CM) XC " LENGTH BETWEEN MEAT CENTER
AND CLAD OUTER SURFACE (CM) YA = WIDTH OF FUEL MEAT <CH) HA » ENTRANCt LENGTH OF CHANNEL (CH) HB - H1GHT OF FUEL NEAT (CM) HC = LENGTH BETWEEN MEAT BOIIOM AND PLATE BOTTOM (CM)
SPECIFICATION OF COOLANI CHANNEL (FREE FOHHAT) XCHI = THICKNESS OF COOLANI CHANNEL (CH) YCH1 - WIDTH OF COOLANT CHANNEL (CH)
PRESSURE LOSS CALCULATION DATA (FREE FOHMAT) STRETCH (1) ( ELEMENT ENIRANCE PLATE ENIRANCE > «»« 7.ETA1 • RESISTANCE COEFF1C1EN1 OF SIRETCH (1) ENTRANCE OHI • LENG1H BIIWEEN ELEMENT ENTRANCE AND PLAIE ENTRANCE00006010 H0E1 - HYDRAULIC DIAMETER OF STRETCH (1) 00006020 AR1 " STRETCH (1) CROSS SECTION AREA (CH2) 00006030
PRESSURE LOSS CALCULATION DATA (FREE FORMAT) 00006040 STRETCH (2) ( PLATE EXIT -• ELEHENT PLUG ENTRANCE ) aaa 00006050 7ETA2 - RESISTANCE COEFFICIENT OF STRETCH (3) ENTRANCE 00006060 Oil? • LENGTH BIIWEEN ELEMENT ENTRANCE AND PLATE ENTRANCE00006070 H0E2 = HYDRAULIC DIAMETER OF SIRETCH (2) 00006080 AR2 • STRETCH (2) CROSS SECTION AHEA (CH2) 00006090
PRESSURE LOSS CALCULAIION DAIA (FREE FORHAT) 00006100 SIRETCH (3) ( PLUG ENIRANCI PLUG EXIT ) •»» 00006110 MM ' RESISIAHCE C0EFF1CIEN1 OF SIRETCH (3) EXII 00006120 0H3 " LENGIII UIIWEEN ELEMENT LNIRANCE AND PLATE ENIRANCE00006130 II0E3 ' HYDRAULIC OIAHEIER OF SIRETCH (3) 00006140 ARJ -- STRETCH (J) CROSS SUlION AREA (CM2) 00006150
LaaaaaaaaaaBaaaaaaaaaaaaaaaaa]*aaaaaaaaaaaa«aaaaaaaaaaaaaaaaaaaaaaa»aaaaaQ0006 160
- 6 5 -
]AER1一M84 -162
HA fUfl HfAl HAlfRIAlS 00005390
o U-AL ALLOY 00005400
U-ALX DISPERSION 00005410
UOE“ST" URAIi Of“SIIY (GICHJ) 00005420 POROIY. PR0511Y Of UALX DISPERSION (DlHEN510NLESS) 00005430
IOPHX 宮 NUH8ER Of OIFFERENI PLATE 0IHENS10N(HO. OF CARUF4100005440
IOCHX NUH8ER OF OlffERfHr CHAHHfL 0IHfHSIOH(HO.OfCAROf5)00005450
EAREA • FLO匂 AREA IH A FUEL ELEHENI (CH11 00005460
FRATE“(ELEHfNI FLOW RAIEJ I (AyERAGE ELEHENI FLOW RAIE) 00005470
CAROFl HOI CHANNEL FACIOR (FREE FORHAI】 00005480
FR RAOIAL POωER 日AIIO 00005490
FC日日 ENGINEF.RIHG HOI CHAHHEl FACIOR CI)COOLAHI 00005500
FFILH ~ (2)FILH 00005510
FCLAO Cl)ClAO 00005520
F80HD (4)80NO 00005530
FNEAT ・(S)HEAT 00005540
CAHOF4 (FREE F日目HAIJ 00005550
C Fl' PO~fR DISrR/8U1/DH FACIOR OFAXJAl LuCAJ/OH 1 00005560
CAROF51 (A20) 00005570
IJTLP • SU811TLE (IYPE OF FUEL PLAIEJ 00005580
CA自由F52 <FRH f目白NAIJ 000055 90
NPLATE ( REAL NUN8ER ) 00005600
• HUH8ER Of FUEL PLATES 00005610
C FLOCιOCAL PEAK1HG FACTOR 00005620
C 10PLιATE SPEC. 10 HUH8ER 00005630
KHX (1) SYHHEIRIC COOL1HG 00005640
官)ASYHHEIR1C COOL1HG 00005650
IPLOT PLOI OF CALCULATIOH RE5ULT 00005660
• 0 NO PLOT 00005670
CHAHHEL 1 51日E PLOT 00005680
• 2 CHAHNEL 2 51日E PLOT 00005690
CHANNfL 1 AHD 2 SIDE PLOT 00005700
10UT PRINT OUT OF PRE55UPE • 01i8 品目H8 CAL. RE5ULT 00005710
o HO PRIHT 00005120
PRIHIOUI 00005730
CAROF5l CFREE FO州 AIJ 00005740 --- ICHL CHAHHEL (11 SPEC. 10 HUH8ER 00005750
HHEAT (REAL HUN目ER ) 00005760
1.0 COOlAHT 15 HEATEO 8Y OHE FUEL PLATE 00005770
2.0 COOLAHI 15 HEATEO BY BOTH FUEL ?lATES 00005780
--- FRATEI= ( CHAHNEL YELOCITY I AVERAGE ELENNT VELOCJ了Y ) 00005790
--- ICHL CHANNEL (1) 5PEC. JO NUNBER 00005800
HHEAl (REAιNUH8ER ) 、 00005810
1.0 COOLANT 15 HEATEO 8Y OHE FUEL PLATE 00005820
= 2.0 COOLANT 15 HEATEO 8Y 80TH FUEL PLATES 00005830
--- F骨ATEJ' ( CHAHHEL VfLOCITY I AVfRAGE ELENHT VELOCJTY) 000058‘0
CAROf6 SPEClflCATIOH OF FUEl PLATE (fREE FO目HAT) 00005550
XA • HALF-THICKNESS OF FUEL HEAT (CH) 00005860
18 L[HGTH 8ET~fEN 伺EAT CE柑JfR 00005810
AH日 CLAO INNER 5URFACE (CH) 00005880
_CιEHGTH 8ETWEEN HEAT CEHTER 000058唖o
AHO CLAO OUTER SURfACE (CH) 00005900
VA WIOTH OF FUEL HEAT (凶 00005910
HA EHTRAHCt LfHGTH OF CHANNEL (CHJ 00005920
H8 = HIGHT OF FUEL HEAI CCH) 00005930
HC LEHGTH 8EI~eeH HEAI 80110阿州o PLATf 80110H (CH) 00005940
CAROF70 5PEClFICAl10H UF COOLAHI CHANHEL (f
一65-
Illli
llll i
s iii
iiliil
lili
iUlil
fill O
OO
OO
OO
OO
OO
O
OO
O
O
OO
OO
OO
OO
OO
OO
O
O
OO
O
OO
OO
OO
OO
OO
O
OO
O
O
OO
OO
OO
OO
OO
OO
O
O
OO
(O
rorO
fOfO
—
"*-
"*"
*—•-
»••
* .*
-*
-•
©
»U
NM
DC
00
-u
O<
Vi
»U
>S
S -
» O
«
mi
HI
—
ft
" C
J
CS
oo
cx
c-
Cz
i j>
—
>
a,
— x
— —
=»
M
-.
OO
fC
—
&
-H—
"O
-m
»,
yw
»(
PTI
p'
~ »
W<
~
l>
.-.
,-*
*
9 «
«X
O,
XO
,0
>o
l
X
i)
--
IO
»«
I\
,|
>i
""
'
r*.
W C
5 ^
^"
»
©
*•*
-N
C
« <
X
%--
,>
z **
x >
- —
z :
^.
— «
• -e
«
* :
X
— X
X"
— X
>
.-.
j> e
- j
*no-
o-»
~- —
> »
s»
«_
>>
-
mm
03
or
pv
ao
m-
ri
DO
IyJ
—<
0—
<0
n
WI
**
m
~,
; ro
—<
-H
-H
7*
i ©
rn
o
ITI
rn I I
II!
c »
e «
: » o
« H
-* .-
* •V
— z
o _
t ro -n ro X J
— rs)
ro V
ii ro
rO V
CO t/» \*
o II
CC o T
J SO -
J —
U.
ro ••* •f
<o
CO
so
© o
X z
> o
•*
O O
o z
© »
w 5 X
s w m ** 13
w
*" OD > v
^ w
m ©
m c
s X
I»
Z M
3» s.
> %
CO Irt *-•
x 3»
s»
> x
=* =» => z
V 3» <
3» X
to -n
3k
3»
3» 3
-s»
3*
3*
z =» V
a» —
3> W
o r-
a X
3» > Ul
>
X -1
Z
X v
•>•
-H o e>
o •*
CI •n
^ m
•n z
•n •• x > ©
c »
x 3>
o •n
3» e=
z <
_ •.
*-X)
3D
3»
«0
z 3»
r-x =
SO m z
3* O
«. CD
3» *~
X>
m —» o
es
m i—
w > •
o
c -n
j>
rn H
ro n »
u >
3»
O z
z m
* —
3> c -*
r~
5 in
* * w
< -o x o
—i « >
" *
*-"* o
»
U» ©
»
3» ;
©
m j
mm
si
II
iiii I
f! <
» o
o o
-
: 3>
— «
— o
—
i
• >
x
c
i -o
,C>
—
»-
>X
iC
-~
Ot
»V
l0
U>
ZX
Ut
3>
Ui
—(U
i 5
»-
pi
-•
^»
*-,
—
— —
—-
-—
—
X3
>»
„ —
m s
-*
3*
O
~
— —
.
> —
. .*
m *
i-
) -•
•»
I >
-
i y
ui
i x
i/
tv
<*
*n —
W
Z3
»—
«r
-—
-«
» •
—i TJ O
m x
3D co •
—* c
•*»
3» m n
•
i ui s x z —
-* O ••
is o m
s o
—••«-' :
• -* m < <
%- ©
> i
• ro W K
fs( %
: O
s Wi ro
— 3» X ~
a =?
-- ~
^ >.
3» ;
O z
CD e-i
m o
*
• n m
-o L
P u> ;
3
f— ©
•. * .
^ ^ »
ro w
«
VI Ui O v
v
w>xzr-^—
« • *
* *
-o
x-*w
^J
: wi
*
>©
viw
» v
:w
ox
mw
v M
M
i *
%
>
t -<
o
»—
< z
a x
— n
— -
* i
> *
. »
M x
^. r
-.
A -n
z
-<•-
_.
x i
ui »
"O
r- ^
w •
»
j» r
- -o
— w
*.
. —
-H
O
-"*
Ui
•• O
i
ui
m
—<
ui
+*
<
*
5 i 2 00
••*
^^ s
o «
-I
r F
O»
-i
*-
o
i~
~
= =
£
liilil
llilll
llliil
iliiii
llllll
llllll
llilll
llllll
llllll
liiei
llllli
lllill
lilH
!! 000007 000003 000004
000005
000006
000007 000008
000009 000010
000011 000017
000013 OOOOH
00001ヨ000016 000017
000018 000019
000020 000021 000022
000023 000024
000025
000026 000027 000028
000029 000030 000031
000032
000033
000034 000035
000036 000037
000018
0000J9
000040 000041
000042 000043 000044 0000~5
000046
OOOOH
OOOO.R
ooou.ヲ
000050
OOOO~ 1
000057
000053 UOOOち4
0000~5
0000~6
000057
000058 000059
000060
000061
JAER1-M 84 -162
RlAL HtUfL.HPlAJf.HHEAJ
CIIARACIEN AAA"12，JITLE・72，IIILN・40.IITLP・20・
日lHEHSI0H XAI(15).X81115).ICII15).YAII15).HAII15).HBII15).
HC 1 <1 ~】 .XCHI(15).YCHII15).IOPMXI5).IOCHXI5).IOPLI15)(OMMO" IIX11 111LE.lI1lH(5).IITLPI5.15) COHH日拘Hll COATE(2).HPAGE
COHHOH IHH71 IAHAX，IHAX，JAHAX，NPLOI，11WC，KMXI5.15) COMMO柄 IM"31 "I.H2.H3 ， A.B.t ， D.FRAI~.11NllDJ.Oll'0).JAHXll0).
XOI5.1~).YAI5.15).HAI5.15).H日 15.15).HCI5.15) ，
fRAIECIヨ.15.2).HIIEA115.15.2).fRAIEHI5).fLUCLI5.15).fR<宮I.fCOOL<51 .ffll“(5).fClAO(5)，fBO伺:.0151.f“[A1(5) • lEIAI5.1~.3).0"15 ， 15 ， 3)."OEI5 ， 15.3).
AW 1 5. 15 .31 • 1 C HL 15. 15 ， 2) COHHOH IUAll HA(5).UDEHS1IS).POROTYI5) COMHOH 1 HH41 H闘AX.HPHXI5J.HfUEl(5).EA日EA151.HPlA I E 15 .15).
XAI5.15).XCI5.15).XCHI5.15，?).YCH(5，15.2).flI5，21) COHM日H IHN71 QRRll0).PflO¥/(¥0)
COHHOH IC[21 SFl日制(10)，AFLO¥/ll0).CIKIII0).HEKII10).SSClll0).lClll0).SSHEll0).IHEll0)
COHMOH IPS21 PRESIH.VIH.VOUI.IRAHF COMMO" 川唱"01JHAX.KEY<l) COHMOH ICHlI日((2).0[(2). VELC IV 1 2>. PERI (2) COHHOH 10111 IOUI15.15) CO輔純白H IPl1l IP1C.IPL日1<5.15)日AIA AAA/'IHPUI CARO'I
CALL OATE ICOATE)
RfAOI5.100) IlllE ¥/RITEI6.105) CDATE.HPAGE
¥/RIIE16，200) TITLE.ICOATEIII)，II=I，2) REAO ". IAMAX.IHAX.JHAX.HMAX.HPLOT.IKEYII).I=I.3) WRllEI6.210) AAA.IAMAX.IMAX.J阿AX.HHAI.HPLOI.
IHVII/).11=1，3) 日日 10 IA=I.IAHAX
READ ". QAAIIAI.PFLO¥/IIA).IIHIIA)，OJILA).JAHXIIA) LfIKEYll).GE.l1 60 10 10
AEAO ・.SFL日WIIA).AflOW(LA).CIKIILA).HEKLILA).SSCIILA).lCTIIA)，SSHfllAl， lHEIIAl
10 COH1L~UE LFIKEYII)) 13.13.12
11旬RIIE(6，220J AAA
GO 1日 15
13 ¥/自 lIEI6.140) AAA.AAA
15 00 10 IA=l.IAHAX Lf(KEYll)) 18.18，17
17 ¥/RIT[16.221) IA.QRRIIA)，PfLO¥/IIA).IIHIIA).OIIIA).JAHX(IA) GO TO 20
18 WRIIE<6.宮宣0) IA.QRRILA).PFlOWIIA).IIHIIA)，OTILA).JAHI(IA)， 富 SfLO¥/IIA).AFLOVIIA).CTKIIIA)，HEKIIIA).
SSCTIIA).lCT(IA>.SSHEIIA).IHEIIA) 20 CONTlIIUE
lf 1 KEYI 'c .LT. P ) RETURH READ HI，LI.H3.A.B，C.0.ITVC WRIIEI6，170) AAA.H1，H2.H3.A，B，C，O.ITWC READ ". fRATE.vIH.V日UI.PRESIH.IRAHf旬RITEI6.271) AAA，FRAIE.VIH.VOUI.PRESIH.IRA阿FDO 30 H=I.H"Al REAO(ヨ.101J J1IlH(H)
READ *， HPMXIH).HFUELIH).HA(H).UOEHST(H)，P日目OIYIH).IOPHXIH).
lDCHXI").E~RE~IH) ， fRA1E"I"1 wRlrrl6，?BO) AAA，JlrIN1N).AAA.HPHXIN).NfUfLIN).
HA (N) ，1l0r HS I I H 1， PURU r Y< H 1， rllPHX (H) ， 1 DCHx< H) • I AllfACHl，fRAI [M(M)
"' AU・， IH(Ni.fCO
一部 一
00006170 00006180
00006190 00006100
00006110 00006210 00006230
00006140 00006250
00006260
00006270 00006180
00006290
00006300
0000631日00006310
00006330
00006340
00006350 00006360
00006370 00006380
00006390
00006400 00006410
00006420
00006HO 00006440
00006450 0000M60 00006470 00006480
00006HO
00006500
00006510 00006520
000065JO 00006540
00006550 00006560
0000657日
00006580
00006590
00006600 00006610
00006610 00006630
00006640
00006650 00006660
00006670
00006680
00006690 00006700 00006710 00006720
00006730 00006740
0000675D 00006760
00006110 00006780 00006790
00006800
00006810
00006810 00006830
00006840
00006850 00006860
00006870
00006880
00006890 00006900
00006910
00006910
0000693U 000069品。
JAERI-M84-162
000062 000063 000064 000065 000066 000067 000068 000069 000070
000071
000072 000073 000074 000075 000076 000077 000078
000079 000080 000081 000082 000083 000084 000085 000086 000087 000088 000089 000090 000091 000092 000093 000094 000095 000096 000097 000098 000099
000100
000101
000102
000103 000104
000105 000106
000107
000108
000109
000110 000111 000112
000113 000114 000115
000116 000117
READ ', (ICHL(N,NP,K),NHEAl(N,HP,IO,FRATEC<N,NP,IO,K=1,K.HAX> DO 22 K=1,KHAX
22 WRiTE(6,296> K,1CHL<N,NP,K>,NHEAT(N,NP,K>,FRATEC<N,NP,IO 23 CONTINUE
IDPHAX-IDPHXCN) 1DCHAX=1DCHX<N> WR1TEC6,300> AAA DO 24 IDP°1,IDPMAX READ «, XAI<I0P>,XBI<lDP>,XCKlDP),YAm0P>,
1 HAI<IDP),H8J<1DP>,HCJUDP) 24 WR1IE(6,305> IDP.XAI <10P> ,XBIUDP),XCI UDP) ,YA1UDP) ,
1 HAI<IDP),H8I(10P),HCI<IDP> WR1TE(6,310> AAA,AAA DO 27 1DC=1,IDCHAX READ « , XCIII(IDC),YCMIUDC) WRITE(6,315) IDC,XCIIKIOC),VCIII (IOC) DO 26 IS •= 1,3 READ >, 2£TA<N,1DC,IS),DH(N,1DC,1S),HDE(N,1DC,IS>,AR(H,IDC,IS WRITE(6,316) IS,7ETA<N,1DC,IS>,0H(N,IDC,IS),
t H0E(N,I0C,IS),AR<N,IDC,1S) 26 CONTINUE 27 CONTINUE
DO 28 NP-1,NPMAX I I - IOPKNP) XA(N,NP) = XAK11)
X B I ( l l ) XCK11) VAKI1) H A I ( l l ) HBI(II) HCUI1)
"1/2
XB(N,NP) XC(N,NP> YA(N,NP> HA(N,NP) HB(N,NP) HC(N,NP)
DO 28 K» IJ - ICHL<N,NP,K) XCH(N,NP,IC> = XCHKIJ) YCH<N,NP,K> = y C H I ( U )
26 CONTINUE 30 CONTINUE 100 FORMAKA72) 101 FORMAHA40) 102 F0RMAHA20) 105 F0RMATUH1,?0X,'CODLOD
1 200 FORMAT( 3(/),28X,40<'»»')/28X
1 'CALCULATION DATE',5*,2A4,21X,••
0.0006950 00006960 00006970 00006980 00006990 00007000 00007010 00007020 00007030 00007041 00007050 00007060 00007070 00007080 00007090 00007100 00007110 00007120 00007130 00007140 00007150 00007160 00007170 00007180 00007190 00007200 00007210 00007220 00007230 00007240 00007250 00007260 00007270 00007280 00007290 00007300 00007310 00007320 00007330 00007340 00007350 - THERNAL HYDRAULIC CALCULATION',2X,
32X,'CALCULATION DATE ',2A4,4X,'PAGE',13)00007360 »»s»',A72,•«»««'(28X,'«»«»',22X,00007370 *»'/28X,'****',27X,'INITIAL 1NPU00007380
2T DATA',27X,'•«««'/28X,40(••»')> 210 F0RHAT(1H0,5X,A12,' B',8X,'IAHAX',6X,'1HAX',6X,'JMAX',6X,'NHAX'
1 5X,'NPL0T',4X,'KEY(l)',4X,'K£Y<2)',4X,,KEY<3)'/23)(,«I1O) 220 F0RHAT<IH0,5X,A12,' C/17X,'8RR',6X,'PFLOW',5X,'TIN',8X,'DT',
1 3X,'JAHX') 221 F0RHAT(6X,'CASE',12,4F10.3,I4) 240 FORNAT(1HO,5X,A12,' C',40X,A12,' 0'/
1 1?X,'8RH',6X,'PFL0W',SX,'T1N',8X,'DT', 2 3X,'JANX',8X,'SFL0W',5X,'AFL0W',6X,'CrKI',6X,'HEtCI', I 6X,'SSCT',7X,'ZCT',6X,'SSHE',2X,'1HE'>
250 FORNAT<4X,'CASE',12,4F10.3,I«/60X,F10.J,3FI0.1,3F10. 270 F0RHAT<1H0,5X,A12,'E1',11X,'Hr,aX,'H2',8X,'H3',9X
1'B',9X,'C',9X,'D',6X,'ITWC'/23X,7F10.3,I10) 271 fORHAr(1lfO,5X,A12,'E2',8X,'FRATE',7X,'VIN',6X
1 5X,'IRAHF'/23X,4F<.0.3,IS> 280 F0RHAJ(1H0,5X,A12,'F1',3X,A40//6X,A12,'F2',9X,
1 -NPHX',5X,'NFUEL',8X,'MA',4X,-UDCNSI',4X,'POROTY' 1 5X,'10CHX',5X,'tARlA',4X,'FRATEN'/ S 23X,IIO,H0.1,110,2F10.3,2I10,2F10.3>
2B5 F0RMAI<1H0,5X,A12,'F3',11X,'FR',5X,'FC00L 1 5X,'F60ND',5X,,FHEAT'/23X,6F10..S>
2B6 F0RHAI<lH0,5X,At2,'F4',3X,' J',8X,'F7'> 287 FORMAI<24X,12,F10.3> 290 F0HHAK1H0,10X,A12,'F51',9X,A12,'F52',45X,A12,
I'PlAIf «AH£',13X,'NPLAI£',3X,'FL0CL',4X,' 2 'IPL0T',4X,'I0UT',13X,' K',2X,'ICHL',3X,
295 F0RNAT(2X,'NP",l2,2X,A2O,3x,F8.1,FB.3,518> 296 F0RHAT<9]X,l?,i6,F8.1,F8.4> 300 FURHAK1H0,5X,AI2,'F6',10X,'IDP',7X,'XAI',7X
1 'YAl',7X,'H»I',7X,'HDr,7X,'HCI') 305 FORHAT(23X,I10,7F10.J) 310 FOHHAT(1H0,5I,A12,'F70',45X,A12,'F71 73'/
1 8X,'I0C',6X,'XCIII',6X,'YCHI',35X,'IS", 2 6X,'/HA',ax,'DM',8X,'DE',6X,'AALA'>
15) ,9X,
V0UT',4X,'PRESIN'
5X, 'FFILM',5X,'FCtA0'
IDPL', 'NIIEAT
F53'//11X, 5X,'KHX,,3X, ',2X,'FRATEC>
XBI',7X,'XCI',7X,
00007390 00007400 00007410 00007420 00007430 00007440 00007450 00007460 00007470 00007480 00007490 00007S00 00007510 00007520 00007530 00007540 00007550 00007560 00007570 00007580 00007590 00007600 00007610 00007620 00007630 00007640 00007650 00007660 00007670 00007680 00007690 00007700 00007710 0000 7720
- 6 7 -
JAERI-M 84 -162
000062 REAO ". IJCHLlH.HP.K) .HIIE ^，(~.嗣 P.K).FRATEC(N.HP.K).K=I.KHAX) n0006950 000063 00 22 r.ロI.KHAX 000069晶000006‘ 22 WRITE(6.296) K.I(HL(N.NP.K).HHfATIH.HP.K).FRAIEC(N.HP.K) 00006970 000065 23 CONTIHUE 00006980 000~66 10PHAX.IOPHXIH) 00006990 000067 10(HAX=IOCHX(H) 00007000 000068 WRITE(6，300) AAA 00007010 000069 00 24 10P.l.IOPMAX 00007020 000070 REAO ". XAIClOP).X81(IOP).xrIClOP).YAIClOP). 00007030
HAI(IDPI.H8J(IDPI.HCJ(IOP) 00007D‘。000071 24 WRJlE(6.305) IOP.XAIClDP).X81(IOP).XCIOOP).YAIClOP). 00007050
HA! C10P) .H81 0白P).HCI(IOP) 00007060 000072 WRITf(6.310) AAA.AAA 00007070 000073 00 27 1 OC= 1.1 OCMAX 00007080 000014 REAO ". XCH!(IOC).YCH!(lOC) 00007090 000075 WRITE(6.l15) IOC.XCHI(IDC).YCHI(IOC) 00007100 000076 00 26 IS 1.3 00007110 000077 REAO ". lElA(H.IOC.IS).OH(H.lDC.IS).HOE<M.10C.IS).AR(N.IDC.IS) 00007120 000078 W"ITE(6.3161 IS.IETA(N.lDC.ISI.0IHN.IOC.1S). 00007130
HOE(H.IDC.IS).AR(H.IOC.IS) 00007140 000079 26 COHTI HUE 00007150 000080 27 COHTlNUE 00007160 000081 00 28嗣P'I.HPHAX 00007170 000082 11 = IOPl(刷P) 00007180 00008J XA(H.制Pl XAJ< JI) 00007190 00008‘ X8(H.HP) X81(11) 00007200 000085 XC(N.HPI • ICI(II) 00001210 000086 YA(H.HP) • YAI(II) 00001220 000087 HA(H.HP) • HAI(JI) 00007230 000088 HO(H.HP) • H目J<JI 1 00007240 000089 HC(H.HP) • HCI(II) 00007250 000090 00 28 K= 1.2 00007260 000091 IJ IC制L<H.HP，Kl 00007270 000092 XCH(H.HP.K)' XCH1(lJ) 00007280 00009J YCH(H.HP，K) YCIIl(lJ) 000072~0 00009‘ 28 CONTlHUE 00007300 000095 ]0 COHTIHUE 00007310 000096 100 FORHAJ(A721 00007320
00007330 000097 101 FORHAI'A‘0) 000098 102 FORHA J(A20) 000013‘0 000099 105 FORHATlIHI，20X.'COOLOD . THfRHAL HYOAAULIC CALCULATION'，2X. 00007350
32~.'CALCULATI0H OATE '.2A4.4X.'PAGf'.13)00007360 000100 200 FOAHAT( 3(/).281，40('・・')/28X.'....'，A72o'....'/28X，'..・...22X，00007370
1 'CALCULATION DATf..5X，2A4.211.'.....，28X........27X，.IHITIAL IHPU00007380 2T DATA'.27X，'・..1!"/28__，40('.・')) 00007390
000101 官10FORHAT(IHO.51.AI官，'U'，8X，'lAHAX'，6X，'lHAX'，6X，'JHAX'，6X，'NHAX'， 00007‘00 51，' NPLOT' ，4X， 'ICEY(1) ， ，‘X.'KfY(2)'，41.'Kfγ(3)'/231.8110) 00007410
000102 220 FORHAT(IHO.5X.AI2.' C'/17X，'QRR'，6X.'PFLOW'.51.'TIH'.8X.'OT'. 00007420 I 3X.'JAHI') 00007430
000103 官21FOAHAf(6I.・CASE'.12.4Fl0.3.14) 00007440 000104 240 fOAHAT(IHO.51.AI
-67ー
JAERI-M 84 - 162
000118 315 F0RHAI<1X,II0,2F10.3> 000119 316 F0RNAT<60X,I8,2X,4FI0.3> 000120 RETURN 000121 END
0000/730 00007740 00007730 00007760
000002 000003 000004 000005 000006 000007 000008
000009
000010
000011 000012 000013 000014 000013 000016 000017 000018 000019 000020 000021 000022
000023
000024 000025 000026 000027 000028 000029 000030 000031 000032 000033 000034 000035 000036 00003/ 00003H MOOS') 000040 000041 00004 2 000043 000044 00004 5 000046 00004 7 000048 000049 000050 000051 000052 000053 000054 00005'.
SUBROUUHE OUTUA,JA,N,NP> C C PRINT OF CALCULATED RESUL1S C Caaaaaaaaasaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
REAL NFUEl,HPLATE CHARACIER Tl UE«72, T 1 H.H«40, Tl TL P«20 CHARACTER TT(10>al6/[L(13)a8 DIMENSION HTC(2>,0.QW<2,21),002(2),V(2),00HAX<2) COMMON /UNO/ JHAX,KEY<3) COHMON /MN1/ CDATE<2),NPAGE COMHAN /HN4/ NHAX,NPHX<5>,NFUEL<5),EAR£A<5>,NPLATE<5,15)
1 XA(5,15>,XC<5,15),XCII<5,IS,2>,VCIH5,15,2),FZ<5 COMMON /MN5/ Jl,J2,QAVE<5),00(21),XAA(2,21,15),TBU(2,21) 1 TC1(2,21>,VAVE<5>,S,TFUEL,KHAX,PH1N(2> COMMON /HH6/ «A(2,21,15>,ffZF(2,2l>,TC2<2,2n,TW7<2,21,15>,?F<5>, 1 TU<2,5,21),TONB<2,22),TSAT(2,22) COMMON 7HN7/ QRR<10),PFL0V(10) COMMON /HH8/ TVPI,TWPO,DTP COMMON /TX1/ TITLE,TITLN(5),TITLP(5,15) COHMON /PS1/ DP<2,10>, OPF(2,21),TDPC2,10),TDPF(2,21) COMMON /PS2/ PRESIN,V1N,V0UT,IRAHF COMMON /PS4/ PA(2,10),VVV(2,3> COMMON /PS5/ PAF<2,21> COHMON /CHI/ RE(2),0E(2),VELCTV(2),PER1(2) COMMON /OBI/ «ONB<2,22> COMMON /0T1/ 10UT(5,15) COMMON /OBI/ aDNBK2,22>,0DNB2(2,22>,0DHB3(2,2i> OATA TT/'UPPER 1 2 3
DATA T L / '
PLENUM' PLATE ENTRANCE' STRETCH(2> OUT' LOWER PLENUM'
' S T R E T C H U ) I N L E T ' 'PLATE E X I T ' 'S1RETCH<3) I N L E T '
' S T R E T C H ( I ) 'STRETCM(2> •STRETCIK3)
A I ' E I ' E I '
' I f ' I P ' I
C I ' I '
' I U ' I L
T I ' 1 I '
' I E ' I A 1 ' I L V I ' ,
2 ' I T N I ' , ' I E E I ' , ' I I ' / XPLAT=2.0axC(N,NP) XHEAT-XA(N,NP>*2.0 OOHAX(I) = 1.0E-30 Q0HAX(2> " 1.0E-30 NNHAX-NHAX JHAX1 = JMX * 1 NPXX-NPMX(N) l f ( J l ) 10,10,30
10 1F«EV<1>.L£.0> GO TO 22 20 HPAGE*NPAGE*1
WR1TE<6,100> 1A,JA,CDATE,NPAGE WRITE(6,110) TITLE WRITE <6,130) TWPI,TWP0,DIP,PH0V(1A)
22 WR1TE(6,U0) QRRUA),S,rFUCL 00 28 NN°1,NNHAX OAVEW^QAVE(NN)a4.1B7 VK1IE(6,150) MHN(NN>,NFUFL<HN>,QAVEW,VAVE(NH) IF(Kl[E(NN>.LO.O) GO 10 2? WRI1K6,152) K IU(NN) CO 10 ?»
2/ VRUE(f>,153> K I I M ' N ) 28 CONIINUI
J i ' l 30 KPAGE NPAGEM
WRIIt(6,100> IA,JA,COA!t,HPACt IF(J2) 32,32,40
32 WRII£(6,160) TllLN<H),LAHtA(N) DO 34 NPX-1,NPXX
34 WRIIE(6,165) 1iriP(N,NPX),HPLA(E(N,NPX) GO TO SO
40 UHIU(6,170> IIIIH<N,HP),11TLN(N> IF<kHAX.[Q.1) WMII£<6,180) XCH(N,NH, I ) ,YCII(N,NI', 1) ,VFICIV<
« • 00007770 00007780 00007790 00007800 00007810
aaaaaaaa 00007820 00007830 00007840 00007850 00007860 00007870 00007880 00007890
,21) 00007900 ,KITE(5),00007910
00007920 00007930 00007940 00007950 00007960 00007970 00007980 00007990 0000.8000 00008010 00008020 00008030 00008040 00008050 00008060 00008070 00008080 00008090 00008100 00008110 00008120 00008130 00008140 00008150 00008160 00008170 00008180 00008190 00008200 00008210 00008220 00008230 00008240 00008250 00008260 00008270 00008280 00008290 00008300 00008310 00008320 00008330 00008340 00008350 00008360 00008370 00008380 00008390 00008400 00008410 00008420 00008430 00008440
0U1' INLET'
QUI'
I I', 0 I',
- 6 8 -
JAERI-M 84 -162
000116 31) fOHHA1C1X，110，昔fl0..H OOOOUlO
000077‘9 000071.50 00007760
000119 516 FOHHATC60X，16，2X，‘Fl0.H
000120 RETUHH 000121 EHD
E車車庫・..・g・s・g・..・・・・‘・・・・・・8・・・・......車・・・・・・・・・・..・.....・・・・..・・・・s・a・00007770 000001 SUOROU11NE OUTCIA ， JA ， H ， H~) 00007700
00007790
PHIHT OF CAlCUlA1EO RESUllS 00007800 00007810
E・a・・・..・‘................・B・z・‘・.........................._...・・・・・・・・ 00007820 000002 HEAl HFU[l，HPlATE 00007830
000003 CHARACTER TITlE・72，T 111.H‘命日，TlTlP・20 000078‘0 000004 CIIA恥ACTER TT(¥0).¥6，ll(13)・8 00007850 000005 01HEHSIOH HTC(2)，QQW(官，21)，QQ2C昔)，VC2)，QQHAXC2) 00007860
000006 COHHOH IHHOI JHAX，KfY(J) 00007670
000007 COHHOH IHH11 COATE(2)，HPAGE 00007660 000006 COHHOH 川lH~1 HHAX，HPHX(5)，HFUElC5)，EARfACS)，HPlATfC5.15)， 00007690
XAC5，15)，XCC5，15)，XCUC5，15，官)，YCII<5， 15，宮)，fZC5，21) 00007900
OU0009 COHHOH IHH51 Jl ， J 官， QAVECS) ， QQC21) ， XAAC2 ， 21 ， 15) ， TOUC 官， 21) ， ~ITEC~) ， 00007910TC \(官，官 1) ， VAVE(5) ， S ， TFUEl ， ~HAX ， P例 IH(2) 00007920
000010 COHHOH IHH61 QA(2，21，15)，Hlf(2，21)，rC2(2，21)，TWlC2，21，15)，lFCS)， 00007930 TUC2，5，21)，TOHBC2，22)，TSATC2，22) 000079命0
000011 COHHOH ~HHす 1 QRR(10)，PflOVC10) 000~7950 000012 COHHOH IHH81 TVPI，TWPO，OTP 00007960 000013 COHHOH ITX11 TITLE，TITlH(5)，TITLPC5，15) 00007970 000014 COHHOH IPS11 OPC宮，10)，OPFC2，21)，TOPC2，10)，TOPFC2，2¥) 00007980
000015 COHHOH IPS21 PRESIH，VIH，VOUT，IHAHF 00007990
000016 COHHOH IPSH PA(2，10)，VVVC2，ll 0000.6000
000017 cOHHOH IPSSI PAfl2，211 00006010 000016 COHHOH ICH11 RE(2) ， DEC2) ， VElCTYC~) ， PERIC2) 00008020
000019 COHHOH 10611 曲目HOC2，22) 也0008030
000020 CO側側白H 10111 IOU1 C 5，15) 000080‘0 000021 COHHOH 10811 曲目"日1<官，22)，QOM82C2，22)，QOH83C2，22) 00008050 000022 OATA TT/'UPPER PlEMUH'，'STREICHC!) IHlET'，'STRETCH(1) OUT'， 00006060
'PlME E耐 rR~HCE' ， 'Pl~rE EXIT'.'STRfTCH(2) INlfJ'， OU008070 官 'STRETCH(2) OUT'，'STRETCHC)) IHlET'，'STRETCH(3) OUT'， 00008080
'lOVER PlEHUH・ 00008090
000023 DATA Tl/'・・・ーー‘-_'，' I A 1'，' I F C f'，' t U T "，" E 1 1'， 00004100 '1 l ~ 1'，'1 E 1'，'1 P 1'，'1 l 11・，'1 A 0 1'， 00008110
2 '1 T 咽 1' ， '1 E E 1'，' 1 1 ' 1 00006120
00002命 XPlATo2.0・XCCN，HP) 00006130
000025 XHEAT-XACN，NP)・2.0 00008140 0000官晶 自由HAXC" 0 1 .OE・30 00006150
000027 QQHAX(2)固'・OE-30 00008160 000028 HHHAX-HHAX 00008170
000029 JHAXl • JHAX・ OOOOs1sO000030 HPU"HPHX 'M) 00008190
000031 iF(JIl 10，10，30 00006200
000032 10 IFCKEγ(1).lE.O) GO ro 22 00008210
000033 20 HPAGE.NPAGE+l. 000062官0
00003. WRITE(6，100) JA ， JA ， COATE ， NP~Gt 000
JAERI-M84- 162
000056 1F(KHAX.E0,2) CO 10 70 0P008450 000057 SO WRITE(6,200) 00008460 000058 00 52 JM,JHAX 00008470 000059 WR1TE(6,210> J,TU7(t,J,HP),TC2(1,J>,U1(1,J),TB0(1,J),10(1,1,J) 00008480 000060 52 CONTINUE 00008490 000061 VRITE(6,240> 00008S00 000062 VR1TE(6,315> (ZF(H),HM,5> 00008510 000063 VRITE(6,220) 00008520 000064 DO 55 J-1,JHAX 00008530 00006s aaa » aa(j>«2F(2>«4.ia? 00008540 000066 aaV(1,J> - aA(1,J,HP)»2F(2>»4.1S7 00008550 000067 082(1) • aA(1,J,NP>'ZF(2>*3.6E*4 00008560 000068 SSHAXd) • AHAX1 <«0Wl,J),a0tMX(1)) 00008570 000069 HtC(l) - HZF(1,J)*4.1S7 00008580 000070 URIIE(6,230> J,FZ(H,J>,HTC(1>,aaW(1,J>,«Q2<1>,XAACI,J,NP>,000 00008590 000071 55 CONTINUE 00008600 000072 VRITE(6,240> 00008610 000073 GO TO 80 00008620 000074 70 UR1TE(6,310> (XCH(N,NP,K),YCH(N,NP,K),K-1,2),(VEUTV(K>,K=1,2) 00008630 000075 00 72 J*1,JHAX 00008640 000076 VR1TE(6,320> TVZ(1,J,NP),TC2(1,J),TC1(1,J),TBU(1,J),TU(1,1,J>, 00008650
• J,TU(2,1,J>,TBU(2,J>,TC1(2,J),IC2(2,J>,1WZ(2,.I,HP) 00008660 000077 72 CONTINUE 00008670 000078 VRITE(6,325) 00008680 000079 WRITE(6,315> (ZF<H),H-1,5> 00008690 000080 VRITE(6,330) 00008700 000081 DO 78 J»1,JNAX 00008710 000082 00 75 K"1,KMAX 00008720 000083 HTC(K) " HZF(K,J>«4.187 00008730 000084 «aV(t;,J) = aA(K,J,HP>*if(2)«4.t8? 00008740 000085 0S2(K> - eA(K,J,NP)«2F(2X3.6Et4 00008750 000086 aOHAX(K) - AHAX1(OaV(K,J>,aaMAX(K>) 00008760 000087 75 CONTINUE 00008770 ooooas aoa - aa(j>*2F(2>»4.i87 oooo87«o 000089 UR1TE(6,340> HTC(1),Q«V(1,J>,002(1),XAA(1„I,NP),J,FZ(N,J),000, 00008790
1 XAA(2,J,NP),Qav(2,J),ae2(2>,HTC(2) 00008800 000090 78 CONTINUE 00008810 000091 VRJTE(6,326) 00008820 000092 80 IF(I0UT(N,NP).NE.1.0R.J2.LE.O> GO TO 1500 00008830 000093 HPAGE-NPAGEM 00008840 000094 VRJTE<6,100) 1A,JA,CDAFE,HPAGE 00008850 000095 VR1TE(6,17S> T1TLP(N,NP) 00008860 000096 IF(KNAX.E«.2> GO TO 82 00008870 000097 VRITE(6,400> 00008880 000098 VRITE(6,410) TT(1),PRESIN,V1N 00008890 000099 GO TO 84 00008900 000100 82 WRITE(6,405> 00008910 000101 WRiTE(6,415) PRES1N,VIN,IT(1),PREtIN,VIN 00001920 OC0102 84 DO 94 H-1,9 00008930 000103 IF(H.LE.2) THEN 00008940 000104 V(t) • VVV(1,1> 00008950 000105 V(2> = VV«(2,1) 00008960 000106 ELSE1F(H.LE.4> THEN 00008970 000107 V(1) • VELCTV(I) 00008980 000108 V(2> - VEUTVC2J 00008990 000109 ELSEIFCH.LE.6) THEN 90009000 000110 V(1> • VVV(1,2) 00009010 000111 V<?> = VVV(?,2) 00009020 000112 ELSEIF(H.LE.8> THEN 00009030 000113 V(1) = VVV(1,3) 00009040 000114 V(2> » VVV(2,J) 00009050 000115 ELSEIF(H.£0.9> IHEN 00009060 000116 V(1> • VOUI 00009070 000117 V(2) • VOUI 00009080 000118 ENDIF 00009090 000119 lf(KHAX.Ea.2> CO TO 86 00009IOC 000120 VH1TE(6,4?0> I I(HH),PA(1,H>,DP(1,N), T0P(1,H) ,V(1) 00009110 000121 CO TO 88 00009120 000122 86 VRJJE(6,425) PA(1,H),0P(1,H),TDP(1,H),V(1), 00009130
1 THMM>,PA(2,H>,DP(2,H>,TDP<2,H),V(2> 00009140 000123 88 1F(H.H£.3> GO TO 94 00009150 000124 00 92 JO,JHAX 00009160 000125 L ° J 00009170 000126 IF(J.GT.12) I • 13 00009180 000127 IFU.EO.JHAU I • 1 00009190 000128 IF(KHAX.E0.2> GO TO 91 00009200 000129 WRITE.<6,440> TL(t>,J,PAF(1,J),0Pf(1,J),TDPF(1,J),V(1),TSAT(1,J), 00009210
1 r0NS(1,J),O0W(1,J),OOH8(I.J),O0HO1(1,J>,aON(l2(1,J>,a0Nfi3(1,J> 00009220
- 6 9 -
目00056000057 000058 000059 000060 000061 000062 000063 00006~
000065 000066 000067 0000611 000069 000070 000071 000072 000073 00007~
000075 000076
000077 000018 000079 000080 000081 000082 000083 0000且4000085 000086 000087 000088 000089
000090 000091 000092 000093 00009亀
000095 000096 000097 000098 000099 000100 000101 OC0102 000103 00010~ 000105 000106 000107
00010' 000109 000110 000111 000112 000113 000114 000115 000116 000117 000118 00011唖000120
000121 000122
000123 000124 000125 000官官60001宮V0001官a000129
JAERI-M84-162
lF(KH且X.EQ.2)60 10 10 50 WRI1E(6，200)
00 52 Jol，JHAX 脳血11E(6，210)J，IWl(I，J，HP)，TC2(I，J)，ICI(I，J)，TBU(I，J)，IU(I，I，J)
52 COH11HUE IIRITE(6，世40)旬RITE<6，315) (ZF(H)，H・1，5)旬RITE(6，官官0)
00 55 J・I，JHAXQIIII 砲 1111(J).2 f( 2).亀.117QQ旬(I，J)・@且(I，J，HP)・ZF(2)・‘.187e・2(1) • QA(I，J，MP).ZF<2).3.6E+‘ QQHAX(I) 0 AHAll(QIIW<I，J)，Q・HAU1))HTC 11) 這 HZF<1，J)・‘.187WRI1 E (6， 230) J，F Z <N，J) ，HTt( 1) ，QQ旬(I.J)，Q・2(1)，XIII¥( I，J ，HP) ，QQQ
55 COHTlHUE 旬RITE(6，2亀0)GO 10 80
70 IIRIIE(6，310) (調CH(H， HP，Kl， VCHUl， HP. I() ，1(-1，21， (VfL C1V(I(I， 1(=1，21 00 72 J匡 I，JH且耳IIRIIE(6，320) TWl(I，J，HPI，1C2(I，JI，TC1(I，J).1BU(I，J)，TU(I，I，J).
J，IU(2，I，J)，IBU(2，J)，1Cl(2，J)，1C世(2，J)，1¥/l<2，J，HP)72 COHTlHUE
旬血Jlf <6，325) IIRITE(6，315) <lF(H)，H'I，5) IIRJ TE (6，330) 00 78 J"，JHAX 00 75 1(01，kHIU HTC(Kl 0 Hlf(I(，J)・‘・187QQI{(I(，J) 0 QII(I(，J，NPI・lf(2)・4.187a・2(K) -QII(K，J，NP)・lF(2)・3.6f+‘QQHAX(I() . AHAX1(QQ¥/(K，JI，QQHAl(I())
75 COHTlHUE QQ・.QQ(J)・lF(2)・‘.187IIRITE(6，3亀0) H1C11l，自由1I<1，J)，自由昔(11，lAAI1，J ，HP) ，J，Fl(嗣"J)，由自由，
IAA(2，J，NP)，自由1I<2，J)，自由2(2)，HTC(2) 78 COHT lHUE
IIRJ 1E (6，326) 80 IF(IOUTlH，刷P).刷E.I.OR.J2.lE.0)G日 101500
HPAGE"HPAGE+l IIRIIE(~ ， IOO) IA，JA，tOArf，NPAGE 旬RITE (6，175) r ITlP(圃，同P)IF(KHAr.EQ.2) GO TO 82 旬RIJEC6，.400)旬RITE(6，‘10) rr(I)，PRESI.，VJ. GO TO 8‘
82 IIRIJEl6，‘05) 旬RirEl6，‘15) PAESl圃，Vl圃，n C1I ，PRESl圃，VJN
a亀 009‘H"I，9 IF(H.lE.2) THEH
VCll " VVV!t，1I V(世). VVVI世，1)
ElSElFIH.lE.‘) 1HE同V(1)・ VElCIY(1)y(2)・ VElCJY(世B
ElSElF IH・LE. 6) 1凶ENV(1)・ VVVI1，21V(2) 0 VVV(2，21
ElSEIF(H・LE.8) 1HE削
V(ll • VVVI1，31 V(世 VVV(2，JI
ElSEIF(H.EQ.91 IHEH
EHOI F
V(1) . vour ν(21 • vour
IF(I(HAX.EQ.21 GO 10 86 IIHIIE(6，4201 IT(H・II，PA(I，H)，OP(I，HI，IDP(I，HI，V(11GO 10 88
86 W骨JJf (6，425) PAll ，H) ，0PI1，H)， 1 DP( 1， Hl， V( 1)， TrIH・1)，PA(2，H)，OP(2，HI，IOP(2，H)，V(2)
88 IF(H.HE.ll GO 10 9‘ DO 92 J・I，JHAlL • J
IfCJ.Gr.12) l • 13 IF(J.EQ.JK島町) l ・1 IF(I(HAX.E岨.2)GO 10 91 旬血I1E.(6，亀亀0) 1l(ll，J，PAfCI.J).DPf(I，J)，TDPF(I，JI，V(!1，1SIIT(I，J)， 1 IOHlIl1，J)，QQW<1，J)，QON圃II.JI，Q目岡田lCl，J)，QOH82(I.JI，QO制OH!，JJ
-69-
OQ008450
00008~60
00008410 00008480 00008490 00008500 00008510 00008520 00008530 ooooaHO 00008550 00008560 00008510 00008580 00008590
0000..00 00008晶1000008620 00008630
000086‘0 00008650 00008660 00008670 00008~80
00008690 000011700 00008710 0000.120 00008730
000087‘o 00008150 00008160 00008770 00Q08180
00008190 00008800 00008810 00008820
00008・3000008・‘00000・85000008860 00008810 00008880 00008890 00008900 00008910 00008920 00008930 00008940 00008950 00008960 00008970 00008980
000089唖090009000 00009010 00009020 00009030 000090亀0
0000905D 00009060 00009070 00009080 00009090 00009100 00009110 0000唖12000009130 0000唖官‘000009150 00009160 00009170
00009180 00009190 00009200 00009210 00009220
JAERI-M84-162
000130
000131 000132
000133 000134 000135 000136 000137 000138 000139 000140 000141 000142
000143 000144 000145 000146
000:48 000U9 OOO'.SO
000151
000152
000153
000154
000156 000157 000158
000159 000160 000161
00016?
00.1163
000164 00C165
lFfJ.EO.JHAX) UR UK (6,450) l'MIN(l) , TSAT (1, JHAX1) ,T0NB< 1, JMAX1) ; 1 UQHAX(1>,OONB<1,JMAX1>,a0NU1(1,JHAX1>,Q0NU2n,JMAX1>, 2 0DNB3<1,JMAX1>
GO TO 92 91 ¥RITEC6,445) PAF< 1,J),DHF< l . J ) , T 0 P F d , J ) , V d > ,
1 T1.CI ),J,PAF<2,J),0PF<2,J>,TDPF<2,J>,V<?> 92 CONTINUE 94 CONTINUE
1F(KHAX.E».2) GO TO 95 VR1TE(6,494> GO TO 96
95 VR1TE<6,495> 96 IFdRAHF.Gf .1 ) GO TO 97
WHITE(6,460) GO TO 98
97 VRITE(6,470> C
98 IF<KMAX.E0.1> GO TO 1500 VR1TE(6,480> 00 99 J=1,JHAX WRITE (6, 490) 1 SAT<1,J),TONB(l,J),aOW(1,J>.OONDCI,J),QUNB1<1,J>,
1 a0N02<1,J),QDNB3(1,J>,J,TSAT(2,J>,I0NB(2,J), 2 aaW(J,J>,O0HB<2,J>,ODNB1<2,J),a0NB2<2,J>,Q.0NB3<2,J>
IFfJ.EQ.JNAX) WRITE (6,492) TSAT ( 1 , JHAX1), TONBd, JHAX1) ,Q(1HAX(1 ) , 1 Q0N0d,JHAXl),0DNBK1,JMAXl),ODN82d,JHAXl),QDNB3<l,JMAX1>, 2 TSAT<2,JHAXl),T0N8<2,JMAXl),aaHAX<2>, 3 O0N8<2,JHAX1>,a0NB1<2,JHAX1)^ODNB2<2,JHAXl>,0DNB3(2,JMAX1>
99 CONTINUE WRlTE<6 /496)
1500 RETURN
00009230 00009240 00009250 00009260 00009270 00009280 00009290 00009300 00009310 00009320 00009330 00009340 00009350 00009360 00009370 00009380 00009390 00009400 00009410 00009420 00009430 00009440 00009450 00009460 00009470 00009480 00009490 00009500 00009510 00009520 00009530
100 F0RHAT<1II1,20X,' COOLOD --THERMAL HVORAULU CALCULATION', 2X, 'CASE 00009540 1= dA-',I2,' JA-',I2,')',15X,'CALCULATION DATE ',2A4,4X,'PAGE',13)00009550
110 FORMAT(3</),28X,40<'«»')/28X,'••',76X,'«»'/28X,'«»',2X,A72,2X/'»»'00009560 1/28X,'*»',19X,'RESULTS OF CALCULATION AND USED VALUES',19X '«»'/2 00009570 28X,'»«',76X,'«'/28X,40< '*«'>> 00009580
130 F0RHAT<1H0,40X,'s» PRIMARY COOLANT »••', 00009590 1S20X,'REACTOR INLET TEMPERATURE =',F8.2,2X,'C', 00009600 2/20X,'REACTOR OUTLET TEMPERATURE -',F».2,2X, ' C , 00009610 3/20X,'PRlHRY TEMPERATURE DIFFERENCE-',FB.2,2X,'C, 00009620 4/20X,'PRIMARY COOLANT FLOW RATE •',F8.2,2X,'M3/M1N') 00009630
140 FORHATCIH0,40X,'»a REACTOR CORE •««»', 00009640 1/20X,'REACTOR THERMAL POWER =',F8.2,2X,'MW', 00009650 2/20X,'AREA OF TOTAL FUEL CHANNELS =',F8.2,2X,'CH2', 00009660 3//20X,'NUMBER OF FUEL ELEMENTS =',F8.1,2X,'ELEMENTS') 00009670
150 F0RHAI(/25X,A40,' = ',F8.1,2X,'CELEHHTS)'/ 00009680 • 2BX,'AVERAGE HEAT GENERATION',13X,'=',F10.2,2X,'(W/CH3)'/ 00009690 « 28X,'AVERAGE COOLANT VELOCITY',12X,'<" ,F10.2,2X,'<CH/SEO') 00009700
152 FORMAT(28X,'COOLANT TEMP. -- (MIXED MOOED KITE "',12) 00009710 153 FORMAT(28X,'COOLANT TEMP.--(SEPARATED MOOED KITE =',I2) 00009720 160 FORMAT(1H0,27X,40<'«»')/28X,'»»',1SX,A40,18X,'«'/28X,40<'•"">//400000973O
IX,28('--')/5U,'AVERAGE CHANNEL TEMPERATURE DISTRIBUTION'/40X,28<'00009740 2--')//68X,'FL0W CHANHEL AREA =',F8.2,2X,'CH2'/68X,'NUMBER 000009750 3F FUEL PLATES ')
165 F0RHAT(70X,A40,'"',F6.1> 170 FORHAK/37X,31('--')/37X,A20,' C,A40,') '/37X,31 ( • - -')) 175 F0RMATd37X,31('--')/37X,A20,
1 ' ( PRESSURE , ONB t ONO CONDITION > '/37X,3U'--180 F0RNAT<f5CX,'CHANNEL DIMENSION ' ,.f7.S,' »',F7.3,' (CM)',
1 /50X,'CHANNEL VELOCITY • ',F7.2,' (CH/SEC)') 200 FORMAI W20X,19(' • • ' ) , ' IEMPERATURE UISTRIBUTIOH ',17('--'>/
1 ?0X, ' I ' ,32X,2 (4X, ' I IAD0ING' ,4X>,2C4X, ' IUEL H L A T , 3 X ) , ' I ' / 2 2OX, ' l ' , aX , 'J ' ,12X, 'C00 I .ANI ' ,9X , 'SURTACI ' ,10X, ' INN£R' ,11X /
3 ' I IUUR' ,10X, 'HAX1HI IH ' ,4X , ' I ' / 4 2 0 X , ' l ' , 1 6 X , 5 < i X , ' < D E G . C ) ' , 4 X ) , ' l ' >
210 KIRMAK20X,'I ' , 110 ,4X ,5<F14 .2 ,2X> ,?X , ' I ' > 220 M)HHAK/20X,19C • > , ' HEAT 1RANSFER CONDI HON ' , 1 7 C
I 2 0 « , ' l ' , 2 4 X , M R A N S r F R M 0 X , ' H E A I F I U X ' , 26X , ' / ' l ' / 2 U X / ' l ' , 3 X , ' J ' , 6 X , ' l ( " , M X , ' C 0 f H I . I I « l ' , I 9X,'IN PLATE SURFACE',15X,'XAA',8X,'GENERA1IUH',2X,'I'/20X, 4 'I ',2.iX,'(W/tM2.C>',7X,'(W/CM2>*,7X,'<KC(M2.IIH)',11X,'(CM)',
'))
' ) / II E A T'4X,
000167 000168
V 10X,'JWCN3)',U,'I') 230 F0HHAT(20X,'l',l4,H0.3,2X,FI4.4,?X,f 14.3,2X,E16.5,
* 2(2X,F12.3,2K),'I') 240 F0HHAI(20X,9B('-')) 310 FOHHAI(/IX,IO('*«'),' CHANNEL N0.1 Slot ',21('•'),I2X,
1 10('»«'),' CHANNEL HO,2 SIDE ',21('»')// 2 IX,?<5X,'CHANNEL DIMENSION • ',F7.3, ',F7.3,' (CM)'
00009760 00009770 00009780 00009790 00009800 00009810 00009820 00009830 00009840 00009850 00009860 00009870 00009880 00009890 00009900 00009910 00009920 00009930 00009940 00009950 00009960 00009970 00009980 00009990 00010000
- 7 0 -
JAERI-M 84 -162
000130 IF( J. ~O.JH且o WHl lI【 6 ， ~~0) PHIH(1).TSAI(I.JHAXI).TOND(I.JHAX1); 00009230
1 OQHAX(I)，QONB(I，JHAX1)，QONU1(I，JHAXI)，白ONU2(I，JHAXI)， 00009240
2 QOHB3(I.JHAX1) 00009250 000131 GD 10 92 00009260 000132 91 Vfl1E(6.“ヨ) PAF(I.J).DPf(I.J).IOPF(I.J).Y(I)， 00009270
11.<1 ).J.PAF(官，J).OPf(2，J)，TDPf(2，J)，V(2) 00009280
000133 92 CONIIHUE 00009290
DDOIJ4 ‘CONIINUE 00009300 000135 IfIKHAX.EQ.2) GO 10 95 00009310
000136 WRJTE(6，‘9‘ 00009320 000137 GO TO 96 00009330
000138 95 WRITE(6.‘95) 00009340 000139 96 lF(JRAHF.Gf.l) GO 10 97 00009350 000140 匂RITEl6，‘晶0) 00009360 000141 G日 TO98 00009370
0001‘2 97 WRJTE(6，‘ro) OOOO~~ 00009390
0001‘ 98 JF (KHAXo EQ. 11 GO TO 1500 00009‘00 000144 VRIJE(晶，480) OQ009~10 0001‘ 00 99 J'I， JMAX 00009‘20 0001命6 WRJIE(6.‘90) ISAI(I，J)，TONO(I，J)，QQW(I，J).QONO(I，J)，QUNU1(I，J)， 00009命30
1 白ON02(I，J)，QDN03(I，J)，J，TSAT(2，J)，10NO(2，J)， 00009440
2 Q~旬 (2.JI.QONO(2 ， J) ， QOH01(2.J) ， QON目2(2 ， J) ， QOH03(2.J) 00009450 0001命 lf(J.EQ.JNAX) VRIIE(6，‘92) lSA1(I，JHAX1)，TONO(I，JHAX1)，QQHAX(I)， 00009460
1 QONO(I.JNAX1)，QONB1(I.JHAX1)，QON02(I，JHAX1).QDNB3(I，J 阿AX1). 00009‘70 2 lSAT(2.JHAX1)，TO附 (2.JMAU)，QQ剛 X(2). 00009480 3 QONB(2，JNAX1).QO制目1(2，JHAX1)，QONB2(2，JHAX1)，QDND3(2，JHAX1) 00009490
000，‘8 99 COHllHUE 00009500 0001，9 VRITE(晶，496) 00009510
000:50 1500日ETURN 00009520 00009530
000151 100 FORHAT(IHl，20X，' COOLOO --THERMAL HYORAULIC CALCULATIOU'.官X，'CASE000095‘。l' (IA-'，12，' JA・.，12.')' ，15X， 'CALCULA1l0N DA1E . ，2A‘，4X，'PAGE'.I])00009550
000152 110 FO白HATI](/)，28X，40('・・')/28X"，'・・'176JC，'・.'/28)1;，'・・，，2X，A12，2X，'・・'00009560
1128X.....，19X，.RESULIS OF CALCULAIIOH AHD USEO YALUES'.19X .・$'/2 00009570
28l，'..'，16X，i..'/28X，40('..')) 00009580
000153 130 fORHA1(IHO，401，'・..P酎IHARV COOLANT ...・ 000095901I20X. . REACTOR 嗣LET TEHPERA' U自E"，f8.苫，21，'['， 0000960白2I20X. 'RE"CTOR OUTιET TEHPERATU圃E .'，F8.2，?X，'C'， 000096!O 3120x. 'PRIHRY TE岡PE凪ATURE DJFFE圃EHCE田'，F8.苫，21，'C'， 00009620 4120x. 'PRIHARY C日日LAHTfLOv RATf 園 .，F串.2，21，'H31HIH') 00009630
000154 ・oFORHATCIHOパax，'..・ REACI日目 CORE ••••• ， 00009640
1120X， 'RE"Cl0自 THE目HAL POvER .'，F8.2.21，'M‘i'. 00009650 2120X. 'AREA日f T01AL FUEL tHAHNELS .'，F8.2.2X.'CH2'， 00009660 31120X，'NUHDEA OF fUEl ELE岡E圃IS "，F8.1，2X.'fLEHENTS') 00009晶70
0001~~ 150 FORHAT(I251.A40.' • '，F8.1，2X.'(ELEHHTS
-70-
JAERI-M84- 162
000169
000170 000171 00v1?2 000173
000174
000175
000176
000177 000178 000179 000180 000181 00018? 000183 000184
000185 000186
000101'
000188
000189
000190 000191
000192
3 2 7 X ) M I , 2 ( 5 I , 'CHANNEL V H O C I I V • ',F7.2,' (CH/SEC)',32X>// 4 1 I , 2 ( 9 C - ' ) , ' 1EHPERAIURF DISIRI0UT1OH ', 1 ?.< ' - ' ) , 12X) / 5 II,'I',12X,2(2X,'CLADDING',21),2(2X,'FUEL NEAT-,1X>,•I', 6 10X,'I',2(2X,'FUU MEAT',IX),2(2X,'CLA001NC,2X),12X,'I'/ 7 IX,'I',3X,'COOLANT',5X,'SURFACE',6X,'INNER',7X,'OUTER',6X, 8 •HAX1MUH',2X,'I',5X,'J',4X,'I', 9 3X,'HAX1HUH',6X,'0UIER',7X,'INNER',6X,'SURFACE',5X,'COOLANT',2X, • 'l'/tX.*l',5{3X,'(DEG.C>',2X),'l',IOX,'l',S(3X,'<OEG.C)',2X>,'l'
31S FORHAT(/25X,'»« HOT CHANNEL FACTORS (EXCEPT F2> »«'/ 1 27X,'FCCOOLAHT>=',F6.3,3X,'F(Fim>-",F6.3,3X,'F(CLA0> = ',F6.3, 2 3X,'F<B0ND>-',F6.J,3X,'F(MEAT)-',F6.3>
320 FaRHAT(1X,'l',5(F10.?,?X),'l',4X,I?,4X, I',S<F10.2,2X>,'I') 325 FORMAT* 1 X,6U*-'),12X,li I ('- ')) 326 F0RHAT<1X,50<'-'),34X,50C-')) 330 F0RHAT(/1X,7('--'),' HEAT TRANSFER CONDITION ",5< ),34X,
1 7('--'),' HEAT TRANSFER CONDITION ',5(' — ) W II,'I',2X,'TRANSFER',6X,'H E A T F L U X',15\,'l', 231, 'H E A T ' , 4 I , ' I ' , 1 5 X , ' H E A T F L U X',6X,'TRANSFER",2X, ' I /1X,'l',lI,'C0£f1C1ENT',7X,'IN PLATE SURFACE',7X,'XAA',4X,'I',5X 'J',8X,'F2',5X,'GENERATION',3X,'I',5X,'XAA',8X, •IN PLATE SURFACE',5X,'COEFIC1ENT',IX,'I'/ IX,'I',2X,'(W/CH2.C)',4X,'(W/CH2)',3X,'<ICC/M2.HR>',5X,'ICH>',4X, * I',?3X,'CW/CH3»',4X,'I'.^X.'CCH)',7X, '(WjCH2>',3X,'(KC/M2.HR)',3X,'(W/CH2.C>',1X,'l'>
340 F0RNAT(1X,'I',F10.4,2X,F10.3,2X,E12.5,F10.4,2X,'I',4X,12,4X,F8.3, 1 2X,F10.2,4X,'I',F10.4,2X,F10.3,2X,E12.5,F10.4,2I,'I')
400 F0RHAT(///1X,132('-'>/1X,'l',130X,'I'/1X,•I•,221,2(31,'PRESSURE') 1 5X,'TOTAL',31,'COOLANT', 2 25X,'0NB t 0N8 HEAT FLUX (W/CH2)',9X,'I'/IX,'I',2?X,'AT I 3 . 6X,'LOSS',8X,'LOSS',3X,'VELOCITY',4X,'TSAT',5X,'TONS',5X, 4 'CLAD',5X,'a0NB',4X,'a0NBl',4X,'8DNB2',4X,'0DNB3',4X,'I'/ 5 1X,'I',25X,'(KG/CH2A>',2(2X,'(KG/CH2>'>,2X,'(CH/SEC>',SX,'(C>' 6 6I,'(C)',5X,'SURFACE',37X,'I',/1X,'I',130X,'I'>
405 F0RMAI(/1X,8('»«'),' CHANNEL NG.l SIDE ',16( •• '),24X, 1 8('»»'),' CHANNEL NO.2 SIOE ',16('a')//
II, 52C-'),' PRESSURE C0N01T10N • ,52(' -') MX, ' I ' ,2X, 'PRESSURE',6X,'PRESSURE',4X,'TOTAL-,8X,'COOLANT',2X,'I',241, 'I',2X,'PRESSURE',6X,'PRESSURE',4X,'TOTAL',8X,'COOLANT',2X,' I '/ 1X,'I',2X,' AT I ',8X,'L0SS ',4X,'L0SS ',7X,'VELOCITY',2X,'I' 24X,'I',2X,' AT I ',81,'LOSS ',4X,'L0SS ',7X,'VELOCITY',2X,'I MX,'I',1X,'(KG/CH2.A>',5X,'(KG/CN2>',2X,'(ICG/CH2>',6X,'<CH/SEC>
8 ,2X,'I',24X,'I ',1X,'<KG/CH2.A)',5. ,!,'(»:G/CH2>',2X,'(KG/CM2)', 9 6X,'(CM/SEC)',2X,'I'>
410 FORNAT(1X,'I',2X,A16,3X,FI1.3,20X,F11.2,67X,'I') 415 F0RHAT(1X,'I',F10.3,28X,F10.2,2X,'I',4X,A16,
1 4I,'I',F10.3,26X,F10.2,2I,'I') 420 FORHAT(1X,'l',2X,A16,3X,F1! 3,2F11.5,F9.2,6?X,'I') 425 F0RNAI(1X,'r,F10.3,2F12.4,4X,F10.?,2X,'r,4X,A16,
1 4X,'I',F10.3,2F12.4,4X,F10.2,2X,'I') 440 F0RMAT<IX,'I',2X,A8/6X,I2,3X,F11.3/2F11.5,8F9.2,4X,' I ') 445 F0RHAT(1X,'I',F10.3,2F12.4,4X,F1O.2,2X,'l',4X,A8,6X,12,
1 4X,'I',F10.3,2F12.4,4X,F10.2,2X,'I') 450 FORMAT(IX,'I'21,'"WORST CONDITION"',IX,F11.3,31X,7F9.2,4X,•I') 460 F0RHAT(21X,'( BLASIUS EQUATION WAS USED FOR',
• ' WALL LOSS CALCULATION >') 470 F0RHAT(21X,'( KALHAH - N1KULAUZE EOUATION WAS USED FOR',
• ' WALL LOSS CALCULATION >' > 480 F 0 R H A T ( / 1 X , 5 5 ( ' - ' ) , ' OHO t DND CONDITION ' , 5 5 ( ' - ' ) /
2 1X,'I',62X,'I',6X,'I',62X,'I'/1X,'I',3X, 3 'TSAT',4X,'T0Nfl',6X,'H E A T F L U X (W/CH2)', 15X, ' I ' ,tX,
,4X,'IUND',6X, H E A T f i l l <W/CH?>',15X,' ( C)',4X,'( C)',5X,'CLA0',iX,'aONB',4X,'ODNB1',4X, '0DNB3',2X,'I',6I,'I',3X,'( C)',4X,'( O ' ,
4X,'<J0HBl',4X,'ODNB2',4X,'a0NB3',2X,' I ')
LABUNISOV Willi a HO SUUCDUL IHG KIRSIIAK, , OURANT I 10WEL ', DIRNAIH C0RRELA1I0H M l ' ')) >>
4 'l',3X,'TSAT 5 IX,'I',3X, 6 '<1DN02',4X 7 5X,'CLA0',5X,'OONB
490 fORHAI(1X,'l',F7.2,FB.2,»F9.?,2X,'I',2X,I2,2X • 'l',F7.2,T8.2,5r9.7,2I,'l')
49? fORHAlUX,' I ',F/.2,FB.?,5F9.2,7X,'I',1X, • ' W 0 R S T ' , ' I ' , F ? . 2 , F B . 2 , 5 F 9 . 2 , ? X , ' I ' >
494 I ORHAIM>, ' l ' , 1 3 0 X , ' I ' / 1 1X,12C • > , ' O0NB1 2 4C ' ) , ' BONO? 1 4C ' ) , ' Q0NB3
495 F0RMAK1X,52C-'),24X,52C 496 F0flMAT(1X,'l',132X,'l'/
1 1X,14('-'),' QDNB1 V 4('•'),' 0DNB2 3 4 ( ' • ' ) , ' QDNB3 LND
I '/
LABUNISOV WITH ZERO SUBC00L1NG HIRSHAK , OURANT t TOWEL ', DCRNATII CORRELATION ' , 4 C ')>
00010010 00010020 00010030 00010040 00010050 00010060 00010070 >00010080 00010090 00010100 00010110 00010120 00010130 00010140 00010150 00010160 00010170 '00010180 ,00010190 00010200 00010210 00010220 00010230 00010240 00010250 00010260 ,00010270 00010280 00010290 00010300 00010310 ,00010320 00010330 00010340 00010330 00010360 00010370 00010380 00010390 '00010400 '00010410 000104 20 00010430 00010440 00010450 00010460 00010470 00010480 00010490 00010500 00010510 00010520 00010530 00010S40 00010550 00010S60 00010570 00010580 00010590 00010600 00010610 00010620 00010630 00010640 00010650 00010660 00010670 00010680 00010690 00010700 00010710 00010?20 00010730 00010M0 00010750 00010760 00010770 0001 Of80
-71 -
JAERI-M 84 -162
3 21X)IIX.2(~X. 'CHN刷El VILOCIIY '，F1.2，' (CHISEC)' ， 32~)ff 00010010
‘1X.2(9( ，ー')，'IEHPERAIURF DISIRIOUlION '，11.('" 】.12X)1 00010020
~ 1X.'I'，12X，2(2X，'ClADDI刷G'，2Xl，2(2X，'FUflHEAT'，IX)，'I'， 00010030
6 IOX ， 'I' ， 2(2X ， 'FU~L HEAT'，IX)，2(2X，'CLADDING'，2X)，12X，'I'1 000100‘o 1 IX ， 'I' ， 3X ， 'COOLANT' ， ~X ， 'SURFACE' ， 61 ， 'INNER' ， 1X ， 'OUTER' ， 6X ， 000100~0 8 ・HAXI削 H'，2X，' 1" ，51，. 'J'..叫，'.'， 00010060
93X ， 'HAX1HUH'.6X ， 'OUIER' ， 1X ， 'INNER'.“ .'SURFACE'.~X.'COOLANT' ， 2X ， 00010010 ・，I ' 11 X，." 1 .. .. 5 (31..・(OEG.Cl'.官X>，"1'.. 101，" 1" ，5(3k，" (OEG.C) 1，2X)，・ 1')00010080
000169 315 FORHAT(/25X，'・.HOT CH血NNEL FACTORS (EXCEPT FZ) ..'1 00010090 1 21X，'F(COOLAHT)c'，F6.3，3X，'F(FILH)"'，f6.3，3X，'F(CLAD).'，F6.3， 00010100
2 lX，'f(目。ND)・'，F6.3，3X，'F(HEAT).'，F6.3) 00010110 000110 320 F自由HAT(1.，' I .... 5(F10.. 2， 21>..' l' ，41， 12，41， l' ，5(f 10. 2，21()， ， Iリ 00010120
000111 325 印刷AT(IX，61("')，12X，LI('ー')) 00010130
00、.172 326 FOR例AT(IX，50(" ')，3‘耳，50("')) 00010140
000113 310 FON例AT(/IX.1I'唱ー・).'HEAI JRANSFER CONOII10H '.SC'ーー')，3‘X， 00010150 17(....).. HEAI IRANSFER CON01110H '.SC" 司場 ).1 00010160
2 lX.'I'.2X.'IRAHSFER'.6X，'H E A I F L U X'.15~.'I'. 00010170 3 231，'H E A 1'，‘X，'I'，15X，'H E A I F L U X'，6X.'TRANSFER'，2X，'I'OOOI0180 ‘11X， 'I'，IX，'COEFICIENI'，1X， 'lN PLAIE SURFACE' ，1X， 'XAA' ， 4X ， 'I' ， ~X.00010190 S 'J'，8X，'FZ'，5X，'GENERATION'，lX，'I'，5X，'XAA'，8X， 00010200
6 'IN PlAIf SURFACE'，5X，'COEFIClENI'，IX，'I'1 00010210
7 U:，'I '，2X，'(W/C例2，0'，4X，'(WfCH2)' ，lX，' (KCIH2.HR)' ，5X，' (CH)' ，4X， 00010220 8 '1'，23X，'(WIC阿3)".. 4>::， ' I ' ，‘.， '(tH)'，71， 00司102309 '(WiCH2)'，3I， '(KCIH2.HR)'.lX， '(WICH2.C)'，1X.'I') 000102命0
00011・ 340FORHAI(IX，'I'，FIO.‘，2X，Fl0.3，2X，EI2.5，Fl0.4，2X，'I'.4X，12，4X，F8.3， 00010250 2X ，F 10ト2，41，'1 '，Fl0. 4， 2X， F 10.3， 2X， E 12.5 ，Fl0・‘，2X，'1') 00010260
000115 刊 oFORHAI(fl/lX，132('・')IIX，' 1 ' ，130X，' 1 '/IX，' 1 ' ，22X， 2(JX，' PRESSURE') ，00010270 5X， 'IOlAL' ，lX， 'COOLANT'， 00010280 751， 'ON8 畠 ON8 HEAI FLUX (W/CH2)'，9X，'I'/IX，'I'，21X，'AI Z'OOOl0290
.6X，'LOSS'，8X，'LOSS'，lX，'VELOCITV'，‘X，'ISAT'，5X，'ION8'，5X， 00010300 ‘ 'CLAO'，5X，'QOH日'，4X，'QOHD1'，叫，'QOH02'，4X，'QD帥 3'，4X，'I'1 00010J¥0
11，' I ' ， 251，・ (KGICH2A)'，2(2X，'(KG/CH2)')，2X，'(CH/SEC)'，5X，'(C)'，OOO103206 6X，'(C)'，5X，・SURFACE'，37X.'I'，/IX，'I'，130X，'1リ 00010330
000116 刊 5 FORHAI(/IX.8(".')，' CHAHHEl HO.I S10E '，1&("'>
-E-n'
JAERI-M84- 162
000002 000003 000004 000005
000006
Caaaaaaaaaaaaaaaaa*aaaaaa«aa**aaaaaaaaaaaaaaaaaaaaaaaaaaavaaaaaaa«aaaaa SUBROUTINE TQVER<1A,1M)
C C COOLING TOVER CHARACTERISTIC CALCULATION C
aBIBLIOGRAPNYa .HIDEO UCHIDA .SHIHERIKUKI TO REIKYAKUTOa
aSYn'BOLS ANO UNlTSa TEMPERATURE OF 2N0ARY COOLANT AT TOVER ENTRANCE TEMPERATURE OF 2NDARY COOLANT AT TOVER EXIT
IVS1 DEG * TVSO DEG
KCAL/M3.HR.D1 OVERALL HEAT 1RANSFER COEFFICIENT = CTKA TRANSFER UNIT = CNTU VET BULB IEHPERATURE * TV8 OEG 2N0ARY COOLANT FLOW RATE - GL KC/IIH AIR FLOV RATE ' GA KG'/HR CROSS SECTION AREA OF TOVER - SSCT M2 MIGHT OF TOVEN = 2CI M ENTHALPY OF SATURATED MOISI AIR - EIV KCAL/KG' ENTHALPY OF AIR " El KCAL/KG'
Caaaa*aaa««aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa*aaaaaaaa«*aaaaaaaaaaa DIMENSION EK51>,EIV(51>,TVS<51),0IW<51>,VV<204) COMMON /MN7/ ORR(IO),PFL0V(10> COMMON /CE1/ IVSl,TVSO,DTS,CTKA,CHTU,flREAC,VES,UN,GLA,GAA,XN COMMON /CE2/ SFLOVC10>,AFLOV<10>,CTK1<10>,HEKI(10),
1 SSCT<10),ZCT<10),SSHE<10),1HEU0> COHHON /CM/ TVC,RHO,CP,ANU,AHU,RAMDA,PRN,RAHO
000007 LHAXMO 000008 ML - LHAX/2*! 000009 LHAX1=LHAX*1 000010 EEC - 0.0005 000011 EE2 = 0.01 000012 N-0 000013 H»51 000014 aREAC°B.598E«5*aRR(IA) 000015 CU=1.0E«50 000016 GL1 ° SFLOW<1A)*0.6E*S 000017 GA1 = AFL0V(lA)a60. 000018 EK1>"ETA<fVB,«S> 000019 1ERRT1 = 0 000020 1ERRT2 ' 0 000021 TVC-TVB 000022 5 CALL CONSTKO,0,0,1,1,0,0) 000023 CL = RHO«CU 000024 VES-GLaCP 00002J DTS-OREAC/VES 000026 GA°RA<TVC)aGAl 000027 GN°GWGA 00002a IF (N.CE. l ) GO TO 20 000029 10 CTKA-CTKKIA) 000030 15 CHTU"CTKAa7CTCIA>/<GA/SSCTUA)> 000031 AA°0.O254/0TS 000032 CC-AAaTVBaa2«9.488aAAaTVB*0.0835aOTS-GNat0.5»l./CNTU) 000033 TVN=C9.48BaAA»S0RT<<9.488aAA)aa2-4.0aAAaCC>>/<2.0aAA> 000034 rvx-tvc 000035 lVC'TVH 0000.16 CALL ERKORUVX.IVCEEC.IEHR11,15,116) 000037 H»N»1 000038 GO 10 20 000039 16 V R I I t ( 6 , ! / > 1A,IU0,IVX, [ V C l t R R I I . f l C 000040 17 I0HMAK/2X,'SIII1.I0VER COOLANI ANO AIM II HI'. IURAM0N
a ' I A " , l 7 , 7 X , ' T W B ' ' , E 1 ? . 5 / • 5X , ' IVX" ,E1? .5 ,2X , ' 1VC ' , t l l i . i , ? J , • 1 LHH1 1 • ' , l 4 , ? X , ' t
00004 1 I IRRI1 - 0 II0UO4 2 70 01 MMS/FIOAKINAX> O0UU4J lll'GNaOll ' -UU44 UO 30 L-?,I.NAX1 000045 H U ) - t l ( 1 ) t D l » I I O A I ( L 1) 000046 30 CONIIHUE 00004 7 LI - 0 000048 1? • 0 000U49 L 1
EEC M l ? , l )
00010790 00010800 00010810 00010820 00010830 00010840 00010850 00010S60 00010870 00010880 00010890 00010900 00010910 00010920 00010930 00010940 00010950 00010960 00010970 00010980 •00010990 00011000 00011010 00011020 00011030 00011040 00011050 00011060 00011070 00011080 00011090 00011100 00011110 00011120 00011130 00011140 00011150 00011160 00011170 00011180 00011190 00011200 00011210 00011220 00011230 00011240 00011250 00011260 00011270 00011280 00011290 00011300 00011310 00011320 00C11330 00011340 00011350 00011360 00011370 00011380 00011390 00011400 00011410 00011420 000114 10 00011440 00011450 00011460 00011470 00011480 00011490 00011500 00011510
- 7 2 -
JAERI-M 84 -162
C.・・・・・・・・率・・・・・・・・・・・・・...竃=・・率・....・B・s・......，.......率司E率...事a率率率事奪事・ 00010790 000001 SUDROUrlHE rOWER(IA.IWU， 00010800
000002
000003
000004
000005
000006
~00001
000008 000009
000010
000011
00001官。00013000014
000015
000016 000017
000018
000019
000020
000021
000022 000023 000024
000025
000026
000027
000028 000029 000030
000031
000032
OOOOJJ
UOOOJ‘ 000015 0000J6 0000J7
00UOJ8
OOOOJ句
OUUO~O
00。日令'"OOO~? 00υfJ/d
l' _"，U44
00U045
OU0046 0000.， 000048
000Q4~
00010810
COOLJHG TOWfA CIIARIICTERJSTJC U1CU1IITIOH 00010820 00010830
C.・.............・・・・・・・・・・..・........・・・・・・・・・・・・・・・・・・・・・・・・s・m・・・・・・・ 000108‘。a日』日II0GRAPHY' 'HIOEO UCHIOA ....SHIHERIKUKI 10 REIKYAKUrO・00010850。0010860・SY;';OOLSANO UHlTS' 00010870
rEHPERATURE OF 2HOARY tOOLAHl Ar rOwER ENTRAHCE • TWSI OEG 00010880 rEHPEAATURE OF 2HDARY t日日lAHT Ar rOWER EXIT • TWSO OEG 00010890 OVEHAll HEAT lRAHSFER C日EffltlEHr CrKA ~CAl 川43.HR.DI 00010900 1白A倒5fERUHlr • CHTU 00010910
WET OU10 rEHPEHArURE • rwo OEG 00010920
2HOARY COOLAHr FLOW RATE ' Gl KG/HR 00010930
AIR fLOW P.AI[ GA KG'/HR 000109‘o
CROSS SECTIOH AREA OF TOWER sscr 倒 00010句50HIGHr Of rOWEH 1CI 伺 00010960ENTHALPY OF 5nrURnTED附0151 AIH EIW KCAL/KG' 00010970 EHrHALPY OF A IRτ 正 KCAL/KG' 00010980
c・・・・・・・a・・・.......・-率・s・・・・・・.....................率竃思竃率率直・・・・s・・・s・・・・'000109900lHEN510H EI(51).EIW(51).TWS(51).DIW(51).VW(20‘ 00011000
COHHOH 附H11QRR(10).PfLOW(10) 00011010
COHHOH ICE11 rWSI.TW5U.OTS.CTKA.CHTU.QREAC.WES.UN.GLA.GAA.XH 00011020 COHHOH ICE21 5fLOW(101.AFL日W(10).CTKI(101.HEKJ(10). 00011030
SSCT(IO).lCT(IO).SSHE(IO).IHE(IOI 000110‘o
COHHOH ICrl1 TWC，RHO.CP.AHU.AHU.RAHOA.PRH.RA倒o 00011050 00011060
LHAX=IO 00011070
HL • LHAXI2+1 00011080
LHAXI'LHAX・ 00011090EEC = 0.0005 00011100 EEI = 0.01 00011110 H-O 00011120
M-51 OOOII1JO
QREAC=8.598E+5aQRR(IA) 000111‘o CU固1.0Eφ50 00011150
GLI = SfLOWC IAl・0.6E'5 00011160 GAI = AfLOWClAl・60. 00011170 EICIJ-ETA<1WB.rSI 00011180 IERRrl • 0 00011190
IERRr2' 0 00011200
rWC'TWD 00011210
) CALL COH5Tl(0.0.0.1.1.0.0) 00011220 GL=RHO・GLJ 00011230
WES圃 GL・CP 000112‘O OT S.QREAC IWES 00011250
GA園田A<TWCl・GAl 00011260
GH'GLlGA 00011210
IFCH.GE.IJ GO 10 20 00011280 10 CTKA-CTKIC1A) 00011290
15 CHrU-CrKA・lCTClA)/(GAlSSCrcIAII 0001¥300 AA'O，025Hors 00011310
CC困 -AA・rWB・・2・9.488・AA・TWB+0.083S'OTS-GH・(0.5・1，/CMTU) 00011320
rWM'(9・‘88a!IA'SQRJ((9.‘88・AAI・a2-4.0aAAaCC))/C2，O'AA) 00011330 rwx，rwc 00011340 lwc~rWH 00011350
cnLL ERNUR(rWX，IWC.EEC.IENRll，‘5，‘16) 00011360 H.H" 00011370
GO 10 20 00011380
I~ I/RIIU6.11l IA.IW8.rwx.rWC.H白血11.ft.C 00011J90
11 fURMAI</2X.'SIID.IOWER COOLHI AND AIH TrHP. 11
00011510
-72-
JAERI-M 84 - 162
000050 IWS<l)»IWH-OIS/2.0 00011520 000051 EIW(1)=£!AUWS<L),XS> 00011530 000052 D1V(L>-1.0/<E1W<L)-EI<L>) 00011540 0000S3 1F(DIW(L>.LE.0.0> LI » 1 00011550 000054 DO 35 L'2,LHAX1 00011560 000055 rVSU>-TVS<1>tDTT»FLOATU-l> 00011570 000056 EIV<L>-ETA(TSS«L>,XS> 00011580 000057 DIVU)<-1.0/(EIWU>-EIU>> 00011590 000058 IF<0IVU)) 33,33,35 00011600 000059 33 IFU1.E0.0) L1 - L 00011610 000D60 IFU1.GE.1) L2 < L 00011620 000061 35 CONTINUE 00011630 000062 1FU1.GE.1) GO TO 40 00011640 000063 CALL S1MP1(0IW,IHAX1,DTT,SNTU,ICON) 00011650 000064 SNTU - GN * SNTU 00011660 000065 CALL ERR0R(CNTU,SNTU,EEC,lEART2,t50,«36> 00011670 000066 GO TO 100 00011680 000067 36 WRITE(6,37) IA,TUB,CNTU,SNTU,1ERRT2,EEC 00011690 000068 37 F0RHAT(/2X,'SUB. TOWER NTU CAL. ITERATION ERR0R'/5X, 00011700
«'IA"',I?,2X,'TWB-',E12.5/5X,'CNTU-',E12.5, 00011710 • 2X,'SNTU=',E12.5,2X,'1ERRT2=',I4,2X,'EEC=',E12.5> 00011720
000069 IERRT2 * 0 00011730 000070 GO TO 100 00011740 000071 40 1FU1.GE.1) I = L1 00011750 000072 IFU2.GE.2) L = L2 00011760 000073 E1X = EKL) • 1.02 00011770 000074 TO - TWS(L) 00011780 000075 45 TX • <E1X-597.3'XS>/(0.24»0.441»XS> 00011790 000076 TWH » TWH * ( TX - TWS(L) ) / 2.0 00011800 000077 GO TO 54 00011810 000078 50 DIWHX»SNTU/(GN«DTS) 00011820 000079 01WHV=CNTU/(GH«DTS) 00011830 000080 DIUC°D1UHY*DIV<HL>/D1VHX 00011840 000081 1F(OI'J<26).LT.O.O> DJVC-10000.0 00011850 000082 EI'Vi;=1.0/0IWCtEi(HL) 00011860 000083 EPS-O. 00011870 000084 IF(EIVM-EIV(LMAX1>> 52,51,51 00011880 000085 51 TWH»TVS(LHAK1> 00011890 000086 GO TO 54 00011900 000087 52 IFCEIWH-E1U<1>> 53,53,57 00011910 000088 53 TWN>TVS(1> 00011920 000089 54 TWC-TWH 00011930 000090 GO TO 5 00011940 000091 57 CONTINUE 00011950 000092 CALL AKLAG(E1W,TWS,LHAX1,EIWM,H,EPS,TWN,VW,ICON) 00011960 000093 IFCICOH.EQ.30000) GO TO 60 00011970 000094 !W0°TWH-DTS/2.0 00011980 000095 IF(TVO.LT.O.O) GO TO 250 00011990 000096 TWC-TWH 00012000 000097 GO TO 5 00012010 000098 60 WRITE(6,200> ICON,CNTU,SNTU,E1WH 00012020 000099 200 FORMAT<1H0,20X,'TOWER CALCULATION',3X,'ICON-',15,3X,'CNTU- ',£12.5,00012030
1 I3X,'TU"',E12.5,3X,'EIWH-',E12.5) 00012040 000100 250 TVSO"0.0 00012050 000101 TVSI'DIS 00012060 000102 VRITE(6,260> TUM 00012070 000103 260 FORHATC1H0,25X,'TWM",E12.5> 00012080 000104 GO TO 300 00012090 000105 100 TVSI-TVS(LHAX*1> 00012100 000106 TVS0'1VS(1> 00012110 000107 300 GLA • GL/SSCKIA) 00012120 000108 GAA • GA/SSCHIA) 00012130 000109 XN • GLA/GAA 00012140 000110 UN = CNTU/XN 00012150 000111 REIURN 00012160 000112 END 00012170
[••••••••••••.•••••mI. >••••>• •••«•••• ..•.•.OUODISO 000001 SUOROUIINE EXCIIG< U , JA, IWB> 00012190
C 00012200 C 00012210 I «>••• M l CUM 11 UN OF SHELL AND TUBr HEAT EXCHANGER ••»•• 00012220 [ »>••• (COIINIER FLOW TYPE) »«««» 00012230
- 7 3 -
JAERI-M 84 -162
000050 IWSCl)'IWH-OTS/2.0 00011~20 OOOO~I [IW( 1 ).EIAtTWS(l) ， ~S) ・ OU0l15.10000052 0IW(l)'1.0/tEIW(l)-E!(l)) 00011540 000053 IF(OIW(lJ.lE.O.OJ ll' 1 00011550 00005‘ ・日o35 l=2，lHAXI 00011560 00 0 0 5 5 ν S (l)・T"S(1J'日TT・FlOAT(l-IJ 00011570 000056 EIW(lドETA<T日S(lJ，UJ 00011580 000051 OIIl<LJ-l.0/ tEllI(lJ-EI (lJJ 00011590 000058 IF(OIIl(lJ) JJ，JJ，35 00011600 000059 33 lF<lI.EQ.OJ lI' l 00011610 (100060 IF(lI.GE.1J l2' l 00011620 000061 35 COHT1HUE 00011630 0000晶2 Jf(ιI.Gf. ¥J GO 10 ~O 000116‘0 000063 CAll SIMP1(0IW，lHAX1，OTT，SHTU，ICOHJ 00011650 00006‘ SHIU • GH _ SHTU 00011660
000065 CAll ERROR(CHTU，SH1U，EEC，IERRI2，畠50，晶36) 00011610 000066 GO TO 100 00011680 000067 36 WRITE(6，37J JA，TW8，CHIU，SHTU，IERRT2，EEC 00011690 000068 37 FOR嗣 1(/2X，'SU8. TOWER HTU CAl. JTERATIOH ERROR'/5X， 00011700
・'JA.'，J2，2X，' IW8-' ，fl2. 5151，' CHTU" ，fI2. 5， 00011110 ・2X，'SHIU" ，EI2.5，2X，'IERRT2" ，14，2X，'EEC" ，EI2.5J 00011120 000~69 IERRT2 c 0 00011730
00011140 000010 GO TO 100 000011 ‘o IfCL1.GE.l) 1 II 00011150 000072 1f<L2.GE.2J L • l2 00011760 000013 EIX EI(lJ・1.02 00011710 000074 TO • TWS(l) 00011180
000075 ‘5 n • <EIX・597.3-XS)/(0.24・0・‘41・XSJ 00011190 000076 IWH 担 TWH+ ( T~ -TWS(l) ) / 2.0 00011800 000077 GO 10 54 00011810
000078 50 OIWHX包 SHIUI(GH・DTSJ 00011820 000079 OIWHYcCHIU/(GH・DTSJ 00011830 000080 OIWC-OIWHY-OIW(HLJ /OlWHX 00011840 000081 IF(DIY(26J.lI.0.OJ DJWC・10000.0 00011850 000082 EI 叩~.I.O/OIIIC+El(HLJ 00011860 000083 EPScO. 00011810
00008・ IF(fll川・E111<LHAXI)) 52，51，51 00011880 000085 51 TWH'TIIS(lHAXIJ 00011890 000086 GO 10 5‘ 00011900 000081 52 IF(EIWH-EIW(lJJ 53，53，57 00011910
00011920 000088 53 JWH-JWS (1) 000089 ‘IWC-TWH 00011930
000119‘0 000090 GO JO 5 000091 51 COHJIHUE 00011950 000092 CAll AKlAG(EIW，IWS，lHAX1，EIWH，H，EPS，TWH，YW，ICOH) 00011960 000093 IF(ICOH.EQ.30000) GO ~O 60 00011910 00009‘ IWO固 IWH-OIS/2.0 00011980 000095 If(JWO.lJ.O，OJ GO JO 250 00011990 000096 IWC-JWH 00012000
00012010 000091 GO 10 5 000098 60 WRITE(6，200) ICOH，CHJU，SHIU，EIWH 00012020 000099 司00 FORHAI(IHO ， 20~ ， 'TOWE 圃 CAlCUlATIOH' ， 3~ ， 'ICOH.' ， 15 ， 3X ， 'CHTU' ・， EI2.5 ， 00012030
13X，'IU-'，EI2.5，3X，'EIWH-'，EI2.5J 00012040 00012050 000100 250 JWSO-O.O
000101 TWSI-OJS 00012060 000102 IIRITE(6，260J IWH 00012070 000103 260 FORHAT(IHO，25X，'TW例_，，EI2.5) 00012080
00012090 00010‘ GO TO 300 000105 100 TIISI-TWSIlHAX・IJ 00012100
00
E・E・..............・・・・・・・・・・・・・・B・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・‘s・-00012180OUOOOI SUONOUIIH( EXCHG(IA，JA，IWB) 000121~0
00012200 00012210
..... CAlCUlMWH Of SllfLl. JlHO TU8< HEJlI fXCHHGfR ・・・・・ 00012220
・・・・・ (&OUHlfn flOW TYPEJ ・・・2・ 00012230
一73-
JAERI-M 84 - 162
C «*»«» (PARALLEL FLOW TYPE) axxx* 00012210 C xxxax (SMELL SlOt N-PASS AND TUBE SIDE 2XH-PASS-IYPE) «»•«« 00012250 Cx**x*xxxxxxx*xxxxxxxaaxxxi*x««x*xx«x»ii*xxxxxa**x**xxaaxixxx**xxaxxxxaxxoO012260
000011 000012 000013 000014
000015 000016 000017 000016 000019 000020 000021 000072 000023 000024 C00025
000026 000027 000028 000029 000030 000031 000032 000033 000034 000035 000036 000037 000031 000039 000040 000041 000042 (100043
000014 00004} O00046 00004f
•BIBI IOGHAPHY* 'KOGAKUTOSIIO (1977.7.1) HEISUKOKANKI HANOIIOOK' •K0GAKU10SII0 KETSUKOKAHKI SEKKEI HANDBOOK (1977.7.1) * •JSM6 DENNETSUKOGAKUSHIRYO (1976.1.20) «
(SYMBOLS AND UNITS* IHt =• -1 (COUNTER FLOW TYPE) HIE - 0 (PARALLEL FLOW TYPE) IHE » M (SHELL SIDE H-PASS AND TUBE SIDE ?*M-PASS TYPE) TEMPERATURE OF 2NDARY FLOW AT H.E ENTRANCE ' TWSO DEG
AT H.E EXIT • IWSI DEG TEMPERATURE OF PRIMARY FLOW At ENTRANCE •= TUPO DEG
AT EXIT • TWPI DEG HEAT TRANSPORTATION COEFFICIENT- HEKA KCAL/H2.HR.DEG HEAT TRANSFER AREA = SSHE H2
00012270 00012280 00012290 00012300 00012310 00012320 00012330 00012340 00012390 00012360 00012370 000123BO 00012390 00012400 00012410 00012420 00012430 00012440
CxxxxxaxE*xxxxxxxxxxxxxxKX*«xxKxxxxaxxxxxxxxxxxx«axKxx*xxxxaaa*KxxKxaaaaO/0012450 000002 000003 000004 000005 000006 000007 000008 000009 000010
CHARACTER TITLE»72/TITLHx40,TirtPx20 COMMON /MHO/ JHAX,KEY(3) COMMON IHHM CDATE(2),NPAGE COMMON /MN7/ ORR<I0),PFL0W(10) COHMON 'NHS/ TWPI,TWPO,DTP COMMON lUII TITLE,T1ILN<5),TIUP(5,15) COHMON /CE1/ TWSI,TWSO,0TS,CTKA,CNTU,aREAC,WES,UN,GLA,GAA,XN COMMON /CE2/ SFL0W<10),AFL0W(10>,CTK1(I0),HEK1(10>,
1 SSCT(10>,ZCT(]0>,SSHE(10),IHE(10> COMMON /CI 1/ TVC,RHO,CP,ANU,AHU,RAHDA,PRH,RAMD
WS > WES EEE - 0.0001 HEKA • HEKK1A) TWC = TVSI xx CALCULATION OF PRIMARY COOLANT TEMPERATURE «»
IERRE1 = 0 KEY3 " KEY(3>
30 CALL CONST1(KEY3,0,0,1,t,0,0) WP " PFLOW(IA)xRH0xO.6E*5xCP DTP - OREAC/VP RA • WP/WS UU ° HEKAxSSHEOAWWP 1FU»E(1A» 40, 50, 60 x«x IHE - -1 (COUNTER FLOW TYPE) « •
40 FA1 * EXP(-UUx(1.0-RA)> EA « (1.0-FAI)/(1.0-RA'FAI) GO TO 90 «xx HIE » 0 (PARALLEL FLOW TYPE) xx*
SO EA • (1.0-£XP(-UUx<1.0tRA)))/<1.0«RA) GO TO 90 xxx IHE • H (SHELL SIDE H-PASS AND TUBE SIDE 2*M-PASS TYPE) xxa
60 M - IHE(IA) RA2 • Sa«l(!.0»BA»«2> GAMMA * UUXRA2 GAEXP • EXP(-GAHHA) EA ' 2.0/<(1.0»RA)«RA2x((1.0*GAEXP)/(1.0-GAEXP>>> lF(H.LE.I) GO TO 90 EX » ((1.0-£A(RA)/(1.0-EA)>((H FA • (EX-1.0)/(EX-RA>
90 TWPO ' IWSO»0TP/£A IWPI • IWPO-DTP IVPM IWC (Wt - <r«PHTWP0)/2.0 CALL EHH0R(TWC,lWPH,EEt,IERRL1,«O,t94> GO 10 99
95 WRIIE(6,96) 1A,IWC,IWPM,IERRL1,EEI 96 F0HHAT(/2X/'SIIU. EXCIKi C00I..1N1 IEHP. IHHA1I0N LUKOR' • 2X,'T«C",H2.5,2X,'IWPH»',EI2.:i,2X,'IEHRE1",l4,2X, • ifwu'i » o
99 HI'AGL KI'ACL'I VRITF(6,100) IA,JA,CUAtE,NPAGt UR1TI(6,I10) H U E
00012460 00012470 00012480 00012490 00012500 00012510 00012520 00012530 00012540 00012550 00012560 00012570 00012580 00012590 00012600 00012610 00012620 00012630 00012640 00012650 00012660 00012670 00012680 00012690 00012700 00012710 00012720 00012730 00012740 00012750 00012760 00012770 00012780 00012790 00012800 00012810 00012820 00012830 00012840 00012850 00012860 00012870 00012880 00012890 00012900 00012910 00012920 00012930 00012940 00012950
m , ' IA",12,00012960 m»',rt2.5> 00012970
00012980 00012990 00013000 00013010
- 7 4 -
JAERI-M 84 -162
-・‘皐.(PARALlEL fl日V TYPU ・・.0' 000122~0 ・・・..(SIIEU SI 日~ H-~ASS AND TUOE SIOE 20N-PASS-IYPEI ・・・O. 00012250 E・・"0・....・E・.......................“..............・a・...・a・...........0001~Z60
0001官官70
E 奮闘181.1OGNA~HYo oK日GAKUTOSIIO (190.1.11..... 嗣~ISUKOKA"KI 11品HOUOOKO 00U1?280 ')(OG)(UI05110 .... .HET5UKOKAHKJ SE)(UI IIA制OBOOK (1977.7，1)・ 00012290
E ・JS阿.....DEHNETSUKlIG向KU5111RYO (1976.1.201 • 00012300 00012310
E ・SYH日日lSAHD UHITSo 00012320 00012330
IH~ ・ 1 (COUHTER FLOW TYPEI 000123命。IIIE' 0 (PARLLEL FLOW TYPEI 00012350 JHE' H (SIIELL SIDE H-PASS AHD rUSE SIDf 2oH-PASS rYPf> 00012360 TEHPERATURE日F 2HOARY FL日V T II.E EHTRANCE • TW50 OEG 00012370
AT H.E EXIT • TWSI OEG 00012380
Tf'HPE自ATU自fOF P日IHA自YflOW AT fHTRAHtE • lWPO DEG 00012390 AT EXIT • TWPI DEG 00012~00
HEAT TAA嗣SPORTAT10NCOEFFICIEHT- HEKA KCL/H2.HR.日EG 00012410 HEAT rAANSFER AREA • SSHE N2 00012~20
00012430 0，0012440
E・・s・・血..“s・a・.......・・・・・a・......・.......・・・・・・00・S・S・.....血..車車.00...00012450000002 tHA自ACTfR fI TLE・72.rITlH.40.rlrLP.20 00012460 000003 COHHON /HHO/ JH向X.KEY(31 00012470
00000‘ COHHON /MNII CDATE (21 .HPAGE 00012‘80 OOOOO~ 日附附ON IHH7I QRRClO>.PHOW(IO> 00012490
000006 COHH。“ IMN81TWPJ.TWPO.Orp 00012500 000007 日HHOH ITXI/ TJTLE.TlrlN(51.TITLP(5.151 00012510
000008 COHH白H /(Ell TVSJ.TWSO.OrS，CrKA.CNru.画REAC，WES.UH.GLA.GAA，XN 00012520 000009 COHHOH パ:E21SFLOV(101，AFLOW(10>.CrKJ(10>，IIEKJ(101. 00012530
SSCT(101.lCT(!0).SSHE(101.1HE(10) 000125‘。000010 COHHON ICT11 TWC.RHO.CP.A制U.AHU.RAHDA.PR刷，自AMO 00012550
00012560 00012570
000011 WS • WES 00012580
00001宮 EEE • 0.0001 00012590 000013 HEKA • IIEKJ(JAI 00012600
00001・ TWC • TW5J 000U610 00012620 ・.CALCOLATJON OF PRJMARY COOLANT TEHPERATURE O. 00012630 。0012640
000015 IfAREl • 0 00012&50 000016 KEY3 国民EY(31 00012660
000017 30 CALL CONST1(KEY3.0.0.I.l.0.0) 00012670 000018 WP 回 PFLOWClAI.RHO・0.6E+50CP 0日012680000019 DTP • QREAC/WP 00012690 000020 RA 白 VP/WS 00012700
000021 UU g HEKA・SSHE(JAII切 00012710
000022 IfIlHH!A)) 40.50，60 00012720 ι ・・・ JHE • -1 (COUNTER FLOW TYPEI ..・ 00012730
000023 命日 FAI • EXP(-UU.Cl.0-RA)) 00012740
00002‘ EA 回 (1.0・FAI)/(1.0-RA・FAII 00012750 G00025 GO TO 90 00012760
c ..・ IIIE 固 o (PARALLEL FLOW TYPEI 0・・ 00012770 000026 50 EA • (1.0・EXP(-UU・(1.0令官Al))/(1.0tRAI 00012780
000027 GO ro 90 日0012790
C •
-74-
tflfif
llll
r?o
.->
oo
t-.
c-.
r>r,
r>r.
r>r>
o«
<ir
j
il-iiiis
n
B
-oo
wc
/»-*
^3
*o
>x
mm
mn
ix
o Z
^O
OS
OS
OP
TIP
-o
x«
-*
-x
xx
> —
. — -
n -n »
» 3
> a-
llSlll
il
0 C"
i O
*
om
b a>
=0 o
» •
m
3*
> r-
PO
C»
r*
X 1—
*.
X 0
-»
r> 0
0
a
a r»
X
X X
w
e» 0
X
a a
ro
m
m
u
. =
OS *
* 0
0 so
m t
o
a 0
m
ri
0
a 0
II"
||||l|||ll|||||i|lllH
ss
ssss
sgg
gss
ssss
sgss
ss
00000000000000
00000000000000
00000000000000
00000000000000
II *•
w
rO
»* «
M
a a
a *
*>
NO
>U
l «.
M
14 .«
10 .*
_»
a *-
-n
•»
•»
****
*. •H
-n
X
*.
T\
n -n
c
-T
IO O
S rO
M O
PO
*o
rO P
O P
O r
o M
N M
N P
O O
S ISS
KS
e
lO
O
e 3D
SB
0
0 O
0
so O
O
0
0 0
O
OO
OO
0
O
O 0
so
V
so <
N SO
—
x s
* X
X X
X
x X
3* X
M
X X
3C
X
sc »
: X
X » X
X —
X -
-
a
* 3
» >
» m
m
* -H
•O
T»
33 3
3 ~
3*
St
3» «
fO
-1
*
a *•
> o>
9
as s
o m
m
—
>
•- m
sc
O
Om
m
^ -
a m
t*i
•- »-
2> 3
* =
ci
»- c
so
r>
0 a
r «
-1 3
» =
0*
— 3
= •-•
X X
O
r>
0
O
3» r
n m
0
0 X
PO —
w
ro
> so
-*
* ^1
•n
*»
so s
o »-»
** 0
O
so -
e O
0
*• O
-n
r-
0
-C
O
*•
»a
*
w
PO
w
< 3D
so
0 S
O O
s*
3> Z
O
O
3»
so
e> « X
fS9
O
-<
»e
w
a:
=0 -
* O
CO
yc
» *
to C
X
—« r>
O
n
m
-<
m z
=
c
- X
3»
« c
X 3D
o
xo
O
=0
x r
--1
r-
SO "
* •0
«H
30
0 -0
3=
«
JE
X »
r> -
© m
(-
OS
m
PO
m
*•
•• t^
c
1-
™
1- «
m
O
0 O
O
k_
0 -•
O
m
-( -•
« C-
to 0
*
O
—
J> =
0 m
• 3>
•n
*n •
n -n
w
O
m 0
so
sc
*
JC C
~
—
O •
^
«= »
Z 3»
-1
0
r- >
m
p-
-
PO
r* «
c X
w
1- ~
3»
-H
SO
OS
*•
•M a
*
O -
B
<=
*-
-n X
C -
t -<
-t
X
m O
c»
a
- 0
O «
-* >
•n s
o •^
-1
X ^
-1
SO
m
m
m s
> n
^s
»^ X
r-
•=
> 1-
m
-»
O
a 0
0
ox
m X
X
X r
- 0
O
«
O >
S3
a 0
pn m
3»
c
c «
a:
•n
-0
-O •
« X
» -n *
» -1
** a
« a
X X
so
m pn
m
m
0 r-
0 m
m
n
i OS
a
PO
-O «>
a
k,
•v
-0 -
e SO
3D
3D 3
D 0
-n
0
—
so
so s
o >
r)
e» V
I ^
3>
a:
a so
-n
m
m
«n -
H
«
-n 3
> >
» so
»
X X
X
>
w
1 >
11
3P S
O
0 -
( -n
^ -H
-H
TS
-<
r* >
*
PI
0
s -<
m
s»
3>
^ c
o»
m
C =
= O
r»
* -
so
X s
m
so -*
-H
O
O
no
x 3D
SO
SO
«:
0
c: a
r>
x
X
^ s
n ts
<=
O
c
so m
-
, m
m
m
m m
0
r*
a
a»
>
* ao
x
» SB
CJ
m
so m
x
3D
O
3»
»
p-
f—
=c M
>
b 0
m
m
r-3D
0
*-m
t—
m
»
•— -
^j e
= >
J^
1 n
a
II "-
3 n
u 1
II *
X X
p* <
>
0 v
^ 5
-V 1
1 -n
*
•"
m •n
^1
*n
-n
-n -
n -n
•n
-n
-n
M
» * •H
3D
*-
3>
V
to
0> 0
0 fS
o> o
» to
o>
o»
OR C
B 0»
0>
0» o
?
: x
a 0
a 0
e=
X r*
s
eo
PO U
P
O
•*
& *•
0 r>
5
ro r
o f
O *
o PO
ro
•S
3 TO
IO
PO
lO
rO
ro
ro «
J er
t PO
>
C X
X X
X
X X
X X
X X
X
X
X X
X
m
00 -
^ r>
O
x m
>
r*
>
X O
0
rv
3*
J* *
K X
X
-rt rt
r»
0 X
•
^ *
* n
V
M
»
O
O
0 r>
w
w «.
ar
» a
N c
: ••
*'— \
3*
r* «
ro
r->
X f-
X X
1- X
X
c •*
> =>
•«
>-.
"«•
TO r
o »»
1—
K.
PO s
*•
—t
r*
X I
Z Z
&a
*C
o
PC
=E X
>
X *
O
«:
^ *
so 3
D •
* x
*
* x z
^ X
PO T>
to
* v 3> X
- PO e> •*•
a x
rn *•
IO
OO
OO
OO
OO
OO
OO
OO
O lOOOOOOOOOOOOOOOO
IOOOOOOOOOOOOOOOO
JM
WW
UI
Ul
l-
IU
lM
MM
MW
WW
ta
iW
t IW
PO
rO
PO
'Or
Or
O*
Oft
Sr
OP
Ot-
»*
*-*
«*
^«
'O
OO
-J
SA
Ul
A'
WI
OM
Oi
OB
'N
iO
tU
J >oooooooooooooooo< ll
illl
illl
iil
illls
iiiili
il
JAERI-M 84 -162
auaHVAVAOnuaunuauauaunuAOnuauaHV白
uaUAOAUAwauaυnOAuaunuaUAUAUAO
n，‘，‘dA-TE3&u'e-Ba・，au--
内，‘，aA・E，a'
曙
g-oau，au-an，‘，S
血・e3zo'eaeo，AU48
AUAHvaonUAOnuaUAHV
・a-a---a-----a---a--ngqen，‘ndndR4
内eng
内，』内，‘，s'a
，a，a，a，a-a'a's's
，‘，，s'a-a
，S噌
a's's's's's's
，a's-a'S噌
S'S噌
S's's
，a
t
-
-
1
1
1
2
1
1
3
2
1
1
2
2
2
2
1
1
2
1
1
1
1
1
1
t
t
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
nuauaunuAOAHVAuauauaUAOAHwnuAHWAHWAunOAunuaυ《
MWAHVAUAUAuaonumonuau
nuaHV
白unuaUAuaunuAUAU
白UAOaunuhuau
白UAO
内UAOAHvauauaUAuaunu
白ununu
、，，.0
E
3
・2
'eGE----
・'
A時
A
内，，，
R
E
，，.
，.，ELνa ..
，
、
，
FL
，nU内4・
，
，
'
H
A
'
'
I
E
、，内enF
内eua
・
・
倫伺，，，・a，
白
E
n
o
n
-
，
，
A
1
H
'
'
H
t
N
E
'
'
'
'
・
aR.
，
nuA-T智
a，
，
，
，
曹
司
M
U
H
M
M
q
，
.
，
nu
・4'
q
e
e
A
U
M
町M開UR
-
-
M
開
M開
i
L
T
.
‘.，，EL
，4・・・，，，‘。ι
'
'
E
-
-
z
-
a
"
・"'
"
"
'
M
円凶円E
E
M
M
伺幽"・L
M
開
血肉
'Lqa--
‘..
，，，，，，，，，a
"
'
'
'
-
a
"
'
'
'
'
'
'
u
o
'
・・"
u
-
w
，，，，，a'aFIMFupur-'a.
，，a
、，
pba'u，
M伺pivpBWFEUP--M円“同uaRvhRνERU且RPL'LPEUMn
A内
・L
'
'
'
'
a
'
'
'
'
'
'
'
'
e
，，
・・・内E
L
-
-
m
m
u
'
'
'
'
'
'
'
'
'
'
'
'
'
'
'
，‘.PEUT-aaFE
匂
a同
MAwava--"ua伺也
A
M
A
M
a町
"-nwa-awA智
a-A
u
-
-
m
内4e首唱，.崎，.。，‘句，h
句，h崎，.ぬ，ぬa
n
4
n
a
内，‘句，hag
伺，.内4
0urL-aH'''uu''''''''E''''''''''''
-L
・且，，崎，.内，‘句，h
句，h。，‘。，‘伺，.ぬ，‘，a
，a。，‘。，‘，a
内，.，内4q，』内，‘伺a
e
r
-
L
U
R
-
a
u
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
suo-前
sassBaassassa--8
・8888
，
."-a'
・円
--ErErz『ErzrErrrrrz『'rrrz『E『er・ErcrFrzr
SRI'''''''''''''''''''
τ
-
n
w
a阿
智
A
悩開曹.，，，，，，，，，，，，，，，.，a
，，
nu
・"、，ν，.‘&unuunsa---
留置町・・EaaEUnzaaE
，MR・"""uu
，F，.
.
円
EE
・円
rt
-AEE・E・-r-'τ
・・-
-
F
旬、，
on---EE-EE-rL-
Faun
，‘・L
・ι，a内nu自信
n
M
開EE
n
R
E
E
n
u
n
R
R
M
n
創四
割
'u-
・内A
-
L
O
E
E
E
L
E
E
s
-
E
O
R
M
-
P
R
O
M
u
u
E
-HOMHr--uMEM-RERan-円
M
-
E
B
E
E
T
-
-
o
n
E
'u‘・LaR''FLnuuuHUHUEEm眠
nuHM.
，・
p
u
a
内a内CET・
白u
，E『，E
，，・L
、，UEnrT'T.
，・E『'・白U
M
円白刊nnFr
・"
eaa内向V
“nua伺ua-a町、，白隠・内-Ra内rrN・T・'r
・伺，EFEFrnR
uwa内，T-
包'・eriu
，."nRnRnR
・・・白urr
白unRnRaRa"
“nu--Brnr'a
・・戸hwnr
・-内，‘
.. nuFEFE
，Enu--‘nu
，E，EFEPEP-unRM開M"RUN-
，，， .. ，a'Fr
・-M開nrnvnrrr
、，“.“・u・hw-a-a円FEFEAu
aua内nv
，、，nu'A0
・LMnM"
凶円E
E
M
刷戸UHOAunu
伺UnueEM開T'
ぜ
arc-L
M'a』'va
、，，，、FLwa内ELE』EE--nv'a円Mnτ-v・'・τ・ye
-
-
n
n
E
E
'・puaonua
・FBAH-EEM開T'TET・uuu同
rrE且
叫
関
白
鴨
川
U
，，arnu'STEA-TF面白R
T
'
a
“，、
.. ‘，‘
nrTE'e
，.
、，MRM・-Lqg
，・L
，EE
・内a
-
-
n
u
'
・T'rEa伺M間
内
U
E
・01
4
U
z
-
-
H
T
R
O
E
O
-
F
F
F
F
A
-
E
L
H
A
--''nM'nuea
・0・'・
E』T'r』nuT・rL・'・・nu
白ununMEL--a』曹・ZE--L
，‘HU--pb
，‘.守EEm4
・
auELEERrrtu-円凶開
un
・凶伺uunr
向u
on'・白r
a
.
，aMn，.，
aahT，EEMM開n
E
n
u
u
a
・且RUM円AW
ORMRM.
，.伺曽ぬ'''UMMMM同
E』V・
，
ELF-
合唱許、，... "・d-amw
，.. hz内島田白u-a
，B白RUM-n阿
m
R
M
A
V
，
AO
内
4Ma--AO
~.・g・..・・・g・・・・g・・s・・・・・..・s・g・.......・a・......・a・...............・g・..・ 00013320 000001 SU8ROUTIME E~ROR(TX ， TY ， EEX ， IEROR ，・，・ 00013330
c....・..・.......・・・・・s・・・・・...................軍a・・・B・・・・・・・・..・s・..・g・.'00013340 C 00013350
000002 IEROR 0 IEROR・ 00013360000003 EEO匪 TX -TV 00013370
000004 EE晶 a 品目5(EEO) 00013340
000005 EEE • EE /TV 00013390 000006 IF(EEE.LE.EEX) GO TO 10 00013~00 000007 IF( 1EAOA .GE. 100 ) GO TO :; 00013・10000004 RETURH 1 00013・20000009 5 RETURH 2 00013‘30 000010 10 RfTURH 00013‘40 000011 ENO 00013450
c--・・...............・・・・・z・a・・・........11・・・・・・s・...........s:・・・・・・・・・・"000134晶0000001 SUBROUTINE COHST1(KEY1，101，102，ID3，ID4，105，106) 0001347d
E・・・.....・・a・・・・・・e・・・・・・・............・S・S・....・e・......................00013480
TWC " CO日lAHTTEHPER晶TUREIIHU必匝JHfHATICVISCOSITY HAHOA" THERHAL CONOUC TI V!TY RI刷o'THERHAl CONOUCTIVITV 制10 • SPECIFIC GRAVITY OF THE WAIER
CP 5PECIFIC HET I poCOHSI
j¥HU " OYHAHIC Ofν'SCOSII Y ~RH PRAHOTl，S NUHBER
(OEG.C) (E-2 C"215ft)
(Cl1CH・5ft・OEGC)(KC晶lIH・HR・OEGC)(G白血H/CHj)
(CAL IG・O[G.C) IG' JCH-5(C)
00013490 00013500
00013510
00013520 00013530 00013540 00013550 00013560 0日013570
00013580 00013590 00013600 00013610 00013620 00013630
E
ι E E E E C 101
102 E
103
104 105 106
PIlY5ICl PR日PERTlE5OF lIGHT旬ATERANO IlEAVY WATER
• llSI OF SYH80lS・
C...II"，・・e・・・・・・・m・・・・・2期・・・・・・.........・・・s・a・・e・・・・・・・・・s・・・・・・・・・・・・・0001364000000官 UIHf.H5IDH HO(官官，6)，00(22，6) 00013650
00013660
E ・・・・・・・・z・・ L1GHI WAI~R ........~..・ 0001l6l0
-75-
JAERI-M84- 162
000003
000005 000006 00000/ 000008 000009 000010 1)00011 000012 000013 00001'i 00001S 000016
•liatkiliif ************ 101 ANU • KINEMATIC VISCOSITY (CH2/SEC «C-2>
DATA 110/ 1.79, 1 .31 , 1 .00, 0 .803, 0 .668, 0 .555, 0 .480, 0.417, 1 0.368, 0 .328, 0 .297 , 0 .247, 0 .209, 0 .186, 0 .168 , 0 .155, 2 0 .146, 0 .139, 0 .133 , 0 .128, 0 .13 , 0 .13 ,
1D2 RAMD 'THERMAL CONDUCTIVITY 3 0 .489, 0.505, 0 .518 , 0 . 5 3 1 , 4 0 .578, 0.583. 0 .586, 0 .589, 5 0 . 5 5 4 , 0 . 5 3 7 , 0 . 5 1 7 , 0 . 4 9 3 ,
<KCAL/M»IIR«OEGC) 0 .543, 0 .552 , 0 .562, 0 .588, 0 .585, 0 .578, 0 .462 , 0 .423 ,
103 RIIO " SPECIFIC GRAV1TV OF HIE WATER (GRAM/CM3) 6 999.9, 999.7, 998.2, 995.7, 992.3, 988.1, 983.2, 7 971.8, 965.3, 958.4, 943.1, 926.1, 907.3, 886.9, 8 840.3, 814.0, 784.0, 751.0, 712.0, 667.0,,
0.571, 0.568,
977.8, 864.7,
104 CP = SPECIFIC HEAT AT P=CONST <CAL/G«0£GC> 9 1.008, 1.002, 0.999, 0.998, 0.998, 0.999, 1.000, 1.001, « 1.003, 1.005, 1.007, 1.014, 1.023, 1.037, 1.054, 1.075, • 1.102, 1.136, 1.183, 1.250, 1.36, !.S4,
ID5 AMU = OYNAMIC VISCOSITY (G'/CH»SEC «E-2) « 1.79, 1.310, 0.998, 0.800, 0.663, 0.548, » 0.358, 0.317, 0.285, 0.233, 0.194, 0.169, « 0.123, 0.113, 0.104, 0.096, 0.093, 0.087,
1D6 THERMOMETRY CONDUCTIVITY CH2/HR*E-4) PRN •= PRANDTL,S NUMBER = X1/X6
• 4.85, 5.04, 5.08, 5.34, 5.48, 5.59, » 5.93, 6.01, 6.08, 6.16, 6.21, 6.22, • 5.98, 5.81, 5.57, 5.25, 4.77, 4.12/
0.472, 0.149,
5.72, 6.25,
0.408, 0.134,
5.85, 6.11,
fttSItXIZM scsssvyssss
HEAVY WATER xsm*a*ss*a**
101 ANU = KINEMATIC VISCOSITY (CH2/SEC «E-2) OATA 00/ 0.7444, 1.278, 1.135, 0.9044, 0.7297, 0.6034, 0.5105,
1 0.4405, 0.3864, 0.3438, 0.3095, 0.2584, 0.2225, 0.1963, 0.1765, 2 0.1611, 0.1489, 0.139, 0.1308, 0.1239, 0.118, 0.1129,
ID2 RAHD 'THERMAL CONDUCTIVITY <KCAL/H«HR*0EGC) 3 0.4782, 0.4882, 0.5031, 0.5159, 0.5268, 0.5360, 0.5434, 0.5493, 4 0.5537, 0.5568, 0.5586, 0.5587, 0.5547, 0.5470, 0.5359, 0.5216, 5 0.5044, 0.4841, 0.4607, 0.4339, 0.4034, 0.3688,
ID3 RHO » SPECIFIC GRAVITY OF THE VATER (GRAM/CM3) 6 1105., 1105., 1105., 1103., 1100., 1096., 1091., 1085., 7 1078., 1071., 1062., 1044., 1024., 1003., 981.5, 959.6, 8 938.1, 917.1, 897.0, 878.0, 860.3, B44.1,
104 CP = SPECIFIC HEAT AT P=COHST (CAL/G«DEGC) 9 1.015, 1.012, 1.009, 1.006, 1.003, 1.001, 0.9991, 0.9974 » 0.9959, 0.9946, 0.9937, 0.99J2, 0.9959, 1.003, 1.018, 1.044, « 1.083, 1.140, 1.220, 1.328, 1.47, 1.652,
105 AHU - DYNAHIC VISCOSITY (G'/CH>SEC *£ -2 ) • 0.7556, 1.2933, 1.1452, 0.9098, 0.7319,0.6040, 0.5100, 0.4394, « 0.3848, 0.3419, 0.3076, U.2566, 0.2216, 0.1969, 0.1797, 0.1682, • 0.1613, 0.1409, 0.1596, 0.1645, 0.17,5, 0.1865,
106 IHERWIHEIRIC CONDUCTIVITY (H?/)IR«1 4) PRN = PRAKDTL.S NUMBER - X1/X6
« 4.266, 4.364, 4.515, 4.651, 4.774, 4.885, « 5.157, 5.229, 5.291, 5.387, 5.438, 5.434, » 4.966, 4.630, 4.210, 3.722, 3.191, 2.645/ COMMON /CT1/TWC,KH0,CP,ANU,AMU,RAMOA,PRN,RAHD IK KEY3 . EQ. 1 ) GO TO 100 IKI06.E0.1) ID1 -- 1 IF(1WC.GT.0.0) GO TO 10 1-1 GO 10 20
10 II<1VC.I 1.320.0) GO TO 50 l'2?
20 1MID1.E0.O) GO TO 21 ANH IIO(I,1)«1.E-2
21 II(ID2.T0.0) 00 TO 22 l!AH0»IIO<l,2>
4.985, 5.361,
.076, ,209,
00013680 00013690 000137.00 00013710 000i3?20 00013730 00013740 00013750 00013760 00013770 00013780 00013790 00013800 0J013810 00013820 00013830 00013840 00013B50 00013860 00013870 00013880 00013890 00013900 00013910 00013920 00013930 00013940 0001395a 00013960 00013970 00013980 00013990 00014000 00014010 00014020 00014030 00014040 00014050 00014060 00014070 00014080 00014090 00014100 00014110 00014120 00014130 00014140 00014150 00014160 00014170 00014180 00014190 00014200 00014210 00014220 00014230 00014240 00014250 00014260 00014270 00014280 00014290 00014300 00014310 00014320 00014330 00014340 00014350 00014360 00014370 00014380 00014390 00014400 00014410 00014420 00014430 00014440 00014450
- 7 6 -
00013680 00013690 000131.00 00013110 000i1720 00013730 000137~0
00013750 00013760 00013770 00013780 00013790 00013800 0~013810
00013820 00013830 00013840 00013850 00013860 00013870 00013880 00013890 00013900
0.408， 00013910 0.134， 00013920
00013930 00013940 0001 J95~
00013960 00013970 00013980 00013990 00014000 00014010 00014020 00014030 00014040 00014050 00014060 00014070 00014060
0001‘090 00014100 00014110 00014120 00014130 00014140 00014150 00014160 00014170 0001/，180 00014190
0.9974， 00014200 1.044， 00014210
00014220 00014230
IU) AHU. OVHAHIC VlSCOSlrV (G'/CH.SEC 'E-2) 00014240 ・0.7556，1.2933， 1.1‘52， 0.9096， 0.7319，0.60‘。.0.5100， 0.439'‘00014250 ・0.3848，~.3 ‘ 19 ， 0.3076， u.2566， 0.2216， 0.1969， 0.1797， 0.1682， 0001‘260 ・0.1613，0.1‘09， 0.1596， 0.1645， 0.17.5， 0.1865， 00014270
00014280 00014290 00014300
5.076， 00014310 5.209， 00014320
00014330 00014340 00014350 00014360 00014370 0001命3800001命3900001.400 00011，410 00014420 00014命3000014440 0001.450
JAERI-M84-162
-・・・s・・・・..・IDI AHU. KIHfHArJC VJSCOSIJV (CH苫ISfC・f-2)
日A1AIIDI 1.79， 1.31， 1.00. 0.803. 0.666， 0.555， O.‘80， 0.417， 0.]68. 0.328. 0.297. 0.247. 0.209， 0.186， 0.166， 0.155. 0.146， 0.139， 0.133， 0.1宮8，0.13， 0.13 ..
..........・
0.571， 0.566，
(KCAlIH'IIR・OEGC)o.~‘3， 0.552. 0.56宮，
0.588， 0.565. 0.576， O.‘62， 0.423.
IU2 RAHO 'JIIERHAL COHOUCJIVIIV 3 O.喝89， 0.505. 0.518. '0.531， 4 0.576. 0.563， 0.566. 0.569， 5 0.5苛4. 0.537. 0.517. 0.493.
000003
917 .8， 864.7.
(GRAH/CH3l 986.1， 961.2. 907.3. 666.9. 667.0._
103 RIIO" SPECIFIC GRAVllV OF IItE ¥lAJER 6 999.9， 999.7. 998.2. 995.7， 992.3. 7 971.6. 965.3. 958.4. 943.1. 926.1. 8 640.3， 614.0， 764.0. 751.0. 712.0.
1.001， 1.075.
，，
aυA・
0VζJ
Aυau
.• 1
1
3
PL FU，，
EEn，，，，
o"n・，，Ja・
--aFOur-，
戸
u
・
・
・
''nu--aa
t
偏向E
，，
，、自民u'J，
白羽町4so
n-，au'a
---
Tot-
F通UR
n
u
'
'
'
FLamUA・aυ
=915
P902
---
Toft
A内I
，
，
，
hu円
n
，弓rヲS
EEn-，auamu
M"n，Au-a
---
pbnU4a・・
1
Z-l
'''
piuのZζJ&U
EEAUAυ'a
nrnuAU-a
p
a
-
-
-
1
1
1
= ，
，
，
nrao'a。4
pbnuAUAU
hunu--
••• 111
A
個、0
9・・
1
E
E
O.命7官，
0.1‘9. ，
，
，
8
9
r
.，A匂
4000
2
5
1
0
----
FEnununu
--P-w，，，
E
3
4
3
ea40avnv
・61
0
幽
n---
pbaυaυnu
I
，
n
u
'
'
'
，、aυ，ato
0
3
9
aoq，hAυ
---
u'AUAUnu
守
EI
e
a
'
'
'
0854
piMa，amunw
ean-，。4・a
i---
UVAUAUAυ
piu I，
，
，
M町内U
，e、a
A-1-
M間
宮
品
's-a
u----
nu-anuaυ
=
，，
u'83
H
9
5官
品
"'r，s-a
••. -aaunu
zJ O
・B
・
-
5.85， 6.11-
5.72， 6.25.
5.59， 6.22， 4.121
IHERHOHEIRIC CONOUCIIVIIY (H2/HR'E-‘〉PRN PRANOIl，S NUH自ER X1/X6
4.65. 5.04， 5.06. 5.34，‘46， 5.93. 6.01， 6.08. 6.16， b.21， 5.98， 5.81， 5.57， 5.25， 4.77，
106
...............
..‘・...・・・...
，， EJEJ
auto
-r
ζJ-a
--
aυaυ
，
，
，
a，，an・，
，a'O内
e
nun-，4a
611
---
Aυaυnu
，，
‘，，，EJ'
。，‘白"，。zamu
-内，‘の4・5
E721
..••• Auauav
pL E
，
，
，
ρ
S
4
・4
・0
・，
''a'amu'a
内eAUaJ内d
u円
n・，内4・a
p-----
，‘aυAuaυ
，， ，EJ
・0
EJavAu
u''3au-s
T132
1
・
・
・
Fa咽
aAOav
nu pb
，
s'a'
'且白。，anv
uv，ea''a
2
3
1
P
・M
・--
E---aaυnu
T
A
，
，
，
M449
E468
"484
1r31
V民・・・
auaunu
z
，，，
U051
URnunu--
AMnAMT&u
A崎
A.
，，.
E
-
-
A同
nunu
-anu
ぬ
u-aq，‘
I
ItEAVV IIAlfH ...a.・r...c.・R・...11.....
EEEEE
，， ，a&u
av-a
A-Y内
4
5
5
--
Aυau
，， 4
9
，aS3 4.，a
巴
daJ
•• 、，AUAU
F-u
併
H
V
'
'
'
FEAuaυ白o
huau，，mo
--3a句
6
nREJEJ2d
u
n
-
-
-
souovnuv
M開t
'''
aLamu''a'
aunauA.，a
F・旭町de3AU
V邑REJEJa・
f
・--
AUAUAU
，
，
，
n・，，，白，
v'EJ・。，a
TE---zJ，a
'且a3EJA個、
UE・・・・
曹&のυAunuv
T
E'''
H0・aao，a
nu'aaO向。
MmAU区
Jde
nHVEJEJ4・
P
・M
・--
Aununu
--』h'''
u町n4ao，a
n町白640AMY
FEaORdao
H454
T--e
=aOAUAυ
A
υ
'
'
'
Mmn，‘，eA'
A"由。，aA噌
図柄
''e3nu
4ss
・--
AUAUAU
AZ
nU2da句
g.，
l
000004
103 RH。固 SPEC/fICGRAVI 干VOf IHE IIAiER (GRAHICH3) 6 1105.. 1105.. 1105.. 1103.， 1100.， 1096.， 1091.， 1065.， 7 1078.， 1071.. 1062.， 10‘4.. 102‘.. 1003.. 981.5. 959.6， 8 938.1. 917.1. 897.0. 678.0， 660.3. 8‘11.1 ..
，
2
，
n・，eO
9
1
n・，aυ
•• 0
2
}
FL p
u
'
'
'
E132
nuaυnue3
・・Aunuau
F
U
-
-
-
't11
L
命"'
piw，白ヲ
E
3
s
，
Aυa，ヲE
0
9
4
---
TE4・aυ・・
合、叫u
n
'
aυ'q，h，
E628
2aυn，az
P093
•.• 守
E-aAU4・
A"
，
I
，r，
A
“n・，，O向。
FEnun-，内e
unaυn・，内，‘
---
P・M-aaυ・・
1
Fr
，
.. ，au
，
FLのea句
AU
EE4an・，A-y
oenun-，.』
e
a
-
-
-
tot
z
，
，av
，
P553
E198
0
9
0
•.• --Au-a
A噌B
9
・・
1
‘.965， 5.361，
IHtH例IIHflRICCOHDUClIVIIV (H2IHR・14) PHN ロ I'RA~OTL .S 刊UHOER 留 Xl/X6
・4.官66， 4.364. 4.515. ‘.651. ‘.71‘'‘・665，5.1ラ7. 5.229， 5.291. 5.367. 5.438， 5.43~.
・4.966， 4.630， 4.210. 3.7官官 3.191， 2.6451 COHHOH ICllIIWC.RHO，CP，AHU.AHU.HAH目A.PRH，HAH。If( ~fY] .EQ. 1 ) GO 10 100 IHI06.f.Q.1l 101 If(lWC.Gr.o.O) GO 10 10 1-1 G(J 10 20
1(J JlII¥lC，t 1..120.0) 00 10 )0 lι21
20 It (lOt.EQ.O) GO 10 21 ANII，'UOII，llaI.E-2
11 11 IIU1.IQ.0) 00 ro 12 IIAHU>1I0( 1. 2)
-76-
ID6
00000) 000006 000001 000008 UOOOO'I 000010 OIJI){) I I 000011 000013 00001/， 110001、CJ00016
JAERI-M84- 162
000017 RAHDA = IIO(I,2>/360.0 000018 22 If (103.F.O.O) GO TO 23 000019 HH0=H0(l,3)«l.E-3 000020 23 IF(ID4.EQ.0> GO TO 24 000021 CP'H0(1,4> 000022 24 IF(IOS.EQ.O) GO TO 25 000023 AHU»H0(!,5)«1.E-2 000024 25 IFU06.EQ.0) GO 10 26 000025 PRNMH0(I,1)/II0(I,6>>»36.0 000026 26 CONTINUE 000027 GO TO 300 000028 50 1'IF1X(TWCM0.0>»1 000029 U=(l-l)»10 000030 1F(TWC.GT.100.0) THEN 000031 1 = 1FIX((TVC-100.0>/20.0>*11 000032 U = (1F1X((TWC-100.0)/20.0)»2*10>«10 000033 ENOIF 000034 OT = (T«C-FLOATU1))/10.0 000035 JF(TWC.GT.100.0) BT'dWC-FLOAT (1I))/20.0 000036 J=Itl 000037 tFUDl.EQ.O) GO TO 51 000038 ANU=((H0<J,1>-H0(l,1))«DT*H0(I,l>)»1.E-2 000039 51 TF(1D2.E0.0) GO TO 52 000040 RAMO=(HO(J,2>-HO(1,2>)«DT+HO(I,2> 000041 RAHOA=RAMO/360.0 000042 52 1FUD3.EQ.0) GO TO 53 000043 RHO»((HO<J/3)HO(I,3))»0T»HO(l/3))«l.E-3 000044 53 1FUD4.EO.0) GO TO 54 00004 5 CP=(HD(J,4>-H0(l,4>>»DTtH0(l,4> 000046 54 IFIJ05.E0.O) GO TO 55 00004 7 AHU=((H0(J,5)H0(1,5)>»DT*H0(1,5)>«1.E- 2 000048 55 IKID6.E0.0) GO TO 56 000049 AN"(H0<J,1>-H0<I,1>>«0T»H0(I,1) 000050 AA=((H0(J,6)-H0(I,6))«DT*H0(I,6>) 000051 PRN=(AN/AA)»36.0 000052 56 CONTINUE 000053 GO TO 300
C****»***BS 020 ****»«****«**« 000054 100 IFUD6.E0.1) 101 = 1 000055 lF(TUC.GT.O.O) GO TO 110 000056 1=1 000057 GO TO 120 000058 110 1F(TWC.LT.320.0) GO TO 150 000059 1=22 000060 120 1F(ID1.E8.0> GO TO 121 000061 AHU=00U,l)*l.E-2 000062 121 IFUD2.E8.0 ) GO TO 122 000063 RAHD = D0d,2> 000064 RAHDA=D0(I,2>/360.0 000065 122 IFUD3.EQ.0) GO TO 123 000066 RHO=DO(l,3>»l.E-3 000067 123 IF(I04.E«.0> GO TO 12« 000068 CP = 00d,4) 000069 124 IF(IOS.EQ.O) GO TO 125 000070 AMU=D0(I,5)«1.E-2 000071 125 1FC1D6.EQ.0) GO TO 126 000072 PRN=(DOd,1>/DO(l,6>>«36.0 000073 126 CONTINUE 000074 GO TO 300 000075 150 l=IFIX(IUC/1J.0>*1 000076 I I - C I - 1 X 1 0 000077 IFC1VC.GI.100.0) THEN 000078 1 = IFIX((TWC-100.0>/20.0>»11 000079 (I = (IFiX(dWC100.0)i'?0.0>«?*IO>«IO 000080 ENOIF 000081 DT=dW('FL0AT(ll))/10.0 000082 IFdWC.GT. 100.0) DTMTWC-FLOAT ( I I > >/20.0 000083 J=H1 000084 IHIDI.10.0) CO TO 151 000085 ANU«((D0(J,1)•DO(1,1>>«DTtDO(1,1>>*1.E 2 000086 151 IT (11)2.10.0) GO TO 152 00008 7 RAMOMDO(J,2)-DO(I,2)>"DUDO(I,2> 000088 RAMDA'RANU/360,0 000089 152 U(I03.EO.O) GO 10 153 000090 RIIO-((0O(J,3)-0O(J,J))«DltOO(J/3))«l.f 3 000091 153 IMI04.IQ.O) GO TO 154 00009? CP (00 (J ,4) 00(1,4) )«DHDOd ,4) 000093 154 11(11)5.1(1.0) GO 10 155
00014460 00014470 00014480 00014490 00014500 00014510 00014520 00014530 00014540 00014550 00014560 00014570 00014580 00014590 00014600 00014610 00014620 00014630 00014640 00014650 00014660 00014670 00014680 00014690 00014700 00014710 00014720 00014730 00014740 00014750 00014760 00014770 00014780 00014790 00014800 00014810 00014820 00014830 00014840 00014850 00014860 00014870 00014880 00014890 00014900 00014910 00014920 00014930 00014940 00014950 00014960 00014970 00014980 00014990 00015000 00015010 00015020 00015030 00015040 00015050 00015060 00015070 00015080 00015090 00015100 00015110 00015120 00015130 00015140 00015150 00015160 00015 170 00015180 00015190 00015200 00015210 00015220 00015 230
- 7 7 -
JAERI-M 84 -162
E軍事2・・・・・・ 020 ・・・・・・・・a・・・s・
0001命令60
00014410 00014480 00014490 00014500 00014510
00014520 0001命53000014540 00014550 00014560 00014570
00014580
00014590 00014600 00014610 00014620 00014630 OOOI4b40 00014650
00014660 00014670 00014680 00014690 00014700
00014 710
00014720 00014130 00014740 00014750 00014 760
0001‘770 00014780
00014 790 00014800 00014810
0001‘820 00014830
000148‘0 0001‘850 00014860 00014870 00014880
0001‘890 00014900 00014910
00014920 00014930 00014940 00014950 00014960 00014970 00014980
00014990
00015000 00015010 00015020 00015030
00015040
00015050 00015060 00015070 00015080 00015090 00015100
00015110
00015120
00015130 00015140 00015150 00015160 00015170
00015180
00015190 00015700 00015710 0001S??0 00015，JO
n
v
n
v
1
・
B
n
υ
》
2
0
J
1
》
A
V
}
1
t
i
t
-
-
4Y》
{
O
}
O
T
-
A
υ
-
A
M
内
ι
u
・
n
u
向
υ
3
0
2
L
Z
2
f
F
〉
I》
-
、
，
、
，
n
u
p
b
n
U
&
u
n
u
-
n
u
u
w
.
，
N
・0
・7
nu，a'JAM可区
Jn，‘，bzartnununu，a
6
2
-
2
2
F
2
《
H
o
-
-
Z
3
E
E
o
-
-
-
J
T
''nu・nuaυ・nUMn-a-rL‘，nu
、，，，‘.Y'T'4E''''AV、，riWu--、，
2
・
・
・
〉
》
O
U
T
-
-
E
，
O
}
0
0
3
0
1
0
・
T
t
l
o
eapu，apu、，PUEJFU'・nu，t，‘，、.
{
，
4
'
1
0
0
E
H
T
o
nu、，.A、，，、，，a、，，、‘.・auan冒AAunAU
M
O
《
0
1
0
{
O
o
t
o
-
-
F
0
1
=
・
0
・
《
・
0
・
H
E
-
-
F
i
L
-
A
Q
H
Q
O
Q
U
H
Q
〈
O
M
・
6
I
，
、
F
T
B
E
=
E
H
E
=
E
Z
E
O
T
3
・
-
G
H
・
0
・
-
-
u
-
N
U
3
《
1
E
z
=
c
-
A
3
H
4
p
s
"
6
R
N
X
-
M
F
U
E
伺
関
白
Un同nUFLnua内nuofE&nu'A-ZTE・E・冒AY'hg
1
1
1
1
T
T
F
《
{
1
1
0
4
7
《
《
《
E
N
I
z
F
N
Z
〈
F
F
F
F
O
O
z
-
-
E
T
F
-ae--TE--arLFuza-a
臥
u-Z
2
3
4
3
6
0
2
2
2
2
2
s
r
8
9
0
1
2
3
4
3
6
r
8
9
0
1
2
3
4
5
1
2
2
2
2
2
2
2
2
2
2
2
2
3
3
3
3
3
3
nυnununununununununununυnunununununUAU
AυnυnunununuaυnununununununununununUAU
nunununununununununununununununununυAυ
nunυnunuaυnunuaυnununununuAununununυAυ 000036 J=I+1 000037 IFClDt.EQ.O) GO TO 51
'
J
q
'
L
q，L
一
-
-
E
E
E
-
-
・
1
1
E
g
g
-
-
}
〉
》
》
}
3
3
〉
2
3
5
〉
2
，
，
E
'
}
6
'
1
1
4
1
1
'
I
《
{
，
《
'
l
，、nunU冒AnUE且，、
nuMHHn，、Hn，、nu
H
+
+
O
+
O
H
+
T
T
N
T
H
-
T
O
H
A
V
D
-
T
o
-
-
-
I
S
T
D
.
》
】
日
》
D
g
、
，
、
，
、
，
..
、，z、，
》
2
3
》
5
》
〉
1
'
'
〉
，
》
6
，
』
1
4
1
1
'
i
《
{
，
〈
'
l
，、内dnunu'JnUA匂冒AEJnuιuE且，‘Aυ
0
5
H
・
5
H
5
〈
5
H
5
f
0
・
“HEAυ一内υ・nuunto
-nu、，ιunu、，nuunnu、，nuun一?a
】
T
2
3
T
Z
I
-
-
5
T
一
}
.
1
'
'
'
}
，
》
6
}
'nu・dnunu・4AUA『
AUadnu-a'aun
aAUFU，、Mnpu，‘nu'pu'目、pu'・4aun
d-、nuaunnu・4nu・u，t，，
O
〉
H
R
》
刊
》
〈
》
H
》
{
O
N
unnυ，、znu'目、nununυ，.、nunu“HA"
《
・
=
A
-
t
-
M
，
《
-
M
〈
《
，‘AUnununuznu，‘AU=内u，、，、=AU
2EEM円MnrtnurEEFEMurE==n同rEAU
Hu-a内a内・un-nr-Mn-M刊偏向。RHU冒a
M阿
qgnk両
院
ヲ
3nHA噌「LRJa同ιua的偏向nrMN
A
O
D
O
D
O
1
0
1
1
1
1
1
T
T
，
‘
，
t
，
‘
，
‘
，
、
“
"
F
F
F
F
t
o
o
i
l
i
-
-
E
G
1
2
3
4
5
6
5
5
5
5
5
5
Boa-'nu-aq，‘，JA噌Rdto，fa00・，Aυ-aqZ23
3
3
4
4
4
4
4
4
4
4
4
4
5
5
5
5
nunυnυaυnununununu向υnυAυAυnununu
nunununununυAυnuAunυnununununυnυ
nunununununυnunuAUAununUAUAUAυnu
nununununυhununυAUAununuAυAυnunu
司d
。，‘…
f
t
'
-
-
h
u
V
o
u
-
-
・
2
・
・
』
E
A
U
、
，
、
，
、
，
、
，
。
，
晶
、
，
内
，
‘
，
J
h
u
v
'
'
・
a
，
，
、
，
Z
》
'
i
j
e
e
》
I
《
t
'
-
a
q
g
冒
A
，
‘
A
υ
n
υ
・
』
1
・
・
I
U
O
B
《
-
P
{
D
・
，
o
O
}
O
T
A
，
1
1
0
-
n
u
-
a
内
T
E
n
u
n
u
・
6
・
0
O
D
-
-
-
3
o
f
-
-
}
》
D
o
-
-
2
f
F
》
》
J
・
5
》
f
J
-
}
V
3
】
0
1
》
》
O
E
1
'
'
3
4
・
A
υ
‘
u
n
υ
-
A
υ
M
W
，
E
I
E
J
A
噌
1
0
1
2
・
3
9
5
6
'
N
・
0
・
T
1
1
E
t
s
t
a
，
ぅ
Y-内ζ内4nυ。，‘，S内，‘。，‘。，‘。，‘，arEnunuAU，.、、J，‘aJnUAULJAυaJ-aζ2
・anu-a内4・a
£
u-a--a-a‘，a，、“円仇wea--・=‘‘仇υ'Bhu--anu's，‘・a
Y
'
n
u
-
v
J
E
E
E
E
A
υ
v
E
-
a
-
'
'
T
E
n
u
-
a
υ
-
A
U
=punurEnu''nu-nunu・nunu---pb、，nunu-nu、，，bnu、JUunuuu
nUT--Y，、，y，.EYETt-aTE''&胃、，FLu-、，va、，，.内4胃
4・''JT』'B
1
6
〉
1
}
2
車
庫
》
}
o
u
-
-
】
1
'
J
'
〉
nuAυnu--nuq，‘，nu、，Aυnu、，AU-aAυ-YEJ、.aAuuu，“u・uuUHu・d白
UAMTOU
'a、，.eu、，FU'E品目
u司
JMRU、，nuRJRU'・nu，‘，、，、・CUEd-nu，、MHμU，E'nu，RU
内
H
V
A
υ
-
a
E
且
，
.
、
，
A
喝
，
E
晶
、
u
n
u
，
‘
V
A
Y
'
A
U
，
‘
“
U
A州
nuaJU
、，.qg、，，、，，‘nu、，冒A、，，、，冒A、，，‘，a'aun，aA門
AU、，nu、，nunuHB'nν、，，、、，
-aAυvJnu-a
《
UAυnuAU，、Aυ'aAυ，、向υnue'AU--且rrnu-anunuAU，‘一自のυ，‘nununυ
.
.
.
.
，.、・RUE-nu・，、・nu-nup--噌a'・zr冒AEL--，‘.一-eaun・，‘・nu-
q
T
O
T
a
n
u
Q
S
A
G
O
Q
O
Q
n
u
Q
《
O
U
S
6
1
《
F
I
Q
《
G
O
B
O
-
Q
《
Q
E
6
2
t
E
D
E
D
B
E
=
E
n
u
E
Z
E
Z
E
0
1
》
-
e
G
t
-
e
M
H
M
H
E
n
u
t
t
---a・・=・MAM同-Aυ・=・HU-M刊HU'a，‘.，FEu-z'a--HU-a内a同・un・“r・
4up--FEU--MU内4aunaun，aMHA-vnr《
JM円‘ununMNMAHWrrHM-PL
咽且
aM開。anMnnH'anMnι“TFL‘，
nUHM'Aυ“wnuM開nun町
n町
nu内Mnup--nU偏向nunr，anu---E且官，，且・2・官'HM--a帥
υa"“υ
凶
u
n
U
帥
υ
i
T
T
T
2
1
A
l
l
i
-
-
T
I
F
〈
【
I
t
D
【
I
・
l
t
i
l
l
，、，‘.a，.、内，‘，、，t，、，、，‘，‘M何
Ea-zrM同一-，目、，‘，‘，‘，目、，‘，‘
EErr-nurrzrrrrrrrrrrrrAunuaESEE-EEytrrzE・g・句‘FEr-'
1
1
1
6
1
1
1
1
1
1
1
1
E
G
-
-
D
l
J
l
i
l
-
-
A
U
A
U
A
υ
-
a
q
'
・
2
3
A
唱
に
J
'
h
w
r
u
'
・
n
g
v
d
A
噌
0
2
2
2
2
2
2
2
2
5
5
b
b
う
1
2
1
1
1
1
1
1
1
1
1
1
l
1
A噌EJeo，aaonMZAυ-a内4'JA噌RJ'o，goonヲ
nu-a内ζ'JA匂ZJ‘。マfGOO-，nu.，。z，aAMvaJhu，，ooo噌，AU-anr，A
RJEJEJEJEJ区
Jzozozo'b'hw'O4u‘uzozo'g，e，s，e，f，f，g，e，『，『nonoaoaoaOB0・00000non-'o，nw，“uF
nuAUAUAυnυnυAυnunuAUAυAUAUAUAυAυnUAUAυAUAUAunu向υnuAunUAUAUnununUAυnUAυAUAUAUnuAU
AV《
UAυAυAυnuAUAUAυAυAunυAUAUnunUAunuAunuAU《
U向υ向υnu向υ向υAUAUnunuAU“υAUAυAUAUnununu
ooAυAυnunuAUAυAυnUAυAUAUAUAununununuAU向υAυ向υ“υnunu向υnUAUAunununu川
νnuAυnuAUnu“U仇U
AυnUAυnunυAUAυAυAυAυnυAUAununuAununuAU向υnUAununυnunuAUAUAununununuAリAUAUAUnunリのU
-77ー
JAERI-M84- 162
000094 AHU'((OO(J,5)-D0U /5>>«DlipO<l,5))«1.E-2 000095 155 1FUU6.LQ.0) GO TO 156 000096 AH=<D0(J,l)-D0(I,1>>xDT<00(l,1) 00009? AA = ((D0(J,6>-D0U,6>>xDHD0<I,6>> 000098 PRN«(AN/AA>»36.0 000099 156 CONTINUE 000100 300 CONTINUE 000101 RE1URN 00010? END
00015240 00015250 00015260 00015270 00015280 00015290 00015300 00015310 00015320
000002
000003
000004 000005 000006 000007 000008 000009 000010 000011 000012 000013 000014 000015 000016 000017
000018 000019 000020 000021 000022 000023 000024
STORE THE PLOT DATA ON FILE 11
1 COMMON
1 COMMON COMMON COHMON COMMON COMMON IP1T
Cxxxxxxxxxxwxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx SUBROUTINE 0UTF11(1A,JA,N,NP,OZ>
Cxxxxxxxxxxxxxxxxxx*xK«««xxkxxxxxxxxxxx»xxx»«xxxxxxxxrxx; C C C Cxxxxxxx*xxxxxxxxs*sxxxx*k>*KXSxxxx*xx«««*«*x*>«sx«*s»>xxsxxxxxxx«
COMMON /MN5/ Jt,J2,QAV£(5> ,00.(21) ,XAA(2,21, 15) ,T8U<2,21) ,KI TC1(2,21>,VAVE(5),S,TFUEL,KMAX,PHIN(2>
/HN6/ QA(2,21.15),HZF<2,21>,TC2<2,21>,TWZ<2,21,15),2 TU(2 /5 /21),I0NB<2,22),TSAT(2 /22)
/MN7/ BRR(10>,PFLOV<10> IHHOI JHAX,KEV(3> /MN8/ TVPI/TVPO,OTP /PIT/ IPTC,[PI0T<5,15) /PS5/ PAF(2,21>
1PL0HN,NP> IF( KMAX .EO. 1 ) [PIT = 1 GO 10 (10,20,10>,IPLT
10 H - 1 GO 10 100
20 K ' 2 100 I P T C M P T C * !
URITE(II) IA,JA,N,NP,K,JMAX,D?. WRITE(11) TWPI /TUPO,PFLO«(lA),aRR(IA),(TWZ<(C,J,NP),J = l,JMAX) 1 (TC2(K,J),J=1,JHAX),(TU<K/1,J),J=1,JHAX), 2 (TSAla,J>,J = l,JHAX),<T0NB<K,J>,J = 1,JHAX), 3 (PAF(K,J),JM,JHAX> 00 110 J=1,JHA» aCX°0A(K /J,NP>x;F(2)x4.187 VRITE(II) OCX
110 CONTINUE IF CIPLT . EQ .3 .AND. K.ED.'.) GO TO 20 RETURN ENB
X««.«»00015330 00015340
«*««x*O0O1535O 00015360 00015370 00015380
•*«x*x0001539fl TE(5>,00015400
0C015410 F(5), 00015420
00015430 00015440 00015450 00015460 00015470 00015480 00015490 00015500 00015510 00015520 00015530 00015540 00015550 00015560 0001S570 00015580 00015590 00015600 00015610 00015620 0001S630 00015640 00015650 00015660 00015670
C»»» C c r. c««»
000002 000003 000004 000005 000006 000001 OOOOOB 000009 000010 110001 1 000012
00001.1 000014
Kxx«*»*««xx«x««xxxx*xxx««»*«««x*xxxxxxx«.^x««*«x«x«««xx«xxx*xx SUBROUTINE PRESS<J,K,t/PDN,RH01,rtNU1,RH02,ANI/2, ZLL,ilC0>
>«»•*«•*X>X*XXK«K«»XXXX«««*«**«««XKXXXX*X**»i»*««*XK«*XX*XXXXX
PRLSSUHI LOSS CALCUIAIIN
COMMON COHMON COMMON COHMON COMMON COMMON COMMON D M A GV R01 R0G1 If(J.Of
0P<K,1) PA<K,1)
X«*»KX»XX»XXXX*X««*»XX»XSXXXXXXXXXXXXX**«««««XXXXXXX IHHOI JHAX,KEV(3) /PS1/ 0P(2,1O), DPF(2,21>,I0P<2,10),TDPF(2,21> 'PS2/ PR£S1N,V1N,V0UT,IRANF /PS3/ ZIIAP(2,3),DHP<2,3>,II0EP<2,3) /PS4/ PA<2,10>,VVV(2,3> /CHI / RE(2),I)E<2),VELCTY<2>,PERI<2) /PS5/ PAF<?,21>
/1960.0/ 1(1101x1.F 3 R01/U2 .2) CO TO 10
/MAP(K,I>>R0G1»VVV(K,1>»2 I'RFSIN l>P(K,1>«R0G1»(VIN«*2-VVV(K,1>»«?>
•«xx>x«00015680 00015690
.x»xxx«00015700 00015710 00015720 00015 730
:xxx«>»00015740 00015750 00015760 00015770 00015780 00015790 00015800 00015810 00015820 00015B30 00015840 00015850 00015860 00015870 00015880 00015890
- 7 8 -
t
]AERI-M84 -162
00009~ AHU与 ((UO(J，5) -UU (1，5))・01・OO(I ，5))皐1.[. 2 000095 155 IF(IU6.lQ.0) GO 10 156 000096 AH~(OO(J.l) ・ 00([. 1) ).01 ・ OO <J，1)
000091 AAo((00(J，6)-00(1.6))車01・UO([.6))000098 PRHo(AH/AA)・36.0000099 156 COH11HUE 000100 JOO COHTINUE 000101 RflURH 00010' EHU
00015240 00015250 00015260 00015210 00015280 00015290 00015300 00015310 00015320
nununuAUAUAUAυAυAuaohuaυnununvnununuaUAUAunuAunu
自
UAUAUnunu自
UAUnUAυAυnv
官、dA幽
TRJZOヲ'oonu'Aυ-a内z'SA句
RJιu，goon，AU-a内E，aA句
Rdau，seen-，のu-Eqa'JA噌
EJau守
g
，d官、d，S官、dva?a'st喝
A幽
TA句
AU司
A句
A凶噌
A幽
TAqA噌
A噌
EJEJEdEJEJRJEJEJEJεJauauauaoauauauta
ss53553555555555555555555555・3555555
1111111111t111111111112123111221112
白
υAUAUAυnUAUAUnunu自
uhUAυAυnuhunuaυAυnvAUnununvaυAUnuauAUnu
自
un町内UAυAυau
nUAUAUAUAυAUAυAun--nu内U
自
ununununuaυAUAUAUAUnuaoaυAυ
自
νnMWAUnuaυaoaυnonuau
nununvAUAUAUAυAUAUAυhUAUAUnuhunU内UAUAUAυnununuaυ
自
unvnM"のνnuaυaHvnunununu
-
-
z
s
'
---a』，
・
・
・
・
3
》
-----E5
・
・
e
E
t
.
，
e
T
F
，
-
-
-
S
F
且
，
a
晶
、
，
s
a
-
K
'
x
-
-
z
s
，
、
，
a
向
車
.
.
.
.
、，民
a
，
Mn
-
-
-
Z
1
1
J
a
s
-
-
2
，
，
----s，.
E
-
a
a
a
-
-
q
'
b
q
，
‘
=
-
-
a
a
f
'
J
'
-
-
z
-
U
2
，
，
E
S
-
-
a
日
《
》
〉
X
-
S
S
T
』
Z
P
H
A
g
e
-
・
'
t
u
N
A
"
-
s
z
、
，
，
、
T
E
'
u
n
・
d
・
-
-
-
-
a
J
M
岡
'
・
d
・
d
'
-
a
s
-
-
z
星
、
，
，
，
..
a
富
.
.
，M-
-
v
‘
n'・E
・
g
・
-
1
P
2
』
4
5
J
a
g
-
-
q
，
‘
，
，
。
，
ι
，
，
‘
，
e
，
.
.
.
.
.
.
，ua問。，ι吻
ι
u
・
，
.
，
-
a
・
。
，
-
A
内
，
‘
，
T
.
、
，
，
d
-
-
-
t
M
2
2
，
‘
J
'
-
-
-
-
-
-
A
n
v
-
R
P
L
，
.
、
，
，
v
h
-
-
-
A
'
T
T
』
3
t
a
-
-
v
a
同
B
L
，
A
H
a
n
'
a
"
-
s
a
・
'
E
E
、
，
e
s
p
・
-
v
h
u
"
A
u
s
-
-
3
u
t
T
，
、
t
n
u
t
-
-
a
s
‘
・
z
・
9
ι
'
B
R
H
U
T
-
率
、
，
a
s
q
£
T
.
，
、
，
n
n
T
，
，
、
n
u
--'ιz
.. ，
、
，
q
，
‘
勾
，
‘
、
，
n
u
.
，
‘
，
τ
E
.‘0.‘1
‘QS《
2
0
』
Z
，
，
E
..
， ..
咽
a
g
h
u
'
z
・
，
咽
目
・
ミ
J
n
u
、
，
、
，
v
-
円
、
，
o
u
s
p
・
-
竃
，
E
z
t
f
1
'
A
M
A
Z
E
--NSEL--』
S
N
f
u
p
'
x
l
s
n
u
n
A
..
，SEL--R，，‘，agnuz・ζJ咽目・見何，、Mn・d-Mn?・，
gM問事官Aa.，‘EE、，U開・-h、，nν，、Mnu--d，，eaoa-
-
'
a
F
-
-
E
V
S
O
F
Z
'
I
=
J
O
'
t
'
1
・
--A内--gu--A内
.. ，aoz，‘nunu、，，.L唱
aE咽目・・nM・
竃
J
-
H
-
A
V
'
'
'
v
p
t
t
T
K
F
e
J
=
‘E
.， ..
nu--AU，咽目-、，、，ELM・o・。，bskv''nr・d，da--
BA内
.
.
.
，、，q，‘，・nuv-RY.，.，D-a』
oz，，、，，、，v‘R
・E・---A内息。，‘，.，q'b，.，，，q，‘，E・o-M問。u、，，d・、，qd
.. 《
臥
I
・
J
2
2
'
t
z
I
C
t
3
1
'
P
J
'
J
f
-
----an--，，，‘ζJ白
nA内P・T-z-B・、，，MRH.，VR'z-nu
-----nu---q'-A"'白
nMnu-nrA内M開、，，Y-vh，、v-m，4u"
-
F
-
-
J
《
Q
2
0
d
T
I
P
'
1
0
A
'
t
I
t
x
g
A
-
-
T
，
.
T
l
-
-
a
，
、
U
聞
哩
E
a
リ
-a内ga内Fra筒、，.
--H0・ou--''ru''MU，，，e，，，，，，，、.，，nrFLue-anMnp・町an
g
o
a
t
s
s
T
6
T
F
o
a
I
s
-
-
O
A
n
u
-
T
I
p
i
切
N
E
3
・
・
a
p
-
-
M
"
H
M
"
N
t
s
o
E
2
1
1
T
t
t
t
'
'
a
-
S
E
a
-
-
M
M
M
M
M
P
P
L
.
，
φ
1
d
a
-
-
N
-
-
E
z
-
-
1
1
1
1
1
v
o
o
E
』
』
=
'
E
E
=
1
・
・
H
S
I
x
-
o
r
-
-
J
K
1
E
・
・
・
I
-
-
I
S
A
《
1
P
1
1
【
1
U
T
-Mu----M開刊
M"“同M町M岡M岡脳同--M円
ea，、，‘nwAn，、MHBLU同
anu--EL--nununununuounuv-mOU咽目・0U9ι='ZLEι'・n-z』
gaDEOn
-
-
H
・
a
・
-
M
N
M
M
M
M
M
I
-
-
E
T
T
2
ロ
T
T
I
u
--aManu--MHMHMHMHMHMHMH・a・，、一-zy-F且gav-円，AMH，、T'nu
-
U
S
T
8
0
0
0
0
0
0
0
P
E
E
n
u
o
p
H
a
n
O
E
R
O
F
E
N
--sss・-EEEEEEEl-GKGKluunvQM-ElaHEL
-
-
z
z
1
1
1
2
3
g
-
-
s
n
u
n
u
n
u
n
u
-
-
Z
8
1
2
0
1
g
-
-
S
咽
畠
唱
-
z
s
s
E
E
E
E
E
E
-
-
q
ι
，
3
A
句
EJ&u，g
自
onvAU4aqezaA句
EJtoヲ，aon，AU-aqz'aA噌
nunuAUAUAUAUAUAυAυ‘s・a-E4a-E-E4a-E.，.a内4ぬ
zqeqeqz
AunununununuAUnuAUA
1:11111'.・8・・・・・・・a・H包・・・s・a・..・a・.'・・・・・・・・e・・・2・・・・匁2・・・・・・・a・・・・・・竃‘...........00015680000001 SU8ROUIIHf PRESS(J，K，UPU柑，RHOI.ANU1，RH02，A柑U2，Zll.ilCO) 00015690
E・・................・g・....・・・・・.......・s・a・...・・・・・・・・・・・・・.....・車率・・・g・00015100u0015710
PI令l5SUHf lOSS CAlCUIAf1H 00015120 0001HJO
E・・・・・・・・・・・・・・z・s・‘彦事...事............皐・...率..軍事事・・・2・・・・・・・・・・・......思率・草・00015140OOOOO~ιCl HHOH I"HOI JHAK，KEV(J) 00015150 000003 COHHON 11'511 OP(2，10)， OPF(2.21) ， IOP(2.10) ， TOPF(2.~ 1) Oa015160 000004 COHHOH IPS71 PRESIH，VIN，VOuT.IRAHF 00015710 000005 COHHOH IPS31 1[IAP(2，3)，DHPC2，3)，HOEP(2，3) 00015780 000006 COHHDH IPS41 PA(2，10)，VVV(2，3) 00015790 OOOOOi COHHOH ICH11 RE(2).UE(2)，YElCTY(官)， P[RI<2) 00015800 OOOOOR (0附HOH 11'551 I'AfO，21l 00015810 U00009 OAIA G"1960.01 00015820
000010 H01 IHl01.1.F'3 00015830
1)1)0011 00001l
I/OG1 H()II(j2 IfIJ.Gf.2) GO 10 10
00015840 00015850 00015860 00015810 000句58RO00015890
UOOO 1.1 00001'
OP(K，1) If.IAP(K，11・ROGl・VVV(K，1).・2PAIK，IJ I'HF51H IIP(K，1l・R061・(YI H・>?'YYY(K，1)・・21
-78 -
Hi!»
oooooooooooo
oooooooooooo
oooooooooooo
oooooooooooo
gv
Di
^w
^V
Ui
UI
Ui
UI
Ul m
ini
* W
N
- O
<
fi
CB
N
C>
U.
* W
«
0
llllii
i I!
oooooooo
oooooooo
oooooooo
oooooooo
oooooo
ooooooooo
oooooo
ooooooooo
oooooo
ooooooooo
oooooo
ooooooooo
ro
ro
ro
ro
10
ro
rj
rO
fC
rv
)X
M^
uu
>o
CD
->
J
o>
u
i <
• U
IO
MO
^R
-S
VI
VI
o o
X r
n o
O
•c *
z »
O
- 3
m
N
-J
O
»
o •
»
ui
^ -D
»
•
« ^
w :
:?
2S
S|S
•
-o *-
x
-*
\D
*C
OS
O
S
"
<o
"o
r*i
-o
-n •
— «
-v :
O
—
IV
D
»
m
>
33
33
«
>
O
O
O
"0
^
—
**
-<
.*-
»'.
( "C
«•
»
75
J>
J
5
o
X
l*J
<
—<
*-v
7
5*
-
OH
—
( -n
^
O
T(
- C
O
~
-g
W
•*
v
.-*
•«*
75
—
so
"n
Or
—
—
• -.
»
O
»
O
• O
U
O
O
*
-—
-o
—•
*o i
o o
«
• A
M
A
K
^
3*
S3
5
*
<
•*
«•
O
•*
<
<
NO o
oo
<
m
3>
7>
Z-
3D
•
- J
» 75
O
X
rO
—* -
n o>
U
l
"Y
Y S
O
**>
O
3D
O
—
to
r>
so
< •*
* * *
< <
i ~
-o
-n
•—
as
so
>
. .
~
•-
J»
re O
w
:
O
75
«
X
*^
P
C
. i
-4 -
n o
«
C
7)
- <
W
K
t
rO
-*
O
• <
-w
3
0 -
n
-^
• o
so
m
—
)
—
O
O
—
O
) 75
-O
»
- O
W
.
v A
H
-
* —
:
ro
75
<
%
O
' r
o
• +
75
*
o <
*o
Ul
m
o •
< -n
to
s 5
*•*
-o
o
< o
7C
o
< o
75
o •
o
»o «
z •
fO
z «
* z
« 7
5
tt
> II
7
1 •
3»
* ro
M
*-% x
so r
o z
*•»
3
0 to
X
*•*
II
S
O
< w
o
«=
< te
l O
«=
•
* so
o
< -*
fO
ro
«;
ro
rO
m o
>*
<
« m
*=
II
* r-
CI
«
« II
o o
•"
• M
o
O
« 75
r
o
z X
7^
ro x
s
I*
H
IHJ
-o
-o
T)
-o
fO
< r-
Ul
fO
i*>
. m r
* 7
5 75
75
7
5
«: r—
+
«
* «=
H
Z
« U
l M
rO
(O
«: It
O
ro
v
**"
ro
w
V
~ rO
O
-n «
i—
•o
o
r» o
—
©
S
O
5>
X 3
» m
-
S
i-
-n -
n 1—
7
5 *- x
-*
-o
f"
u»
S> m
3>
75
X ^
*-
s •n
T
, H
n
C*
SO
O
75
m
-n
*»
ej-
o X
fO
d>
M
75
^-
X
fO
O
H
S"
1
T»
•n
30
O
> 5
0 3>
e
« t
-"
• M
X
ii e
" 75
o
-n
» C
O
75
O
-< •»
»
•»
K
m o
"^
O
SO
30
"C
X O
—
rO
-4
—
o (T
3 o
• *-
(-) o
-o
V X
H
o -n
« *
m
H
<-• <
< ro
o
75
m
m
x -o
-o
o i-
r-%
so
-n *-
w : o
O
«
3 7
5 o
+ ro
m
-a
v>
H
ez
7
5 -n
c
»
-o
'• ^
-.
O*
-'
o 3>
•
* J
> V
z Z
v I—
-O
* C
n
o 3
» TO
-* -
«= -
n o
H
r-
«
m
5>
75
•f
f--»
-H
H
r*
j 1—
rO
«
C
_ r-
. o
^
r-H
» 2
"ri
«
•—
"O
O
O
—
O
W
-n
Z>
-o
3>
7
5
r-
^
^.
Jl
Ul
J>
ff
l J>
7
5
71
it
*H
^
o>
^
-*
—
as
o
•n
T5
*^
o>
<*
o
-H
^
^r
OC
JV
^l
ri
i—
7
5
O
»*
•»
*-
• -O
**
1 S
O
-H
«w
H
O
3>
SO
3
> e«
e_
—
«
—
. x
II
It
C
H
, 75
o
T
t »
"
03
75
0s
-<•>
• ••
•<.
» H
• W
w
-
n
mi
mo
-D
Ov
?B
SO
^
. —
c
Z>
^
'
O
•-
M
rO
H
-N
O
C
i n
•
• «—
7
5 O
-B
-
»
—•
i^
>\
^Z
" G
T1
H*
^ %
m
—
*-
<
. <
r-
cx
-o
* t
T1
' r
-r
—
H
>
so
*0
-»
»
s
- <
m
»
^*
v
«
o
on
wA
Q
+
Mm
-o
>
e
n 7
5 o
c
: 7
5
-n
^>
H
-O
H
AN
nN
5
3
>
? a»
X
i m
m
^ ^
1-
75
r-75
75
75
^
„ M
ro
rO
1%
so Z
•<
—
59 <
t. li
II
r» m
< <
W
V
V
V
•<
3»
. >
S
O »
7
5 *
A
^.
t^i
A
»
3>
x
^
75
7
5
«
75
O
X
—
•—
75
<
• r
: <
N
• r
- »
«
>
ii C
= 3
>
m m
3*
75
rO r*
^ t»
i
w Z
->
rO
rO
rn »
X
X IS
O
—
so o
O
-H
•V
•o
SO
H
> o
•• -
o
> a i 2
m
m
»».
x _
* >
- ro
-
o
rO
rO •
• 3
>
• •
nj
"W
vn
^/i
x
«.
o o
o
o
D
O
O
O
0 o
o
o
01
»
C"
Oi
o o
o
o
oooooo
oooooo
oooooo
w
ui
ui
ui
u>
w
•J
Oi
Ui
^
U
i^
O
OO
OO
O
II
_*
©
O
O
1111
11 OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO
OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO
ooooooooooooooooooooooooooooooooooooooooooooooooooeooo
(^
0^
^^
0^
O>
0^
O»
0^
0^
0^
0x0
K0
^0
^O
^0
^O
^0
^^
tJ
vC
T,O
4e
T'
0^
0^
0^
^
^^
^W
Ug
UJ
Wt
^W
WW
WW
rO
iO
rO
tN
Sr
Of
Or
sS
^r
oi
NJ
—
^^
—
^
—
—
^
^^
OO
OO
OO
OO
OO
ND
^^
^^
^O
**
*^
WN
«O
iD
tt
N0
1V
I»
Wr
O^
O*
»^
^W
4>
Wi
i)
-O
lD
C»
Ne
Al
Jl
*W
Ma
O«
tt
NO
iU
'*
'W
M"
'0
«0
)N
IJ
'U
l*
Wf
i)
JO
O
OO
OO
OO
OO
OO
OO
OO
OO
OO
OO
OO
OO
OO
OO
OO
OO
OO
OO
OO
OO
OO
OO
OO
OO
OO
OO
O
JAERI-M 84 -162
向。aυnu白υ白υnuoυnuAUAUAUAUnunuaoaυAυ白unu白UAUAU白U白υnunuaυaυauaυnuau
向。‘a。，‘曹aA崎区
J4u，『oonu，nU4sqz'aA崎区
d'Oヲ・aO内w，AU--内，‘，ah句
aJzo，raohu，nu-a
nvnvo，白"'nヲovov内w'ovovnunuaυAUVAUAUAuaonua0・a-a-a-a-a-a-a・・4B・E・内，Lag
‘J区
dkdEJ区
d区
dgJε2区
d区
d'hutD，。，b，。，。，。，。，O4040z。tD'uto'uao'oao'hu‘u‘u
114511111121111111111111111111111
の
υ白unuao白υ白υAυ白U白unuaυaυ白unUAUAυnUAυ白U白U白UAUnUAunu白uaoの
υnuaυnu白u
nUAUnunu白υAυAυ内U白U白υnunυ白υnUAUnunHvaunUAUAUauvaOAυ内UAυnuaoaununu白υ
aonununu白υAUAUAυAU白υAυAυ白υnununU白υau白υAυAUAUAυAυnuAυAUaononu白υnυ
，
，
，
，
》
-
E
・E-V邑
R
ν
-
R
，
，
，
V
恥
，
a
，
、
，
，
、
，
〈
X
5
3
Z
S
F
2
・
・
2
・
A
'
2
2
'
2
}
P
2
1
1
2
1
。
4
q
d
'
・
Z
E
E
E
E
-
a
F
E
-
-
-
》
，
，
，
，
，
-
-
-
-
a
，
，
，
，
，
》
〉
'
=
=
z
E
Z
V邑
R
ν
-
R
ν
邑
R
・
e
、
，
a
J
V
、
，
《
t
t
'
〉
1
'
1
u
-
w
E
・
r
r
，
，
s
，
‘
，
，
‘
T
E
P
，
《
F
，
F
F
・
-
P
L
n
u
s
"
A
H
A
内
-
t
-
t
，
由
民
n
r
n
r
n
民
n
r
c
L
F
E
T
'
白
u
'
'
a
υ
'
V
V
E
R
'
'
a
，
、
，
.
-
-
a
n
R
〆嘗
A
-
A
n
R
M
A
》
》
官
官
R
E
2
2
E
2
・
・
・
・
p
o
-
-
r
r
，
，
，
'
'
n
o
-
-
，
M
n
z
J
Z
J
M
阿
‘
J
V恥ν
邑
n
n
円
、
，
E
L
、
，
n
u
-
-
-
L
、
，
a
υ
-
t
《
・
・
1
〉
L
3
I
2
2
》
L
J
I
2
P
P
3
，
l
z
，
T
1
1
L
Z
'
T
t
M
M
"
》
V
R
L
-
K
A
E
E
L
-
-
K
A
E
O
B
k
t
Z
1
4
L
，
，
Z
1
t
L
，
'
s
，
‘
"
v
'
n
u
a
内
H
U
'
'
'
a
υ
r
r
u
u
'
-----u・"・・・2nnnrFLzg-anna内PLZ
U
O
T
v
u
・
'
L
〉
H
u
g
o
-
L
》
"
2
R
E
t
N
N
》
A
》
1
N
N
，
A
Z
A
-
-
-
L
-
A
B
2
E
2
4
A
B
3
E
t
'
・
N
E
1
'
p
'
t
F
'
P
J
F
vh、，nUM--puvhHunuv邑
Reaamnrv恥HU'psnr
rE・E・nr・'aurEq4+Auv，‘戸、unrnuFEq，‘+nuv邑RFSnu
nu'HU、，onnu--、，咽-A内Cι，，nu.、，A，，、ELe
'
k
e
t
A
V
'
・
・
1
P
R
'
'
'
・
J
F
R
'
t
《
〉
，
}
L
L
'
b
'
P
X
E
L
L
'
o
p
p
x
E
V
E
K
3
E
E
V
I
3
2
2
E
E
K
T
B
2
uvu--，，‘，uvu--，‘唱目・EL''u'u，，‘，EL'nu
'Vυh
、E'
S
F
O
'
N
S
S
，
.
F
O
T
M
S
O
T
-
t
v
，
、
I
1
p
s
k
i
-
-
I
1
P
G
E
I
-
-
E
1
p
v
p
E
6
0
《
T
2
2
E
6
0
』
I
2
-E'nunu-nUE且nu-、，a内Hu・s-E--anU句、，nHHu-aaυ
nRAυFAυ司自民自民、，AUnroυrEFE由民自民、，nurrAυrE'S
F
R
3
・
〉
F
B
3
・
'
R
'
'
F
S
3
・
'
R
'
， .. 咽.，zq，‘，v・'Auv-Ran-'''y・'ouv‘naw'nu
、，E『T，，，、，、，CEFLU-m・'Hu--=、，CEFlwvh・'HOgpu
〉
E
"
c
k
S
E
E
N
-
〈
I
J
S
K
M
I
〈
TIMe-
， ..
，am--，、aJ，‘，‘A帥
nHA帥
pu，、，y，，‘A帥
nmA帥
pu'T，、，
'
E
内
K
E
A
-
A
Y
R
F
P
・
〉
'
t
E
Y
R
F
P
・
3
'
E
n
k
t
I
F
p
o
p
-
》
I
》
E
X
〈
l
I
》
1
3
2
Z
I
A
，、nr，‘FLν
邑
R，‘=一-・240。4a内n"HFLνA，‘ZS・J・‘uq'・nHM同
u-ZLriwzzdz・-』，‘rL，&u''ogg-aL，‘ri.，‘u''Egad-
u'nu--rE，E， .. 、，、，u-m，，e，，EEEEE且、，、，v-n，，，，.
u，Mm白M岡、，、，、，、，MM-nunR‘a噌
a，、to，‘，，uvnU由民adad，‘zo，.、，，E
F
2
2
3
3
F
'
'
F
E
I
Z
E
F
，
，
F
E
T
E
t
zz''''22v-nvha内EEA内定Jeazzv-nv-namrEamaJ・
-L，.n，.nv-nvh-g，、，、nrT'u円''nr・--，.、，‘nrT'u円，snrai-
-LVぬ
-L，、，‘，‘，‘・--vh・Lrrrr，、・・・nH・2nu-Lν
邑
n---rrrr，‘EEnun---nu，.‘
PRFRA内白VAMnnra伺
't'ta内nrANrvnHAu-a''FEPRAM内nrAM内rrnH仇UEa，EFr
u-nupLnu白rnunru--nupLnunr・--Hwrrpau--nup--nunrE且Hwrr'bEA
ss
・
-
且
仇
υ
司
4
n
u
b
-
6
e
ι
u
，
。
E
E
s
t
p
F
8
9
0
1
2
3
4
5
6
r
a
a
，
O
1
2
3
4
S
6
F
8
9
0
12'22222
》内
4••
‘
〉2 ，
、，
ν恥
、，nuaz，‘
nvPL・-uv
EM--uW
Hetuv
-
t
E
-
-L-LU--ぬ
Z
L
Z
軍
事
Z
E
2
・
'
e
s
t
・---snuEE
UUAυnRUV
M"nn.，‘
A内.。，..
'
N
・2
V邑
nnu・FU
FEnr、，Auv
nu。4Hu-Lnn
'・・eEA守
t--〉
V
E
E
t
e
I
S
M--FE，、，，
'u'V邑R。，‘ν‘R
E--t'《
，ap---anrv-nnr
・-spunυ，‘nu
E
R
O
-
-
‘
-E『OR、，U曹、，
22'・・3V4
SEE--，-，
q，h''u円PLν恥白υν恥
02Alt-t
uHAυnnnRam-且An
RRIFptp
t
sfpEszss
-H33》》
F
q
4
5
3
，，，，
2
L
K
K
K
K
26LE《tt
aUAOAM刊
nrAMnnrA的
自
R
E
B
P
O
P
3234567
4444444
白UAυAυ白U白unuau
向UAυ白UAυnυnυau
nuAυAυAυnuAυ九
u
nuAυnunununuau
000048 VEL ' YYY(K，2) 000049 DEK HDEP(K，2) 000050 CALL FRIC(lRAKF，FRICT，YEL，DEK，AKU2，OHP(K，2)) 000051 OP(K，6) FRICTaROG2aVVV(K，2)・・2000052 PA(K，6) 回 PA(K，5)-OP(K，6)+UPOHaRO宮"OHP(K，2)000053 DP(K，7) • lETAP(K，2)aROG2・VVY(K，3)"2
000054 PA(K，7) • PA(K，6)・OP(K，7) +ROG2・(YYY(K，2)・-2-VVY (K ，3) --2>
》内
4••
事T
uu nu v
》
司
》
》
2
3
3
・
，，
s
k
K
》
，、，‘，a
avnr，
u"
“"の4ν‘n
nunu.，目、
'
B
-
v
a，L。，‘、，UM'
HUAυ'au--
M開。4nH，，‘
A
S
-
K
・
》
'
S
N
4
2
1
νa円、，nuuvpu，
E
3
p
v
o
k
nu，“ou--nH，‘
，KAT--+P
L
《
〉
2
〉
B
PRu-aOFUnv
vv
，nu，
.
'uvv邑
Rnu“ν恥
T
a
t
-
-
4
》
E
2
P
3
p
t
'APunu'anu'AU
nRAuv-，一、，E且'o
F
R
〉
K
3
1
'
'
s
r
E
B
，
K
0
3
F
T
'
p
'
K
《
I
、，，au円FLν
邑
RA内ν邑
R，‘nr
言
iu，amg.. ，‘71
，‘nrnヲnunu
'ν邑
nn関向阿AMnrEA内向u'TtFu
k
t
I
F
P
Z
P
?
t
p
《
-
=
》
V
E
C
F
S
Z
S
S
3
v
o
i
}
》
-
O
VHH3}，}11107
F
8
8
9
9
'
'
E
Ea''''E且町内UV・R・0HV
LKKKK《rtl1
L
K
L
t
f
t
t
p
p
【
FEFRA内nrA川
nra内nuo"uurr仇U
V日
EBPBPID--E
ZJ40ヲ『aO内w，Aυ‘a司，.，ah句
aJιU
555536666666
向UAυ白υAυ白υAυAυ白ununυnυAυ
nvAυnuAυAHUOυnυnυnυnυnuoυ
AUAυnununUAυnunununununu
nunuAυnunuAυAυnunuAυnUAUV
000067 60 00 6~ JJol，JHAX 000068 6~ TUPf (K，JJ) TOP【K，J)・OPf(K，JJ)
000069 70 [()H T J HUE 000070 100 [OHII HUE
000071 RETURH
000071 EHD
00016220
00016230
00016240
00016250
00016260
00016270
00016280
00016290
00016300
00016310
00016320
00016330 00016340
00016350
00016360
00016370
00016380
00016390 00016400
00016410
00016420
00016430
00016440
00016450
00016460
00016470
00016480
00016490
00016500
00016510
00016520 00016530
00016540
00016550
00016560
00016570
c..........................・..・・・・・・・・・・・・・・・・・・・・・..・...・臨・・・・・・・=・..・・・00016580000001 SU日flOUTINE FRIC(IR Kf，FRJCT，V，D，NU，lL) 00016590
c.......・・・・・・z・・..・・...・・m・・・・・・g・・・・・・・・・・・・・・z・・・・・・・・・・・・・・・・..・..fI*00016600OOOOO~ HfV 0-・V/ NU on016bl0
-79 -
JAERI-M84- J 62
0 0 0 0 0 3 IF ( RtY . G t . 3 0 0 0 . ) GO 10 SO c C LAMINAR FLOV C
000004 RAH <• 64.0/REV OOOOOJ GO TO 200
C 000006 50 IF < IRAHF .Efl. 1 > GO TO 100
C C IRANF -- 0 «» BIASJUS »» C
00000? RAH = RAMFKREV) 000008 GO 10 200
C C lltAHF - 1 *» KALMAN-N1KURAU2E • > C
000009 100 RAH - RAHF2CREY) C
000010 200 FRICT - RAH»2L/0 000011 RETURN 000012 ENO
000160 20 00016630 00016640 00016650 00016660 00016670 00016680 00016690 00016700 00016710 00016720 00016730 00016740 00016750 00016760 00016770 00016780 00016790 00016800 00016810 00016820
000002 000003 000004
000005 000006 000007 000008 000009 000010 000011 000012 000013 000014 000015 000016 000017 000018 000019 i;ooo20 000021 000022
000023 000074 00007-1 OOUO 26 OOuO'/Y 000028 000029 OOOOSO 000031
00003 2 0000.J3 000034
SUBROUTINE T0NB1(K,J,JNAX1,NP,P> Csa*f>i«t>«f>xxxMix»M«»iiiat*ii*lii»*ifK»B»*»*tiii»«*i C C c
ONSET OF NUCLEATE BOILING
V I X ( a 4 S « X a t * X » t l S > * S S X I » X X X t M I I I K g f » » X X X S I I t t l l I k I > X X I » t COHHON latl TVC,RHO,CP,ANU,AMU,RAMDA,PRN,RAMO COHHON /OBI/ 0.0NB(2,22) COHHON /HN6/ QA<2,21,15) ,IIZF (2,21) ,TC2<2,21) ,TWxT<2,21,IS
1 TU<2,5,2l),JONB<2,22),TSAT<2,22> ELX - 0.0001 IERR01 = 0 JJ * JHX1 AA -
- J P » * 1 . 1 5 6
BB = P » x < 0 . 0 2 3 4 / 2 . 1 6 1 4 6 2 1FCJ .NE .JHAX1) GO TO 5 JHX1 = JHAX1 JJ - JMAX1 • !
5 QOB = Q A ( K , J J , N P ) « Z F ( 2 > TC » TC2<K,JJ> I F ( r V 2 ( X , J J , N P > . G E . T S A I < K , J H X I j ) GO TO 70
10 T0NB(K,JHX1> - ( 5 . / 9 . ) a ^ 3 9 . 5 2 5 5 5 » Q 0 B / A A ) * « B B TOO - [ 0 N B U , J M X 1 > CALL FRROIMTOO, ! C , E E X , I E R R 0 1 , 8 . 5 0 , 5 4 0 ) CO TO 100
40 W R I T E ( 6 , 4 5 > N P , J , K , T O B , T C , 1 E R R 0 1 , E E X 45 F 0 R H A T ( / 2 X , ' S U B . T0NB1 ITERATION ERR0R- /5X .
• ' N P » ' , I 2 , 2 X , ' J - ' , I 2 , 2 X , ' K = - , I 1 / ar 5 X , ' 7 O N a = ' , E 1 2 . 5 , 2 X , ' T C ' ' , E 1 2 . 5 , 2 X , ' l E R R 0 1 =
1TRR01 ' 0 GO II I 100
50 QUI! ( I I )NU(K ,JHX1) I V 7 ' ( K , J J , N I > ) ) « I I 7 F ( K , J J ) I t I W < K , J J , N P > > 0 0 B / I I 2 F C K , J J >
GO II I 10 TSAI(K,JHX1) 0.1E 30
•TSAT<K,JMX1)
,i4,2X,'EEX=
CO I0NU<K,JHX1) QONUIK.JHXI) GO TO 200
100 00NB(K,JHX1) • ixi.oieei OONIKK.JHXD
200 m r u R N t HI)
2.5293F 2«AA«i((9./5.>«<IONB(K,JHXl>-[SAHK,
00NB(K,JHX1)
ai««*«KSKa:00016S30 00016840
• •»»ai«s*a:00016850 00016860 00016870 00016880
»*«*«»ss*00016890 00016900 00016910
>,2F<5>, 00016920 00016930 00016940 00016950 00016960 00016970 00016980 00016990 00017000 00017010 00017020 00017030 00017040 00017050 00017060 00017070 000170B0 00017090 00017100 00017110 00017120
,E12.5) 00017130 00017140 00017150 0001CI60 00017170 0001C180 00017190 00017200 000U210
JHX1))) 00017220 00017230 00017240 00011-250 00017260
I. *«»x»«»»»**x«x«»«»x«»«»»*»«»ai»»«««ai»»«»«»ai»»»«»««»*«««»«*aiar3*»»»xEx**x*0001i'2i'0
- 8 0 -
JAERI-M84 -J62
00000] H (RH .Gf. ]000.1 GO 10 50 00016620
000166JO
000166~0
00016650
00016660
00016610
00016660
00016690
00016700
00016710
00016720
000167JO
00016740
00016750
00016760
00016770
00016180
00016190
00016800
00016810
00016820
LAHI HAR flOV
000004 RAH • 6・.0/REVOOOOO~ GU TU 200
000006 50 Jf ( I RAHF • EQ. 1 ) GO ro 100
IR~伺 o •• BlASIUS ・m000007
000006
RAH RAHF1(REV)
60 10 200
IRAHf •• KALHAN-HIKURAU1E ・車000009 100 RAHιRAHF2<REYI
000010 200 FRICT " RAH-ZlIO
000011 RE1U白N
000012 ENO
c..........・..・g・...・g・.........・a・-竃....電車窓亀s・g・z・........・2・・・・・..・'''00016630
000001 SUBROUTINE TOH01(K，J，JHAX1，NP，PI 00016840 c...........................................竃竃率....車電...............怠車奪事000168~0
00016860
OHSET OF NUClEATE 801llNG 00016810 00016880
AUAUAununununυAUAUAUAUAUAUAUAUAununuAUAunuAUAUnuAU内
dHυAununUの
UAununUAUAHVAu
n，nu--q，.，aA司
Edeo乍，aon，nu---qa，aA・Edao，enon，nU4aq'h，SB亀
ιJzoveoon'nu
・』qz'ah句EJ
U00・，n'nヲn'nヲ白岨，白岨，白岨，nヲ白岨，nunUAUAUAUAUAUAUAUAu--4848484a484E
・E・'E-a勾，Lqgqg
内E勾，L勾4
66666666666rrrrrrrrrrrrrrrrrrrrrrrrrr
1111111111111111111111111111111111111
nunununuAUAυnUAUAυ自
UAunUAUAUAUAUnununununununununUAUAUAυnvnvnvnununυnununu
nununuvnununυnUAUAUAHVAυnHVAUAUAUAUAUAUAUAUAUAUAUAUAUAUAUAununununununυnunυAU
AUAυAUAununununununununUAUAUAUAUAUAUAυAUAUAUAUAUAUAununununununuAUAUAununu
--..
，
‘
，
}
..
〉
5
1
・3
・
)
B
f
2
1
・F
I
X
-
-
Z
E
H
.
，
，
J
.
》
，
，
・5
3
E
K
・・
1
1
X
t
・-，
X
E
I
--‘a
M
円
r
E
A
内
a
q
'
'
E
U
'
c
e
-
-
，
，
，
r，
g
q
ζ
V
邑
R
・A-
E
《
4
2
}
-
z
T
'
1
・・
M
W
A
内
A噌
習
内
・・0
T
S
a
N
-
-
M
'
I
，
J
--A
》
.
，
，
a
o
n
'
a
a
u
z
v
邑
R
..
，q'h、，
a
u
-
-
.
、
，
，
、
-
-
N
'
2
a
u
O
J
a
-
-
R
2
2
o
u
-
-
s
R
J
N
--P
〈
'
r
、，
t
R
，
u
s
'
内Z内ea
内
，
r
E
ν
恥
'
'
za内FL，、
n
u
A
n
o
n
-
-
，
、
，
‘
S
O
T
-
-
t
〉
O
，
r
r
-
BM円
'
n
n
a
u
白U
・
V-non''昼
、
，
-
A
F
S
o
o
-
E
R
X
“}-
r
s
a
n
t
-
c
o
a
-
-
E
E
2
・JE
a
-
-
'
2
'
a
，
，
，
》
J
I
-
-
-
u
'
F
}
3
0
1
N
S
》，
.
.
竃
Mn
官
官
、
，
5
5
0
0
'
・
P
E
9
4
・・A内，目、内E
・E-zJ
・・
nnEZ4a
角
Z
M
刊，‘，‘
.，F
'
Z
2
'
R
T
I
t
'
F
4
・
-
u
z
E
"
5
2
E
A
'
E
J
z
-
a
"
H
t
J
・0
・aH
'
'
J
H
2
A
}
--a"'"“
，
O
3
0
n
'
Z
L
Z
'
'
'
'
'
・
An
，.
8
，、，N
E
3
B
R
E
I
K
F
K
R
u
x
-
x
znr、，ζJnu
，‘，‘
EE
曹
'ES'PL
，、h
U
M
n
q
g
u
円
-
-
E
2
1
1
2
〉
T
-
-
I
'
'
I
t
Q
J
J
・-'内E
'
'
&
u
ζ
J
内EA"
、，，
au---A'uw'AUιa
，
a
o
'
1
、
，
‘
，
‘
s
-
E
O
B
2
'
B
，，
K
冒JE
E
-
-
H
2
2
3
2
0
F
7
9
E
I
N
'
E
《
9
《
zoa
，、，q'h
瓜切冒・苫，‘.，，
ZL
，“uq，.。，.、，、，，・ιhqauu
a
'
B
2
'
t
a
E
-
}
'
k
I
I
'
t
P
A
t
s
N
S
E
M〈
5
・。、，
S
5
1
E
'
'
S
M
A
N
S
-
-
0
・・u'nuAn'
今，LR0
・zar.
，、va官
-EU.
，.
M
n
'
官
-AV9¢
AM-
-・7・RM司
nM喝
。
，
.
，a
M
"
、，
M開
''nu--
。，，
EUEd
..
，‘
A句、，
p
，、，nrSEJuan
自
rHU・d・，，Ed4
ゐ
e
ι
.. ，e，s，SM
U
&
U
電
d・aa
凶a凶幽何
'nuM刊ce'rιvn'
・・1
1
6
T
1
3
2
X
1
2
」J
'
》K
T
'
'
'
t
K
》
》
》
》
，T
B
N
0
1
0
A
Z
E
'
'
J
t
t
，、》
'
x
'
u
t
-
-
t
'
-
z
E
O
M
n
o
o
-
-
M
n
A
A
K
K
J
X
B
R
E
Z
2
=
O
N
J
m
m
x
E
M
--，，，，，z
n
u
E
d
‘aAUEuunM円，‘，‘，Mnu伺
nunvA噌。，.，“onu叫
"h'M円M円“uMnnuM円
-
-
-
E
E
u
-
-
-
-
-
」」
A2kJOHnν''a官
側
Enu--oJJOJtJ
'
O
z
-
-
-
E
O
E
t
'
I
n
n
-
6
E
1
0
1
〈
1
'
'
2
'
o
，
-
N
N
N
1
p
p
N
昌
司
T
Z
K
E
f
-
'
1
1
k
k
k
-
K
側
--AUnunu--nu--zHM.，.、
-nugLA附，，
AU
凶"。υ
，.、，‘nu
，‘・s'tnn
--unM円M円
nm-az=
・d-a=γtロuaL7tyEMns'nNFEa'uuuuT』uu
，‘“"uu
-
M
n
M
n
H
X
H
X
{
X
H
t
N
n
u
l
l
H
P
X
H
H
N
N
M
H
E
N
-
--OMAunvtLELEUM何A何回uz-M何adouFLEznunuAnnuuHnuM日
RdrEAu-
“uzt
“"nuH"。unu
・nusa
--EEEElJJA日
IJJOT-TTESUE-
，
l
G
G
I
G
-
Q
C
O
Q
n
a
-
-
a
・
S
5
0
0
5
0
0
0
0
・
1
4
4
う
t
o
o
-
-
4
'
q
'
z
Fι
今，L'sι“『
ιJtB
，a白On噌，Au--ar'SA崎長
Jto、，oonヲAυ
・'qE23A句、，ιo
，taoH岨，nυ
・』ヲa苫a
nuAUAυnuAUAununu--‘a-a-a-a-a-s
・a・』・』内E
伺
gqg
伶，ι司
rリ
EHrhrqe
怜，LEJvaaJ''
O
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
o
u
o
υ
0
0
。。
o
o
nunununununuAUnununuA
000014 l HI】 00017260
l...・...・...・....・...・......・・・・・・.....率忠司1...・‘.........“s・..・・・‘・・・摩...OU01(1(-0
一ω-
JAERI-M84- 162
000001
000002 000003 000004
000005 001006 000007 000008 000009 000010 000011 000012 000013 000014 000015 000016 000017 000018 000019 000020 000021 000022 000023 000024 000025
000026 000027 000028 000029 000030 000031
000032 000033 000034 000035 000036 000037
SUBROUTINE BOIL(K,J,NP,PPP,KEY3)
SUBCOOLED BOILING HEAT TRANSFER WITH FORCED CONVECTION ( SATO - HATSUHURA t JENS - LOTTES CORRELATION )
COHHON /CHI/ RE(2>,0E(2),VELCTV(2>,PERI(2) COHHON /CT1/ TWC,RHO,CP,AHU,AHU,RAHDA,PRN,RAHO COHHON /HN6/ QA(2,21,15),HZF (2,21'/,TC2(2,21> ,TWZ<2,21,1
1 TU(2,5,21>,TONB(2,22),7SAT(2,22>
1ERRB1 = 0 EEX - 0.1E-4 QX •= OA(K,J,NP)a2F(2) 01SUB = TSAT<K,J)-TWZ(tC,J,NP) OTSAT - TC2(K,J)-TSAT(K,J> TWC = 1WZ(K,J,NP) CALL C0NSTl(KEY3,l,1,O,0,0,1> RE(K) » VELCTY(K)aOE(K)/ANU H71 - 0.023«RA«OAaRE<K)«ao.8aP«Na«0.4/0£(K) IF( HZ1 .GT. HZF(K,J> ) HZ1 - HZF(K,J>
10 HZ2 = 4.5»EXP(PPP/20.0)/(3.6E«4) OCO - HZKDTSlie DY = ax-aco IF(OY) 40,40,20
19 OISAT - OTSAH 20 DTSAM=DTSAT-(H22aDTSATaa3.6*HZlaDTSAT-aY)/(3.6aHZ2«DTSATi
CALL ERROR(DTSAH,OTSAT,EEX,lERRBl,t19,t25> TCB - TSAT(K,J) • DTSAH CO TO 30
25 VR1TE(6,26> NP,J,K,DTSAH,OTSAT,1ERRB1,EEX 26 F0RKAT(/2X,'SUB. BOIL (SATO CORRELATION) ITERATION ERROR a'NP=',I2,2X, J=',I2,2X,'K=',ll/5X,'DTSAN=',E12.5, a ,2X,,DTSAT»',E12.5,2X,'IERRB1=',I4.2X,'EEX=',E12.5) JERBB1 = 0 RETURN
30 1F(TC2(K,J)-TCB> 90,90,50 40 TC2(K,J) - TONB(K,J>
GO TO 55 50 TC2(K,J) - TCB
FULLY DEVELOPED NUCLEATE BOILING HEAT TRANSFER ( JENS-LOTTES CORRELATION )
DTSAT « 11.2951«QXaa0.25«EXP(-PPP/63.0> TCB2 = TSAT(K,J) • DTSAT 1F(TCB2.LT.TC2<K,J>> TC2(K,J> = TCB3
55 HZF(K,J) • 0X/(TC2(K,J)-TWZ(K,J,NP)) 90 RETURN
END
00017280 00017290 00017300 00017310 00017320 00017330 00017340
5),ZF(5), 00017350 00017360 00017370 00017380 00017390 00017400 00017410 00017420 00017430 00017440 00017450 00017460 00017470 00017480 00017490 00017500 00017510 00017520
• •2.6+H2D00017530 00017540 00017S50 00017560 00017570 00017580 00017590 00017600 00017610 00017620 00017630 00017640 00017650 00017660 00017670 00017680 00017690 00017700 00017710 00017720 00017730 00017740 00017750 00017763
/5X,
000002 000003
000004
00000' 000001 000007 000008 000009
000010 000011 000012 000013 000014 000015 000016
Caaaaaaaaaaaaaaaaaaaaaavaaaaaaaaaaaaasaaaaaaaaaaaaaaaaaaaaaaaaxaassaaa* SUBROUTINE ODNB(RP)
Caaaaaasasaaaacaaaaaaaaaaaaaaaaaaaaaaaaaaaaaxaaaaaaaaaaaaaaaaaaaaaaaaaa COHMOH /CHI/ RE(2),DE(2),VELCTY(2),PER1(2) COHHON /HH5/ J1,J2,0AVE(5),00(21),XAA(2,21,15),TBU(2,21>,KITE(5) 1 TC1(2,2l),VAVE(5),S,TrUEl;KHAX,PHlN(2) COMHON /MN6/ 0A(2, 21,15) ,I(7F (2,21) ,TC2(2, 21), rVZ<2,21,15) ,ZF (5), 1 TU(2,5,21),T0NB(2,22),TSAT(2,22)
IDBU 00NB1(2,22),QDNB2(2,22),a0NB3<2,22) /CTI/ TVC,RIIO,CP,ANU,AHU,RAMOA,PRN,RAh'D /MHO/ JHAX,KEY(3>
COHHON COMHO* COHHON COHHON / P S 5 / P A F ( 2 , 2 1 ) KEY3 ' KEY(3 )
I aaaa CRITICAL POINT C H?0 C 020
PC ' 2 2 5 . 5 6 I F ( KCY3 . E O . 1 ) PC ' 2 2 5 . 7 2 00 50 K"1,KHAX 10 " 0 DCr - O H I O a 0 . 0 3 2 3 1 VF( ' V f lCTY( tC) a 0 . 0 3 2 8 1 Pfl • I'ERMK) a 0.03281
PRESSURE (PC) 225.56 (KG/CH2) 225.72 (KG/CM2)
TEMPERATURE 374.15 (C) 371.1 (C)
00017770 00017780 00017790 00017800 ,00017810 00017820 00017830 00017840 00017850 00017860 00017870 00017880 00017890 00017900 00017910 00017920 00017930 0001/940 00017950 00017960 00017970 00017980 0001/990
- 8 1 -
JAE悶ーM84-162
000001 SU目白日UTINE BOllCK.J.NP.PPP.KEY3) 00011260 00017290
SU8COOlEO BOILING H~Al lRAMSFER旬I1H FORCEO C日制VEtll目肘 00017300 ( S"IO -HAlSUHURA 畠 JENS -lOllES COAAEl"TIO制 00017310
00017320
000002 COHHOH ICH11 RE(2).OEC21.VElCTYC21.PEAIC21 00017330
000003 COHHON ICTII TWC.RHO.CP.ANU.AHU.RAHOA.PAN.RAHO 00017340
00000‘ COHHOH IHN61骨AC2.21.15). HZF C2. 21 、 .TC2C2.211.T~1(2 ， 2I ， 151.1FC51. 00017350 TUC2 .5. 21 1. TOHBC2. 22)， ¥SATC2， 221 00017360
00017370
000005 JERRD1 0 00017360 00吋006 EEX O.IE-命 00017390
000007 QX QACK，J，NPl・1F(21 00017400
000008 目JSU8 ISAl<K，JJーllllCK，J，HPJ 00017410
000009 DTSAT 0 lC2(K，JJ・ISAT(K，J) 00017‘20 000010 柑 tW1(K.J，NPl 00017430
000011 CAll CONST1(KEY3，I，I.0.0，O，1l 000174‘0 000012 RE(Kl 0 VELCTY(Kl・DEIKl/AHU 00017‘50 000013 H11 c 0.023.RAHOA.RECKl~・0.8.PHN・・0.4/0ECKI 00017‘60 000014 IF( H11 .Gl. H1F(K，Jl ) H11 g HZF(K.J) 00017‘70 000015 10 H12 ‘・5aEKP(PPP 120.0) 1 (J. 6E+亀 00017480
000016 QCO H11・OISUD 00017‘90 000017 QY Qr-晶CO 00017500
000018 IflQYl 40，40，20 00017510
000019 19 OIS"T g OrSAH 00017520 000020 200TS"HoOTSAT-(H12aOrSATaa3.6・H11・OTSAT-QY) 1 (3. 6a"12・DlSAl・・2.ι・H11)00017530000021 CALL ERAOACOTS"H.OTSAT.EEX，IEARBt.畠19.畠25) 000175‘0
000022 lCB • TSAT(K，J)・OTSAH 00017550
000023 GO TO JO 00017560
00002‘ 25 IIRITE(6，26) NP，J.K，OTSAH，OTSAT，IERRB1，EEX 00017570 000025 26 FORHAl(/2X，'SU8. 80ll (SATO CORRELAIIOHl ITEAATION EAROR'/5X. 00017580 ・'NP固'，12，2X，J"" ，12，2X..'K='，lt/5X，'DTSAM='，E12.5， 00017590
・..2X，' DTSAT'" ，Et2.5， 21，' lERRBt=' ， 1亀，2X，'EEX='，EI2.5) 00017600
000026 IERRBl • 0 00017610
000027 RElURH OnOl7620
000028 30 If(IC2IK，Jl・TCBl 90，90，50 00017630
000029 40 lC2IK，J) • 10NB(K，Jl 00017晶‘0000030 GO TO 55 00017650
000031 50 lC2(K.JI lCB 00017660 00017670
fULLY DEVELOPEO NUClEATE BOlllNG HEAl lRAHSfEA 00017680
( JEHS-LOTTES COARELAlION ) 00017690 00017700
000032 DTSAT 11.2951'Qx.aO.25'EXP(.PPP/63.01 00017710 000033 TCD2 TSAl(K，Jl. OTSAT 00017720
0000$4 IF(ICD2.LT.IC2(K.JI) TC2(K，J) TCB? 00017730
0000J5 55 H1F(K.J) 固骨X/(TC2CK，J)-TII1(K，J，肘P)) 00017740
000036 90 REIURN 00017750
000037 EHD 0001776~
nununvnvaUAUAUAUAuaununuAUAunuauAUAUAuvnununuAυ
， .. 0n・，AU---崎，‘，SA句区
JAU
，gao
白，A0
・an，‘，aA-yaJau'geanuz
，.，g'gaoaoaO
自白aBaa-ea・m・aenvnu，nu，nu，白'n'n.，n・'n・，n・，
7
7
7
7
F
7
7
r
r
y
r
r
r
r
r
r
r
r
r
r
r
r
r
t
t
t
t
t
1
1
1
1
1
1
1
1
1
3
1
1
1
1
1
1
2
2
AUAυaunuaUAOAunuaUAUAUAUAununUAUAunununununuau
AUnunUAUAUAHVAUAuaUAUnununUAUnunuAUAUAUAUAuaunu
白リ
nuaUAUAUAUAUAuaUAUnununununununuAUAUAUhununu
，
s
-
J
，
・・
5
》
.
.
.
.
《
S
B
・E
・-，‘
B
g
I
F
奮
-
t
z
E
-
-
K
'
H
3
3
g
・'
E
M
W
E
E
---》
5
T
《
E
・・
1
1
A
・・・
2
'
H
S
.
.
，i
f
-
-
-
-
E
2
p
-
-
-
E
t
'
N
‘1
・・U
2
E
r
r
-
-
E
E
I
3
3
・・T》
Z
}
.
.
，，，.u・9&
・・
3
t
T
E
D
--・
ζavM同，，Mm
・-
1
1
】
2
A
.
.
，H1
《
R
.
.
. 》tpE》Z
，
、
，
》
軍事吻，‘ヲ‘，，q'LaMM"9z
，，‘
'
s
f
'
K
2
E
N
H
〉""
s
s
・-r
A
E
'
O
U
P
E
E
r
-
--zon
，‘Mnq'L9&AM司
'
0
・，，，e
s--ZLA"v恥
PL
，、，A"
，、nunu
g--D'
且内，Y
・T・、，n
u
v
n
v
a
n
-
-
a
a
F
E
t
'
A
2
"
E
E
E
-
-
a
》，E
》S
2
A
H
--S23Hu--
，RU
6
2
S
S
E
-
F
2
'
2
'
s
s
y
s--V27・'
E
f
u
s
-
-
-
g
E
E
'
2
2
2
"
E
5
5
-
-
E
a
s
t
2
B
n
H
2
2
2
・・L
a
'
F
'
N
'
P
2
2
7
・・E
，】
1
2
B
u
-
-
-
-
V
}
5
H
E
Q
M
S
・-，Rdf'E'A
一
2
.
.
》
E
E
E
M
E
'
3
2
1
・・2
E
V
5
0
2
P
3
8
-
-
E
V
A
-
-
T
2
C
E
3
』
E
t
e--ZLA内
UV''''νE
・a・を
dau
-
-
-
B
O
，--
3
2
0
E
2
U
1
O
E
--.，，、，崎4
・.，‘MHVA
，T
E
a
r
a
u
・2J
.、，
.. 、，q'h
・a.
，，‘，・en'司
4
M
"
司
4Auvnu
-p
・2J
2
2
'
B
'
X
E
1
3
・
--M同.，、，，，‘ミ，Mnpiu
見内E-nu
、，
nu-nu
-，‘.EE--qa偏
向
'
白
uu'Mna内
Hr
・
-
B
-
R
J
E晶
2
Q
I
J
P
1
o
s
-
-
"
-
-
-
t
t
k
k
-
0
・''c''u'''''EA00
・内・《3
・--
t
S
I
b
-
-
1
0
3
3
E
2
2
0
"
v
k
・・"“"自『Meet--H06EK
》
v
t
・EL--FLMnMnour--Mnnrν
曹曹，‘，.，
vhFLEa
--u"g
・'''''s，，，.，.，FE-----a
，‘・邑白un
-
-
-
k
e
n
S
3
u
E
E
K
・T・-E
2
v
k
b
v
v
・-Hu--u"“例
Mnu開
MVMnM岡-崎，‘，E
A
U
-
0
・0n
M
O
o
n
u
O
O
E
O
L
a
-
-E開
SMnMnMnMnMHMnMn官
ds
・4，z
-au'MnMnMnMHMHMnMnν-a
，‘
z'E'官
'
s
“n--nuvnuv向
uownunVOWEL--PLE
・0UAWEE-z'z'
gqugr・-piwrLF』
piuFlur--vR
・PEE-白
UEsnuu'u'
z
s
・a-a
s
・
a
・-E
・
g
・-，LFL
-a
内，‘，aAM可
ve--'eaenvAU
・'n，‘，dA噌ミ'to
nuauaununununuAUAU4E
‘，.a-s
・a・，.B
nunuaUAUnununuAUAHvnununUAυAUAunu
nuaUAuaunuvnUAUAU自
unununuaUAUAUAu
nuauaHWAununuAunununununuaUAunuAu
nuaunUAununuAUAUAUAUAUAUAMAununu
-81-
JAERI-M84- 162
000017 000018 000019 000020 000021 000022
000023 000024 000025 000026 000027
000028
000029
000030
000031
000032 000033 000034 000035 000036 000037 000038 000039 000040 000041 000042 000043 000044 000045 000046 00004 7
00 40 J"1,JNAX t ' PAKK.J) PSI • P a 14.2233 ISA • ISAI(K,J> JX » J JJ - J
*»»• LABUNISOV CORRELATION ««»» 10 THETA - 0.98885 > P » 0 . 3 3 3 3 3 » ( 1.0 • 0. 980665XP/HC) >»•!
OTSUB = ISA - TW?<K,J?,NP> IF(OrSUB .IE. 0.0) DTiUB = 0.0 TVC - TUZ(K,JX,n,"> CALL C0NST1(KEY3,0,C,0,1,0,0> 00NB1(K,JJ> = 145.4 • THETA * (1 .0 • <2. Sb-4*VELCTY(i:>**2> /
1 »»0.25 » (1 .0 • 15.248»CP«0TSUB/<HF6(TSA,llf,HG)«P««0.5)> " - " 2ER0 SUBCOOUNG = = = = = =
ODNBKK.JJ) = 145.4«THETAX1.0»(2.5E-4«VELCTY(K)»«2)/THETA)
• ••• H1RSHAK , 0 UK A NT ( TOWELL C0RRELAI10N »••• QBrU? * 478800.XI.0*0.001198«VELC1Y(K))«(1.0+0.00916?«0TSU
1 X1.O»0.186325»P> Q»KB2(K,JJ> = 3.154E-4 > 0BTU2
• •*« BERNAIII CORRELATION «*«• OB 11)3 = (10890. »DEF/(BEF*PFT/3.1416)
1«AL0C(PS1> 97.2*<PSI/(PSI»15.0>> -2 • ii4.0 ) QDHB3(K,JJ> 1F( 10 .ED. 1F( J .LT. P = PMIH(K) TSA = TSAT(K,JMAX*1>
1
< 48.0*VFT/DEF**0.6> » VFT/22.2 • 9./5.*TW2(K
= 3.154E-4 > QBTU3 1 ) GO TO 40 JNAX) GO TO 40
10 JJ • JHAX JX • JMAX GO 10 10
40 CONTINUE 50 CONTINUE 70 CONT1 HOE
600 FORMAT(2X
1
'NP = ,12) 610 F0RMAT(2X,I2,U,6E12.5>
RETURN END
00018000 00018010 00018020 00018030 00016040 00018050 00018060 00018070
.33333 00018080 00018090 00018100 00018110 00018120
1HEIA) 00018130 00018140 00018150
»«0.25 00018160 00018170 00018180
I) 00018190 00018200 00018210 00018220 00018230
(102.600018240 JX,NP>00018250
00018260 00018270 00018280 00018290 00018300 00018310 00018320 00018330 00018340 00018350 0001B360 00018370 00018380 00018390 00018400 00018410 00018420
CaaaaaasaaaBaaaaBaaaaBaaBaBBaaaaaaaaaaasaaaaaB* FUNCTION £TA<r«E,XS>
aaBBBBBBaaaaBBaBaaaaaaBBBBsasaaaaaaaaaassaBBSBB
•LIST OF SYMBOLS*
PS * PARTIAL PRESSURE OF WATER VAPOR XS = HUH1D1TY RATIO VS ° SPECIFIC VOLUME ETA- ENTHALPY
00000? IS'373.16 00000! IU TWt.?n.16 ooooo', X I - I S / I W 00000'.) l 'S-C.90298*(XX 1 . > >5 .02808»AI.0G10(XX) • 1.3
1314«(1. 1 . / X X ) ) - 1 . ) ' 8 . 1 3 2 8 « 1 0 . « X 3 ) X 1 O . « 2AI0C10(1.03323)
000006 l»S"10.»*PS 000007 XS^0.622aPS/(1.03323PS; 00011)8 V S " 0 . 4 5 5 « ( X S * 0 . ' J 2 2 : « T H M 0 0 . 0 000009 EIA-0.24»'Wt«(',97.3«O. «4lalWE)*XS 000010 100 KCIIIKH 000011 IHU
aaaaaaaaaaaaaaaaaaaaaaa 00018430 00018440
•aaaaaaaaaaaaaaaasaaaaa 00018450 00018460 00018470 00018480 00018490 00018500 00018510 00018520
s»aassB**xa*aaw**»«aass 00018530 OC018540 00018550 00018560
816* 10. ax.( . I) «< 10.** (11.000185 70 3.49149XXX- 1 .)) 1.) •00018580
00018590 00018600 C0018610 00018620 00018630 00018640 00018650
- 8 2 -
JA回 I-M84-162
000017 目。‘oJ'I，JN拘置 ・ 00018000000018 P • P~f (l，JI 00018010
oooon PSI • P・2‘・2UJ 00018020 000020 IS~ IS~I(l ， JI 00018030 000021 JI ム 000180・0000022 JJ • J 00018050
00018060
8・・ lADUNTSOY CORREL~IIOM ...・ 00018070 U00023 10 rHEIA -0.9888$ ・p・・0.33333・( 1.0 ・0.980665o(P/PC) )・・1.3Jl3300018080 000024 OrSUD lSA -1輔l(K.JY.MP) 00018090 000025 IF(OrSU自 _lE.0.0) OT.UB = 0.0 00018100 000026 TWC" T~ l< K.JK.nn 00018110 000027 CAlL CONSrl(KEY3.0.C.0.1.0.OI 00018120 曲目NOIlK，JJI ‘5・‘ ・IHETA' (1.0 ・(2.H-・oYELCTV(巨"'2)/1HE1A'00018130
1 ・・0.25 • (1_0 • 15.2460CP・OTSUB/CHfG(T8A.<<f.HG)'P"0.5)) 000181‘o lERO SUOCOOL1NG 00018150
000028 曲目NOI(K.JJ) • 1‘5.4・THEIA'(1.0・(2_ 5E ‘'YELCTV(K)・・2)/THETA)・・0.2500018160 00018170 ・a・・ HIRSHAK • OURAHT ， TOWfll CO同町flAII0伺 a・・・ 00018180
000029 由自 rU2 ‘78800.0(1.0+0.001198oVElC1Y(K))・(1_0+0.009162&OTSU8) 00018190 1 ・(1.0・0.186325・p) 00018200
000030 Q日脚82(K.JJ) 3.15‘E -‘・曲BTU2 00018210 00018220
・・・・ 8ERMAIII CORRElAT 10M .・g・ 00018230 000031 Q8TU3 c (10890.・OEF/(OEF+PFT/3_1‘16)・‘8.0・VFT/OEFaaO.6)・(102.6000182‘。
I&AlsG(PSJ) 97.2・(PSJIIPSJ+15.0)) -VfT/22.2 -9./5."W1U，JX，HP)00018250 2 +匂‘・o) 000182晶0
00003音 曲OMBJ(K，JJ) 3.15‘E-‘富由BTU3 00018270 000033 IF( 10 .E曲. 1 ) GO TO‘o 00018280 00003‘ 1F( J .lT. JHAX) GO 10‘o 00018290 000035 P • PH1N(K) 00018300 000036 TSA = TSAT(K，JMAXtIl 00018310 000037 10 00018320 000038 JJ = JHAX・ 00018330000039 JX • JHAX 00018340 0000‘o GO T~ 10 00018350 000041 命oCONTJNUE 000.8360 000042 50 CONT1NUE 00018370 000043 70 COHrJHUt 00018380 000044 600 FORHA1(2X，'Npc'.12) 00018390 000045 610 FORHA1(2X.J2.1X.6EI2.5) 00018‘00 000046 RETURN 00018‘10 0000・ EHO 00018‘20
c.......・....・g・....・S・S・...............・・・e・・・・・・・s・..・S・S・...・....率..00018‘30 000001 fUHCTlOII ETAcrWE，U) 00018‘40
00000'， O~UOU ，!
01J0004 OOOOO~
U00006 000007 000(08 OOOOO~
000010 000011
c......・g・..........・s・..・g・....・・・2・・.....・哩・・・....・...・s・g・-・8・・・・...00018‘50 00018‘60
'LlSl OF SYHBOLS・ 0001841000018命80
PS • PART1Al PRESSURE OF W~TER VAPOR 00018 ‘ ~O XS = HUH101 rv RAT 10 00018500 VS • SPECJF1C VOlUHE 00018510 f1A-E側IHAlPY 00018520
E・・・・g・・...r:...・g・-・・・・・・取..・...・a・.................・g・-・...・E・・・・・g・..00018530 IS'，313.16 000185命O11." lWE・?lJ.16 00018550
U-15"'" 00018560 ，'s- (.902~8'(XI 1.)・ ~.02808&ALOG10(XX).I.j816・10.-11:(-n車 110...(11_000185701 $'侮‘(¥. ¥./XI)).1.)・8.IJ28・10.・・(，l)・110.'" j.4~149.(kk.1.)).I_)'00018580 2AI OC10( 1_0H23) 00018~90 I'S“10.&・PS 00018600 15'0 .622'PSI (1. OH23' PS; C0018610 VS'O. ‘~~・ (X8+0.'>2官:.・rW/IOO.O 00018620 EIA-O.?‘・てWEt(~97 ..，・0，“1・1細El・XS 00018630
1110 Hf IUHH 00U18640 tHO 00018650
-82 -
JAERI-M 84 - 162
Caaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa 00018660 000001 FUNCTION RA(1UE> 00018670
C«s»t**s«SKaa»aitis»aiiiiaisiaaa«aa»*«Ba*a«**>»3»tillttiliail»««vs*a*ia* 00018680 C 00018690 C ' "LIST OF SYMBOLS' 00018700 C 00018710 C RA • SPECIFIC WEIGHT 00018720 C 00018730 CxKKBxxxxxxaxxxaaaaaaaaaaaaxxxxaaaxxaBBBXxxaxxxxxxxxaaaaaaaxaaaBXBaaxxx 00018740
000002 DIMENSION AA(9> 00018750 000003 DAIA AA/1.623,1.471,1.348,1.251,1.116,1.091,1.026,0.968,0.916/ 00018760 000004 IFCTVE.LT.-60.0.OR.TVE.GT.90.0) GO TO 30 00018770 000005 I = IFIXUWE/SO.OJM 00018780 000006 IF(TWE.IE.-60.0.0R.1.GE.9> GO TO 10 00018790 000007 J = 1 • 1 00018800 000008 II = (1-11x20-60.0 00018810 000009 DT = CTWE-FLOAT(II>>/20.0 00018820 000010 RA « (AA(J>-AAU>)xOT»AAU> 00018830 000011 GO TO 100 00018840 000012 10 RA - AA(I) 00018850 000013 GO TO 100 000^8860 000014 30 URITEC6,600> TWE 00018870 000015 600 F0RHAT(/m,'TVE°',F10.2, 'CALCULATION STOP') 00013880 000016 STOP 00018890 000017 100 RETURN 00018900 000018 END 00018910
CaaaaxxxxaxxaaaaaaaxaxxaxxxxaaaaxxaaaaaaaaxaawxaBaaaxaaaBaaxaaxaxaaaaa 00018920 000001 FUNCTION RAHUAL<N,TUC> 00018930
CaaxxaaaaxxxxaaaaaaaaxaaxxaaaaaaaaaaaaaaxxKKXKXxxxaaaaxxxaaaaxxxxaaaaaa 00018940 C 00018950 C THERMAL CONDUCTIVITY OF U-AL ALLOY MA»0 00018960 C THERMAL CONDUCTIVITY OF U-ALX DISPERSION HA°1 00018970 C UOENST ° U-DENSITY (G/CM3) 00018980 C POROTY = FRACTIONAL POROSITY (DIHENSIONLESS) 00018990 C 00019000 CXKXXBXaxaaaaaaxxxxxaxxxxaaxxxxxaaxxXKxxxxxxaaaaaaxKKaaxxxxxxxaaaaxKKxa 00019010
000002 COHHON /UAL/ HA<5),UDENST(5>,POR0TY<5> 00019020 000003 IF<HA<N>-1> 5,25,25 00019030 000004 5 IF(TUC-640.) 10,10,15 00019040 000005 10 RAHUAL-0.415-1.E-4XTUC 00019050 000006 GO TO 100 00019060 000007 IS RAHUAL-0.137 00019070 000008 GO TO 100 00019080 000009 25 WT - UDENST(N)/(2.7a(1.O-POROTY(N))t0.8«U0EHST(H)) 00019090 000010 RK1 - (2.16546-2.7625XVT>X0.2389 00019100 000011 RAHUAL * RKl'Cl.0-POROTY(N))«'!.5 00019110 000012 100 RETURN 00019120 000013 END 00019130
000001
000002 000003 000004 000005 000006 000007 000008 000009 000010
CaaaaxxxxxxaaaaxaaaaaiaaxKXX -«xx«ax«aa«aaaaaaaaxxxaaaxa«#aaaaaaxxaxaaa 00019140 FUNCTION RANAL(TCC) 00019150
Cx«»aa«»vXKaxxBxxaaaaaa*aKKxaaxxxaaaaasaaaaa«Baaaxaxx(-xaaa**'«aa»XBxaxaa»00019160 C 00019170 C IHERHAI CONDUCTIVITY OF ALUMINUM 00019180 C 00019190 CaaBXBX8aaxaaaaaaaaaaaBKXXxaxxxaxxaaaaaaaxaaaaaa«axaaaaaaaaa«aaxxaaaa»aa00019200
0IMCHS10H A<4> 00019210 DATA A/0.39,2.22E-4,-3.76E-7,2.42E-10/ 00019220 RAHAL'O.O 00019230 00 10 1-1,3 00019240 J'l't 00019250
10 HAHAI.'RAHAL«A(J)*TCCaa<|-l) 00019260 RAHAl«RAHAL«A<1> 00019270 RETURN 00019280 END 00019290
- 8 3 -
JAERI-M 84 -162
CI・・.・...・E・...・R・E・....................・・・・a・.，.・・・e・・.....寧事・・害事・，.軍事"00018660 000001 FUHtTIOH RAtlWE) ・ 00018畠10
000002 000003 000004 000005 000006 000001 000008 000009 000010 000011 000012 000013
00001‘ 000015 000016 000011 000018
c...........・a・-・事軍事事・・s・a・ ...II~....・・s・・・・・・・・・η000・..............・・・・ 00018680 t 00018690
. .U ST OF SYHOOlS. 00018700 00018710
RA • SPEtlFIC WEI6KT 0001872日00018730
C.・s・-・2・・・・・・s・・・・・g・・・・・・..・寧.............・・s・a・....・a・...・・・・s・‘・....00018140 DIHfNSION AA(9) DAIA AA/l.623 ， 1.411 ， 1.3~8 ， 1.251 ， 1.116 ， 1.091 ， 1.026 ， O.968 ， O.9 161
IF(TWE.ll.'60.0.0R.l旬E.61.90.0)60 10 30 1 • IfIX(TWf/20.0)+・IF(IWE.lE.-60.0.0R.I.6E.9) 60 10 10
J • 1・211 (1-1).20-60.0 01 (IWE-FlOAl(!!))/20.0 RA • (AA(J) -AA<l)).Dl+AA(J)
60 10 100 10 RA AA(I)
60 rO 100 30 WRITE(6，600) lWE
600 FORHAl(115X，'IWE='，Fl0.2，'CAltUlAIIOH SIOP・》SJOP
100 RElURH E刷。
00018150 00018760 00018710 00018180 00018790 00016600 01>018810 00018820 00018830 00018840 00'01885日000:6860 00018870 000188110 00018890 00018900 00018910
C.・・・・事・g・・・・..................・・・・・事事軍事・・・・・.......・s・g・.......・......00018920 000001 FUNtllOH RAHUAl(N，IUt) 00018930
c・・・・・・・・.................・g・...........・g・.........・・・..・.....・S・S・-・・ 000189‘。00018950
lHf目HAl COHDUtllVJIY OF U'Al AllOY 例A回 o 00018960 lHEAHAl tOHoUCrlVJTY OF U-AlX 01SPERS10N HA包 00018970
UOEHsr 白 U-OEHSITY<6/CH3) 00018980 PORorv = FRAtrlOHAl POROSITV (DIHEHSI0HlESS) 00018990
00019000
E・E・..............・・・・・・・g・・・・・・・・・・s・B・S・S・-・2・・・・・s・・B・S・S・..........00019010 000002 COHHOH IUAll HA(5)，UOEHSr(5)，POROTY(5) 00019020 000003 IfCHACH)-1I 5，25，25 00019030
00000‘ 5 1FtlUt-6‘0.) 10，10，15 000190‘0 000U05 10 RAHU且t・0.415・1.E-‘・lUt 00019050 000006 GO 10 100 00019060 000007 15 RAHU且L=0.137 00019070 000008 60 10 100 00019080 000009 2S Wl' UOENST(H)/(2.7.(1.0・POROTY(H))・0.8・UOENSτ(H)) 0001曹090000010 Rkl • (官.16546・2.162s.wn.0.官389 00019100 000011 RAHUAl • RkIICI.O・POROlY(H)).・1.5 00019110 000012 100 REIURH 00019120 000013 EHD 00019130
t..寧・・・・z・・s・・・・・・・・・・・・..*a............................*.....~.・a・.... 00019140 000001 FUNtllUH RAHAl tlct) 00019150
000002 OOOOOJ 00000命
000005 000006 000001 oooooa 000009 000010
c..........・S・S・.......s.虚血E・.....・s・................，......t......・s・・・0001916000019170
lHERHAI CO削)UCTJVIIVOF AlUHINU例 0001918000019190
E・・・・B・・・・・・s・・・・・・・E・・・・・・・...・..................*..............・・・・・・・00019200OIHEHSI日HA(4)
DA/A A/0.J9 ， 2.22E'~ ，・ 3.16['1 ， 2. ‘ 2E ・ 101日AHAl'O.OB日 10 1'1，]
J'/・110 RAHALoRAHAl+A(J)・ICC"U-1)
自AHALo/l且H且ltA(1)
IIfTU宵HEND
-83-
00019110 00019220 00019230 00019240 00019250 00019260 00019710 00019280 00019290
JAERI-M84-162
CBaaaBBBaBaaBBBBBBBBBBBaasaaaaaaaaaaaaBaaaBsaBBaaBBBBBBBBBaaaBBBsaaaBaBaoOO19300 0O0D01 FUNCTION RAHBOD(IBC) 00019310
CaaaaaaaBaa88BBB*BBKBBaBBaaBaaaaaaaaa*aaB*BBB8BBaBBBBBS**B*Bxss*»Bs*»**aOOG193?0 C 00019330 C THERMAL CONDUCTIVITY OF OONOING LAYER 00019340 C 00019350 C8aaaaaaaaaa8aa8BBBBBBB8XB*xaa88aaaaaa88BB8888B*B**««*B88B**B888aaa»a**x00019360 C THERNAL CONDUCTIVITY OF HELIUM GAS 00019370 C RAMBOD » 0.53E-6aTBC»3.44E-4 00019380 CBaBBasaaaaaaaaaBaaaBBssaaaxaaaaaaaaaBsaaBBBBsaaaaBBsaaaaxxaaaaxaaaaBBBB00019390 C THERMAL CONDUCTIVITY OF XENON GAS (CAL/CN.SEC.C) 000191100
000002 RAMOOO * 0.123B04E-4 » 0.593796E-7«T8C - 0.37228E-10aTBC>>2 00019410 000003 RETURN 00019420 000004 ENO 00019430
000001
000003 000004
CBBBBasxaaaaaaaasBaaBaaaBaaaaaaBBBSaaaaaaaaaaaaaaBBaSBSBBBBBBBBBBBSBBaaBOOO19440 FUNCTION RAHFKREY) 00019450
CBBBss88asaaaaaassa8B8i*BS8a88a**«88**c*csairaaaa888*888a*888a8888Bxx88»B800019460
VAIL LOSS FACTOR CALCULATION
IRAMf BLASIUS
00019470 00019480 000194 90 00019300
C 00019510 CBBBBBBBBsaaaaaaaaa88B88aaaaaaas888B888aaaaaaaaaaBBBBBBBBB8B8888S8asaaax00019520 C 00019530
RANF1 * 0.3164«R£Y«<-0.25> 00019540 C 00019550
RETURN 00019560 ENO 00019570
000001
000002 000003 000004 000005 000006 00000? 000008 000009 000010
000011 000012 000013 (100014 000015' 000016 000017 0000 IB 000019 000020 000021
CaBBBasaaaaaaBasaSBBBB8aaaaaasa8BBaBasaaaBBBBBBB8BaBB8BaaBaaaaa8BB8BB88B00019580 FUNCTION RAHF2CREY) 00019590
Cs8B8sss88a«aa88aB8xx***xaaa*xx*8rcHaaa*xa8xaaaasaa**8*8ar-.ria»*a8XBx8X8800019600 WALL LOSS FACTOR CALCULATION
IRAMF • 1 ** KALHAN-NUURAUZE a* REGURA-FALSI-HETHOD HI YORI F(Y)'0 NO VON 0 NOTOMERU
50 F<Y> • -O.A XI - 0.008 X2 - 0.05 E 1.E-5 N • 1 At FUI> A? - F(X2> FID - A1 B ftj IF( FF12 > 100.200,900
• 2.0«AL0010(REYaS8RT(Y)) - 1.0/S0RT(Y>
XJ ( X2BA1 A3 FCX3) AA.< AII5 i A3) IF ( AA3 .11. IF < N N ' N l I FFI3 • A1 JF ( (ll.f .11. 0.0 XI • X3 A1 » A3 GO 10 100
X1<A2 > I (A1
( > GO TO 300 GF. 200) GO 10 400
A3 > Gl) 10 500
00019610 00019620 00019630 00019640 00019650 00019660
IB00019670 00019680 00019690 00019700 00019710 00019720 00019730 00019740 00019750 00019760 00019770 00019780 00019790 00019800 00019810 00019820 00019830 00019840 00019850 00019860 00019870 00019880 00019890 00019900 00019910 00019920
- 8 4 -
JAERI-M 84 -162
c....・・.........~....*.....・...・・・・・・・・a・・s・・..............，.，.~事専・・=・・.00019300000&01 fUHCTIOH RAHBOD(I自tl ・ 00019310
C...・・........富庫庫町・・・・・.........・a・..............・g・-・.............・....00019320t 00019330
rHERHAL tOHOUCTlVITY OF 00“DIHG LAYER 000191~0 00019350
E・・.........・a・..・a・..，.・・・....・・・・・......町......・・r.......・E・.............000193晶OTHERHAL COHDUCT'VITY Of HELIUH GAS 00019370 RAH80D • 0.53E・6'UC・3.“E-‘ 00019380
C.‘・g・......................・a・......・・・・・・E・・・・・8・・.......・a・........・・00019390rHE自阿Al COHOUtTlVITY OF XEHOH GA5 ICALICH.SEC.CJ OOOI9~OO
000002 R角阿自00 • 0.12380‘E-4 ・0.593796E・7'T自E・0.37228E・10・r8C..2 00019410 000003 RETU同制 000194企0OOOOO~ EH目。0019430
c...................・・・・..・.......・s・...・・2・・・・u・....1:・・・・..・s・..・E・""00019“0000001 FUHCIIOH RAHFtlREYl 00019‘50
c.....・・・.......・a・.....・E・u・・...a...c...................・S・S・.....・a・uOOul9‘品。00019‘70
WALL LOSS FACTORιALCULATlOH 00019‘80 00019‘90
IRAHf : 0 •• BlAS1US •• 00019500 00019510
E・R・.....・a・....・・s・a・....・・・8・・・・..・・・・・・s・・・..................・.......0001952000019530
000002 RA阿F1 0.3164・Rn..(・0.25) 000195‘。00019550
000003 RETURH 00019560 00000‘ f HO 00019570
c................富・・s・・・・a・.....・・・・・・・・..・...・・・..・E・....・・・・..・-・・・思慮.00019580000001 FUHCrlOH RAHF2(REY) 00019590
E町・・・・・・・・・・a・.....・g・...........r:......・..・g・............忌""'......・....・0001960000019610
WALL LOSS FAtTO~ CALCULAT10圃 0001962000019630
C lllAHF 0 1 ・・ KUH~H' lI l I:UIIIIUZE •• 000196‘o REGURA'fALSI-HEJH日D"1 YOI. f(YI・o"0畦0"0 HOJO"ERU 00019650
00019660
c.........・・・s・g・..・・2・・a・・・・・s・・・・・・・・・8・・・・・・・・・・・・・・・・・・・............00019670C 00019680
000002 50 F(Vl • -O.~ ・2.0・ALOG10(REV・SQRT<Y))・1.0/5曲目T(Y) 00019690 000003 kt • 0.008 00019700 00000・ u ・0.05 00019710 000005 I.E-5 00019720
00019730 0000U6 H . 1 000197‘。
000197~0
000U07 AI I(M" 00019760 000008 ^~ -.(X21 00019770 OOOOO~ fl12 喝 1・A1・ 00019180000010 lf( 1ft2 ) 100 ， ~00 ， 900 00019790
00019800 000011 100 IJ (X2・AI Xl ・ A~ 1 I (角 A21 0001'1810 000011 AJ t(Xll 00019820 000013 M.I AIJS'AJI 00019830 ooao 14 I f ( AIIJ • L t. f) GO TO JOO 00019且。。000015 lt ( " .Gf. 200) GO 10‘00 00019850 000016 N • N I 1 00019860 000017 rrll . AI • <¥_1 00019870 000018 n ( H.l.i .11. 0.0 ) GIl 10 500 00019880 000019 Xl o U 00019890 000020 <¥ 1 • A_I 00019900 0000官1. GO 10 100 00019910
00019920
-84-
JAERI-M 84 - 162
0 . 0 > CO TO 7 0 0
000022 900 X? = X3 000023 A? « A3 000024 GO 10 100
C 000029 200 IF ( A1 .ED. 000026 RAHF2 » X2 000027 CO TO 999
C 000028 700 RAHF2 = XI 000029 CO TO 999
C (100030 300 RAHF2 » X3 000031 GO TO 999
000032 400 RAHF2 • X3 000033 WR1TE<6,611> N,RAHF2, A3, REV 000034 610 F0RNAT</3X,'ITERATIONS ARE FAIL
» 'N",I4,3X,'RAHF-',E12.5,3X,'F 000039 GO TO 999
C 000036 900 VRI1E(6,620) XI, A1, X2, A2 000037 620 F0RHAK/3X, 'INITIAL VALUE ERRUR
• "X1*',E12.5,3X,'F<X1>°',E12.5, C
000038 999 RETURN 000039 END
ED AT FUNCTION RAHF' <X>»',E12.9,3X,'RE='
, 3 X , E 1 2 . 5 V
AT FUNCTION RANF 3X, 'X?= ' ,E12.5 ,3X,
3X, F<X2)=
00019930 00010940 00019990 00019960 00019970 00019980 00019990 00020000 00020010 00020020 00020030 00020040 00020090 00020060 00020070 00020080 00020090 00020100 00020110 00020120 00020130 00020140 00020190 00020160 00020170 00020180
000001
000002 000003 000004
CBBB88aaaa888BBB8B8aa8aa8BB8BBaB8aaaaaaa8«BBBBa888a«8aaa8a*aaaBB88BBBBsa00020190 FUNCTION TSATH(PPP) 00020200
CBBBBaaa»a»*BBBBBBBaBSaasBBBSSssaBsaaaaaB*BBBBBBBBBBBaaBasaaaaaBBBBBBBKB00020210 C 00020220 C SATURATION TEHPERTURE OF LIQUID WATER 00020230 C 00020240 CaBBBBaaaaaaBaaBaBaBaaaaaaBBSsBB*B8aaaaaB*BBBBSBSBS««BaaaaaaaaaaBBBBBBSB00020290
IMPLICIT DOUBLE PRECISION (0) 00020260 OIHENSION 01(8,6),02(8,6),0AC8) 00020270 CQHHOH I MHO I JMAX,KEY(3> 00020280
CaaaBBBaaaaaaasBBBBBaaaaa H20 a8a8aaaaBa8BaaBBBBB«BsaaaBBaaaaaaaBBBBaa0002029O 000203QO
-0.3098427809200+4, 00020310 0.6713401681770*9,
0.1 -- 0.5 KG/CH2.A OATA 01/0.1286614906510*2, 0.5333059759000*3,
0.1345330203860*5, -0.3823381608200*5, -0.6589979605020*5, 0.2760266960770*5,
0.5 -- 1.0 KG/CH2.A 0.4271926408940*2, 0.1129634252960*3, -0.9S4S664S7568D*2, 0.4961375546440*2, -0.1072085002190*2, 3>0.00,
1.0 -- 3.0 KG/CH2.A 0.548361060344D*2, 0.684879427607D*2, -0.3379028310820*2, 00020360
0.1153357192210*2, 0.2189991228290*1, 0.17414449867700, 2aO.00,00020390
00020320 00020330 00020340 00020350 00020360 00020370
3.0 -- 5.0 KG/CH2.A 0.?80690227348D*2, 0.2835484364520*2, -0.4580372543850*1 0.46633138285200, -0.2002538226080-1, 3>0.D0,
5.0 -- 20.0 KG/CH2.A 0.9120783084370*2, 0.1882718318880*2, -0.1975866759500*1 0.15377334685400, -0.742089703825D-2, -0.2230613856900-5, 0.00,
20.0 - 50.0 KG/CM2.A 0.1179101648690*3, 0.8738220427420*1, 0.103548'. 187450-1, -0.1917812904120-3, 0.8595225672180 8, 0.00/
aaaaaaaaaaaaa 020 aa«aa»BBaaaaaaaaa«»: 0.1 - 0.5 KG/CH2.A
00020400 00020410 00020420 <<J020430 00020440
1980930833690-3, 00020490 00020460
- 000204 70 00020480 00020490 00020500 •00020510 00020520
34800376614900, 1972661648750 5,
DAIA 02/0.1534184290950*2, 0.5205663538960*3, 0.299856836237014, 00020530 0.1288444494210*5, 0.6093737736560*5,
0.5 • i O.I8341OO2S7350I3, 0.1487964843350*5, 0.8309757964490*4,
1.0 - 3 0.5001514350430*?, 0.4047'/566949i0'?, 0.56072121837500,
0.3619662325420*5, 0.2523996955450*5,
,0 KG/CH2.A 0.1319131736310*4,
0.2120046396040*5, 0 1638737236030*4,
0 KC/CH2.A 0.9086629109190*2, -0.1S»5J0?7122JD»2, 0.34J753288709D-1,
0.628O75246O3|0*S,
0.6I4I4/)915«4?B*4, 0.1789765824850*5.
-0.688647362822D*2, 0.3964536526010*1,
3.0 -• 5.0 KC/CM2.A
00020i4O 00020550 00020560 000205 70 00020580 00020590 000->"">n 00020610 01''20620 00 20630 00020640
- 8 5 -
JAERI-M 84 -162
000022 500 X? Xl 00019930 000023 A? = Al OOOl唱94000002‘ GO 1日 100 00019950
00019960 000025 200 If ( Al .EQ. Q.O ) GO 10 700 00019970 000026 RAHf? = X官 000199800000官 GO10 999 00019990
00020000 000028 700 白島Hf2 • Xl 00020010 000029 GO 10 999 00020020
00020030 ('00030 300 AAHf2 • X3 000200‘O D00031 GO 10 999 00020050
00020060 000032 ‘00 RAHf2 • X3 00020070 OOOOJJωA1IE(6，61G) H，RAHf2， A3， REY 00020080 00003命 610fOAHAI(/3X，'IIERAI10HS ARE fAILEO AI fUHCI10H AAHf'，3X， 00020090
・ 'H=" ， l 命， lX ， 'RAHF~' ， Et2.5 ， lX ， 'f( 調)1:I'， E1 官 .5 ， lX ， 'AEc' ， Et2.5) ・ 00020100
000035 GO 10 999 00020110 00020120
000036 900 WR1IE(6，620) Xl， Al. X2. A2 00020130 000037 620 fORHAI(/3X.'IHIIIAL VALUE EnRUR AI FUHCI10H AAHf '3X. 000201‘。
• 'X 1-' • E 12.5，3 X， 'f (X J)" . E 12.)， lX， 'X?， . E12. 5， lX，' f <X 2) =' ，E 12.5) 00020150 00020160
000038 999 RflURH 00020170 000039 ENO 00020180
c............・E・..・・・・・・a・E・・・・・・・・・・....‘・・・B・s・.....・・・・・・・・・・・......・00020190000001 FUHCI10H ISAIH(PPP) 00020200 c.....・.......・・B・S・S・....・・......・・・・s・s‘・..・・・・.........・・・・・........・00020210
00020220 SAIURAIIOH IEHPERIURE OF LIQU10 WAIER 00020230
000202命O(..............・s・・・・・・・・・・・・・..a........・s・g・...................・・・・B竃'00020250000002 JHPLJCJI OOUBLE PRECJSJOH <01 00020260 000003 OJHEHSIOH 01(8.6)，02(6，61，OA(81 00020270 00000‘ COHHOH IHHOI JHAX，KEY(31 00020280
c...........・・・a・・・・・・・・ H20 ・・・・・・s・・・・・・8・・........・・・・・・8・・・・・e・a・000202~0ーー.......0.1 .• 0.5 KG/CH2.A .....・・・・・・・ー，・ー・・・・ーーー・・・・・ 00020300 000005 OAIA 01/0.128661‘506510・2，0.5333055759000+3. '0.3098命27805200+4，00020310
0.13命5330203860+5，，0.3823381608200+5， 0.6713‘01681770+5， 00020320 ・0.658997960502D+5， 0.2760266960770+5. 00020330
•••••••••• 0.5 .. 1.0 KGパ:H2.A・・・・・・・・・・・・・・・・ー・圃圃・・ーーー・・ー 000203‘0 O.命271C26‘089‘0+2，0.112963‘252960+3，・0.95‘866‘575680+2，00020350 O.‘9613755‘6.‘0・2，・0.10720・5002190+2，3・0.00. 00020360 --------・・ 1.0 ・・ 3.0 KG/CH2.A ...............・ー・..........00020370 0.5命83610603“0・2，0.68‘879‘276070+2， '0.3375028310820・2，00020380
0.1 U3357192210・2，・0.2189991228290・1，0.17‘t“‘5867700， 2・0.00，00020390-・・・・・・・・・ 3.0 ・・ 5.0 KG/CH2.A ........・・・・・・・・・・ー・・・・・・...00020‘00 0.7806902273‘80+2， 0.2aJ5‘U36‘520+2，・O.‘5803725‘3850+1，00020‘10
8 O.‘6633158285200，・0.200253822608D'I，3・0.00， 00020420 .......... 5.0 ・・ 20.0 KG/CH2.A ...ーー-~ .. . .. . .. -ー・・・・ーーーーーー・ . ~;'020‘ 30 O.9120783~8437D+2 ， 0.1882718118880+2， '0.1975866759500+1， 00020“0 0.15377]3‘885400， '0.7‘20897038250'2， 0.1980930833690'3， 00020‘50 '0.2230613856900・5，0.00， 00020.60
ι ・・・ー.....20.0 ・50.0KGICH2.A •. .ーー‘ ・ ・00020470 0.11791016~8690 ・ 3 ， 0.8718?2Q‘2742P・" '0.3 ‘ 800J7661~900 ， OOOlO命800.1035‘6'，167令官0'1，・0.1917812904120・.1，0.19726616‘8750-). 00020~90 0.8595225672180'8， 0.001 00020500 r.....................・・・・ 02U ・・・・・・・・・・・・・・・....................・a・-・00020510
E ・←ー.0.1 .. O.~ KGICH2.A ー四 ・・・・・吋 ・・ 0(1020520 OOOOOb onr凸 02/0.153418命290950・2.0.5205663536960・3. 0.2998~68J62l70 ・ 1，. 00020530
0.1288““ 9~210 ・ 5. ・0.3619662325‘20・5，0.62807 当 2~(， 0 ]J O ・市 00020~~O'0.609H11736~6Ð・~， 0.2523996955‘50・5， 00020550
0.5
-85-
JAERI-M84-162
0.690888/245470>2, 0.2689433769900H, 0.103669644 24 20-2 ,
5.0 20. 0.8854909570310*2, 0.262947085O63D0, 0.1613216437910-4,
20.0 - - 50.0 KG/CH2.A 0.1202266224600*3, 0.8497914684530*1,
0.41/4389214/31)12, 0.378450/4187700,. 0.00, .0 KG/CH2.A 0.2114000506920)2, -0.1717191S11B1D-1, O.159731B38B4O0-6,
0.1216499721-1/0*2, 0.3017355900350 1,
» 0.115133502111D-1, « -0.293731197405D-7,
000007 OATA 10/0/ 000008 0* ' OBIE(PPP) 000009 10 " 10 • 1 000010 IMPPP.LE.0.5) THEN 000011 IC ' 1 000012 ELSEIF<PPP.LE.1.0) THEN 000013 1C ' 2 000014 ELSEIF<PPP.LE.3.0> THEN 000015 IC = 3 000016 ELSE1F<PPP.IE.5.0> THEN 00001/ IC -- 4 000018 ELSE1F<PPP.L£.20.0) THEN 000019 1C - 5 000020 tlSElF<PPP.lE.50.0> THEN 000021 IC - 6 000022 ENDIF 000023 1KI0.GE.21 GO TO 50 000024 ICC • IC 000025 GO TO 70 000026 50 IF(IC.EQ.ICC) GO TO 80 000027 ICC * IC 000028 70 DO 75 1=1,8 000029 DA(I> = 01(1,10 000030 1F(KEY(3).EQ.1) 0A(1) 000031 75 CONTINUE 000032 80 DY • 0A(1) * DA(2>>
1 « DA(5>«0X«»4 • 000033 TSATH • OY 000034 RETURN 000035 ENO
-0.2563743853230-3, 0.103683900309D-9/
2676364994550M, 7006905666960-3,
0.35011993870500, 0.3626301447250-5,
• D2(I,1C)
DX • DA(3)*DX>>2 * DA(4)>0X»3 DA(6)«0X«»S * DA(?>«0X««6 » 0A(8)>0X»7
00020650 00020660 00020670 00020680 00020690 00020700 00020710 00020720 00020730 00020740 00020750 00020760 00020770 000207BO 00020790 00020800 OOC 9B10 000.J820 00020830 00020840 00020850 00020860 00020870 00020880 00020890 00020900 00020910 00020920 00020930 00020940 00020950 00020960 00020970 00020980 00020990 00021000 00021010 00021020 00021030 00021040 00021050
000001
000002 000003 000004
000006
FUNCTION HFG(TSA,HF,HG> C«*>M«»»»»»*»»»»»«aa«»««aaa«»ai»»»»»«»a»»«»»»»aaa»aaaaa««Eaa««»aaaaa c C IIFG ° HEAT OF VAP0URIZAT10H < 1120 t D20 > C I1F * ENTHALPY OF SATURATED LIQUID ( // > C HG *• ENTHALPY OF SATURATED VAPOUR ( // >
IMPLICIT DOUBLE PRECISION (0) DINENSION 0H1 (4,4),0112(4,4>,001 (4,4),002(4,4) COMMON /MHO/ JMAX,KEY<3>
CCCCCCCCCCCCCCCCCCCC H 2 0 CCCCCCCCCCCCCCCCCCC
OAIA 0111/ I
a aaa SATURATED LIQUID • 2.0 80.0 C
0.7953644B5O550-4, 0.1003710742270*1, 0.1399863221480-3, 0.1160699924390-5,
80.0 - 170.0 C O.1O15118395490M,
(H20) aaaaaaaaaaaaaaaaaaa
2 0.4191505827510*0, 3 0.2233857808860-3,
170.0 - 240 4 0.652404329005011, 5 0 .989?53?46/ '54O-3,
7 4 0 . 0 320 6 0.160/761904/00*3, / 0.8031168831170-2,
n u i w u i i i i M SATURAUO VAPOUR 2.0 • 60.0 C
OAIA 1)112/ 0.5974B6566C.190'3, 0.43/9465024910*0, 1 0.9004637782960-5,-0.2206515760*30-5,
BO.O UO.O C
1233877233880-5, C
1512176/67 /U ' l , 267929292929B-5, C 2943229040400*1,
0.119217171717D-4/ (1120) •••
00021060 00021070
••.•00021060 00021090 00021100 00021110 00021120 00021130 00021140 00021150 00021160 00021170
CCCC00021180 •00021190 00021200 00021210 00021220 00021230 00021240 00021250 00021260 000212/0 00021280 00021290 00021300 00021310 00021320 00021330 00021340 00021350 00021360
- 8 6 -
]AERI-M 84 -162
9 0.b~086K(14)~lU ・ 2 ， O.~ l1亀 J8921Hjll ・ 2 ， 0.1216499'(21・170・1，000206)0 0.2689433769900・1，0.378‘501‘1817UO，ー 0.30173559003)01. 00020660 0.10 ，166964~?HO-2 ， 0.00， 00020610
ラ.0 20.0 KG/CH2.A も 000206600.6654909510310・2， 0.211命000506920・2， 0.267636499~550 ・ 1 ， 00020690 0.26294706506300， -0.1717191511610-1， 0.700690566696目白3，00020700
・ 0.1613216437910・4， 0.1597318]66‘00-6， 00020710 一一ーー ・ 20.0・-50.0 KG/CH2.A -ーー・・ ーーーーーー・ー ー悶悶- - - 00020720
0.1202266224600+3， 0.8‘9791‘d8‘5JO+I， -3.35011993870500. 000207JO ・ 0.115IJJ5021110'1， -0.256J743453230・3， 0.3626301447250町吉 . 000宮0740・ '0.2937JI1974050'7，0.103683900]090・91 00020750
000007 OATA 10/01 00020760 000008 OK OBlf(PPP) 00020770 000009 10 • 10 • 1 00020760 000010 If(PPP.LE.0.5) THEH 00020790 0000，11 1 C • 1 00020600 000012 fLSElf(PPP.LE.l.0) THEN OOC 0610 000013 IC • 2 OO~ ‘ J620 00001・ ELSElf(PPP.Lf.3.0)THEN 00020630 000015 IC • 3 000208~0 000016 ELSElf(PPP.Lf.5.0) IHEH 00020650 000011 IC 00020660 000018 ELSElf(PPP.lf.20.0) IHEH 00020870 000019 IC 忌 00020660000020 tLSElf(PPP.lE.50.0) IHEN 00020690 000021 I[ ι6 00020900 000022 ENOlf 00020910 000023 If(10.GE.2) GU TO 50 00020920 0000官。 ICC・IC 00020930 000025 GO 10 70 00020940 000026 50 If(IC.EQ.ICC) GO TO 80 00020950 000027 ICCむ IC 00020960 000028 70 00 75 1-1，8 00020970 000029 OA< Il 01< 1，1 C) 00020980 000030 If(KEY(3).EQ.l) OA(I)・02(1，IC) 00020990 000031 75 CONTJHUf 00021000 000032 80 OY ・OA(I) • OA(2).OX + OA(3)・OK"2 • 0晶(4).OX..3 00021010
2 ・DA(!i)-OX..‘ . 0A(6)・01..5 • OA(7).OX..6 • OA(8).OX・・ 00021020000033 TSAIH • OV 000?1030 0000]‘ RElURN 000210‘0 0000]5 ENO 00021050
C...・・s・..・・・・・・・・・・・e・e・...........................・・・・・・・・..・S・S・...・・00021060000001 fUHtTION HFG(TSA，HF，HG) 00021070
c.・e・.............・E・..・・・・・・・ι.....・....・g・....・・・a・・・..・g・S富・・・...・2・・00021080C 00021090 正 IIFG. HEAT OF YAPOURIlAT10N ( H20 畠 020) 00021100 C Ilf ‘ EHTHALPY Of SATIIRATED LIQUIO 11 00021110
HG ‘ ENTHALPV OF SATURATED VAP目UR 11 00021120 C 00021130
E・........・・・・・・・・・・・・・・2・・・・・・z・・...............・e・..................・・・000211‘0000002 IHPLICII DOU目LEP凪EC1SIOH(0) 00021250 000003 OlHEN~lON OHI(4，‘)，OH2(4，‘)，001<‘，‘)，002(4，4) 00021160 000004 CO""OH '""01 JHAX ，KEV(J) 00021170
CCCCCCCCCCCCCCCCCCCC H ? 0 CCCCCCCCCCCCCCCCCCCCCCC00021180 c........................ SATUAAJEU llQUID (1120) ・s・・・s・・・・・・・・・・・・・・000211902.0 80.0 C ー・・ー ー ・ 00021200
~OOOO) O' DlIlJ 0.79536‘4850550・‘， 0.10037107‘2270・2， 00021210 0.IH986]222480・3，0.116069992‘390・5， 000212~0
80.0 ・170.0C ・，ー 00021230O.命191505827510・O. 0.1015118395‘90・1， 000212~0 0.223365780866白-l， 0.1官3J8772lS880'5. 00021250
170.0・ 240.0 C ー ・・・・ 00021260 O. I> ~240司 32旬。050". 0.11~12176161(U・1，、 OOO?I? 7G0.'IH'I7H?4615・O-j， 0.2679~9292929D・~， 00021280
v‘0.0 320.0 C 司・・・ ・ー 00021~90 0.1601161904160・3， 0.29・37290‘0400'1， 00021300 0.80Jll~88lI170 ・ 2 ， 0.11921711官(110・41 00021310
C'・E・g・...・・・・・・・・・・・・・・・ 5血TURAltOYAPOUR (11201 .・・・・・・・・・2・・・・・・・・・00021320・2.0'・ 811.0r.・ー ー・・ ・・ 00021]]0
000006 OMA OtlU 0 ， )91'‘ 8b~U~190 ・ 3 ， O.‘319‘6502‘9.0・0， 0002.]40 0.900‘b3718?96D・-5，・0.2206515780530'事 00021HO
80，0 110.0 C 00021j60
-86-
JAERI-M 84 - 162
000009 000010 000011 000012 000013 000014 00001S 000016 000017 000018 000019 000020 000021 000022 000023 000024
2 o, ,5980046386950<3, 3 0, .19702797202803, 170.0 -- 240
4 0, .6073194372290*3, 5 0. .1112445887450-2, 6 0. 8431014285710*3, 1 0. 1223704906200-1,
4210238927740*0, 292540792541D 5, C 261817O99567D<0, 4696969696960-5, C 254049663300D*!,
cccccccccccccccccccc Caaaaaaaaaaaaaaaaaaaaaaaa
0 2 0 SATURATEO LIQUID
ccccccc 5.0 -- 80.0 C
DATA OOW-0.3871953819280*1, 0.1016059835010*1, 1 -0.2122963244760-3, 0.756O20463645D-6,
80.0 -- 170.0 C 2 -0.4955886002890*1, 0.104693407888D*1 3 -0.4831168831170-3, 0,
--• 170.0 -- 240.0 4 -0.1562981385280*2, 0, 5 -0.175919913420D-2, 0.
240.0 -- 320.0 6 -0.2012253809520*3, 0, 7 -0.965599927850D-2, 0.
142760942761D-5, C 124799779942D*1, 415404040404D-5, C 3348076936030*1, 140210437710D-4/
Caaaaaaaaaaaaaaaaaaaaaaaa SATURATEO VAPOUR aaaaaaaaaaa 5.0 -- 80.0 C
DATA DD2/ 0.552560120436D*3, 0.419518286313D*0, 1 0.2847021132120-3,-0.4553710202700-6,
80.0 - 170.0 C 2 0.5529894125S7D*3, 0.4044184149180*0, 3 0.1086247086250-3, 0.1130536130540-5,
170.0 -- 240.0 C 4 O.661039761905D*3, -0.1448734126980*1, 5 0.104488095238D-1, -0.2111111111110-4,
240.0 •- 320.0 C 6 0.1002377142860*4, -0.5139579966330*1, 7 O.2299559884560-1, -0.3399831649830-4/ OX -- OBLE(TSA) IFCTSA.LE.80.0) 1C * 1 1F(TSA.GT.80.0.AND.TSA.U. 170.0) IC » 2 1FUSA.GT. 170.0.AHD.TSA.IE.240.0) IC - 3 IFUSA.GT.240.0) IC = 4 IF( KEY(3) .ED. 1 > GO TO 20
0Y1 » 0N1(1,1C) * DH1(2,IC)S0X 0Y2 - 0N2(1,IC) • DH2(2,IC»a0X
0111(3,lC>a0Xaa2 0112(3,1C>«0X"2
GO 10 50 20 DY1 • 001(1
0Y2 50 HFG
HF HG RETURN END
IC) • 002(1,10 • 0Y2 - 0Y1 " 0Y1 - DY2
DD1(2,IC>«0X 0D2(2,IC>aDX
001(3,IC>aOXaa2 002(3,IC)aDXaa2
000213/0 00021380 00021390 00021400 00021410 00021420 00021430 00021440
CCCCCCCCCCCCCCCC00021450 aaaaaaaaaaa00021460
--- 00021470 00021480 00021490 00021500 00021510 00021520 00021530 00021540 00021550 00021560 00021570 00021580
aaaaaaaaaaaaaaaa00021590 00021600 00021610 00021620 00021630 00021640 00021650 00021660 00021670 00021680 00021690 00021700 00021710 00021720 00021730 00021740 00021750 00021760 00021770
DHl(4,IC)aDX«a300021780 0H2(4,IC)>DX«a300021790
00021800 0Dl(4,IC>aDXaa300021810 002(4, IC)aDXaa300021820
00021830 00021840 00021850 00021860 00021870
SUBROUTINE CPIOT 00021890
C i C i c c a IFCNEV.NE.'ncW ') IPII»0 ; PLOT ON PREVIOUS GRAPH a
00021930 00021940
c a IF(HEV.EO.'HEW •) IPLI--: I ; NEW GRAPH a 00021950 c c c 00021960 c c c a I0PIOH1) = 0;N0P10! IPEH .'COOLANT IEHP PLOT a00021980
c a IDI'LUI(2> < 0,'NOPLOI IPEN ;CLAI) SURFACE TEHP. I'lOl •00021990 c a IDI'LOIU) - 0;HOI'LOI IPEN , iHAX. HEAI TEHP. CLOT •00022000 c a I0PIOH4) - 0;NOPIOI IPEN , {SATURATION TEHP. PLOI •00022010 c a IOPlfll(5> • 0;NHPI.O( IPEN , iOHB TEHP. PI 01 •00022020 c a IOPlflK6> - 0;NOPIOI IPIN , {PRESSURE PIOI •00022030 c a I0PLOK7) » 0;NOPLOI IPEN , {CLAD SURFACE IIEAI FlUX PIOI •00022040 c • IPEH • aa. LINE a«a aaa OASIIEO LINE »«« •00022050 c • • lltLIHE HUHEOER 1 ' 21illNE NUHER 1 •00022060 c • - 1?ilIHF NUHEOER 2 ' 22:LINE NUHER 2 •00022070 c • > 13UIHE NUHEUEN i • 2i:LIH! NUHCR 3 •00022080
- 8 7 -
JAERI-M 84 -162
官 0.5980046386950・3， 0.4210238927740・0， 00021310 0.1910279720280'3， '0.2925407925410 5， 00021380 ーー・ .. 110.0 .. 240.0 C ーー 00021390
‘ 0.6073194372290・3，0.2618170995670.0， 00021400 ・ 0.1112‘45887‘50・2，'0.4696969696960-5， 00021410
ー・・・ー ・・・・ 2‘0.0 .. 320.0 C ーーーー ー一一 ....ーーーーー ー・ 00011420 6 0.8‘31014285710・3，'0.25・0‘96633000+1， 00021‘30
0.122310‘906200・1，'0.19・5286195290・‘ 000214‘oCCCCCCCCCCCCCCCCCCCC 0 2 0 CCCCCCCCCCCCCCCCCCCCCCC00021450
E・・・8・・・.................SATURATEO LI岨UIO ・・・・・g・・・・・・・・・・・・・・・・・・・・・00021460C ー.... 5.0 ・・ 80.0 C .. ... ..... ....ー・・...・・・・・ 00021‘70
000001 OATA 0011・0.38719538192eoφ1.0.1016059835010+1， 00021480 '0.212296324‘160'3. 0.1560204636‘50・6， 00021‘90
...ーーーーーー・ 80.0 ・.110.0 C ーーーーー・・・ーーー ..ーーーーーーー ・ー..00021500 . 0.4955886002890・1. 0.104693‘078880+1， 00021510
3 ・0.4831168831110・3，0.1‘27609‘27610.5， 00021520 ー・・・ーーーーー・ 170.0 .. 2‘0.0 C ・・・・・"・・・・ー・・・・ ーーーー ーーー.'・ 00021530
'0.1562981385280・2. 0.1247997799‘20+1， 00021540 '0.1159199134200・2. 0.415404040‘。‘0'5， 00021550
.-._-----・ 2‘0.0 ・.320.0 C ・ーー.，.・・ーーー ・ーーー...ーーー. 00021560 '0.2012253809520・3. 0.3348016936030+1， 00021510
7 ・0.9655999278500・2. 0.1402104317100'‘ 00021580
E・・・s・・・・・・・・・・s・..・g・...SATURATEO YAPOU自 ・a・・・・・・・・・・・・・・・・.......・'00021590C ・ーーー・ーーー・ 5.0 ・.80.0 C ・・・ー・・・・ー・・・・・ーー・・ーーー・ー'・・ 00021600
000008 OATA 0021 0.5525601204360+3. 0・‘195182863130+0， 00021610 '0.2847021132120・3.・O.‘553110202700'6， 00021620
ーーーーーーー..・ 80.0 ・. 110.0 C ..........ー・・・・ーーー・ー・...ーーー.00021630 0.5529894125870+3， 0.4044184149180+0， 00021640 .0.1086247086250句 3，.0.1130536130540・5， 00021650
・・・・・・・・ー・ 170.0 ・. 2‘0.0 C ーーーー・ーーーーー ・・・・ーー..，.00021660 0.6610391619050+3，・0.1448134126980+1， 00021610 0.10‘4880952380・1，・0.2111111111110'4， 00021680
F ・・・・・・ーー‘ 240'.0 ・・ 320.0 C ...............ーー・・・ー・・・ーーー.00021690 6 0.1002311142860・4，・0.5139519966330・1， 00021700
0.2299559884560'1 ，・0.33998316498~0'41 00021110
000009 OX • OBLE(TSA) 000雪1120000010 IF(TSA.LE.80.0) JC • 1 000雪1130000011 IF(TSA.GT.80.0.ANO.TSA.lE.ll0.0) IC 回 2 00021140 00001雪 IF(TSA.GT.170.0.ANO.TSA.LE.240.0) IC・ 000雪1150000013 IF(TSA.GT.240.01 JC .‘ 000雪1160000014 IF( KEY(]) ・EQ.1 ) GO TO雪o 000雪1110000015 OVl 包 OH1(I，IC)+ OH1(雪，IC)'OX・OHI<3，lC)・OX"
c...................・・...・.........・B・s・..........・・s・・・・・s・・・..・......・00021880000001 SUBROUTIHE CPLOT 00021890
c.....・・・・・・・・・・B・s・...・g・..・・・・・・・・・・・・・e・・・・・a・・・・s・・・・・・B抱恩恵・・・・・=・・・00021900.E ・・・・・・・・・・・・E・COOLOO OUTVUr PlOT PRO~RA例 ・・・・・・・・・・・・...........00021910C ..・・・・・・・・・・・・ 4例AACII15. 198]) 日VSII.WATAHABE ・........・s・"000~1920...・・・・・・・・・・・・・・・・・・・............・・・・・・・・・・・・・・・・・・・・・ 00021930
E ・If(HEW.NE.'同tll ') IVLI♂ o PlOT ON PREYIOUS GRAPH ・ 000219‘oC • IF(NEI/.EQ・'HEII') IPLIιHEII GRAPII ・ 00021950
・・・・・・・・・・・・・・...............・・・・・..・・・・s・a・...・・・・・・・・ 00021960 c ・....PlOTTINGOAI・・・・・・・・・・・・・・・・・・・・・s・・s・・・・・・・・・・・・・・・・・・・・・・・e・00021970E ・10PIOI(I) • O;NOPlOI IPEH ;COOlANI IE例PPLOI ・00021980E ・IOI'lO 1 (2)円。;HOPLOI IfEN ;CLAI】 SURfACET[例P.PIOI '00021990
• IUPLOI(3). O;NOPLOI IPEN ;HAX・"正AIIfHV. l'lOl ・00022000E ・10PlOI(4)・ O;H日PIOI IPEN ;SATUHATION TEHP. VlOI ・00022010E ・IOPLOI(S) • O;HOPlOI IPfH ;OMB TEHP. PlOI ・00022020E ・IOPlOllo) • O;H~PI 日 IPt 制 ;PRESSURf PLOI ・00022030E ・IOPLOI(7)命。;HOPLOI IPt制 ;CLAOSURfACE IIEAI FlUX PlOI ・000220‘oE ・IPEH旬...LINE ••• ••• OASIIEO llHE ..・・00022050E ・.lllL1HE HUHEOE自1ω2¥ollHEHU例(R l ・00022060E ・.121LINf HUHEsfR ?雪2.llNfHUHER ?・00022070E ・， ¥3IIINE HUHlUlH J • 2!.LlHE HU例[RJ ・00012080
-87-
JAERI-M84-162
C • • 14:L INE NUHEDER 4 - 24 ! | INt NIIHER 4 C a - 15sLlNE NUHEBER 5 - 2SiLUr NUHER 5 C aaaaaaaaaaaaaaaaaaaaaaaaaaaaaassaassaaaaaa*«a*«a*a•*«*****»** C aaaaaaaaaaaaaaaa«aaa«*a«aaaaasssaaaaaaaaaaa*a«a*aa»««**aaasa«. C • HSHDL-0 : HU SYHBPL, '1 : CIRCLE. ••2 i IRIANGU C a =3 . CROSS, -4 : X '11 I » C sas**a«aaaaaaaaaaa»aaKa«aaaaaEEc*ssaaaaaaaaaaaaa«*a**aa»ssaas
000002 CHARAC1ER NEWB4,ENDa4,NEW|a4,I IUEa40 000003 COMMON /GPL0T/T1ILE 000004 COMMON /GPLT2/1I,IDPL0T(7>,CASE<5),NSHBL(7> 000005 COMMON /P IT / IPTC,1PL0T(5,15>
C 000006 REWIND 11 000007 END'-ENO ' 000008 NEW--NEW ' 000009 1CMAX-IPTC 000010 JSW-0 000011 READ a,WIIHX,WITHY,THIN,TNAX,PH1N,PHAX,HH1N,HHAX 000012 1F(W1THX.GE.200.) WHKX-200. 000013 IF(WITHY.GE.230.) W1THY=230. 000014 DO 1000 IC»1,ICHAX 000015 1PLT=1 000016 REAO (5,5,EN0=999> NEWI 000017 IF (NEWI.EQ.EHO) GO TO 999 000018 IF (NEWI.NE.NEW) 1PLI=0 000019 IF (IPIT.EQ.O) GO TO 103 000020 REA0(S,55) TITLE 000021 i FORMAT(A4> 000022 55 F0RHAKA40) 000023 103 READ a, (10PL0T (1) ,1 = 1,7), (NSHBLU) , 1-1,7) 000024 WR1TE(6,600) 000025 WR1TE(6,603> 000026 WR1TE(6,604> WIIHX,W1THY,TMIN,TMAX,PH1N,PHAX,HH1N,HHAX 000027 UR1TE(6,605) NEWI 000028 WR1TE(6,610) TITLE 000029 WRnE(6,620)(l,I = l,7),<lDPL0TCI),IM,7>,<l,I = I,7),<H.SNBLCI> 000030 CALL XVDATA(1PLT,W1THX,WITHY,THIN,THAX,PMIN,PMAX,NM1N,UMAX) 000031 1000 CONTINUE 000032 999 CALL STOP(O) 000033 600 FORHAT(IHl) 000034 603 FORMAT (IX, B--PLOT INPUT DATA FROM FT05 •» 4 «---
1 6 • 7--') 000035 604 FORMAT(//6«,'»ITHX',5X,'WITHY',6X,'THIN',6X,'THAX',6X,'PMIN
a 6X,'PHAX',6X,'HHIN',6X,'HKAX'/1X,8F10.3> 000036 60S F0RHAT(//1X,'NEVI"',A4> 000037 610 FORHAK/U,'TITLE-',A40> 00003* 620 FORMAT(/2X,7('IDPLOT-'I2,1X),MX,7I10/2X,
a 7CHSH8L = ',I2,U)/U,7110) 000039 STOP 000040 END
»000220S0 •00022100 00022110
«««««00022120 •00022130 300022140
ssaaaaaO0O2215O 00022160 00022170 000221S0 00022190 00022200 00022210 00022220 00022230 00022240 00022250 00022260 00022270 00022280 00022290 00022300 00022310 00022320 00022330 00022340 00022350 00022360 00022370 00022380 00022390 00022400 00022410 00022420 00022430
1=1,7)00022440 00022450 00022460 00022470 00022430
5 a00022490 00022500 00022510 00022520 00022530 00022540 00022550 00022560 00022570 00022580
000001
000002 000003
000004 0 li 110 0 -i
000006 OO'JOOC ooooou 0000'<9
taaaaaaaaaaaaaaaaBaaaaBBBvaaaaaaaaaiaaaaasaasaaaaaaaaaaaaaa SUBROUIINE XYDATA(1PLT,WITIIK,VIT;IY,THIN,THAX,FHIH.PHAX,
aaaaaxaaaaaO0022590 I1HIN,HNAX) 00022600
aaaaaa00022610 DIMENSION r£HP(7,30),X<33),Y<33),XL(l51),XPT<l51>,YPT<15l> COHHON /GIILT2/II,IDPL0I(7),CASE<S>,NSHBL(7)
l£HP<1,J) • COOLDANT TEMP. • HNP<2,J) - CLAO SURFACE TEHP. • IEHP<3,J> ' HEAT MAX. IEMP. • IEHP(4,J) • SATURATION TEHP. * UHI'<5,J> • ONB IEHP. » lfHP<6,J) » PRESSURE Al I a ltHP<7,J> ' HEAI FlUX Al CLAD SURfACl a
REA0(11> 1A,JA,N,HPI ,K,JM< •. ft.' NIAIK11). !WPi,?VPU,PHOV,«RR,mHH<l,J>,J' i ,JHAX>,
• < l iH I ' (? ,J ) , J"1 ,JMAX) ,< IEHP< . l , J ) , J ' l , JHAX) / ( l tMP(4 ,J ) , J ' l , J a <1IHP15,J),.I»I,JHAX>,<IEHPC6,J>,J»1,JHAX>
0(1 30 J"1,JHAX 30 (UAIKI I ) l(Ht><f,J)
100 C0N1IHIII CASK1) IIUAKIA)
00022620 00022630 00022640 00022650 00022660 00022670 00022680 00022690 00022700 00022710 00022720 00022730 00022740 00022750 00022760 00022770 00022780 00022790 00022800
- 8 8 -
JAERI-M84 -162
E ・ 14:lINE NUHEsER 4 ' 2‘:I.I"t NU"E R ~・000220 岨OE ・_1~l lI NE NUHEDER ~ . 25:lINf. NU"ER ~ .00022100 .....・・a・・・・・・・・・・・・・・a・・・・・・・・・...................，........... 00022110
E ・g・・.....・...................・..・a・..・・・・・・・・・・・・・・・・・・・E竃s・..・‘・・‘・00022120E ・NSHDL.O "0 SVHsPL， -1 (1MιLE， み IIRIANGll .000n130 E ・ =3 CRUSS，噌4 : .， 11 I・ .00022140
E ・・s・a・.........・・・s・・・ R‘・・・・・z・s・‘・・・・・・・・・・・・・・・・・・・・・・B・s・...・・s・・000221~0000002 CHARACIEA HEW・4，ENO・‘.HEWlo4.II!LE・40 00022160 000003 COHHOH IGPLOT/IITLE 00022170 000004 COHHOH IGPLT?/ll.IOPLOT(7).CASE(5).HSHBL(7) 00022180 000005 COHHOH IPLII 1PIC.1PLOT(5.15) 00022190
00022200
000006 REWIHO 11 00022210
000007 EHO=' EHO ' 00022220 000008 HEW= 'HEW ' 00022230
000009 lCHAX包 IPTC 00022官40000010 ISW・o 00022250 000011 READ ・.WIIHX.WITHV，TH1N，THAX.PHIN.PNAX.HH1N，HHAX 00022260 000012 lF(WIIHX.GE.200.) WITHX.200. 00022270 000013 1t(WIIHV.GE.230.) W1T刊V=230. 00022宮80
00001‘ 00 1000 IC=I，1CHAX 00022290 000015 lPLI=1 00022300
000016 READ (5.5.EHO=999) NEWI 0002官310000011 lF (NEWI.E岨.EHO) GO TD 999 00022320 000018 Jf (HEWI.HE・HEW) 1 PL 1=0 0002官330000019 IF IJPLT.EQ.O) GO TO 103 00022H。000020 READ(5.55) IITLE 00022350
000021 ~ FDR刷J(A4) 00022360
000022. 5~ FDRHAJ(A40) 00022370 000023 103 REAO o.(IOPLOT(I).I=I，7).(NSHBL(I).I=I，7) 00022380 00002亀附1IE(6.600) 00022390 000025 WR11E (6.603) 000官官400000026 WRIIE(6.604)・JTHX，WlJHV，IHJ例.THAX，PH1N.PHAX.HH1N.HHAX 00022410 000021 WRITE(6.605) NEW1 00022420
000028 WRIIE (6.610) T11LE 00022430 000029 WR1TE(6.620)(I.l=I.7)，(IDPLOT(I)，I=I，7).(I.I=I.7).(且5HBL(I).I=I.7)00022440000030 CALL XVOATA(IPLT.W1THX.WITHY.THIH，TH凪X.PHIH.PHAX.HHIH.HH凪X) 00022450 000031 1000 CO闘TINUE 00022‘60
001)22470 000032 999 CALL STOP(O) 000033 晶00FORHA TC 1 HO 00022480 000034 晶OJFORH凪J(1X.'-ーー -o-.PLDT IHPUT OATA FROH FT05 -・--・・4--_.・--.-5・・・・000022490
1-・・・6---....・・7・・') 00022500
000035 晶0・FORHAT(116X.'WITHX'，5X.'WITHY'，6X，'THIN'.6X.'THAX'.6X.'PHIN'. 00022510 ・ 6X.'PHAX'.6X.'HHIH'.6X.'HHAX'/1X.Sf10.3) 00022520
000036 晶05 FORHAT(111X.'HE恒'0'.A4) 000?2530 000031 610 FORHAT(/1X.'TITLEo'.A・0) 00022540 000038 620 FORHAT(/2X，1('IOPLOT・'12.1X)./ll，7110/2X. 00022550
思 7('N5H8L ='.12.1XI/IX.1110) 00022560 00022570 000039 5TDP
0000・o END 00022580
c.................・・・..・.....・g・.....・‘・e・・・s・・・・・・a・・........・........・・00022590000001 SUDAOU11HE XYOATA(IPLT.WITHX.WIT~V ， T阿 IH.THAX.PHIH.PH且X.HHIH.HHAX) 00022600
c.......................・・・・・・・・・・・・・・・a・・・・..・s・a・...・g・.........・a・-・・00022610000002 DIHENS'OH IEHP(7.30).X(33).V())).XL('S').XPf(ISI).VPT(15') 00022晶20
000003 COHHON IGPLT2/11.IOPLOf(7).~ASE(5) ， NSH自L(7) 00022630
.......................・・E・・・・・・・・・・..・・・・・・・・・・・・・・・・・ 00022UO ItHPC1，J)・tOOLOAHf fEHP. ・ 00022650
E ・ 1正削P(2.JI • CL且oSURfACE fE附P. 00022660 ・ '(HP<3.J) 品 HEAI HAX. IEMP，・ 00022670E ・If削P(・.J) .. S且TURATlON IEHP. ・ 00022680
If削P(~ ， J) • OND IEHP. ・ 00022690
C ・ 1I"HI'(6， J) • 1'lIfSSURl AI 1 ・ 00022700
t ・ I1HP(7.J) • H[A' FLUX I tLAU 5U凪rAj:l ・ 00022710
.・・・.............・・・・・a・・・・e・g・........・・・・・・・・・・・・・・・・ 00~22120 0υυ00" RlAPl11> IA.J.N.HPI.K.JHI・n: 0002~7JO 001100、 “IAP(III.IW'I./~PU.PflO~.Q酎酎 ， <TtHPl' ， J) ， J.! ， J例AXI. 000~~140 ・"・制1・(?J).J.l.JHAX).(IEMP(j.J).J・I.JHAX).(!t削P(‘.J).J'I，JHAX)， 00022150
・(11HI'(5 .J) .J"' ，JHAX) • (IEHI'(6.J)，心 I.JHAX) 00022160
OOOOOb OD JO J回 I.JHIIX OU0227'0 OOQOor $0 "[As(I" IrHP(7.J) 00022180 00000/) 100 CC川I1NIII 00022190 OOOOn~ C^~t(l) fLUAI(IA) 00022800
ー甜ー
JAERI-M84- 162
000010 000011 000012 000013 000014 000015 000016 000017 000018 000019 000020 000021 000022 000023 900024 S„u.i2S 000026 000027
000028 000029
000030 000031
000032 000033 000034
CASE(2> » FLOATCJA) 00022810 CASE<3> • FLOAT(N) 00022820 CASE<4> « FLOAKNPL) 00022830 CASE(5) « FLOAT(K) 00022840 X(1)=0.0 00022B50 DO 50 J"2,JHAX 00022860 X(J> » X <J -1> t 02 00022870
SO CONTINUE 00022880 DD7 - DZ/3.0 00022890 JPTHAX = (JHAX 1>»3 > 1 00022900 XLC1>=0.0 00022910 00 60 J=2,JPTHAX 00022920 XL(J> - XLCJ-1) • DD7 00022930
60 CONTINUE 00022940 VA1TE(6,600) IA,JA,N,NPL,K 00022950 00 70 JM,JHAK 00022960 WRITE<6,610> J,X(J),(TEHP<1X,J>,IX=1,7) 00022970
70 CONTINUE 00022980 00022990
JMIK3°JHAK*3 00023000 CALL PTCNTL(1PLT,JMAX3,X,Y,WITHX,WITHY,THIN,TMAX,PHIN,PNAX, 00023010
» HH1N,HHAX,TEHP,JPTNAX,XI,XPT,YPT) 00023020 200 CONTINUE 00023030 600 F0RHAK//1X, »--PLOT INPUT DATA FROH Fill -» 4 »-- 5- -00023040
1-a -6- -«- 7--'//lX,'IA=',12,2X,'JA"',12,2X,'N=',12,2X,'NP=',00023050 2 12,2X,'K=',12//4X,'J',4X,'X<J)',2X,'TCOOLANT',5X,'1CLAO', 00023060 3 5X,'THEAT',6X,'TSAT',6X,'TONS',5X,'PRESS',2X,'HEAT FLUX') 00023070
610 FORHAim,14,F8.3,5F10.2,FI0.5,F10.2> 00023080 RETURN 00023090 END 00023100
C«aaaaaaaaa«aaaaaaaa»aaaaaaaaaaa«aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa00023110 000001 SUBROUTINE STOP<N) 00023120
Caaaaaaaaaaa*aaaaaaasaaaaaaaaaaaaaaaaasaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa00023130 000002 IF (N.EO.O) VR1TE(6,10> 00023140 000003 IF (N.NE.O) VR1TE<6,20> N 00023150 000004 CALL PLOT<0.,0.,999) 00023160 000005 STOP 00023170 000006 10 FORMAT(/U,'NORMAL EHt)'> 00023180 000007 20 F0RNATC/1X,'PROGRAM STOP',14) 00023190 000008 END 00023200
000002
000003 000004 000005 000006 000007 000008 .000009 000010 000011 000012
000013 000014 000015 000016 00001/ 000016 000019
Casaaaasaaaaaassaaaaa**«««a«a«**«*a*y**««a»a««a*asas»a*wa*»••»»*»* SU0R0UI1NE PTCNTLCIPLT,JMAX3,X,Y,W1THX,WITHY,THIN,THAX,PHIN
« HM1N,HMAX,TEMP,JPTHAX,XL,XPT,YPT) Caaaaaaaaaaaaaaaaaaaaaaaaaaaaauaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
01MEHSI0N TEMP<7,30),X(JNAX3),Y(JMAX3>,XL(JPTMAX),XPT(JPTMAX a YPT(JPTHAX)
COMMON /GPLI2/11,1DPL0TC7>,CASE(5>,NSHBL(7> WRITE<6,666> JHAX3
666 FORMAK/1X,'PLOT START, JHAX3',14> JHAX'JMAX3-3 IJ - 0 ii(ipii.i»,ui co ro u IFHAH'fl I1EHP=0 IPRES-0 IFLUX=0
C ««««a*«****a«»*a*»aa»a**a«a*aaaaaaaaaa»aaaaaaas*aaaaa«a«aaasi C X AXIS PLOT t ••••••••••>•••••••»<>• .a«tiUlltl>l»»iu>»i
CAL1 SLI'H I." AI 1 Nl¥l'INM> XHIN X(1) XHAX X(JHAX) CALL XYSCAl <JHAX3,X,WIIIIX,XMIN,XHAX,XDL1> Crtll XC(INV(JPfHAX,XI ,»PT,XMIN,XOI T) LAI 1 PIOI (0.,0.,3)
«»»«..000232)0 PMAX, 00023220
00023230 aaaaaa00023240
00023250 00023260 00023270 00023280 00023290 00023300 00023310 00023220 00023330 00023340 00023350 00023360
«»»« 00023370 00023380
«•«• 00023390 00023400 00023410 00023420 00023430 00023440 00023450 00023460
- 8 9 -
JAERI-M 84 -162
000010 CASf(21 忌fLOAI(JAI 00022810 00022820 00012830 00022840 00012850 00022860 00022670
00022880
00022890 00022900
00022910 00022920 0()022930
00022940
00022950
00022960
00022970 00022980 00022990 00023000 00023010 00023020
000230JO
000011 CASE (])唱fLOAT(Nl
000012 CASE(4) 宅fLOAT(HPL>000013 CASE(51 • fLOAT(K)
00001‘ X(J)=O.O 000015 00 50 J'2，JHAX 000016 X(J) ロ X(J-1)・ Dl000017 50 COHrlNUE
000018 001 02/3.0
000019 JPTHAX (JHAX-l)・3・1000020 XL(I)=O.O 000021 日o60 J=2，JPTHAX 000022 XL(J) = XL(J-1) . OOl
000023 60 COHTIHUE
~00024 句RIIE(6 ， 600) IA ， JA ， N ， HPL ，~
(;vy.i25 00 70 J=I，JHAX 000026 WRITE(6，610) J，X(J)，(TEHP(lX，J)，lX=I，7) 000027 10 COHTIHUE
0000宮8 JHAK3=JHAX+3 000029 CALL PTCHTL(IPLT，JHAX3，X，y，句lTHX，WITHY，THIH，THAX，PHIN，PHAX，
HHIH，HHAX，TEHP，JPTHAX，XL，XPT，VPT) 000030 200 COHTIHUE 自00031
000032
000033 OOOOH
000001
000002 000003
00000‘ 000005 000006 000007 000008
000001
000002
000003 000004 000005 000006
000007 000008 000009 000010 000011 000011
。OOOIJ000014 00001)
000016
000017 OOOOIB 00001切
600 FORHA T (/ 11 K， 'ー一一ー・ -PLOT INPUr OATA FROH FTII -.---・4 ・.5 -. -00023040 1-・ 6- ・.7- 一 ÞlltX ， 'IA~' ， 12 ， 2X ， /JA 回'， 12 ， 2X ， 'N~I ， 12 ， 2X ， 'NP:' ， 0002jOSO
12，2X，IK"" ，1211‘X， 'J' ，4X， 'XCJ)' ，2X， 'TCOOLANT' ，5X，'1 CLAO'， 00023060 5X，'THEAT'，6X，'TSAT'，6X，'TON8'，5X，'PRESS'，2X，'HEAT FLUX') 00023070
610 FOHHATC!r，14，FB.l，5FI0.2，FI0.5，FI0.2) 00023080
RElURH 000'l3090 ENO 00023100
c.......竃事..・a・.................阜・・・・・・・................................00021110SUDROUTIHE STOP(H) 00023120
c・・・・.............・s・a・............・・・・・z・・・・・・・E・・g・・・...・g・...........00023130IF (H.EQ.OI IIAlTfC6，10) 000231‘。IF (N.NE.O) ..，RITE(6，20) H 00023150
CALL PLOrcO. ，0. ，999) 00023160
STOP 00023170 10 fORHATC/IX，'HORHAL fNO') 00023180
20 FORHA T (/ U，' P凪06RAH STOP'，I‘ 00023190 ENO 00023200
c........・軍............・・・・・e・・・・・............0........・...........・..・・00023210SU目ROUTIHE PTCHTL(IPLT，JHAX3，X，Y，句lTHX，WITHV，THIH，THAX，PHIN，PHAX，00023220 ・ HHIH，HHAX，TEHP，JPTHAX，XL，XPT，VPT) 00023230
c............................車u・s・..‘率・s・g・.......・・s・・・・・・・・・・・・......・00023240OIHEHSION TfHPC7，30)，X(JHAX3)，VCJ例AXJ)，Xl(JPTHAX)，XPT(JPTHAX)， 00023250
VPI(JPTHAO 000~3260
COHHOHパlPLI2/11，IOPLOT(1)，CASE(5)，HSH日L(7) 00023270 WRI TEC6，666) JHAX3 00023280
666 fORHAlUIt， 'PlOT START， JHAX3，.'，J4) 00023290
JHAX"J例AX3・ 00023300
lJ " 0 00023310 If 11 PL 1 .1ρ.~) GO 10 11 IfHA附官。
1 TEHP=O 1 PRE 5"0 lFLUX"O
0002~UO 000233)0 000233~0
00023350 00023360
.......・・ .......!f...・a・.~~.................竃..・..・・・・・・・・・・......車 000~3 .17 0
X A昆IS I'LOT 00021380 ...................・・・・a・・・・・・・g阜‘..........・.11111・・2・・・・・・・s・a・..00021HO じAU SlI'
JAERI-M84-162
000020
000021 000022 000023
000024 000025 000026 000027 000028 000029 000030 000031 000032 000033 000034 000035 000036 000037 000038 000039 000040 000041 000042 000043 000044 000045 000046 00004 7 000048 000049 000050 000051 000052 000053 000054 000055 000056 000057 000056 000059
000060 000061
000062 000063 000064 000065 000066 00006 7 000068 000069 000070 000071 000072 000073 000074 000075 0000/6 000077 0000 78 000079 000080 000081 00008? 00008J
000084 00008')
00001(6 000011 f OMIOBH
CALL A X I S ( 0 . , 0 . , 2 2 H F U E L PLATE LENGTH ( C H ) , 1 - 2 2 , W I T I I X , 0 . , X H I N , X D I T , 1 0 . )
CALL P L 0 r ( 0 . , 0 . , 3 > CALL A X I S ( 0 . , W I T H Y , I H , M , W 1 T H X , 0 . , X M 1 N , X D I I , 1 0 . > M , L I I U E P ( W I T H X )
C XXXXXXXXXXXXXXXX»»XX«XX«XXXXXXXXXXXXX*XXXX*X«X*XXKXXXXXXXX C Y-AXIS PLOT C xxxxxxxxxxxxxxxxxx***xxx*xxxxxKXKxxxxxx«««a**»*»«»*xsxxxx
11 CONTINUE 00 100 11=1,5 iFUDPLOT(ll).EQ.O) GO TO 100 DO 60 J=1,JHAX
60 Y(J) • IEHP<II,J> 1FUTEHP.EQ.1.0R.1PLT.EQ.0) GO TO 70 1FRAH * 1FRAHM 1TEHP = 1TEHPM CALL NEWPENU) CALL XYSCAL(JHAX3,Y,WITHY,TM1H,THAX,TDLT> CALL P L 0 1 < 0 . , 0 . , 3 ) CALL AX1S(0 . , 0 . , 15HTEHPERATURE < C ) , M S , W I T H Y , 9 0 . , 1 H I N , T O L T IPEN • I D P L O T ( I I ) NP N S H 8 L ( I I )
70 CALl C 0 N V < J M A X 3 , X , Y , J P T H A X , X L , Y P T , r H I N , T 0 l T) CALL P L 0 7 a P K 1 ) , Y P T ( l > , 3 > IPEN - l O P L O T ( U ) NP =• N S H 8 L U 1 ) CALL NEWPENUPEN) CALL PTL INE(XPT ,YPT ,JPTHAX,NP> CALL PTSHDL ( I P L 1 ,1 .1 ,1 PEN, NP,WITHX,WITHY) U R 1 T E ( 6 , 6 1 0 ) 11
610 F 0 R M A 1 ( 1 X , - 1 I - ' , I 1 , 2 X , ' P L 0 T END' ) 100 C0NT1NI1F
n-6 1 F < 1 D P L 0 1 ( 1 1 ) . E Q . O ) GO TO 200 00 110 J M , J H A X
110 Y<J> = T E M P ( 1 1 , J ) I F ( I P R E S . E a . l . O R . l P L T . E Q . O ) GO TO 170 IFRAH = IFRAHM IPRES = IPRESM CALL NEWPEN(l) CALL XYSCAL<JMAX3,Y,WITHY,PH1N,PHAX,PDLT) CALL PL0T(0.,0.,3) 1F(1FRAH.GE.2) GO TO 120 CALl A X I S < 0 . , 0 . , 2 6 H P R E S S U R E AT X ( K G / C M 2 . A B S ) , * 2 6 , W I T H Y , 9 0 .
1 P D L T , I O . ) GO TO 130
120 CALL AX IS (WITHX,0 . , 26HPRESSURE AT X ( K G / C M 2 . A B S ) , - 2 6 , W l HY, 1 P K 1 N , P 0 L T , 1 0 . )
130 IPEN » I D P L O T C U ) NP « N S H B L ( I I )
170 CALL C 0 N V ( J H A X 3 , X , Y , J P T H A X , X L , Y P T , P H 1 N , P D L T > CALl P L 0 T U P T ( 1 ) , Y P T ( 1 > , 3 ) IPEN • l O P L O T ( I l ) NP = N S H B L ( I l ) CALL NEWPEN(IPEN) CALL P U 1 N E ( X P T , Y P T , J P T H A X , N P ) CALL P T S H 8 L ( 1 P L T , I J , I P E N , N P , W 1 T H X , W I T H Y > W R I I E ( 6 , 6 1 0 ) 11
200 1 1 - 7 I F ( I D P L O K I I ) . E Q . O ) GO 10 300 00 210 J -1 ,JMAX
710 Y U > I F H P ( I I , J ) I K I F l U X . E O . I . O H . l ' L 1 . E Q . 0 ) CO TO 270 IFRAH •• I F R A N M IF LUX - 1FLUXM CALL NEVPEN( I ) C A I I XYSCAL (JMAX3,Y,W1 IHY, I IMIN,HMAX,HDLT ) CALL P L O K O . , 0 . , 3 ) 0 0 10 ( 7 2 0 , 2 3 0 , 2 4 0 ) , I I HAH
7 2 0 L A I I A X I S ( 0 . , 0 . , 1 7 H H E A 1 FLUX ( W / C K 2 ) , M 7,WI I H Y , » 0 . , IIHI N, 1 H 0 L I . 1 0 . )
Oil Ml fiO /SO ( A l l AXIS(WI I l l X , 0 . , 1 7 I I I I I . A T I I I I * ( W / C H 2 ) , 1 7,W1 I H Y , 9 0 . , IIH I N,
1 HDL 1 , 1 0 . ) Gil Ml ViO
240 XXX ' U 1 I H X M 5 . FAI i A X I S ( X X X , 0 . , 1 / I I H I A 1 FLUX ( W / C M 2 ) , 1 7 ,WI I I I Y , 9 0 . , HMI N,
1 111111,10.)
x**«*««
xxxxxxx*
90.,
00023470 00023480 00023490 00023500 00023510 00023520 00023530 00023540 00023550 00023560 00023570 00023580 00023590 00023600 00023610 00023620 00023630 00023640 00023650 00023660 00023670 O0O2368U 00023690 00023700 OOC23710 00023 720 00023730 00023740 00023750 00023760 00023770 00023780 00023790 00023900 00023810 00023820 00023830 00023840 00023850 00023860 00023870 00023880 00023890 00023900 00023910 00023920 00023930 00023940 00023950 00023960 00023970 00023 980 00023990 00024000 00024010 00024020 00024030 00024040 00024050 00024060 00024070 00024080 00024090 00024100 00024110 00024120 00024130 00024140 00024150 00024160 00024 170 00024180 00024190 00024 700 00024210 00024220 00074230 00024 240
- 9 0 -
000020
000021
000022
000013
000024
000025
000026
000027
000028
000029
000030
000031
000032
000033
000034
000035
0000~6
000037
000038
000039 0000命0
000041
000042
000043
000044
000045
000046
000047
000048
000049
000050
000051
000052
000053
00005‘ 000055
000056
000057
000058
000059
000060
000061
000062
000063
000064
000065 000066
000067
000068
000069
000070
000071
300072
0000/3
00007‘ 00007)
000016
000077
000078
OG~019
000060
000081
000061 00008j
000(.1:1/1 00008、00(.01同
00(1011 (
001108“
JAERI-M 84 -162
》-
nu -，
I
l
au x
，
M開
'
l
、，
M円
"
x
E
，
f
・
、，
nu
un
・
'
E
n
u
'
pu
・5νA
M
n
'
M
H
E
I
-
-
L
-
L
E且
n
U
H
-
-
E
X
，
I
'
1
A
N
-
-L
，a
，
nrM円V
A
U
n
t
'
I
E
.
，
HU内
υ
u
z
F
H
H
'
T
2
H》
l》
q'hMM
，aHWνA
'I''H
・I
・-
UUHW内
υ
・・
'''u'
-n4
・・，‘
nund内
υ内
υωr
《
-E《
E
sfst
『
anuEa
，.
X
L
k
l
A内
帥
ran''
L
l
i
t
L
t
t
‘
白川
ana州
a内
E
E
E
C
ー
000234 70
00023480
000234 90
00023500
00023510
車率率率率草.率率率・・..・...........率率8・.......温s・・・・・・・・・・‘率・..*.*竃忠*111..*・00023520
Y-AX1S PLOI 00023530
B竃........皐......事事事・・・・a・........率Z率翠志摩・a・・・・・・・・・・・・・..事事Z竃...・.00023540
11 CONTINUf 000235~0
00 100 11ょ 1，5 00023560
1fCIOPLOT<lI).fQ.0) GO TO 100 00023570
日U 60 J=I，JHAX 00023580
60 YCJ) " TEHPClLJ) 00023590
lFClTEHr.EQ.1.0R.IPLT.fQ.0) GO TO 70 00023600
lFRAH lFRAHtl 00023610
lTEHP lTEHPt! 00023620
CALl HEWHHC!) 0002~630 CALL XYSCALCJHAX3，Y，WITHY，THIH，THAX，TOιTl 00023640
CALl PLOlCO. ，0. ，3) 00023650
CALL AX1S(0.，O.，15HTEHPERATURE (Cl， '15，WITHY，90.，lHIN，TOL1，10.) 00023660
lPEN . 10PLOT<11l 00023670
NI' NSHB1 C 11) 0002368~ 70 CALl CONVCJHAX3，X，Y，JPTHAX，Xl，YPT，IHIN，TOU) 00023690
CAll PL日干 <KPI(J)， YPIξ ¥)，3) 00023700 1PfN" 10PLOT<l1l 00023710
NP " NSHBL C 11) 00023120
CALL NEWPfNClPEN) 00023730
CALL PTLIHECXPT，YPT，JPTHAX，NP) 00023740
CALL PTSHDLCIPLI，lJ，lPEH，HP，WITHX，WITHY) 00023750
WR1HC6，610l 11 00013760
610 fORHA1C1X， '11 '， 11，2X，'PLOT ENO') 00023710 100 CONTINUf 00023780
11=6 00023/90
IF n OPLOTC 11) • EQ. 0) GO TO 200 0002BOO
00 110 J=I，JHAX 00023810
110 YCJ) TEHP(II，J) 00023820
IFCIPRES.EQ.I.0R.IPLT.EQ.0) GO TO 170 00023830
IFRAH IFRAHtl 000238~0 IPRES IPREStl 00023850
CALL NEWPEN(I) 00023860
CALL XYSCAL(JHAX3，Y，WITHY，PHIH，PHAX，POLT) 00023870
CALL PLOTCO.，O.，3l 00023&80
IFCIFRAH.GE.2) GO TO 120 00023890 CALL AXIS(0.，O.，26HPRESSURE ~T X CKGICH2.ABS)，+26，WITHY，90.，PHIN， 00023900
POl T ，10.) 00023910
GO TO 130 00023920
120 CALL AXIS(WITHX，O.，26HPRESSURE AT X CKGICH2.ABS)，-26，WI:HY，90.， 00023930
PHIH，POLl， 10.) 00023940
130 IPEH = IDPLOTClIl 00023950
HP HSHBLCII) 00023960
170 CALL CONVCJHAX3，X，Y，JPTHAX，XL，YPT，PHIH，PDLT) 00023970
CAlI. PLOIUPTlIl，YPTlIl，3) 000n980
lPEH = JOPLOTC1，) 000239Su
NP NSHULCII) 00024000
CALl HEWPEHCIPEH) 00024010
CALl P1LlHE(XPT，YPT，JPTHAX，HP) 00024020
CALL PfSH日LC1 PL T ，1 J， IPEH， HP ，WITHX ，WI TIIY) 00024030
WRI1E(6，610) 11 00024040 200 II-7 00024050
IF C1DPLOl <l J) .[Q.O) GO 10 300 00024060
00 210 J血 I，JHAX 00024070
110 YCJ) IfHPClI，J) 00024080
1f<lflUX.fQ.1.0H.I'L1.EQ.0) GD 10270 000?4090
1FRAHιIFRAH・ 00024100
11 LUX ・ IFLUX・ 00024110
CALL MEWr~N(\) 00024120
CAII XYSCAL CJH品X3，Y，VlTHY，IIHIN，HNAX，II0LTl 00024130
CALl I'L01CO.，O.，l) 00024140
GO 10 cnO，2JO，官‘O)，IIHAH 00021i1 ~O '110 LAII XISCO..0.，17HIIEAl fLUX C~IW2) ， φ17 ， WIIIIY ， I}O. ， IINIH ， 00024160
1I0L1， 10.) 00024110 OOO:)/，1JW
~U 1(1 Iぅ0IJV (~II ~>l S(W IlIi~， O. ， 17 I1I1 I.AI lilJX (WICH2)， II ， W1IIIY ， ~O. ， IIHIH ， 00024190
II0L r ，10.) 000~4 100 611 111 2~D 00024210
~40 01 W1"1X1\~. 00024220
仁AI'
-90ー
»IS8?S
=Sassssss!s5s
iiliiililiiiillliil oooooooooooooo
(M
MM
nM
CS
lM
MM
^(
UN
NC
><
oooooooooooooo
oooooooooooooo
oooooooooooooo
O •* CM n
CJ , o
- o * • * 00
s I 2
a. 7 o •
OX
v X Q. J
issss.<:
o — : a. _i •
[j
tt
Zu
jQ
iu
(|
ZC
IC
>J
9I
'I
XI
UZ
O^
OU
Ui
lu
Nl
ll
' o
u) a. H
s >o
• . t-
••
• I
M
X
>
J[
« ^ X
O
. X
CO
X
I I
m-
h-
OI
IZ
II
MU
3
.it ii z
ia
-v
Ku
i-
tt
__i uu u. »—
a
. u_
ZK
It
O
M
=
«X
ft «
OK
N
" ""S
SI.
—«
a: i
H
O
UJ *
©O
OO
OO
OO
OO
Oi
-O
OO
OO
OO
OO
OO
O O
OO
OO
OO
OO
OO
O O
OO
OO
OO
OO
OO
O o o o o o o
iiiililii!
oooooooooooooooooo
^ *c* *o f» i^
- r*» N- p^ - f*—
— N cc oo oo oo ao oooooooooooooooooo
oooooooooooooooooo
oooooooooooooooooo
0>
I
» UJ —
i 3S It
-J *
- • •
« —
t- »
is m
is il"i
It <£ H
<C
M >
- » *- M
<r •
a *
«t —
"• •*-
II i—
* «
-, -
ft CO
» X
<
< _ _
X X
x X
X
< I* C
M
X x
Z X
X x
X
« -= «r
o -» —
* X
*"' ** * *
«' ^ c
X -
i S * 3
UJ
« X
3 x «
X X
X Z
«c « «c
!l X
X X
X •**•
v 3E
. est ^ "3 -J ^ -s
x o
u. o
5 x
X X
x x
X
fu n
*
in
* o
o o
o o
o
o o
o o
o
o o
o o
o
o o
o o
o
o o
o o
i liliiiiliiiiiii
~50 IPEN 白 10PlOT<I[) 0002令官 ~OHP HSHBL(II) 00024260
270 CALL CONV(JHAXJ，X，γ，JPTNAX， n， VPT， HHIN，HOL Tl 000H.270
CALL PLOTOPT<I)，VPT【!)，3> 0002‘280 IPfH IOPLOT<J1) 03024290
HP HSHDU 11) 0002‘300 CALL HEIIPEHOPfH) 00024310 CALL PTLlHEOPT，VPT，JPTHAX，HP) 00024320 E且LL PTSK8l(IPll，IJ，IPEK，HP，IIITHX，IIITHV) 0002.330
IIRITf(6，610) 11 0002.3‘0 300 If(lfRAH.Gf.2.0R.IPLT.fQ.0) GO T3 500 0002.350
IF(ITfHP.fQ.l) CAll AXlS(lIlTHX;O.. 00024360 ・ 15HTf例PERATURf (C)，-15，¥/ITHV，90‘，THIH，TOlT，10.1 0002.370 If(IPRES.EQ.l) CALL AXIS(¥/ITHX，O.，26HPHESSURE AT 耳 (~G/CM2.ABS) ， 0002.380
-22，IIITHV，90.， PHIH，POlT，10.) 0002‘390 1F(IFLULEQ.1l CAll AUS叫 ITHX，O.，23HHEATFlUX (CAL/CH2.SEC)， 00024400
-22，IIITHV ，90.， HHI H， HOLT ，10. ) 00024‘10 500 AETURH 0002“20
EMO 0002‘4Jtl
JAERI-M 84 -i62
000089 000090 900091
000092
000093 00日094000095 000096 000091
000098
000099
000100
C0010l
000102
000103 00010.
E竃......・・a・・・・・・・・・.....過・・8・・・・..・g皐.事事・・a・.....・..・g・..・・・・・..・2・・・・・000雷“‘。SUBROUflHE SEPTE 0002‘450 SEPARATER PιOT， OAJGIN SfT 00024460
E・・・・・““・“・・・・・・・・s・・・・・・z・s・・・・・・・・z・2・・2・s・・・・・・・‘.......・・・・・・・・・.......0002‘070OATA JJ/OI 00024480
JJ=JJ'1 0002‘490 lf (JJ. HE.l1 GO TO 10 0002‘500 CALL PLOTS 【BUFfER，1024) 0002‘510 6日 T日 20 00024520
10 CAll PL日T(0.，O.，666) 0002‘530 20 CALL PlOT<10.，20，， -3) 0002‘5‘。
CAll HUHBER(-25.，ー10.，3.，flOAT(JJ)，O.，-I) 0002‘550 REl'URH 000~4560 EHO 0002‘570
000001
000002 000003
000004 000005 000006 000007 000008
000009
000010 000011
c....・・・・S車窓..........:1..............・...:1..・.............虫・・・・...・g・.....0002‘580SU8ROUTIHE lITLEP(¥/ITHX) 000雷‘590TITlE PlOT 0002‘600
c・・・・・・・事事怠・・・・...........‘・，..・s・...・・・・E・・3・s・・・・.....・s・..・・.1:..・....・0002‘610CHARACTER TI TlE・‘o 00024620
COHHOH IGPLOTITITLf 0002‘630 CAll SVH80L(III:~1112. ， -25.，3.5， TITlE， 0.，‘0) 0002‘晶‘ORETURH 000246官。EHO 0002‘660
000001
000002
000003 00000. 000005 000006
c..草・・・・・s・a・...・‘.....・s・........・・・g・u・.....................竃草2・=・・・・・00024670SU8ROUTIHE XVSCAι(JHAX3，XX，IIIIH，XX制IH，KKHAX.UOιT) 00024680
C"・S・S・.............・・・・車場...・・・・・・...:&.....軍..・..・・・‘・....・・・・・・a皐皐啄・・00024690D1HENSIUH U(JHAI3) 0002‘700 JHAX 'JHAX3・ 0002‘71000 10 J=I，JHAX 0002‘720 If <XX (J) .GI. UHAXl UHAX.XX<J) 000宮4730
If (U(JI・LT.UHINI XXHIH-U(J) 000247‘0 10 COHIIHUE OU0247)0
Ul KX<ll 00024160
XX2 XX(JHAXI 0002.770
XX(I) XXHIH. 0002‘1s0 U (JHAXl -UHAX 000H790 CAIl SCAI.E<XX，IIIIH，JHAX，I，10.) 0002.800 KX<H • Ul 0002‘810 XX(JHAXI • XX2 00024820
XXH1H-XX<JHAX>ll 00014830
UOL T'U(JHAX' 2) 00024840
-91ー
000001
000002 000003 000004 000005 000006 000007
000008
000009 000010 000011 000012 000013 000014
000015 ooooa
ivviti--ukpiftE36ABB‘.
JAERI-M 84 - 162
000017 000018
REIURN END
00024850 00024860
000001
000002 000003 000004 000005 000006 000007
000008 000009 000010 000011 000012 000013 001)014 000015 000016 000017 000018 000019 000020 000021 000022 000023 000024 000025 000026 000027 000028 000029 000030 000031 000032 000033 000034 000035 000036 000037 000038 000039 000040 000041 000042 000043 000044 000045 000046
CxxxxxxxxxxxaxxxxaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaxaaaxxxaaaxaaaaaK SUBROUTINE PTSHBLUPL \, IJ,IPEN,HP,WITHX,WITHY)
Caaxxxxxx»xxaaxaaxxxxxxa*xxaaaaaaxaaa*aaaaaaaaaaaaxx*aaaaaaa*xaa*x CHARACTER CNUM(5)*4,PMBL(7)«24,T1TL"24 CHARACTER Tl IL£«72,T1 rLNx40,TITLP«20 COHHON /GPLT2/II,1DPL0T(7),CASE<5),NSHBL(7> COHHON /TXl/ TITLE,T1TLH<5),TITLP(5,15) DATA CHUH/' IA=',' JA=',' H-',' MP-',' t-' I . DATA PMBL/'COOLAHT TEHPRATURE 1 'CLAD SURFACE TEHPRATURE ', 2 'HEAT HAX. TEHPRATURE ', 3 'SATURATION TEHPRATURE ', 4 'OHO TEHPRATURE ', 5 'PRESSURE AT X 6 'HEAT FLUX '/ lKIJ.EQ.O.AND.IPLT.EO.I) DY = 0.0 IF(DY.GT.O.O) GO TO 5 XP = WITHX + 40.0 YP ' WITHY OX = XP • 10.0 XM * XP • 5.0 SXP = OX • 3.0 DY = 5.0
5 YP ' YP DY U ' IJ t 1 IT =- II TITL " PHBL(IT) 1FUJ.6T.1) GO TO 30 YP = YP - DY CALL NEWPENU) CALL PL0T<XP,YF,3> CALL SYHB0L<XP,YP,2.5,9HCASE HO. ,0.0,9) DO 20 1-1,5 CALL SYHB0L(999.0,YP,2.5,CNUH<1>,0.0,4) CALL KUHBER(999.0,YP,2.5,CASE(I)/0.0,-l)
20 CONTINUE H - CASE(3> NN • CASE«4> YP = YP - DY YYP = YP - 1.0 CALL PL0T(XXP,YYP,3> CALL SYMB0LCXXP,YYP,2.5, T1TLP<H,HH), 0..20) YP = YP - CY
30 CALL KEWPENUPEH) CALL PL0T(XH,YP,3> IF(NP.EO.O) 60 TO 50 CALL SYHBOL(XM,YP,2.0,HP,0.0,-1)
50 CALL PL0T<XP,YP,3) CAll PLOT<0X,YP,2) YYP • YP • 1.0 CALL NEWPEHU) CALL SYH80L<XXP,YYP, RETURN END
2.5, MIL, 0.,24)
xxxxxx00024870 00024880
«a*a»00024890 00024900 00024910 00024920 00024930 00024940 00024950 00024960 00024970 00024980 00024990 00025000 00025010 00025020 00025030 00025040 00025050 00025060 00025070 00025080 00025090 00025100 00025110 00025120 00025130 00025140 00025150 00025160 00025170 00025180 00025190 00025200 00025210 00025220 00025230 00325240 00025250 00025260 00025270 00025280 00025290 00025300 00025310 00025320 00025330 00025340 00025350 00025360 00025370 00025380 00025390 00025400
000001
000002 000003 000004 OOOOO'J 000006 000007 000008
Caaaaaaaa«aa»xxaa«aaaaaaaaaaaaaaaaaa»a»»aaaa««a»aaaaa»aaaaaaaxxaaxxxaaaa00025410 SUBROUTINE C0NV<JHAX3,X,Y,JPTHAX,XL,YPT,YHIN,Y0LT> 00025420
taaaaaaaaaaa»»»»aa«»»«a*«*»»a»«aa»««»«»»««»*:«««»»»»«»«x»a«aa»»»«»«aaa«a»00025430 DIMENSION X(JHAX3)/Y(JHAX3),XL(JPTNAX),YPT(JPTHAX),VW(132) 00025440 JHAX - JHAX3-3 00025450 EPS • 0.01 0002!*i0 00 20 JJPT * 1,JPIHAX 00025470 H ' JHAX 00025480 V - XL(JPD 00025490 CALI AKIA«<X,Y,JHAX,V,M,EPS,YYY,VH,ICON) 00025500
- 9 2 -
000017 000018
JAERI-M 84 -162
REI URH EHO
0002~650
000?~660
Caa率車率率率事車率事噂率率・s・g・........・E・E・..・S・S・...8・..・s・B竃...........・g・S率事事率事0002ゐ670
OOOuOl SUBROUIINE PISHBL(IPLI，lJ，IPEH，NP，WIIHX，WIIHV) 00024860 c.....*率草取Z皐事.......・事事・・・・・........・...・......血...・a・・s・a・..*......~...00024890
000002 000003 000004 000005 000006 000007
000008 000009 000010 000011 000012 000013 00UOl4 000015 000016 000017 000016 000019 000020 000021 000022 000023 000024 000025 000026 000027
000028 000029 000目30000031 000032 000033 000034 000035 000036 000037 000038 000039
0000・0000041 000042 000043 000044 000045 000046
000001
0000112 OOOOOJ 000004 00000'， 000006 OOOOOl OOOOOs
J '
E
E
z
o
'
・
u
‘
。
，
.
4
，
L
B
E
E
-
A
-
-
m
u
c
J
'
a
，
、
，
.
a
a
u
q
a
u
n
-
-
，
，
A
・
V
・
-
o
s
'
'
'
'
'
'
'
'
J
O
，
，
，
》
-
L
n
e
M
同
区
J
E
'
'
'
'
'
'
'
・
a
u
a
o
‘
，
A
-
T ..
，E
P
O
-
-
M
関
空
・
a
・
0
E
、
，
B
r
M
開
E
E
A
M
-
'
n
w
a
o
M
開
，
rtsL
目
E
E
・
，
，
，
.
'
T
・
，
、
Y
E
'
"
u
B
R
固
R
A
0
・
、
，
、
，
M
町
、
，
a
w
晶司
EaEE守‘，，.. “
"
“
o
a
u
，
A
'
a
，
、
.
.
。，.T'"hwT''a内
T
・
T
・
g
M
開
，
‘
，
‘
n
r
.
，
e
'
a
"
'
句
F
E
固
R
a
阿
血
肉
凶
伺
E
r
‘
・
L
'
'
L
、，nuFi刷、，u-nau伺RFm鵬由民
u
'
r
E
“
0
・
a
T
・
A
U
T
'
7
4
'
5
U
H
P
P
O
S
H
A
l
l
-
-
，.、
.. 、
，
，
.
、
，
B
F
E
M
同
組
問
・
"
'
a
U
9
L
T
・
A
U
官
・
-
L
M
m
，
e
M
"
'
血
肉
T
・
E
E
E
E
E
E
、
，
p
t
u
，
，
ー
，
""'ι，‘・L，m偶
T
・
T
-
o
n
-
-
崎
・
・
u
n
z
J
a
d
'
巾
m
H
，
u
n
V
4
T
'
T
，
，
伺
r
p
E
凶
u
-
a
u
s
-
-
z
J
M
同
区
，
伺
r
E
a
n
u
-
a
z
U
R
n
-
-
T
'
T
E
n
・
，
。
，
‘
内
4
・
，
.
，T-E』官・A附
ELA向
M
開
・
n
a
"
z
t
c
J
R
，
，
，
内
z
a
w
q
，
‘
A-T'az'・e'・FF-au白N
・
A
-
A
U
-
n
r
n
r
、
，
，
a
w
.
，
・2B
E
E
R
-
-
E
E
U
T
0
3
2
Y
Y
3
P
5
2
、
，
，
s
・
a
・
L
，
T
'
u
u
a
m
T
'
M
関
白
崎
・
L
・
L
，
.
、
，
，
，
，
，
U
E
、
，
，
、
，
、
，
u
'
Rd・-，官.，M岡巴
O
M
円
‘
m
E
r
・
“
o
E
'
e
r
白
u
n
u
電
d
B
r
a
w
n
u
a
r
ν
・
、
，
曹
司
酬
の
u
a
'
'
a
命
4
V
E
，、ELE--E.. ，
a
"
白
網
T
-
C
・
E
・
-
n
u
-
T
・
'
v
・
・
・
ν
・
'
M
開
'
T
-
w
.
，
，
，
M
n
-
L
E
a
y
'
z
・
L
n
U
T
E
H
u
e
a
r
-
-
p
u
n
u
、
.
，
F
r
'
a
噌
，
a
，
u
'
n
r
F
E
同
r
，
n
r
“
r
n
r
HHW，.，sa"nu‘namT・白固FEa"nu&司
AHWAHWT'命"、，MEnra，自噌，nu'旬Aazu-nuu"ν-U1au、，VEa
M伺-a角，‘，，，anu-LEEa"“同nREEM問、，・aw-zapu-a'van-，a'・0『旬A
...
，戸U曽A''・4zνA
pt・T'T，.EFLF-MM開abAunru"a同AUゐ
EAU-'SUE，.、u，，‘"r，.、，‘，‘、，u，.‘旬AaE‘u，，.、M開，.、mV・A・-.，.、，.、
-
L
U
A
'
'
'
'
'
'
'
'
・
・
・
・
z
J
白
u
'
E
E
L
、
，
n
u
u
岡
管
A・LEJ・Lm眠、，&句nu，‘・Eh蜘
UM開智品、，.LuhauM開Eι
D
r
T
'
'
'
'
'
A
U
A
U
u
a
m
U
冒
φEB-arE，.、AU'nurE，a，‘.，‘nUFE，.、auau，t，.、rEnu
n
u
n
白
W
F
U
W
'
'
M
円
・
L
・
・
u
n
u
n
-
舎
Avun--自rT・m個
-a乱
回
目
E
，
‘
F
E
-
T
・
a目
-nrv'・EBTETEnrnu
E
E
F
E
，
，
H
q
n
U
A
M
-
T
『
T
'
T
E
曽
且
町
内
U
伺
r
T
E
H
W
n
u
u
岡
昌
M開unFEFEasnrnUM開HWAUAM-u"aununFHWM円
T'T『
M
開
M
町
F
E
p
u
，
A
E
-
-
n
r
n
V
仇
u-nrEJu，』punrFE-LU・'au'uuuu・s-伺nru--LM盲目
rFE-LFEU，・L-LU'FEu'
ptw，LM四
M
問
仰
b
"
r
・
・
H
・
M
・
-
A
-
-
a
z
J
U
E
E
且
'
』
z
-
u
y
M悶
nr'babu"凶na同Fbu'"r'au'""nv-FSnrnrM開abM"
風
"
a
H
n
u
n
U
E
J
U
U
Y
S
・
J
-
h
u
'
A
F
L
a
m
p
z
n
H
nMnHRU円M開aHa川
-anU2sah
一-ZE---LE--g・L-L-L。，h・L-LT'2a-L-LE-LELM何
EL--‘.，.LELuu
角的
aHM円M円T'T，，.、，tnrT，，.、・L-L-L-L-LM開anr・L-L-LEL，.、・L-L-a自v--L-LT'nu
unHHnunua"a"rrrrnrnr・-備M円MAUEnrEJUT『
2arrnr角的
aHAunauaHa川
auu開nru'・ma同nr・ana"'ra"a川
a同u'a"aHFEM同
FLPEMFEMF-"nunu----a-AU'nO句am匂
Anυuy'』-aTE-AU冒
9LPLPLnupLPLFLu-nM開U'u'FtuFLu'FLPLE--FLFLrbu'FLPLnHFE
1
2
3
6
民
a
，
a
u
a
U
A
U
2
3
5
00024900 00024910 00024920 00024930 00024940 00024950 00024960 00024970 00024980 00024990 00025000 00025010 00025020 00025030 00025040 00025050 00025060 00025070 00025080 00025090 00025100 00025110 00025120 00025130 00025140 00025150 00025160 00025170 00025180 00025190 00025200
00025210 00025220 0日02523000~25240
00025250 00025260 00025270 00025280 00025290 00025300 00025310 00025320 00025330 00025340
00025350 00025360 00025370 00025380 00025390 00025400
c....・・a・・E・g・....・・・...・g・.....軍...........寵隠・・s・a・....・g・S摩・・..・s・..事事00025410SUBROU11HE CONV(JHAX3，X，V，JPTH両X，Xl，VPT，VHIH，YOlI) 00025420
(;..・...........・・・・軍軍・・・.........・.......................・・・・・a・....・皐・*00025命30OlHENSION X(JHAXl)，V(JMAX3)，Xl(JPTHAX)，YPT(JPTHAX)，VW(ll2) 0002~4命。
00025450 JHAX " JHX3・3
0002!‘00 EPS . 0.01
00025410 00 20 JP.I • I，JPIH晶E
00025480 H JHAX
000官事490V . XL<JP f) tr.1I AKI向日(X，Y，JH両x，V，M，f.PS，YVr，VW，ICOH) 00Q1~500
-92-
JAERI-M84- 162
000009 Y P K j p n 0001)10 20 CONTINUE 000011 RETURN 00001? END
<YVY VHIHJ/YOLI 00025510 00025520 00025530 00025540
Caaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa aaaaaaaaaaaaa 000001 SUBROUTINE PTLINE<XPT,YPT,JPTHAX,MP)
000002 DIHENSION XPT(JPTHAX),YPT<JPTHAX) poooo? CALL PLorapr<i),Ypro>,j) 000004 00 100 J=2,JPTHAX 000005 CALL PLOT(XPT(J),YPF<J),2) 000006 100 CONTINUE 000007 lF(NP.ES.O) CO TO 300 000008 NC * 0 000009 00 200 JM,JPTHAX 000010 IF(NC.NE.O) GO TO 150 000011 CALL PL0T(XPT<J),YPT(J)/3) 000012 CALL SYMBOL(XPT<J),YPT<J>,2.0,MP,0.0,-1) 000013 150 NC • It l 1 000014 IF(NC.GE.3> NC = 0 000015 200 CONTINUE 000016 300 RETURN 000017 END
[aaaaaaaaaaaaaaaaa*aaaaax000255 50 00025560
[aaxaxaaaaaaaaaaa*ass**sa000255 70 00025580 00025590 00025600 00025610 00025620 00025630 00025640 00025650 00025660 00025670 00025680 00025690 00025700 00025710 00025720 00025730
C*»»****aa*aa*aa»**»*»«**aa»»a»»a»»»*»»**aa»a*a*»« «a«aa«x»aaaaaaaaaa»s«aOOO 25 740 000001 SUBROUTINE XCONV(JPTHAX,XL,XPT/XHIH.,DLT> 00025750
Caaaaaaaaaaaaaaaaaaaaaaaaaxaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa00025 760 000002 OIHENSIOH XLCJPTHAX),XPT(JPTHAX) 00025770 000003 DO 10 JPT = 1,JPTHAX 00025780 000004 XPT(JPT) ' (XL<JPT)-XHIN)/DLT 00025790 000005 10 CONTINUE 00025800 000006 RETURN 00025810 000007 "NO 00025820
- 9 3 -
JAERI-MS4-162
000~09 YPT(JPT) -(yyy.y阿IH)/YOtl000010 20 COHTIHUE 000~11 R正TURH000012 EHO
0002SS 10 00025520 0002~530
00025540
c............・s‘・.....・・・8・・g・・・・・・z・・.....・E・.......・S・S・‘・B・S・S・..・‘...000255500~0001 SUBROUTIHE PTLINE(XPT.YPT.JPTHAX.NPI 0η025560
E事事・g・・m・・・・・・..・......留軍軍事......・・a・・B・・..・・・・..・E・...............・‘・"00025570000002 OIHEHSIOH XPT(JPTHAX).YPT(JPTHAXI CQ025580 r，uooo~ CALt PLOTOPT(1).YPTC1).J) 110025590 000004 00 100 J=2.JPTHAX 00025600 a00005 CALL PLOTCXPHJI.YPT(JI.2) 00025610 000006 100 CONTI HUE 00025620 骨骨0007 IF(HP. ED.OI GO TO 300 000256.0
000008 HC • 0 000256‘0 000009 00 200 J-l.JPTHAX 00025650 000010 IF(NC. NE.OI 60 TO 150 00025660 000011 CALL PLOT(XPT(JI.VPT(JI.31 0002~670
000012 CALL SYMBOL(XPT(JI.VPT(JI.2.0.HP，0.0，・11 00025680 000013 150 NC • HC・ 0002569000001‘ IF(NC.GE.3) HC • 0 00025700 000015 200 COHTlNUE 00025710 000016 300 RETURN 001125720 000017 END 00025730
c.........................・・....................・......・..........・..・・".000257‘0000001 SU自由OUTIMcXCOHV(JPTMAX.XL.XPT.XNIN.DLTI 00025750
c...................・E・....冨竃......・R・E・..........・g・..・E・E・....・.8.........0002576000000' OIHEHSIOH XL(JPTHAXI.XPT(JPTNAXI 00025770 00000.1 00 10 JPT • I.JPTNAX 00025780 000004 XPT(JPT) 固 (XL(JPTI-XHIH)/DLT 00025790 000005 10 COHTlHUE 00025800 000006 RETuRH 00025310 000007 ・ H~ 00025820
-93-
»c. x * f - * m THERMAL HYDRAULIC CALCULATION CALCULATION DATE 84-07-0?
•••• TEMPERATURE CALCULATIONS OF A-TVPE FUEL ELEHENT WITH THERMOMETERS «•«» CALCULATION DATE 84-07-0.2 »»»• INITIAL INPUT DATA
INPUT CARD 8
INPUT CASE 1 INPUT
INPUT
.INPUT INPUT
CARD C ORR 2.500
CARD El
CARD E2
CARD Fl CARD F2
CARD F3
CARD Ft
I AMAH 1
PFLOW 5.400
HI 0.116 FRATE 0.820
1MAX 1
TIN 27.200
H2 12S.000
VIN 0.340
JHAX 13
DT O.C
JAMX 0
H3 0.333 VOUT 0.340
INSTRUMENTED FUEL ELEHENT NPHX
4 FR
1.420
NFUEL 1.0 .
FCOOL 1.000
FFILM 1.000
NHAX 2
A 0.667 PRESIN 1.840
UDENST 0.600 FCLAO 1.000
J FZ 1 0.325 2 0.304 3 0.465 4 0.649 5 0.838 6 1.069 7 1.323 8 1.S4C 9 1.584 10 1.504 11 1.286 12 0.976 13 1.128
INPUT CARD F51 PLATE NAME NPLATE
CENTER FUEL PLATE 1.0
INPUT CARD F52 FLOCL 0.816
INNER FUEL PLATES 1 6.0
INNER FUEL PLATES 2 6.0
OUTER FUEL PLATES 2.0
1.020
1.020
0.827
1DPL 1
KMX 2
NPLOT 1
B 0.333 IRAHF
0
POROTT 0.0 FBOND 1.000
I PLOT 1
KEV<1> 1
C 0.667
IDPMX 2
FMEAT 1.000
I OUT 1
KETC2) 1
D 0.140
IDCMX 2
KEYC3) 0
ITWC 1
EAREA 38.440
FRATEN 0.977
INPUT CARD FS3 K 1CHL NHEAT FRATEC 1 1 2 1
2.0 2.0
0.8700 0.8700
1 1 2 1
2.0 2.0
0.8700 1.0000
1 1 2 1
2.0 2.0
1.0000 0.7600
1 1 2 2
2.0 2.0
0.7600 0.2400
タ例入力デー附c.PAGf CAιCUιATlOII DATf a‘-07・02
-・・・・・・・・・・・・・・・・・・・・ICII......・・・・・・・a・・・・・・・・・・・・・・・・・・a・・s・・・・・・.................... TfHPERATURE tALtULATlONS OF A-TYPE FUEL ELEHEMT IIlT側 THUM。開ETEIS •••• ・..・ CALtULATJON OATE a‘・07・O~ ・・・・E・・・ E刷lT1AL 1同PUT DATA •••• ・・・・・・2・・・・・・・・・・・・・・・・・・・・・・・・・....・・2・.・・・・・・・・8・・・・・・・...............1'1'・・・・・・・・lAMAX lMAX JHAX NHAX NPLOT KEY(1) KEYC21 KEY(3)
13 2 1 0
- THERM鼻L HYORAULJC CALCULA7l0則tO口LOO
1TIIC Z
b 0.1~0
c 。.667• 0.333
lRAHF 。-"''幽Rau'
a--a-z喝
au
・s・-
-Er--
nuaEn---
-av
言切EI玄室
l-s
FRATf制
O.・77EAREA
38.‘40
10tH翼z
10PM誕z
F伺EAτ1.00。
PO食OTY0.0
F8DHD 1.000
UOENST 0.600
FCLAD 1.000
INPUT CAIO F53
K lCHL NHEAT FRATfC
1 2.0 0.8700 2.0 0.8700
1 2..0 O.・7002 2.0 1.0000
1 2.0 1.000。苫 2.0 0.760。1 2.0 0.7600-2 2 Z.O 0.2必。。
PFLDII TJ偏 OT JAMX 5.400 27.200 0.0 0
Hl M2 H3 。.11・125.000 0.333
FRAtE Vll・ vout0.820 0.3‘o 0.3‘。
lNSTRU閥EHTCO FUEL ELEHENτ
NPMX NFUEL
‘ 1.0
FR FCOOL
1.‘20 1.0・0FZ
0.325
0.30‘ O.‘65
0.6‘' 。.8381.06・1.323
1.5‘E 1.58‘ 1.50‘ 1.28・0.976 1.12且
Z附PUT
制PLATE1.0
lNPUT CARO ・lNPUT CUO C
@食肉
tASE 1 2.500
1制PUT CARO E1
HA O
FF1L伺1.000
Z制PUT CARO n
tA食ofl
CAI¥O F2
.IN~UT
lNPUT
宮
CARO F52
FLOCL O.圃16
Z蜘PUT CARD F3
」1 2 z 4 5 6 7 s
' 10 11 12 13
Z刷PUT tARO F51
PLATE N'‘HE CENTER FUEL PLAtE
CARO F‘ Z闘PUT
lDUT Z
lPLOT Z
区HXE
10PL Z NP・2
。。
。。
2
2
1.020
1.020
0.827
6.0
6.0
2.0
lN制ER FUEL PLATfS 1
lNNER FUEL PLATES 2
OUTER FUEL PLATfS
柑p.2
NP・z
NP.‘
JAE
RI-M
84-162
sis -n II II II W-H
*-40 OO
r- OO
O O OO
< •
m
m
M* H
i KMft
OO «4
<o Ut *4
ss§
iDOO acoo
OOO
OOO
OO
ooo ooo
-*•© s
inmo ")•>.".
•* •* r% •* -*
c «-*
«« —
OO
1 «
0O
1 *W*lrt »«
> > I--
ooo o
o ** •••« u.
ooo o
o Ol-
".".". "!«.«? <s oon
O O
T»
MO
O «C**I >-lf» V
'5 <o*-o
£_ o o oo II
III
ooo
L. OOO
« m m o
x in «-• ra »
II
SSI I! 3!
x o o o o
=1
tz i%
OOOOO-H-M*
in4
tA
«M
>»
pr
4f
SSI n
m
0. M
95
=咽伝田回目=有品局日Z尋~~喧-噌""'-~宅‘S雪~ミ謂現官品.---..-切目目、... - -"_.、，一ー 一一 ←
AREA
50.・‘o50.11‘。19・635
‘o.‘z。‘。.uo1.767
凶tl1.500 1.500
D!
7.13・7.130 5.00。11.・81。.1・21.500
"・160.00。60.00。
YA1 純Al
6.5‘。1.500‘.5‘o 1.50。E刷PUT CARO F71・・73lS ZETA OH
0.50。‘.5000.50。‘・500
3 1.000 17.00。0.50。‘.50。o.。‘.5001.000 17 .00。
XCl 。.1250.063
XBl 。.0250.025
XAI 。.0250.025
10P 1 a
'CH1 7.0‘。
7.。‘。
INPUT CAAO f‘
CARD HO XCHl
0.39。
O.‘116
1N~UT IDC
1
'RATf開1.001
EUEA 40.410
10C胸za
lDP開mz
FN!AT 1.000
PO輿OTT。.0'eo刷。1.00。
ELENENT
伺 UD[NSTo 0.600
'CLAO 1.00。
』〉加担
lgEl-B
Z刷PUT CARD"3
区 lCHL 闘HEAT fRATEC
2.0 1.0500 2 2.0 1;0500
2.0 1.0500 2.0 O.・7502.0 o.・75・
2 2 2.0 0.220・"・ HCl60.0!!0 1.500
FFIL伺1.000
CA同oF5l
'LOCL 1DPL 1.00・ 1
A TT~E STA個DUO PUEL
.PNX 制'UEL3 19.0
，R 'C目。L1.000 ¥.00。
'Z 。.3Z50.3。‘。-‘6s。.64‘'。.113111.06・1.3l3 1.5‘。1.584
1.50‘ 1.286 0.976 1.121
lN~UT
舗PLATI1.0
INPUT CUD Ft
I嗣PUT CUD'2
Z側PUT CUO'3
」
z a z
‘ s 6 F
8 • 1。11 12 13
lNPUT CARO"1
PLATE Nl‘NE CE輔TERFUEL PLATU
INPUT CUD F'‘
co
‘"
10UT O
。
IPLOT O
。
K偶xz
ー1.000 12.。Z削NER FUEL ~LATes
刷p・2
.P・2
。。1.00。2.。OUTU fUEL PLATES 刷p・3
AREA
51.9‘0 51.9‘0 19・635
40.‘10
D!
7.205 7.205 5.00。0.1・1
U I HA1 6.5‘。1.500
Z附PUT CARO F71・-13lS ZETA OH
0.500 ‘.500 0.500 ‘.500
3 1.000 17 .000
0.50。‘.500
XC1 。.063=・I0.025 U l
0.025 10~
1
TCHI
7.0‘。
I胸PUT CUO F6
CARD HO ICH1
0，‘1。INPUT
10C 1
40.410 1.767
0.1・11.50。‘.500
17.000 。.01.000
2 3
7.0‘。O.‘70
Pfi-D. m IJ m
COOLOD --THERMAL hYDRAULIC CALCULATION CASE = ( I A - 1 JA- 1) C . ' L C U L A T I O N DATE 8 4 - 0 7 - 0 2 PAGE
*******s***»*****s***s****»**s**»*****»**9*s********tz**a**»s**«ik******«**«»sa s* »« TEMPERATURE CALCULATIONS OF A-TYPE FUEL ELEMENT WITH THERMOMETERS •• RESULTS OF CALCULATION AND USED VALUES as ***********s*s***»**********s*a*************s*******s****************a*ftttt***
»«« PRIMARY COOLANT ««» REACTOR INLET TEMPERATURE « 27.20 C REACTOR OUTLET TEMPERATURE = 33.88 C PRIMRY TEMPERATURE DIFFERENCE- A.68 C PRIMARY COOLANT FLOW RATE = 5.40 M3/MIN
I >>< REACTOR CORE ««»* ' REACTOR THERMAL POWER = 2.SO MW $ AREA OF TOTAL FUEL CHANNELS = 806.23 CM2
NUMBER OF FUEL ELEMENTS = 20.0 ELEMENTS INSTRUMENTED FUEL ELEMENT = 1.0 (ELEMNTS) AVERAGE HEAT GENERATION = 424.68 (W/CM3) AVERAGE COOLANT VELOCITY =» 93.82 (CM/SEC) COOLANT TEMP. — (MIXED MODEL) KITE = 3
A TYPE STANDARD FUEL ELEMENT = 19.0 (ELEMNTS) AVERAGE HEAT GENERATION * 424.68 (W/CM3) AVERAGE COOLANT VELOCITY • 91.43 (CM/SEC) COOLANT TEMP. -- (MIXED MODEL) KITE » 3
例力出附D.
2 PAGE C:LCULATION DATE 84・07-02
..耳障・耳障a・・s・・2・・・・・・*****..*・2・................・・・・・..・***....・8・・・・・a・2・・....・・・・・・.. .. ・・ TEHPERATURE CALCULATIONS OF A-TYPE fUEL ELE阿ENT ¥11TH THER附白附ETERS ・・•• RESULTS OF CALCULATION AND USED VALUES ・8
・1.& .. ..・2・2・a;*.....耳障耳障耳障.......**.......・s・g・**.*・・s・..皐....aJ・s・eョs・..羽...・・・..・・・...・・・・・2・
CASE <IA- 1 JA・ 1>COOLOD --THER阿AL hYDRAULIC CALCULATION
』〉開河
HlZ白島
l】由一山
-
-
N
・
I
・
"，，
TE
電d
M
同，L
F
、，L
M円
aR
-L
nunu---onu
nu『
400ao'a司
E----
宅
''s，。，コ
『，』
TS
V冒ERH
a"sz==
M
H
E
』
'APEPE
，E.
RMnnRRMnM問
内
rHUHu--E
TET'nkPE
--AAET
・-nRRRE『
a内
--EEFR
内
r白
r'A
MHMHhuu-
E』
E
E
n
u
T
，T
，PE・』
nkpr
uu
'Eマt'E
TEAN
Z』
ELmk
・-n
-LT'rE-L
創刊
Husr内
u
'A内
U
M円
nu
EEP--
マE
R
H
R
H
v
nunuv-mN
T'T
，RMn・"
pt-PLMnM円
-ma"'且-
T
目・
Er-FERHRR
nkmk向
rnr
REACTOR CORE •••• 2.50 附M
806.23 CH2 F3 ・E-
Ez
--RM
・-Fh・Mm
・-HA
nMMH
D-pb
-』
・』
EL
a"MU
MnEr
nH
EE・』
un--n
マE'E
nu
T
，
RRpr
D
O
T
・，L-R
-RPE
EEBR
ena内
1
8
1
1.0 (ELE阿NTS>
424.68 (1oI/t円3)93.82 (C阿ISEC)
ELEHENTS
電」-
gzg=
FZ
T-z
'n
20.0
INSTRU阿ENTED FUEL ELE附ENT
AVERAGE HEAT GENERATI0N AVERAGE COOLANT VELOCITY COOLANT TE例P. -- (例IXED 阿ODEL>
ELE同ENTSFUEL 日FNU附BER
19.0 (ELE阿NTS>424.68 (¥lIC附3)91.43 (C例ISEC>
s
z
S
KITE・3
A TYPE STANDARD fUEL ELEHENT AVERAGE HE~T GENERATI0N AVERAGE COOLANT VELOCITY
COOLANT TE阿P. ー-(HIXED 向日DELl
COOLOD —THERMAL HYDRAULIC CALCULATION CASE = < IA- 1 JA- 1) CALCULATION DATE 8 4 - 0 7 - 0 2
* * * s * s a t * s * s * s s s * * s * * * s s s « s * s * s * t s * s k * s * t t f t * t * * * * * * * t t * * K K * a t * * * * z s « « s s * * s s * s * s a «« INSTRUMENTED FUEL ELEMENT «« t t * t i i t t i i i t t t t t t t t t i t t t i s t i i i t t t t i i * ( t t t i t * t t t t t t t t t t t t * t * l t l t l t t t t t t t a a i i i l i i i
AVERAGE CHANNEL TEMPERATURE DISTRIBUTION
1 2 3 4 s 6 7 8 9 10 11 12 13
COOLANT (DEG.C) 27.20 27.40 27.65 28.01 28.49 29.11 29.89 30.81 31.83 32.83 33.73 34.47 35.15
FLOW CHANNEL AREA * 38.44 CM2 NUMBER OF FUEL PLATES
CENTER FUEL PLATE INNER FUEL PLATES INNER FUEL PLATES OUTER FUEL PLATES
-- TEMPERATURE CLADDING SURFACE (DEG.C} 33.01 33.47 37.03 41.04 45.15 SO.00 55.30 59.91 61.45 60.77 57.61 52.67 5S.93
DISTRIBUTION CLADDING
INNER CDEG.C) 33.22 33.66 37.33 41.46 45.69 50.70 56.16 60.92 62.48 61.75 58.45 53.30 56.66
FUEL MEAT OUTER (DEG.C) 33.22 33.66 37.33 41.46 45.69 50.70 56.16 60.92 62.48 61.75 58.45 53.30 56.66
FUEL MEAT MAXIMUM (DEG.C) 33.24 33.69 37.36 41.51 45.76 50.78 56.27 61.03 62.60 61.86 58.55 53.38 56.75
i HOT CHANNEL FACTORS (EXCEPT FZ) »« F(C0OLANT)= 1.000 F(FILM)» 1.000 F(CLAD)= 1 .000 F(BOND>= 1 .000 F(MEAT)* 1 .000
1 J FZ 1 1 0.325 1 2 0.304 1 3 0.465 1 4 0.649 1 5 0.838 1 6 1.069 1 7 1.323 1 8 1.540 1 9 1.584 1 10 1.504 1 11 1.286 1 12 0.976 1 13 1.128
TRANSFER COEFICIENT CW/CM2.C) 0.5943 .5324 .5267 .5290 .5343 .5433 .5S26 .5618 .5678 .5715 .571B .5692 .5763
HEAT TRANSF H E A T IN PLAT
(W/CM2) 3.450 3.228 4.937 6.890 8.897 11.349 14.046 16.350 16.817 15.968 13.653 10.362 11.976
ER CONDITION — F L U X
E SURFACE (KC/M2.HR) 0.29667E+05 O.277S0E+O5 0.42447E+05 0.59244E+05 0.76496E+05 0.97583L+05 O.12077E+O6 0.14058E+06 0.14459E+06 0.13729E+06 0.11739E+06 0.89094E+05 0.10297E+06
XAA (CM)
0.025 0.025 0.025 025 025 025 025 025 025 025 025 025 025
H E A T GENERATION
(W/CM3) 138.020 129.101 197.474 275.614 3SS.878 453.97B 561.846 6S4.000 672.6B6 638.712 546.133 414.483 479.034
3 PAGE CALCULATION DATE 84-07-02 CASE (IA- 1 JA- 1) COOLOO --THER阿AL HYORAULIC CALCULATION ••• 8
・・•• ••
-
s
s
・--
••• •• •• --
s
a
----E
s
a
s
s
a--
a
a
---
s
・
a
・-s
・
aE
・
g
・---
B
・
s
・
-・
8
•.. ---
s
・
a
・-
••• ---
a
-
S
T
・-
S
M阿
8・ES
‘RMH--
‘.E-
sL--
・E-
----
a'
』・--E』・8HU ..
. ，F
・
s
・-・・恥
u--
--ES
--T・g-M四
S
SE-
-"・--Hu--E
-ons
-T
・
8
C
叫・8
創
刊
・
-z-E -s
---E
s
・
g
・-s
・
s
a
s
s
a
--.‘ ---E
-
s
s
・---
S
B
・S
・S
・--a
s
a
s
sa--
g
・・
1.0 6.0 6.0 2.。
AVERAGE C~ANNEL TEMPERATURE OISTRIBUTION
FLOW CHANNEL AREA NU阿BER 白 FUEL PLATES
CENTER FUEL PLATE INNER FUEL PLATES 1・INNER FUEL PLATES 2= OUTER FUEιPLATES
CM2 38.44
】〉何一周回
1富田
AF--四日
--a
・3E』
E'EB---B
・s・-.，.，.a-E.，.，.'"
-
-
-
m
-
-
-
T
E
R
--RM円、，，-avao---auee
，，，a
内uaOEJeasa-
-EEHU
，EW『dao'ar3
，，，，『ζaua。.0F3曹
a''-
-
M
円幽円・・・・・・・・・・・・・・-
-Z63371506121836・
-aL曽
-RZ』電d
電d電dz-z-EdRdAMAMAMRdRdRd
由
-EE--nnu
咽
-HU
泊
円
，
‘
-
-PF
旬• • •
-
-
-
-
-
守
'
-
-・側、，『，-anw'aaoavauaO
『ζ・0EJeanMao-
-Er』由民PL
『ζao'a'・40''
・・・av
，‘，，，句宮古eao-
-
M
n
E
E
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
・守，PHMZJ'a
，，... EJ
内uaO
内U『，-4E-eozdao-
-・』HUE』宅dをJτd
，‘，-Rd巴JAUAwaoeJRdad-
-
F
E
n
u
n
u
-
-HU
，
‘
.
EE'
・
-
-
e
e
-
-
一
M
m
-
-
m632636906285506-
TNHE2634671947436
一
HU'AFE
・e・------------
aunuMmpuzd'a'''AEJ内
uaO内
U『
ζ4E-eo'aao-
-DNE3334455666555
一
B
n
a
"
'
A
h
υ
E
TE--
』
，
、
-
a
F
d
p
u
-
'
A
-
n
u
-
F
E
-
D
n
-
H
U
-
T
E
-
-
MGE317345001571T3-
E
』M同pt-pt-au'-auau---AU
電」内V
，‘，，auaonv-
a
r
T
E
-
-
R
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
MnauErpu'a
，a'''AEJAUEJav---nu
，，『ζga-
EEhυRMREE-a'a'a
，‘，匂r3r3e3a。，。，、，F3e3
・
，E
・-n
H
u
n
u
-
-L
府
当
，
‘
.
-
'
u
-
'
• • -•
-
-
T
目、，AUAWEd---av---av--.
，a宮古e，a''ea-
-
M
開，EW
崎，‘，‘，。hu
，‘.AeO
・E・D-o
，，，‘.A-
---n・・・・・・・・・・・・・・-
-・』PHM''''''
・0・0白V
向
vau---『
ζ'a'-Ed-
-nupC
『4『ζ『，』崎4
『C『4『，‘，a'a'a
，a'a'a-
'
O
D
白
-
p
b
，
、
.
-
一
-
-
-
-
-
-
--
--
一
• -
-
-
-
-
一
1234567B90123-
E
・J・
4E・4E・4A4A-
e
一
---
-
--
-
-
--
-
-
一11111111111Illi--
ー
喧
叫
1
F (ME.¥Tl・ 1.000
..... ，，
.. ，.aE
・g-EEBaez-a，....... BE
a
--
、
，
.
-
M
聞
'a
内U4E.
，‘，‘.0
・saC仇
ua。‘a'a'a
，‘.
-OH2071T740813az-
-T.
，AphAW
咽.. ，‘Au
・0o'
・0AVAu''4・・'・nu--
-TE''
・・・・・・
e-------
a
・m・-四u-aga-'''e3ga
宮古・4..
，‘『，‘.0ao'・宅内v
-
・・"，‘，a
，za，，，E3E，aosa'''a
，.... ，，-
-eEEE----E・4..
，z'a'句
E340a
。a。EJ，.，--
-
旬
開
-
-
u
n
F
E
-
-
p
u
-
-
-
•. -
-
・
町.、，，SF3F3'3F3F3'3F3F3F3F3F3F3-
『幽円内d
『，‘『，‘‘，‘『，‘『，‘『，‘『，‘内，島崎，‘『，‘『，‘『，』『
--RPL"のu'
内u'nwAunvnu曹のu'
内u'nw
内u'内u'nw
向日・-
---n，‘・・・・・・・・・・・・・-
-v-nnuAMAH-
《uaunu
肉、内Mau-
内U内U内U内u-
-
-
由
-
-
-
-
-
--
-
'
F
-，
F
-
-adadEdEJadRdAMAMAMAMauadao-
、，nvnunuAUAvavnunununvAVAVAu--
R
R
+
+
+
+
+
+
+
+
+
+
+
+
+
司
副同
unFEFEEEFE冒-e-FEFEFEFEPEEr』
FE-
nu
・''hu
，，，‘，。，a''eonVAVAV
，‘，，-
1ιv-n
『ζaOE3
，‘，-avee''EJEJ
句ζ'anvnv-
，EELMnao
，，，‘，ζ'句官、，nu
内u，‘，，，，内U
『C-
'AMUPlw''nv
，，『ζnva。，，‘，‘，‘，‘，S4E-nv
内u-
仇
ν
・内pt・-g
『，‘，句Ed''nV-E-4E・4E・4E・4E-eo---a
副
RaLerV・R
・-------------
nunR
，、nuwnuwnunu《
UAMAMAH-AMAH-AMAunu--
pt・Er
H
u
-
F
S
a
n
k
-
F
E
E
E
-
p
r
T
E
T
E
-
F
a
-
-
n
-
Mm
・-n
・
』
-
-
R
B
r
、，Au--e''nu
，，。，AMAH-''eo
電d'gAu-
BREE
令
aea
『ζ'aavn.，，‘，-ea---aosaao
，，-
T
・幽同幽円'・司、，』avau-e'enw
電dau
。，AU
電d。，-
U町守4
p
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
T・，，，aτ
」'・au
・0・・・'-aOAUEJ'anu
‘A-
a
R
u
-
-
E
・4E・・・・・・・4E・4目・・且勾目・-
E
f
-
M
H
-
•
•• •. •. •. . ，E-
'RRM
冊
、
，
.
-PEEEFt
・
-
司er
，A.
，a，‘，，nu'a'aaO
・B-eE300
『，‘，a
-
-Fapt・『，‘，‘『gaOAM，，‘，a
『，‘‘A
，，‘A4Anvao-
-ω
開曹AMnnv'a
『，』内d'a'句E，aoao''''ao
，，.
--RZ-PL-adadEdRdadRd巴JEd町a4，Ed巴J包
d包
d.
崎
RRFE
，，............. .
. T'
内υu.仇
u仇
u
内u《unuu"
仇
u仇
u
内u《Hu.nuu"nuu"内unuu".
-
P
l
』》，、
.
•
•
-
句
-
-
-
-
F
、3，，血句司，、3，向va。Rv'、3d"七匂.，血句司，血句司a。a。e。-
-
『
，ζ‘《ua。，色匂守'、3da。崎，4ι
，色匂守.。内u.。'，崎，4ι-
-
'
ι
電d宮J，血匂守au.。nuu"電」官、，EJEJ
『ζnv----
-
E
r
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
内
UAUAU
内unU4E・4E・4E・・・・4目・・且内U4E--
-
-
--
-
-
-
-
-
-
B
J
・4E--g'a'・E340''auavau--&
『，‘，a
-
-
4
A
4
A
4
&
咽目・・
-
-
h
・E-Es---E.，.，.，.，.4
・・・a
・'・s
・a・-，.，
.
•
F(B白NO)= 1.000 F (CLAD)= 1.000 •• HOT CHANNEL FACT口RS <EXCEPT FZ) ・・
F(COOLANT)= 1.000 F<FILM)・1.000
COOLOD —THERMAL HYDRAULIC CALCULATION CASE = <IA- 1 it.- 1)
CENTER FUEL PLATE C INSTRUMENTED FUEL ELEMENT
CALCULATION DATE 84-07-02 PAGE 4
>
s**s*s*s»*as»******* CHANNEL NO.l SIDE ********«*»»««•»***** CHANNEL DIMENSION = 0.390 « 7.040 CCM) CHANNEL VELOCITY = 79.77 (CM/SEC)
ft******************* CHANNEL NO.2 SIDE ****rti«ti**a«tttt*s< CHANNEL DIMENSION CHANNEL VELOCITY
0.390 * 7.040 CCM) 79.77 (CM/SEC)
TEMPERATURE DISTRIBUTION CLADDING CLADDING FUEL MEAT FUEL MEAT 1 1 FUEL MEAT
TEMPERATURE DISTRIBUTION FUEL MEAT CLADDING CLADDING 1 COOLANT SURFACE INNER OUTER MAXIMUM 1 J t MAXIMUM OUTER INNER SURFACE COOLANT 1
1 CDEG.C) CDEG.C) CDEG.C) CDEG.C) (OEG.C) 1 1 CDEG.C) CDEG.C) CDEG.C) CDEG.C) CDEG.C) 1 ! 27.20 35.06 35.30 35.30 35.33 1 1 1 35.33 35.30 35.30 35.06 27.20 1 1 27.48 35.68 35.91 35.91 35.94 1 2 1 35.94 35.91 35.91 35.68 27.50 1 1 27.82 40.44 40.79 40.79 40.83 1 3 1 40.83 40.79 40.79 40.44 27.87 1 1 28.31 45.77 46.26 46.26 46.31 1 4 1 46.31 46.26 46.26 45.77 28.40 1 1 28.97 51.15 51.78 51.78 51.85 1 5 1 51.85 51.78 51.78 51.15 29.11 1 1 29.81 57.54 58.35 58.35 58.44 1 6 1 58.44 58.35 58.35 57.55 30.02 1 1 30.87 64.4S 65.45 65.45 65.57 1 7 1 65.57 65.45 65.45 64.46 31.17 1 1 32.14 70.35 71.52 71.52 71.66 1 8 1 71.66 71.52 71.52 70.36 32.54 1 1 33.52 72.25 73.45 73.45 73.60 1 9 1 73.60 73.45 73.45 72.27 34.04 1 1 34.89 71.32 72.46 72.46 72.59 1 10 1 72.59 72.46 72.46 71.33 35.52 1 1 36.14 67.15 68.22 68.22 68.34 1 11 1 68.34 68.23 68.23 67.27 36.86 1 1 37.15 60.95 61.69 61.69 61.78 1 12 1 61.78 61.70 61.70 60.97 37.95 1 1 38.09 65.10 65.96 65.96 66.06 1 13 1 66.06 65.96 65.96 65.12 38.96 1
*> HOT CHANNEL FACTORS (EXCEPT FZ> »«
13
F(COOLANT)= 1.159 F(FILM)= 1.159 FCCLAO) = 1.159 FCBOND)= 1.159 FCMEAT)= 1.159 - HPAT TBAM^cen rnimtTinu err CONDITION
L U X 1 TRANSFER H E A T ^rtn V.UIII/1 n u n F L U X H E A T H E A T F
CONDITION L U X TRANSFER 1
1 COEFICIENT IN PLATE SURFACE XAA J F2 GENERATION XAA IN PLATE SURFACE COEFICIENT 1 1 (W/CM2.C) (U/CM2) CKC/M2.HR) (CM) CW/CM3) CCM) CW/CM2) CKC/M2.HR) CW/CM2.C) 1 1 0.5087 3.998 0.34376E+05 0.0250 1 0 325 159.93 0.0250 3.998 0 34376E+05 0.5087 > 1 0.4565 3.744 0.32193E+05 0.02S0 2 0 304 149.59 0.0250 3.735 0 32117E+05 0.4567 1 1 0.4540 5.730 0.49264E+05 0.0250 3 0 465 228.82 O.O2S0 5.711 0 4910SE+05 0.4S43 1 1 0.4582 7.999 0.68779E+0S 0.02S0 4 0 649 319.36 O.02S0 7.969 0 6BS15Z+0S 0.4588 1 1 0.4658 10.332 0.88833E+05 0.0251 5 0 838 412.36 0.0249 10.286 0 88442E+05 0.4668 1 1 0.4754 13.182 0.11334E+06 0.0251 6 1 069 526.03 0.0249 13.120 0 11281E+06 0.4767 1 1 0.4861 16.322 0.14034E+06 D.02S1 7 1 323 651.02 0.0249 16.229 0 13954E+06 0.4876 1 1 0.4973 19.004 0.16340E+06 0.0251 8 1 540 757.80 0.0249 18.886 0 16238E+06 0.4993 1 1 0.5051 . 19.S62 0.16819E+06 0.02S1 9 1 S84 779.45 0.0249 19.411 0 16690E+06 0.5078 1 1 0.5106 18.598 0.15991E+06 0.0251 10 1 504 740.09 0.0249 18.406 0 15826E+06 0.5140 1 1 0.5124 15.942 0.13707E+06 0.0252 11 1 .286 632.81 0.0248 15.699 0 13498E+06 0.5163 1 1 0.5107 12.156 0.104S2E+06 0.02S3 12 0 .976 480.27 0.0247 11.858 0 1019SE+06 0.5151 1 1 0.5196 14.034 0.12066E+06 0.0253 13 1 128 55S.07 0.0247 13.719 0 11796E+06 0.5245 1
4 PAGE CALCULATI0N DATE 84-07-02 CASE <IA- 1 JP.・ 1)COOLOD --THER開AL HYDRAULIC CALCULATI0N
-ー・・・・ー・・・・ー・・・・ーーーーーー---ー・・ー・・.・ーーーーーーーーーーー----ー『ー--ーーー------tENTER FUEL P~ATE (INSTRUMENTEO FUEL ELEMENT
盆調k傘*I:*J・8・....$音羽t.*.**・....*.血..掌・・g・・・・s・・ CHANNEL NO.2 SIDE .，量・****...........盆盆書........・・8・s・..念...CHANNEL NO.1 51DE
0.390・7.040 (CI'J) 79.77 (C凹15EC)
tHANNEL 01阿ENSI0N .. CHANNEL VELOCITY
0.390・7.040 (tM) 79.77 (C開ISEC)
CHANNEL DIMENSION CHANIIEL VELOClTY
』〉切目白
l玄窓
1-s
ーーー・ーー-ーーーーーーーーーー-TEMPERATURE DISTRIBUTI0N -時・・ーーーー『ーー・ーー---FUEL MEAT FUEL MEAT CLADOING CLADDING
1 問AXIMUM OUTER lNNER SURFACE COOLANT (DEG.C) (DEG.C) (DEG.C) (DEG.C) (OEG.C)
35.33 35.30 35.30 35.06 27.20 35.94 35.曹1 35.91 35.68 27.50 40.83 40.79 40.79 40.44 27.87 46.31 46.26 46.26 45.77 28.40 51.85 51.78 51.78 51.15 29.11 58.44 58.35 58.35 57.55 30.02 65.57 65.45 65.'品5 64.46 31.17 71.66 71.52 71.52 70.36 32.54 73.60 73.45 73.45 72.27 34.0~ 72.59 72.46 72.46 71.33 35.52 6昌.34 68.23 68.23 67.27 36.86 61.78 61.70 61.70 60.97 37.95 66.06 65.曹6 65.96 65.12 38.96
， .. ‘a'3'句E2AU''eonVAU---『，‘，a
-A・A・A-A
1111111』
11211111
m
-
T
'
-
---nM"、，電d'匂'3・AEJ'句，，aO仇H・R.，，‘.Gae-
-eEHUFh'anvaa'3ea'a司EdaoaoE3'3''nu-
-MnMn・・・・・・・・・・・・・・-
.，E-PUE3E3nuao---eo-34 .. ，a弓aeo---ao-
-・』uanEL'3'3，‘，a司E2EJan・''''''aU-Auau--
-
E
A
D
-
-
u
u
M
円
，
‘
，
-
p
r
・
• • •
-， .
.
-・肉、，仇H・44nvau--eE3Ed『，.E2ae『'・nvau-
-E』nkpi・'3n，，，『，』'''a，‘，、，，句，句『，-aOR7-
eMHEE---------------e
T-PUE3Edauau---eOEd--.，a『ζeo--‘E2・
M開・』HUEE'3電d'句'a司EJE2ao''''''aoaoao-
n
u
a
L
n
u
n
u
-
-ut
一
T
・er“u-
n
u
-
官
-
-
-
R
-
T'pu、，nu---nvao--EJRJ弓aE2ao『，havao-
-aMmmRF1w電dhv，，‘a，，電d'・E3'句'a司『，haonv-
ya.
，E
・EE
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
aunuM間停
UEJE3nuau---eoE2・・・電」『ζeo---E2-
RUMmEEZJ'3'句，句E3E3ao''ヲ
'''auaoao-
-
E
a
内
'
A
n
u
-
R
L
E
一
Hup--T
-
-
.“n-B
n
-
ar』-
Drpuzι.、，au--a'匂''EJ'a司E2EJE3『，』E2E2仇H--
MH脳同
PL-PL-nvAW，句'''・・巴dz-τd，，』電U町色。，e'---
EETA・H・--------------
T
D
F
G
5
5
0
5
1
7
4
0
2
1
7
0
5
-
aunHEr・'a'3'匂，句E2Edao''''''auaoao-
-
-
R
H
u
n
u
-
-
E
L
F
-
，
‘
-
-c
一
--
-
一T3
0
且2z7z7，
ι‘29，‘句5'
一
-
旧
伺
Pι、"吟，a-，匂.@電ヨd，".v，白。白。4.&.Eヨ白。唱.&‘.A《u-
-." ••••••••••••••
-
-.』R"u.'，'，'，.包.。向.v，仇Hu.吟，‘‘'a，血‘司a。'，白。-
-nuE「‘.弓，ζ-弓，ζ-弓，ζ-雪，ζ』弓，ζ-宅，ζ-電d'、a4電ヨ」，電d，、a，電ヨ」，電ヨ」，-
，
日
D
-
.
E
4
.
--
-
-
•
181
-tIt--ttit--tt'SI--
.
，
，
、
，
，
田町民M刊
pi・''''zdoe-o''ao'300《切望、4・・・E2-
-EE-z--oao'・00aoao''nv'''a司AMEJ，‘-
-e''品『ζRUEJE2EJan・''・0《V《U444・--A司g-
-eep--個別
EJ，‘，‘，句，‘，句，‘，句EJRJEJEJE3-
・制問
'A，EU--------------
-・内pr，，nu白HW向HW向HWAU《》《》《》《ununununu-
-
D
R
E
』
u
-
-
守
-
n
u
，
‘
-
F1・
-
-
側
5
5
5
5
5
6
6
6
6
6
6
6
6
・
uut、emu-nvnwnvnunvnvAuwnvnunununu--
TR+++++++++++++・
1HEEEEEEEEEEEEE-
nuw-nEr--ao''E2E2『444'句63muaoeoE3au--
H
C
2
7
1
0
2
ゐS
5
2
9
2
9
9
9
p
nu"ua内M円'344・AEJ'句吟a《w，司aaoeo'a司44'''
FLEr，，，a司吟anvaoao--.，、d，。，。r『d'3nu----
-』BRFLU宮、d'3'a司aoeD・A・---・・・4・4・A・A・A-
RKHUV邑
Re--------------
Er--rFa，、仇H'mU仇H'白HWRU《U《》《U《ununu白HW向Hw-
E
F
-
FS
、FE
-
創刊
'
E
-
-RT・-肉、，.OEd---a，aoau。.，au---AU。，.0a，.
nk・』『ζ内V'344aoeo『，--6eo---《unvE2・---
T・・肉nVM円《V''''nv『ζ・・・『，‘。。，‘，句ao---，-
pi---------------
T・EEM町，，電d'aE3，，仇切望daoeo内VOOE3・.. ，3-
An，Au--・・44・・・・A・A・A・-‘・・・・4-
E
E
u
n
，
‘
.
H
， -
-
内
v
n
u
曹の"の
Hwhvav。，a，。，av-o，，，，.
-E2E3'3E2'句，‘，‘，句，句，‘，句，句，句-
-aH、，『ζ司£『，h『ζ『ζ『ζ『ι‘，‘司£『£司£司£『ι-
eAnMnnvnuw内V内vnv内V内V内V内vnunuwnunu--
-vaFlu--------------
.，、《》《》《ununu《unu《unu《uaunw《u-
-
-
-
--
-
• F(HEAT>= 1.159 F(BOND)= 1.159 F(CLAD)= 1.159
z・HOT CHANNEL FACTORS (EXCEPT FZ) •• F(COOLANT)= 1.159 F(FILH)= 1.159
H E凪 TGENERATION
(W/CM3) 159.93 149.59 228.82 319.36 ゐ12.36526.03 651.02 757.80 779.45 740.09 632.昌1480.27 555.07
FZ
0.325 0.304 0.465 0.649 0.838 1.069 1.323 1.540 1.584 1.504 1.286 O.曹761.128
ーーーーーーーーーーーーー-HEAT TRAN5FER CONDITI0N ーーーー-----TRANSFER H E A T F L U X
I COEFICIENT lN PLATE 5URFACE XAA (W/C胴2.C) (W/C胴2) (KCI胴2.HR) (CM)
0.5067 3.998 0.34376E+05 0.0250 0.4565 3.744 0.32193E+05 0.0250 0.45'品o 5.730 0.49264E+05 0.0250 0.4582 7.999 0.68779E+05 0.0250 0.4658 10.332 0.88833E+05 0.0251 0.475'品 13.18Z 0.11334E+06 0.0251 0.4861 16.322 0.1403~E+06 ~.0251 0.4973 19.004 0.16340E+06 0.0251 0.5051 .19.562 0.16819E+06 0.0251 0.5106 18.598 0.15991E+06 0.0251 0.5124 15.942 0.13707E+06 0.0252 0.5107 12.156 0.10452E+06 0.0253 0.5196 14.034 0.12066E+06 0.0253
J
-吟a'3'a司，、，RU''・en.，mu---『，‘，a
----A----A
COOLOD —THERMAL HYDRAULIC CALCULATION CASE = (IA- 1 JA- 1) CALCULATION DATE 84-07-02 PAGE 5
CENTER FUEL PLAT3 ( PRESSURE / ONB B DNB CONDITION )
«» • « » «« CHANNEL NO.l SIDE »«»«»***»»»»»*«» » • » •<•• CHANNEL NO.2 SIDE »*«>«««**»*«**•*» PRESSURE CONDITION -
PRESSURE TOTAL COOLANT PRESSURE PRESSURE TOTAL COOLANT LOSS LOSS VELOCITY AT Z LOSS LOSS VELOCITY
{KG/CM2) CKG/CM2) (CM/SEC) <KG/CM2.A> CKG/CM2) (KG/CM2) (CM/SLC) 0.34 UPPER =LENUM 1.840 0.14
0.0009 0.0009 60.31 3TRETCHC1> INLET 1.837 0.0009 0.0009 60.31 0.0000 0.0009 60.31 STRETCHQ) OUT 1.842 0.0000 0.0009 60.31 0.0004 0.0002
0.0013 0.0016
79.77 79.77
PLATE ENTRANCE 1.840 1.841
0.0004 0.0003
0.0013 0.0016
79.77 79.77
0.0004 0.0002
0.0013 0.0016
79.77 79.77 j
1.840 1.841
0.0004 0.0003
0.0013 0.0016
79.77 79.77
0.0010 0.0023 79.77 A 1 2 1.845 0.0010 0.0023 79.77 0.0017 0.0031 79.77 1 F C 1 3 1.850 0.0917 0.0031 79.77 0.0025 0.0038 79.77 1 U T 1 4 1.854 0.0C25 0.0038 79.77 0.0033 0.0046 79.77 1 E I 1 5 1.858 0.0033 0.0046 79.77 0.0040 0.0053 79.77 1 L V 1 6 1.862 0.0040 0.0053 79.77 0.0047 0.0061 79.77 E 1 7 1.867 0.0047 0.0061 79.77 0.0055 0.0068 79.77 1 P 1 8 1.871 0.0055 0.0068 79.77 0.0062 0.0075 79.77 1 L Z 1 9 l.d75 0.0062 0.0075 79.77 0.0069 0.0083 79.77 1 A 0 1 10 1.879 0.0069 0.0083 79.77 0.0076 0.0090 79.77 1 T N 1 11 1.884 0.0076 0.0090 79.77 0.0084 0.0097 79.77 1 E E 1 12 1.888 0.0083 0.0097 79.77 0.0091 0.0104 79.77 13 1.892 0.0091 0.0104 79.77 0.0091 0.0104 79.77 13 1.892 0.0091 0.0104 79.77 0.0093 0.0106 79.77 PLATE EXIT 1.893 0.0093 0.0106 79.77 0.0002 0.0108 60.31 STRETCHC2) INLET 1.894 0.0002 0.0108 60.31 0.0000 0.0109 60.31 STRETCHC2) OUT 1.899 0.0000 0.0108 60.31 0.0062 0.0170 156.16 STRETCHC3) INLET 1.882 0.0062 0.0170 156.16 0.0007 0.0178 156.16 STRETCHC3) OUT 1.898 0.0007 0.0177 156.16 0.0124 0.0301 0.34 LOWER PLENUM 1.898 0.0124 0.0301 0.34
( BLASIUS EQUATION WAS USED FOR WALL LOSS CALCULATION > 0 N B s D N B CONDITION
TSAT TONB H E A T F L U X <W/CM2> TSAT TONB H E A T F L U X (U/CM2) C C> ( C) CLAD QONB QDNB1 QDNB2 QDNB3 ( C) ( C) CLAD QONB «DNB1 QDNB2 QDNB3
117.03 • 124.16 4.00 49.31 215.32 405.07 240.08 1 117.C3 124.16 4.00 49.31 215.32 405.07 240.08 117.10 123.85 3.74 43.98 215.46 404.89 239.82 2 117.10 12->.85 3.74 43.98 215.46 404.84 239.79 117.17 123.88 5.73 43.60 215.59 404.58 239.46 3 117.17 123.88 5.71 43.60 215.59 404.48 239.39 117.24 123.96 8.00 43.82 215.73 403.96 238.88 4 117.24 123.96 7.97 43.83 215.73 403.77 238.74 117.31 124.06 10.33 44.28 215.87 402.99 238.04 5 117.31 124.06 10.29 44.30 215.87 402.70 '237.83 117.38 124.16 13.18 44.84 216.00 401.65 236.93 6 117.38 124.16 13.12 44.36 216.00 401.22 236.61 117.45 124.26 16.32 45.38 216.14 399.87 235.49 7 117.45 124.26 16.23 45.38 216.14 399.26 235.05 117.52 124.36 19.00 45.84 216.27 397.66 233.74 8 117.52 124.36 18.89 45.83 216.27 396.83 233.14 117.59 124.43 19.56 45.90 216.41 395.20 231.82 9 117.59 124.42 19.41 45.88 216.41 394.14 231.04 117.66 124.48 18.60 45.73 216.54 392.77 229.91 10 117.66 124.48 18.41 45.71 216.54 391.49 228.97 117.73 124.51 15.94 45.26 216.68 390.60 228.20 11 117.73 124.51 15.70 45.24 214.68 389.11 227.11 117.80 124.52 12.16 44.61 216.81 388.90 226.84 12 117.80 124.52 11.86 '4.58 216.81 387.25 225.63 117.87 124.61 14.03 44.94 216.95 387.34 22S.57 13 117.87 124.61 13.72 (.4.90 216.9S 385.55 224.26 117.03 123.82 19.56 44.53 215.32 382.91 225.57 WORST 117.03 123.82 19.41 44.49 215.32 381.12 224.26
0DNB1 = LABUNTSOV WITH ZERO SUBCOOLING QDNB2 = MIRSHAK , DURANT I TOWEL 0DNB3 = BERNATH CORRELATION
PAGE CALCULATION OATE 64-07-02 CASE CIA- 1 JA・ 1)COOLOO --THERMAL HYORAULIC CALCULATION
CENTER FUEL PLAT! PRESSURE ， ONB 晶 ON6 CONOITIO例 3
』〉加包
IZ窓l-oN
2・2・.・...傘......IJJ・
--
-守'VE
、，，骨4444
ヲ，，，，，，，，，，，，，，，，，，，，，，，，，，，，，
... 444040'句-
-NTC司
$3377777777777777733113-
-a"曹---E・・・・・・・・・・・・・・・・・・・・・・・-
-・』plwFsaununu
内VRV
内V内w'nv
内'nvnv
肉.，nv
内V内w，内w，内.，nv
白unU404unu-
-nunu''auau
，，，，，，，，，，，，，，，，，，，，，，，，，，、，，，auaOEJEd-
-
n
u
'
L
M
n
4
4
4
・・
F
-cEC
一
-
u
w
，、
-----
-
-EP936318631853074688071m
m'』，‘
nunw
唱・・唱.. ，‘ミd'a
，時EJAMAu
，，.。。，。，nwnununw''''nu--
.‘"'3Mnnuaununu
白unu
白ununuaunuaunununu--・4A4・・4・・444..
，a，
-T-eepunununwn日
-nwnwnunununwnwnununvnununwnwnunwnunu-
-nunu
，，
.
.
.
.
.
.
.
.
.
.
.
.
.
.
.
.
.
.
.
.
.
. .
-TLEDDO0000600000000000000
一
'
'
h
.
，
、
.
--
-FE
、，
F
-
D
n
-
g
-
ENd-eeMn
白vnu'匂'』nv''Rd
電d《uw''ad
、‘。，AU
電d4A
ミd-6nv-g
，，，匂-
-papa't-auaununu--・4.. ‘，-'a'匂，.EJ4040''eo内
w'nvnvnvauau『
ζ戸
-SOFOOOOODE-U0000000000Doo--
-ELGOODODO0000000000DODODD
一
-
n
R
V
恥・・・・・・・・・・・・・・・・・・・・・・・
-PE0000000DODO00000009000
一
• 崎
E
一
一
--、
，
.
-EA07201504B2715948234PEBaa
-
n
R
.
，匂'a
，‘，句，匂，匂eJEJEdaOAO''''''S0
・0内w'a・，内w'a・'eon-'nv-
-HU
・4-gS0
・0・0・o・e・0・0OGee-0
・0・GAMeoOGee-Gao
・0・o・e・oeo-
-"3Mm
・-----------------------
'SC11111111111111111111111
一
-
E
』守，，，
-RAG
一
-nrv-n
-
E
一
..主主主..・8・s・・8・・ CHANNEL NO.2 SIrE ..，・a・S室温..・..・.，・8
E
M問、uI
T
，
a例・』Hu azh ・』・"
Flu c--
CG
nu
-』'』
'』a四H
a.，，‘Ea----------
-
-
n
R
-nu
一TV341177777777777777711664・F
-
創
刊
T'plw'a
，、d，、d，，，，，，，，，，，e'''''''''''''''''''a'34・・44'a-
-
-
R
T
A
E
E
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
n
u
--』，LP3nvnunu
内w，内w，内w，内w，内w，内w，内w，内w'nvnv
内w，《M'nvnv
内w'nvauaGaeau-zz
-ODF667777777777777776655-s
-
O
L
N
1
1
一一u
-PL'E』
PL・
-
u
，，、
-F3
・
-a例
-M
一
-
-
，
Mm
-AU
-TA
一
39P363186318530746H9os--T
-LEoo--233456678P90BOOT70-an
--"eeMnnununu
《uwnununu
内ununvnvnuw
《uwnunu--・4ふ4・・4・・4・・4・・官、e-HU
-TEe-'tunununununununu曹のunu内
unununuaununununununununu-AM-
-nunu
，，
.
.
.
.
.
. --
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
E
L
-T，・』punununununununu
内U『ununununununuaunuaunuaununu-
-
M
E
R
-
n
S
F
，、
-HU
-
-
I
-ce
一EE
-
A
-nk
『
6
.
‘』
-MUFSMnnvnu'匂『znv''E3'aau''Ed
『，hnvao'匂44
望、，『zau
『Z，，，匂-ロu
・酔3pap--nu
白U白unu--・44
『，‘，a'匂尻・EJ4040
ヲ'eon-'nvnunuaunu
『z-
-so，eO000000nVOODOO0000GOOD--t
-ELGoonMOODDODOODODOB白
ODODo-
-
R
R
V
恥・・・・・・・・・・・・・・・・・・・・・・司
-PE000000060000000DODODOO
一
'
-
一3
一
-EA07201504BET-5948234P2as-
-an
・'句宅3
・'句，句，句，句EdEaEdAMAw''''''
・0・0白v。，。，。，au
。，。，-
-uzzsasas--aSEasBasasasasas昌一
-
S
H
・・・・・・・・・・・・・・・・・・・・・・・・
-SC11111111111111111111111
一
-eE
守，，，
-RAG
一
-nvvER
.
，
、
-
-
-
1
1
・
CONOITI日開
UPPER PLENUM ~TRETCH(1) INLET STRETCH(1) OUT PLATE ENTRANCE
--------A I 2 C I 3 T I 4 1 I 5 V I 6 E I 7
P 6 L Z I 9 A 0 I 10 T N I 11 E E I 12
--ーー 13PLAτE EXlT STRETCH(2) INLET STRETCH(2) OUT STRETCH(3) INLET STRETCH (3) OUT LOWER PLENU阿
PRESSURE
z'HUFE
・L
........a:....・s・・ CHANNEL NO.1 SIOE
ー
唱
曲
l
由ON63240.06 239.79 239.39 236.74 '237.63 236.61 235.05 233.14 231.04 228.97 227.11 225.63 224.26 22'ら.26
274870263491552
ロunuao'句ヲ'''『Z
『ζ・0・A'u守4・・『ζEJ4A
創
刊
・
-----a-------
RUEd'匂，‘，a
『Z4Anvae'句4司会内.，，，EJ4A
、，向unuaunv
白unvnu
内M，内.，nvのv
・a-e
・o・0
『，‘，匂，‘，‘，匂，匂，‘，s'a'a'a's'a'a'2
"
piw ，， u
・・・・司aag
内w''a''au'匂，，4A
，句ao---eJ
司Z
，‘白。，a'匂eJ''eonu---
司，‘，句Edauao
内w''3
削開--------------
auF3E2'3F3E2a。，。，。a。a。，sa。a。E3
.且Rau--・・4A4A
・A・A・-・4A4A
・』・&4A
・A・A・--
『d『，‘‘，‘司，‘『，‘崎，‘司，‘『d
『d司，‘『，‘‘，‘司，‘，Z
HU
-L h
Wu---eo
白u'anU40
・o，、dae--.
，句。。白unv
z'創刊
'a
内w，a。.。，aea
，、deo--
，，『ZSJ
内w，，匂
n
u
-
-
-
-
-
-
-
-
-
-
-
-
-
-
au
。，宅d
電Jτd'匂'"εJRdEdaJRd'句，句t喝
444444444ゐ
44匂
4
T
，
・"EEnunu'匂4A
，，内w，『Z'a
内w，4・・・&auao角
64A
-mnu''''ov
『44A角
6
・。，句，‘，，eo
，，，匂
unB』
.
.
， .......... .
plu'匂
'aE3''nu'aaoeo内
w，aBEd--.
，anw，
-A
・A・A・A・A・A・-・4A4A4A
TONB ( C)
124.16 12'>・65123.68 123.96 124.06 12'ら.1612'ら.26124.36 124.42 124.48 124.51 124.52 124.61 123.62
ONB 晶 ON6 CONOITION
TSAT ( C)
1 I 117.C3 2 I 117.10 3 I 117.17 4 I 117.24 5 I 117.31 晶 I117.38 7 I 117.45 6 I 117.52 9 I 117.59
10 I 117.66 11 I 117.73 12 I 117.60 13 I 117.67
WORSTI 117.03
QONB3 240.08 239.62 239.46 238.86 236.04 23晶.93235.49 233.74 231.62 229.91. 228.20 226.84 225.57 225.57
『，‘，，内w'aoao
内w'eJ''aenu''aunu'匂噌--
BEnu--oeB
内w，《M，aeeoao
『，‘，，aue，，a
肉，
M
開・・・・・・・・・・・・・-
nue3'匂，匂曹、
4
司44・・nv''eJ
司eau-e
，，‘，-
、，内姐aunuauauaunun-，《V
《VRV
肉vaロease
-a'a『，句，句，匂，血守，句ZJ'a'a'a'a'a'a'a
MH
plu ，， U
胃・・--gaonv
，a，，白u'匂，，... ，‘eo---eJ
司Z
，、RM
宅3
・'句Rd''eonv
・.. ，，』'句adau--e，電d
M
問・・・・・・・・・・・---
nuvRdEdEdεJEBAUAWAUAWAWAwaOAWEd
v-RAu----a----A-a----A-a-A----A4A
・』-A
崎，‘崎，‘司，‘司，‘司，‘崎，‘崎，‘崎，‘崎，‘内，島内，b
内，b内，島内t
HH
・'L a
o-&
・onv
『zeo'句。。，句nu'Jae--.
，句'a
ErMm'anvaeaO
『，‘.。，aeon-，，，『ζaenveJ
nu--------------
AU
内''a'a'a'句尻-eJEJeJEJEJ'匂'u守，匂
，匂，‘，匂，句，匂，匂，‘，句，‘，u
守，‘，句t
・'句
'E 働"E
Lnunu'匂
'anv'aeo弓
ζ内
uaonu
，‘au'sae
血例
nu''''nu'a4..
，anuEdaunV4・・nueJ
un・』・・・・・・・・・・・・・・
F』'ι『'SF、deemu'a
，。内w'a766P3
『d'匂RV
-A
・・・4A
・A・A・A4A
・A・A・--
TSAT TONB ( C) ( C)
117.03・124.16117.10 123.65 117.17 123.68 117.24 123.9晶117.31 124.06 117.38 124.16 117.45 12'ら.26117.52 124.36 117.59 124.43 117.66 124.48 117.73 124.51 117.60 124.52 117.67 124.61 117.03 123.62
由ONB3 BERNATH CORRELATION QONB2 MIRSHAK ， OURANT 畠 TOWEL ----aONB1 LABUNTSOV WITH ZERO SUBCOOLING
COOLOO —THERMAL HYDRAULIC CALCULATION CASE = <IA- 1 JA- 1)
INNER FUEL PLATES 1 ( INSTRUMENTED FUEL ELEMENT
CALCULATION DATE 84-07-02 PAGE 6
>
s**sass*******>***** CHANNEL NO.l SIDE «**«»*»««»«*********» **t*i**>*«<»>»***t«* CHANNEL NO.2 SIDE »*»»»»**«*»***««»«»«* CHANNEL DIMENSION = 0.390 s 7.040 (CM) CHANNEL DIMENSION = 0.390 * 7.040 (CM) CHANNEL VELOCITY = 79.77 (CM/SEC) CHANNEL VELOCITY = 91.69 (CM/SEC)
ftftYimc nTcr CLADDING CLADDING FUEL MEAT FUEL MEAT FUEL MEAT FUEL MEAT CLADDING CLADDING
1 COOLANT SURFACE INNER OUTER MAXIMUM J MAXIMUM OUTER INNER SURFACE COOLANT 1 1 (DEG.O (DEG.O (DEG.O (DEG.O (DEG.O (DEG.O (DEG.O (OEG.C) (DEG.C) (DEG.O 1 1 27.20 36.33 36.44 36.44 36.47 1 36.47 36.43 36.43 36.30 27.20 1 1 27.50 37.02 37.13 37.13 37.16 2 37.16 37.12 37.12 37.00 27.53 1 1 27.87 42.50 42.66 42.66 42.70 3 42.70 42.64 42.64 42.47 27.94 1 1 28.40 48.58 48.80 48.80 48.86 4 48.86 48.78 48.78 48.53 28.53 1 1 29.11 54.76 S5.04 55.04 55.12 S 55.12 55.02 55.02 54.70 29.32 1 1 30.02 62.03 62.39 62.39 62.50 6 62.50 62.36 62.36 61.95 30.33 1 1 31.17 69.85 70.29 70.29 70.42 7 70.42 70.25 70.25 69.75 31.59 1 1 32.S4 76.55 77.07 77.07 77.22 8 77.22 77.02 77.02 76.44 33.11 1 1 34.04 78.59 79.13 79.13 79.28 9 79.28 79.08 79.08 78.48 34.76 1 1 35.52 77.43 77.94 77.94 78.09 10 78.09 77.90 77.90 77.33 36.39 1 1 36.86 72.68 73.12 73.12 73.25 11 73.25 73.09 73.09 72.60 37.87 1 1 37.95 65.43 65.76 65.76 65.86 12 65.86 65.74 65.74 65.37 39.08 1 1 38.96 70.08 70.46 7C.46 70.58 13 70.58 70.44 70.44 70.01 40.20 1
«» HOT CHANNEL FACTORS (EXCEPT FZ> ««
13
F(COOLANT)= ? c e D rniifiiTTAti
1.448 F(FILM)= 1.448 F(CLAD)= 1.448 F(B0ND)= 1.448 F(MEAT)= 1. _ U C A T TDAU
448
1 TRANSFER H E A T F L U X H E A T *" I1CAI IKANarcn i>unuiiiun H E A T F L U X TRANSFER- 1
1 COEFICIENT IN PLATE SURFACE XAA J :Z GENERATION XAA IN PLATE SURFACE COEFICIENT 1 1 (W/CM2.C) (W/CM2) (KC/M2.HR) (CM) (W/CM3) (CM) (W/CH2) (KC/M2.HR) (W/CM2.C) 1 1 0.5104 4.659 0.40060E+05 0.0233 1 0 .325 199.91 0.0267 5.336 0.45880E+05 0.5862 1 1 0.4583 4.365 0.37530E+05 0.0233 2 0 304 186.99 0.0267 4.985 0.42837E+05 0.5264 1 1 0.4566 6.682 0.57451E+05 0.0234 3 0 .465 286.02 0.0266 7.619 0.65S10E+05 0.5245 1 1 0.4624 9.333 0.80243EJ05 0.0234 4 0 649 399.20 0.0266 10.627 0.91373E+05 0.S312 1 1 0.4702 12.060 0.10369E+06 0.0234 5 0 .838 515.45 0.0266 13.713 0.11791E+06 0.5403 1 1 0.4812 15.401 0.13242E+06 0.0234 6 1 .069 657.54 0.0266 17.476 0.15026E+06 0.5525 1 1 0.4931 19.073 0.16399E+06 0.0234 7 1 .323 813.78 0.0266 21.616 0.185?5E+06 0.5665 1 1 0.5049 22.219 0.19104E+06 0.0235 8 1 .540 947.25 0.0265 25.143 0.21618E+06 0.5802 1 1 0.5137 22.889 0.19680E+06 0.0235 9 1 .584 974.32 0.0265 25.827 0.22206E+06 0.5907 1 '0.5197 21.781 0.18727E+06 0.0235 10 1 .504 925.11 0.0265 24,475 0.21044E+06 0.5979 1 0.5213 18.691 0.16071E+06 0.0236 11 1 .286 791.02 0.0264 20.859 0.1793SE+06 0.6007 1 1 0.5197 14.279 0.12277E+06 0.0238 12 0 .976 600.34 0.0262 15.738 0.13532E+06 0.5986 1 1 0.5300 16.490 0.14179E+06 0.0238 13 1 .128 693.83 0.0262 18.201 0.1S649E+06 0.6105 1
晶PAGE CALCULATI日N DATE 84・07・02CASE (IA- 1 JA- 1) E目白LOD --THERMAL HYDRAULIC CALCULATION
INNER FUEL PLATES 1 ( INSTRUMENTED FUEL ELEMENT
aa寧aa・..**・・....1・....****車率志摩s・・・・s・・息傘.a CHANNEL NO.2 SIOE 車ヨtlt*.・8・・・・・s・**.......，・aaa・・・・・a・・oa:....事 CHANNEL NO.1 SIDE
』包包
12晶
:-aN
0.390 a 7.040 (CM) 91.6世 (CM/SEC)
E
-
-
T
，、，nu'a'句'a
司盆'aav---a。av''eo
内um
M
M
閃
piw
『dE2nye3zd'aEa--‘，，，aeonu
『4-
，
a且n
-
-
-
-
-
-
e
e
-
-
e
・e・-
-・』FU''''''eoavnu・4.‘，a'句a。，，avnu--
-nuEE
『ζ『，』司盆『ζ
『，‘，s'azd'a'a'a'‘3d，色匂守句
-
円
u
n
u
ν
'
-
-，
i
、.，‘
.
•
-
-
-
-
-
• -
戸
MuuP巴、，《u角
u'，'‘sdnHuw'、，，F、3d，ι匂司.c'‘sd《u句，.A-
-削問Fι
匂M，L』.'『a，内u
，句E2'，n.v，'，，句，色匂守，、3da。浬dnu-
Y--a内・・・・・・・・・・・・・・-
MmnuE『puao
，，『400'句4E・e・，aoee
，，『4Eanu--
nURUORE-
電d電d'句，句EdAUAu''''''''AU''-
y
・・民M
R
H
U
R
U
E
T
』・』pa
，
‘
-
H
u
p
i
w
-
a
u
-
，
.
‘
-
b
R
-
守
E
-
FSF也、，，S
『，‘，匂・0
『4aoE2
『4・0内unw，，匂，匂-
Y--M伺
RRFL，，匂-4ao
，，AU'S
内anunun-'nu
，，，匂-
nu
，--
E
E
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
nu
創刊puao
，，‘dag-3
『4au
，，mw''''SEdAU-
EERUM同FE'a'a'句，匂F2
，。，，『，，，，，，，a。，，.
RRa且
n
'
-
-
n
u
-
HU
・
』
，
‘
-
'
'
p
i
-
-
a
-
n
E
D
n
-
E』
-
RF守
E
-
Mn-m
、，，S
司盆，句・0
『4a。E2
『400nu向
w，，匂，匂-
E』EEDnpLU'句4・・40
ヲ'nu
電d向
1』nu
《uaV
《口w，，，匂-
TEMnrE
・・・・・・・・・・・・・・-
守ERua。，，『aeoE3
『4nu
，，《V'''SF3nu-
-・』HUE-'a'a'句，句E3a。，，，，，，，，，，AU
，，-
-EEnU仇
U
F
-Hu
，
‘
-
-
E『
且-
-
-
-
-
守
E
-
-aunM町、，，，ao
内uao
『gnu-
『ζ『400向
VEaaoeo-
-E1・HUP--'句
a..
，，ao---aB''句
44ヲιnu『
400e2
・
-MHM円・・・・・・・・・・・・・・-
-Y--pua。，，『400E2
『dnu''nvee'SEd
内u-
-・』uanEE'azd'匂，匂E2AU''''''''''ao''-
'PEaun恥
υ
-
-HUM円
，
、
-
-
E
r
-
-
-
CHANNEL DIMENSION CHANNEL VEL口ClTY
4・・『，‘，a'句e3ao''eoavnu--‘‘，‘，a
444A4A
・・・
0.390・7.040 (CM) 79.77 (CM/SEC)
-
-
守
E
-
-a"
幽町、，，，ao
内ua。『，』《U
『ζ『4eon-，P3ao
・0-
-EE-Huptu'句唱.‘，，ee---P3'匂崎，h
『dnu
内aeoE2-
-MHMH
・・・・・・・・・・・・・・-
曹
--nuAw
，，，‘auEJ
，‘nv
，，。，au宅dedav-
-・』uanEE'a'a'句，句e3ao''''''''''ao''-
-
P
E
a
u
n
m
u
-
-HUMH
，
、
-
"
'
r
-
-
-
由
一T-
-a側、，，匂'aaonu，，匂《V
《V'''a'匂『4a。a。-
-Er-nRPi・'匂44aoeoAU'S
『4nu---av--.
，，，句・
-MHE』・・・・・・・・・・・・・・・
T-nuao''-aaMEa-anu
，，。，，，電dEd'uv-
M刊・』HUEE'a'a'句，匂E3a。，，，，，，，，，，ao''-
nuEEnu仇
u
-
'4Hu
，
‘
.
T
E
r
r
-
H
U
-
a
u
F
'
A
-
-
m
G
F
，匂Z60'匂99734266-
edM問内kpi・'匂44aoaGnu-'a-gnu-Amw，-4
，，，句-
曹
--Y--ZE---------------
仇
unu
創刊Rua。，，『4
・0e3-znu
，，mw''''SE2nu-
nu
創刊Er.
，a'a'句，匂e3ao
ヲ'''''''''ao
，，-
REa内
T
A
n
u
-
a
nR-L
，
‘
-
HUP--
司
守
E
e
a内
-
内
K
-
FE
，
Brpuzι
、，，S
『g内ueoao'aadEJ白
''aeo'see-
MHMmFL-pi・'anuEdE2''nuauEdEd'匂a。，句nu--
EETA-"
・・・・・・・・・・・・・・-
T・nuErRuao
，，『aao'匂『4e，aoae''-ZEJnu-
nunREE'3'a'句，匂E2aoιu
，，守'''''ao
ヲ，-
-a内
HU恥
υ
-
句・LFS
，
‘
-
-
p
u
-
-
--
--
-
-
-
-
T
，、，nu
内u''nu---
『，‘，，，句，句『4aoEda。.
-』同'i・『gE3
・。，匂4Anu-4・-E2
内UE3
・0nvav舗
『
a
R
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-・』'u''''''
・0白
vnu--A
『，‘，句E3a。，，.6-
-nuFE
『g『4『4内，b『4・3
曹
3
・a'a'a'a'a'3-
-
n
u仇
u
-
-
P
1
・
，
‘
-
一
一
-.，，， ..... ‘.a ... ， ...... BEE--E-----
CHANNEL 01開ENSIONCHANNEL VELOCITY
IHS-
F(MEATl= 1.448
ーーーーーーーー------HEAT TRANSFER CONDITiON ーーー，ーーー-H E A T F L U X TRANSFER・
KAA IN PLATE SURFACE COEFICIENT (C凹 (W/CM2) (KCI阿2.HR) (W/C凹2.C)0.0267 5.336 O.45880E+05 0.5862 0.0267 4.985 0.428~7f+05 0.5264 0.0266 7.619 0.65510E+05 0.5245 0.0266 10.627 O.91373E+05 0.5312 0.0266 13.713 0.117守1E+06 0.5403 0.0266 17.476 0.15026E+06 0.5525 0.0266 21.616 0.185~5E+06 0.5665 0.0265 25.143 0.21618E+06 0.5802 0.0265 25.827 0.22206E+06 0.5907 0.0265 24.475 0.21044E+06 0.5979 0.0264 20.859 0.17935E+06 0.6007 0.0262 15.738 0.13532E+06 0.5986 0.0262 18.201 0.15649E+06 0.6105
F(BOND)= 1.448
H E A T GENERATt口N
4・IC阿3)199.91 186.99 286.02 399.20 515.45 657.54 813.78 947.25 974.32 925.11 791.02 600.34 693.83
F (CLAD)= 1.44畠
Fl
0.325 0.304 0.465 0.61，9 0.838 1.069 1.323 1.540 1.584 1.504 1.286 0.976 1.128
窓.HI】T CHANNEL FACTORS (EXCEPT FI)・8
f(CO口LANT)= 1.448 F(FIL凹)= 1.4..8
」
4・・『，‘，a'匂Eaao''eonvau---
『，‘，a
・・・・・・4A
・4
言
dzd'匂，匂，匂，匂，匂EJ
・3Eaao
・e・0-
33333z'EF333333・
a“、，『ζ
司6-e
『ζ『，』『，』司4-Z
『ζ『g-Z
『ζ『4
・
-mM円
nunununununuaunununvaunuau-
U
A
p
h
-
-
-
-
-
-
-
-
-
-
-
a
.
，
，、nunununvnvnu
内wnvnu
内》《》《U
内w-
--
M悶
，
nuEJe3EJEJAuaoa。4040a。4040a。.
1ι
、，nununvaunuaun"nuauaununu内
HV-
''FERR++占
YS司止
す
会
V会
VKT会
V会
V会
V会
V会
v
，
TAw-np
、unEEFEFEFEFEPEFEFEEEFEPEEEPE-
nuaMR
・nunU4Aミdnw，‘dnv'匂《u''4A''nv-
M刊HUEr
弓，hAUZJEJ'-ao'句mw'nu--O
『，‘，，，，，，-
nun-uM円RUEd'匂『aTa
『，‘，S4Aao''nw
『ζ4・・・
Flv
・』HU''AU''''nunuTaAunvnveoao『
ζ'匂時
pbptu'匂'SFコao----A
・A・A・-・4A
・A・A・---
RREFvh
・・・・・・・・・・・・・-
zruE巳，、内HV
内Hvaunuaunuauauaunu
内Hvnunud
E
『
'
'
-
p
b
a
u
n
-
M悶
T
，
.
』
-
A同Br
、，OFEd-eミd
《U4・・電d
。，OF4・・句目・0・'AW-
BRan
『4EJ40
・0Taaonu
，，.・・00
・0av''nv-
T・創刊MHao'aaOTanu-'-nw
『aeo''ao
『，‘，匂-
E』
'a&P
・M
・-------------
T・，，，句，句aonw，『4Ednw，‘，‘『ζ4... 。，-a。-
RHunH胸
4A4A4A
『4『4『44A4A
・4-
FE
，
、
，
u
n
--
-
-
-
-
，
，
、
，
.
anRM刊piw，匂'aao'句『ζ
『4・・・8v''''
・e''au-
-EEPE-Aueoao『
4RV4..
，a'匂
'aaV4・・nvau-
-'r
，A『44AF3F3
，。，，ao向
VRU4A4A
『4・4's-
-SE凹
54444A4555555-
-MN'AFiv--------------
-anEr
，，nununuaUAuaunMaunvnvauaunu-
-
n
R
E
L
u
-
-
-
F'Bnu
，
、
.
-
F
L
u
-
•
-
-
COOLOD —THERMAL HYDRAULIC CALCULATION CASE = <IA- 1 JA- 1)
INNER FUEL PLATES 2 C INSTRUMENTED FUEL ELEMENT
CALCULATION DATE 84-07-02 PAGE 7
******************** CHANNEL NO.l SIDE ********************* ******************** CHANNEL NO.2 SIDE ********************* CHANNEL DIMENSION = 0.390 « 7. 340 (CM) CHANNEL DIMENSION = 0.390 * 7.040 CCM) CHANNEL VELOCITY = 91.69 (CM/SEC) CHANNEL VELOCITY = 69.68 CCM/SEC)
O E R Y C I T
CI"DOING CLADDING FUEL MEAT FUEL MEAT FUEL MEAT FUEL MEAT CLADDING CLADDING 1 COOLANT •SURFACE INNER OUTER MAXIMUM J MAXIMUM OUTER INNER SURFACE COOLANT 1 1 (DEG.O CDEG.C) CDEG.C) CDEG.C} CDEG.C) CDEG.C) CDEG.C) CDEG.C) CDEG.C) CDEG.C) 1 1 27.20 36.87 37.00 37.00 37.05 1 37.05 37.02 37.02 36.92 27.20 1 1 27.53 37.64 37.77 37.77 37.81 2 37.81 37.78 3T.78 37.69 27.64 1 1 27.9* 43.46 43.65 43.65 43.72 3 43.72 43.68 43.68 43.53 28.17 1 1 28.53 49.89 50.15 50.15 SO.25 4 50.25 50.19 SO.19 50.00 28.94 1 1 29.32 56.43 56.78 S6.78 56.90 5 56.90 56.83 56.83 56.57 29.97 1 1 30.33 64.15 64.58 64.58 64.74 6 64.74 64.65 64.65 64.32 31.28 1 1 31.59 72.38 72.92 72.92 73.11 7 73.11 73.00 73.00 72.59 32.93 1 1 33.11 79.38 80.01 80.01 80.23 8 80.23 80.10 80.10 79.63 34.90 1 1 34.76 81.56 82.21 82.21 82.44 9 82.44 82.31 82.31 81.82 37.04 1 1 36.39 80.40 81.02 81.02 81.24 10 81.24 81.12 81.12 80.66 39.15 1 1 37.87 75.62 76.15 76.15 76.34 11 76.34 76.24 76.24 75.85 41.04 1 1 39.OS 68.25 68.66 68.66 68.81 12 68.81 68.73 68.73 68.44 42.57 1 1 40.20 73.16 73.63 73.63 73.80 13 73.80 73.71 73.71 73.37 43.97 1
«* HOT CHANNEL FACTORS CEXCFPT FZ) **
13
FCC00LANT)= - — UCAT TRflNCCCD fftiinTTinu
1.448 F<FILM>= 1.448 FCCLAD)= 1.448 FCBOND)= 1.448 FCMEAT)= 1. 448
1 TRANSFER H E A T F L U X H E A T - MEAT TRANarcn bunumun H E A T F '. U X TRANSFER 1
1 COEFICIENT IN PLATE SURFACE XAA J FZ GENERATION XAA IN PLATE SiiRFACE COEFICIENT 1 1 CW/CM2.C) (W/CM2) CKC/M2.HR) CCM) CW/CM3) CCM> CW/CM2) CKC/M2.HR) CW/CM2.C) 1 1 0.5872 5.679 0.4882SE+OS 0.0284 1 0 325 199.91 0.0216 4.317 0 37116E+05 0.4440 1 0.3274 5.331 ".45836E+05 0.0285 2 0 304 186.99' 0.0215 4.019 0 34552E+05 0.3997 1 1 0.5258 8.160 0.70163E+05 0.0285 3 0 465 286.02 0.0215 6.141 0 S2798E+05 0.3996 ! 1 0.5333 11.391 0.97939E+05 0.0285 4 0 649 399.20 0.0215 8.569 0 73678E+05 0.4070 1 1 0.5423 14.705 0.12643E+06 0.0285 5 0 838 515.45 0.0215 11.068 0 95164E+05 0.4160 1 1 0.5550 18.768 0.16137E+06 0.0285 6 1 069 657.54 0.0215 14.109 0 12131E+06 0.4270 1 ! 0.5691 23.211 0.19957E+06 0.0285 7 1 323 813.78 0.0215 17.478 0 15028E+06 0.4407 1 1 0.5835 26.999 0.23214E+06 0.0285 8 1 540 947.25 0.0215 20.363 0 17509E+06 0.45S2 1 1 0.5939 27.797 0.23900E+06 0.0285 9 1 584 974.32 0.0215 20.919 0 17986E+06 0.4671 1 1 0.6014 26.465 0.227S4E+06 0.0286 10 1 504 925.11 0.0814 19.791 0 17016E+06 0.4768 1 1 0.6040 22.797 0.19601E+06 0.0288 11 1 286 791.02 0.0212 16.753 0 14405E+06 0.4813 1 1 0.6022 17.566 0.15103E+06 0.0293 12 0 976 600.34 0.0207 12.451 0 10705E+06 0.4812 1 1 0.6139 20.230 0.17394E+06 0.0292 13 1 .128 693.83 0.0208 14.461 0 .i2434E+06 0.4918 1
7 PAGE CALCULATI0N DATE 84-07-02 CASE (IA- 1 JA- 1) caOLOD --THER例AL HYDRAULIC CALCULATI0N
lMNER fUEL PLAτES 2 ( lMSTRU例ENTED fUEL ELE例ENτ 〉
ー'ーーーーーーーーーーーーーーーー----ー---ー『・・ーーーーー--司--ー・・ーーーーーーーーーーー・ーー‘・・ー・・・
S司区司"・...・・.......・***.s・a・*****.*.・*......・ CHANNEL NO.2 SIDE 司t*****..主主..，・・.........倉......・*...・・・・・..CHANMEL NO.l SIDE
言明白l露呈!日由N
0.390・7.040 (CM) 69.68 (CM/SEC)
'-
-
-
'
'
a
、，nut-''t・''ao'3Au，，句tB'h『，，，，，
『脳同pt・『dae---
内V内V司，』内V
向V内u---AUE2nv-
---n・・・・・・・・・・・・・・-
--LPU''''eoeoav---
『a，‘，，nv
・4『ζ電d-
-nuEE
司，』『g
『d内¢弓azaza'a
，、d電d'匂'u司，匂-
-
n
u
n
u
-
-pt.
，
‘
-
w
-
'PUEE
、，‘，h
内V'anu
，，『g
内V'O
司，L，。P3
，‘，，-
四脳同pt-pt・内vaOE3nuE3zaEda0
・0a0
・0，‘，a
-
官--a-n
・・・・・・・・・・・・・・-
M問
auzfpuao'''anuao'匂内¢nV44
《UE2
・。，a
a
nunuakEE'a'at・EJE3ao''''
・0・。，，au''-
'・・a
"
H
M
n
u
-
T
・E』
酌
a，
‘
-
uupt
・
-
R
u
-
-
，
•.
-
O
R
-
v
・
-
eep也、，‘，.. 0・0内V'SE3nunu---
『，‘，‘，a
・---
官.‘“町民-npiwnu''ao----oaenu--‘，a
・・・『，‘，，，，.
RU官
-
-
F
E
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
RUM開
pu
，，，‘，anuao'匂'aAU
『ζ44aoeo'a-
EERUM同
EE'a'a'-EJEdao''
・e・o-o''ao''-
。nam
，•. 仇
w
-
HU
・L
，
.
、
-
v
・Fl
u
-
a"
向
a
k
-
-
F
E
h
F
n
r
'
'
-
M円・側、，『e
・e・-av'SEJaunu---
司Z'句ZEv----
EEZ』。Rpt-nu''au
・・・・04unu---望
d4・・喧，‘，，，，-
T-M円
E
r
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
T-pu'''''anuao'h『
'anu『
ζ44aoeo'a-
-E』HME』電d
電d'-EJRdau''eeau
・u''AV
，，.
-
z
r
-
n
"
a
u
-
-HU
，
‘
，
e
p
r
e
-
-
-
-
-
T
・
-
-A"M円、，E3
・・・『gEdhHV'句... ，a，‘，‘，‘・4
《u-
-ZLHupt-aHveo
，，『g
内V，，，.. 司，‘，匂司，‘，aeoeo-
-MHMH
・・・・・・・・・・・・・・・
司官--pu'''''anuao'匂
'S《
U『
6
・4aoeo'a-
mLHE3345567888767・
-
E
A
D
-
-u"E
一
-pr
tIl--1111111111t
CHANMEL DIMENSI0N CHANNEL VELOClTY
-・・司Z'a'匂Edao''eon-'nu---
『，‘，a
・4・4・4・4
0.390 奪 7.040 (CM) 91.69 (C阿ISEC)
11112111111111』
f
-
-
，
，
.
-A"M円、，Ed---
『dE3hHV'句・・・'a
，‘，‘，匂44
《u-
-Z』"upLwmu-e
，，‘anv
，，... 司Z'u司『e's
・o・0-
-H"・・・・・・・・・・-----
''ARO'''''SAuto
，‘，3nu
『g---a0
・o'3e
-e』UAEE'a'at・E3EJao''
・0a@eo
，，ao
，，-
-
E
E
A
"
n
u
-
-MUM円
，
‘
.
-
F
F
-
-
-
•• -
-
.
，
，
-
-a"
、，au''E3EJ
・0・0司z・・・・・・司ζE3ao'a-
'EEnRpt-nu''ao--.
，，EJ
内vnu
『g《u・・・4uao-
-
M円
E
r
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
T-pu'''''anuao'u司司znu
『6・・・aoeo'am
創刊
e』
HUEL'a'a'a守
EJE3ao''ao
・e-o''ao''-
n
M
E
r
-
n
u
n
u
-
TAMU
，
‘
-
T
・FF
-
u
u
-
R
U
E
-
-
ロn
-
TEFU
、，nu''E3EJ
・0・0司Z4・・4・・句aEdaO
電d-
eJ・Mmmmpiwnu''ao--.
，，E2nvnu司
Z《
U44£口
'au-
TA'AF巳・・・・・・・・・・・・・・-
nunuM開
pu'''''anuao'匂司zaHV
司ζ・・-a0
・0電d-
nuM同巴
E'a'a'匂
EJEdao''
・0・0ao
，，ao''-
E
L
a
u
n
'
A
n
u
-
nk'L
，
‘
-
H
U
R
L
-
T
・
-
a
"
-
n
k
-
F巳
e
nrpur巳、，，，，句aonv'SEdaueoaonu
司ζEda。.
MHM刊
pt・pt・-oao
，‘.。，-4・・'S2JE2'句aO
司Z44-
E』7
・・am
-
-
-
-
-
-
-
-
-
-
-
-
-
-
e
?，内Uprpu
，。，，，anv
，。，&司句auv-ARUP30P's-
nunnzL22v'a
，‘，-EJao''''eoeo''ao
，，司
-
R
U
D
-
-
t
S
E
-
-
p
-
-
-
-
-
--
-
-
-
-守.、，nu'a
，‘，a
『ζ電dnv---aonv''aanu-
-
M
悶
pt・『dE3
内VE3'a'SEd--.
，，，aeOAU
司Z-
-
-
a
n
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-‘』eu''''''
・9avnu---電
d
，匂au''avnu'
-nuEE
司，』角ζ
『g『g『，h'aza'a'a
，a'a'a'匂-
-
n
u
n
u
-
-ptu
，
‘
-
-
-
'
--
-
g
-
CHANNEL Dl阿ENSIONCHANNEL VELOClTY
ISM-
f(MEATl= 1.448
ーーーーー旬ー・・・・ーー--- ~EAT TRANSfER C口NDlTI0N ー-----...ーH E A T ~ U X TRANSFER
XI¥A lN PLATE SI，Rft.CE. COEfICIEIIτ (C阿 (W/CM2) (KC/M2.HR) (W/CM2.C) 0.0216 4.317 0.37116E+05 0.4440 0.0215 4.019 0.34552E+05 0.3997 0.0215 6.141 0.S2798E+OS 0.3996 0.0215 8.569 0.73678E+05 0.4070 0.0215 11.068 0.95164E+OS 0.4160 0.0215 14.109 0.12131E+06 0.4270 0.0215 17.478 0.15028E+06 0.4407 0.0215 20.363 0.17509E+06 0.4552 0.0215 20.919 0.17986E+06 0.4671 0.0214 19.791 0.17016E+06 0.4768 0.0212 16.753 0.1'品405E+06 0.4813 0.0207 12.451 0.10705E+06 0.4812 0.0208 14.461 O..2434E+06 0.4918
F(80ND)" 1.448
H E A T GENERAT101l
(W/C阿3)
199.91 186.99 286.02 399.20 515.45 657.54 813.78 947.25 974.32 925.11 791.02 600.34 693.83
F (CLAO) = 1.448
FZ
0.325 0.304 0.465 0.649 0.838 1.。晶9
1.323 1.540 1.584 1.50'ら1.286 0.916 1.128
•• HGT CHANNEL FACTORS (EXCfPT FZ) •• F(COOLANT)= 1.448 F(FIL阿)= 1.448
4・・句，』空3'匂EJau''
・0内V《U44
『¢'a
----A4A
・・・
-・8
.
，‘E
・I・『'B.，.，.，a
，... ，.，.， ... ， .
•
.
，匂EJE2EJEJEJE2EJEda0
・o'S司
ζE
・
・
0
・OEO-0
・0・000
・OEO-0
・0avav-
-
a
"
、，司ζ
司，L司，L司，L司，L『g弓ζ『g司，L司，L喝
4
司ζ『6・
-
a
肉
M円《ununu
《ununuw
内Unununu
内UAU
内u-
-
u
R
F
i
u
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-，、nuAW内
uvnuAUAMAununMAUAM-仇
U仇
u-
-
-
--
M悶
-
nuE3EJEJE3aoaeau-aoauauauaoa
。.
引
ι
、，内unuau
内unuw
内U内U内U内ununuwnuwnu'
TER++++++φ++++++
飼
育
AVAP--MHeEELELELEE-EEZ』
FEEEEEEEEr-EE-
nMAm-gJAW
電do，電d''ヲ''"nu
，‘，.. 電d'匂-
M問
HUer
司ζ内¢電daozd
，‘，SEJ44
内UE3nu
《uwnv-
nu
内KM円。ロao--‘nvau---nv
司znw，、，a。‘‘za-
FLW
・LHu''eoaJnu
，，司za。nw，電d'S苛匡
nvEd
，，-
pbpt，，匂，‘，，内V4・・4A4晶司，』句，』司，-44喝品
44-
nRPrvhn
・・・・・・・・・・・・・-
EEEL
，‘nu
内向unu
内ununu
内ununHwnHWAU
内u-
FF
〒
'
'
p
a
a同
-
M何
'ae』-
aunnF
、，内v-Anu-&F3ao---
向V''FB'F'onu-
nna"
『，‘，，電daunvAuau44nv
内vaonvaO
電d-
T
-
M刊
MnAW
電d'・・電d'''''zav
，，，‘，，Ed'c-
EE.
，Ap
u
-
-
-
-
-
-
-
-
-
-
-
-
-
-
τr5581&83676270・
a
"
M
H
u
-
-
4
・4・A弓ζ司Z『g『g『644
『e-
EE
，
‘
-
u
n
--
--
-
-T.、，
-
司mmMmmpt・句a
，‘.。，a'a
《u---EJ
内V'匂内U
『gnv-
-ZLEE-''''EJ'S
『gEJnv'a'a
・・・，色守『eza-
-er
，晶司zeO
司ζ司，』電d'・E2a0
・0内VAunu
《UW44-
-SC阿
5355555556666-
aMN'Apt
・--------------
-a内Er・，，AW
内uvnMAunuwnunu
《》AW
《νnMAunu--
-nRPEH胃
・
・
-
T
・nu，
‘
.
a
F
i
u
-
-
-
-.，.‘ .. aE
・22E
・E・-E，，，E''''・・・・・・・-
COOLOD --THERMAL HYDRAULIC CALCULATION CASE = (IA- 1 JA- 1)
OUTER FUEL PLATES ( INSTRUMENTED FUEL ELEMENT
CALCULATION DATE 84-07-02 PAGE 8
) •• » m . . i CHANNEL NO.l SIDE * * X * * * * S * * * * * X S * S * » « * m t i t i t t i i **»*>*** CHANNEL NO.2 SIDE ************** «****«* CHANNEL DIMENSION = 0.390 • 7.040 (CM) CHANMEu DIMENSION - 0.486 t 7.040 (CM) CHANNEL VELOCITY = 69.68 (CM/SEC) CHANNEL VELOCITY = 22.00 (CM/SEC)
CLADDING CLADDING FUEL MEAT FUEL MEAT FUEL MEAT FUEL MEAT CLADDING CLADDING 1 COOLANT SURFACE INNER OUTER MAXIMUM J MAXIMUM OUTER INNER SURFACE COOLANT 1 1 (DEG.C) (DEG.C) (DEG.C) (DEG.C) (OEG.C) (DEG.C) (DEG.C) rDEG.C) (DEG.C) (DEG.C) 1 1 27.20 42.04 42.45 42.45 42.53 1 42.53 42.53 42.53 42.44 27.20 1 1 27.64 43.06 43.44 43.44 43.51 2 43.51 43.51 43.51 43.43 27.49 1 1 28.17 51.56 52.15 S2.15 52.26 3 52.26 52.26 52.26 52.13 27.84 1 1 28.94 60.87 61.69 61.69 61.85 4 61.85 6'i.84 61.84 61.66 28.35 1 1 29.97 69.96 71.01 71.01 71.22 S 71.22 71.21 71.21 70.97 29.05 1 1 31.28 80.59 81.92 81.92 82.18 6 82.18 82.16 82.16 81.86 29.96 1 1 32.93 91.73 93.37 93.37 93.69 7 93.69 93.67 93.67 93.29 31.12 1 1 34.90 100.84 102.74 102.74 103.11 8 103.11 103.09 103.09 102.64 32.54 1 1 37.04 102.87 104.81 104.81 105.19 9 105.19 105.17 105.17 104.69 34.11 1 1 39.15 100.13 101.96 101.96 102.32 10 102.32 102.30 102.30 101.84 35.71 1 1 41.04 92.46 94.01 94.01 94.31 11 94.31 94.29 94.29 93.89 37.19 1 1 42.57 81.41 82.58 82.58 82.80 12 82.80 82.78 82.78 82.47 38.42 I 1 43.97 87.72 89.07 89.07 89.33 13 89.33 89.31 89.31 88.94 39.10 I
«* HOT CHANNEL FACTORS (EXCEPT FZ) •«
13
F(C00LANT)= -- HEAT TRAN C C C D ^nuniTinii
1.174 F(FILM>= 1.174 F(CLAD)= 1.174 FCBOND)= 1.174 F(MEAT)= \. 174
1 TRANSFER H E A T F L U X K E A T — hcAl IKANarcn mm;.' i tun H E A T . F L U X TRANSFER 1
1 COEFICIENT IN PLATE SURFACE XAA J ••I GENERATION XAA IN PLATE SURFACE COEFICIENT 1 1 (W/CM2.C) (W/CM2) (KC/M2.HR) (CM) (W/CM3) (CM) (W/CK2) (KC/M2.HR) (W/CM2.C) 1 1 0.4501 6.681 0.57439E+05 0.0412 1 0 325 162.08 0.0088 1.424 0 12240E+05 0.0934 1 1 0.4054 6.251 0.53746E+05 0.0412 2 0 304 151.61 0.0088 1.330 0 11431E+05 0.0834 1 1 0.4081 9.547 0.82088E+05 0.0412 3 0 465 231.90 0.008. 2.048 0 17607E+05 0.0843 I 1 0.4163 13.293 0.11430E+06 0.0411 4 0 649 323.66 0.0089 2.890 0 24848E+05 0.0868 1 1 0.4278 17.110 0.14711E+06 0.0409 5 0 838 417.92 0.0091 3.786 0 32555E+05 0.0903 1 1 0.4406 21.722 0.18676E+06 0.0407 6 1 069 533.12 0.0093 4 . 934 0 42427E+05 0.0951 1 1 0.4556 26.788 0.23032E+06 0.0406 7 1 323 659.80 0.0094 6.202 0 53327E+05 0.0998 1 1 0.4708 31.050 0.26697E+06 0.0404 8 1 .540 768.02 0.0096 7.351 0 63205E+05 0.1049 1 1 0.4826 31.771 0.27317E+06 0.0402 9 1 .584 789.96 0.0098 7.727 0 66439E+05 0.1095 1 1 0.4918 29.992 0.25787E+06 0.0400 10 1 504 750.06 0.0100 7.512 0 64585E+05 0.1136 1 1 0.4952 25.460 0.21890E+06 0.0397 11 1 286 641.35 0.010? 6.608 0 56812E+05 0.116S 1 1 0.4928 19.142 0.16459E+06 0.0393 12 0 .976 486.74 0.0107 S.195 0 44666E+05 0.1179 1 1 0.5045 22.070 0.18976E+06 0.039. 13 1 128 562.55 0.010B 6.058 0 52084E+05 0.1228 1
B PAGE CALCULA110N OATE 84-07-02 CA5E (lA- 1 JA- 1) COOLOO -ーTHERMAL HYDRAULIC CALCULAT10N
OUTER FUEL PLATE5 (lN5TRUMENTEO FUEL ELEMENT
-・2・・*****..傘..・・・・・.. ..z*率・..・_*:IF*..・・e‘CHANNEI.. N口.2 510E ..*:1:...:1:....・S率_...$...:I:.Jr...:.....怠草草....CHANNEL NO.1 510E
』〉何回出
l
g宝l回目N
0.486 単 7.040 (CM) 22.00 (CI'II5ft)
-E-e司
-
-
E
T
a
、，nu
内w，，匂Ede、dFAU
『，h'匂・・・44
内V『，hnu-
-
M
同PL
令g'句。。電」nuwav---EdqA
，，44'匂，ι
-
-a"・・・・・・・・・・・・・・-
-LG7778亨
912'
・5789-
-
n
u
F
』3z.，‘，‘，‘，‘，z-胃d2J胃d
ミd電42J胃
d-
'
n
u
h
u
-
-
P
L
z
、
E
-
-PUE巴、，，匂'a'3ao''AU
内w，，匂内w，，匂内w，，，，匂-
-M同plvplv'匂，匂唱Aaoov
・0令gAuaoeoao'句nv-
'AA"
・・・・・・・・・・・・・・-
M同RUErFU
令g'S
『，h--enu
‘.. ，a、，‘，h司令A'a
令goo-
nununRE』'匂，匂EJAU''
・0酌
vnunununy-oeo-
-
-
b
a
"
H
u
n
u
-
-
・44・A-
Ta--、
。
逼
，
‘
-
HLP
、
-
E
B
--
-
h
n
-
守
a
m
psF也、，，a
‘.. ae'匂‘.. AU
，，ぬv''au
内.，.0
・A-
'AM周
nn't-EdE3-，‘.0
令，』44aeau-qA'a
，，』'''a-
R
U
T
-
-
F
E
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
nuM同FHM
令g'コ司F・4444
令g'a'aEd-，‘，匂令，』内v
-
EE-nν
脳同Z』'匂，.Edauu''aU0・'nunwnMeV-uau-
nHa例
'
A
A
u
-
-
.
‘A‘A-
H
U
L
，
.
守
'
P
L
-
a内
-
n
u
n
-
E』
舗
nF
守
』
-
Mna"
、，，344ao'句--eao''
内w'''nu
内.，eO4A-
eEZ・-BRPLE3Ed-，‘。。令gqAaO
《M44'a'g
ヲ，，a
-
TaM門
P
E
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
す
-FU
，.噌3
内4'1・・4・a内a'3's'P
『4'A喝『，島《V
B
句'』HUEL'匂
'a司
EJAU''eORVAUnu
《》内w'eGao-
-
P
E
n
u
n
u
-
-
・4A
4
A
-
-HU
，
、
-
-
r
r
-
-
-
-
m
・
-
〒
』
-
-a"温n
、，曹、，.-eAueコ勺660AV4a.
。.，，，Ma--
内HV'3e
-PEド
l帥
Flvr3r3『
400内
4
‘Aa
。444A'a'aao'3-
-
M
円M
円・・・・・・・・・・・・・・-
-'AFU『
d'S内
444
・・6『
d's'SF3内
d
'匂司dnv-
-
B』VRE』'匂，匂EdAu''aU0・'nunvnu
。，auau-
-
P
E
a
"
n
u
-
-
・4A
‘A-
-uuM門
，
、
-
-
Z
E
-
-
-
Illi--il--111111
CHANNEL 01MENSI0N tHANNEL VEL口t1Tv
宅---，‘，a
'匂e3AM''ee
内w，《M44
『ζ'a
1111
0.390・7.040 (CM) 69.66 (C刊15Et)
l111111111111111
-
R
圃
'
s
-
-a"M円、，，344AUE3
『，h・0
酌
v-A
内w，令g-anuv's-
-eEuuplwe3E3-，‘.0
『，h‘.. Auaaa---
電」'a
・。，a
-
-MnM円・・・・・・・・・・・・・
-a
''・・PU
喝S'S
令g‘... A司4's'SEd
令ad--
司，h内ve
--』uarE'匂，匂Edae
，，。。内vnununuway-oeo-
-
P
E
a
"
n
u
-
-
・4A
4
A
-
-HUM門
，
、
-
-
'
r
-
-
-
-
〒
』
-
，a円、，‘dt崎
a'0.，‘.. q6
ヲ't-Y4AAM4Aau
ヲ'-
-
E』BRplw
，匂，匂・--aOAUav'a''ee
内vnuvE3nu-
-MnE巴・・・・・・・・・・・・・・-
TaFU
司d'S
内4・・6・・644'a
『，‘，h-4A
，匂内4
内V-
Mm
・』HUPE
，‘，h司P3a。，，aORV
《UAUAU
内VBone-
nurEnu恥
u
-
A
4
A
4
A
-
'AHU
，
、
-
守
'pr
田
川
u
-
由
。
，
I
-
D
n
-
T'FU
、，EJ'句EJ
内V44笥
4
，，，匂唱AAu-Aee
，，-
edM開
BRplw
，匂，句aaaaenu
内.，ZJ''eo
内ynuEdnu-
'ATAeE
・・・・・・・・・・・・・・-
nunuM同FU
司ζ'a
司ζ4444qAZJ
、，‘，h司令A
，“司令g
内v-
huM同E巴，匂'a司EJAU
ヲ'eon-'nuvnuvnuvnvaoeo-
EEa"'Anu
‘A44
・Ah
nR
・L
，
、
-
H
U
P
L
-
T
E
-
R同
-
h
n
-
F
ト
』
-
。rFUZE
、，，匂aOAU''AU
内VZJ'a司ヲ'ZJaO4A弓
ζ
-
MnM問
PLFLAMnuE300内
VEJ''eeeo--.
，h-'匂''-
EE'AA"
・・・・・・・・-------
TsnuE『，U
喝d，、da--Aυ
内VAU4Anv
内4内U『44A''-
nunRE』'匂，匂Edaoaoeonvnv
《unun.，aaeo-
-a"
“un
u
-
-
・4A
‘AE
--LFa
，
‘
-
-
P
L
-
‘
"
-
-
T
a
、，AHW
，‘，，，‘，，ao'SAHW'・e3
，.，，，，
a
-Mmplw
，，』Au---
内V内v-，』内V
内ynuqAnvEJ
内v-
-
A
M
n
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
B
』Fu''''
・0・0内w，.. A令g'匂，，内yqA-，』電」-
-nuEE'e-，‘『，‘『，‘令g
・3'3'a'a'コ'匂，.，a司-
-
n
u
恥
u
-
-plv
，
‘
-
-
-
-
-
s
-
------E
，E---E ... ，.，.，.E
・E.，.，.，
.. -
CH~NNEL D1MEN510N CHANNEL VELOC1TV
ISM-
f(刊EAT>; :..174
-----B
・S・S.
，.8S』
aha，a''EB--''EB'a
，.-
-
守
』
、
，
.
-nunM刊
Flv'h-'h-'aeo'a
‘•. aS内
VE3a
。E3《
van-
-PEFS
・'a'a'h-aonuE2nw''h-nw，TJa。，，『，L-
-rrTA-，』nveoeoaun-'n-'nvnunU4A44
・A『
ζ
-
白
Fap--MnnunununununvAU弓
A-A4A4A4A-A-
-MN'AF
、•••••••••••••
-
-a"E『
''nunununununv《
ununu《
unununu-
-nwneEU明
-
守
'nu
，
、
-
P
L
-
M
問
-
nuE3E3P3E3P3E3E3E3E2E3r3E3E3
・
'A
、，nuvAununuw《
unununununuvnuw《
unu-
守'n
w
n
品目品目&τ
る胃る・‘・4E4τ&E&E4τ&E&E-
T
u
n
E
L
e
E
FヒeEE』E』E巴EEF凶
E巴Eに
E』EL-
nuvaHEL-nuV4A
ヲ'BOEJ
『'ヲ'zdnvzd
『ζAM'a司'
M刊
pi--，』'h-zJ
《u'句Ed
『，』『，』《U
電deO
句且-AURU
『
《uuua"Mn-，』'匂AueoEJ'句電J弓
ζ'a司Edeoaonu'
F
L
r
r
，，『，L4A'''h司『ζ
『，LTJ'aa。，h司a。，h司『4
・
-Lnwn
鼻、444A4A『
d'a'h-P3a
。aoaOP3'句
P2
・
n
R
H
U
M
A
-
-
-
-
-
-
-
-
-
-
-
-
-
-
EL
，rFa
，、nuvnuv
内unu
内unuv
内U内U内U内U内U内U内u-
F
-
F
a
r
E
-
M同
'
s
-
a-nTaa"
、，，h-nuvaO
《U&u'句、，‘.A
，，、，‘.0E300
・
RL22349830522095-
守』-a町内VMR'h-TJnuvao''
内V『dTJ''E3aO4Anu-
E--------------
守'PEM同，，.A
・・6『4『dTJ'h-ao
，，，，，，a。P3aOF
A
"
'
A
u
-
-
R巴
un
，、
M
u
n
-
-
a
n
a
n
リ
a内
M，‘.. ，a'h司
aoaenuv'n''ao-
-
e
o
e
e
・o・0
酌
V
内V内V内V内yaunuwnVAU-
-
a
u
町、，《UAV
《uhunuvhunuvnunu
噌目・・‘，‘.‘、
-
a
"
M
円nu
《U《U《unuhuhu
内νnunvnvnvnu'
-
w
a
n
p
l
w
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
，
、nuw《
unuw《
ununununuvnuvnunuvnunu-
-a『
''E'a't''11a1ea---s・，，，』aeag''-
F;BDNO); 1.174
K E A T GENERATION
(W/C阿3)162.08 151.61 231.90 323.66 417.92 533.12 659.80 768.02 769.96 750.06 641‘35 486;74 562.55
f(CLAO); 1.174
FZ
0.325 0.304 0.465 0.649 0.636 1.069 1.323 1.540 1.584 1.504 1.266 0.976 1.126
•• HOT CHANNEL FACTOR5 (EXCEPT FZ) •• F(COOLANT); 1.17'与f(FIL阿); 1.174
。A司d'a'句F，a。，，固O
《V内υ4且・司4
噌S
aa・句
A
・44
噌目・
-Ill111111lili----
-
苛
6崎
4崎
44A内
Vヲ'AU'h司令ιmvヲ''SIe
--A4A4A4AnunMAunununu
内V内V内v-
-
a
"
、，，a司，匂，句'a司'句，句，匂'a司，句，匂'3'a'a-
'a"Mn
内U内U《U《unununu
内リnunu
《ununu-
-
V
A
P
i
v
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
，
、nuvnuvnuvnununununununu《
ununu-
M
同
-
nur3r3r3aoaoaoaoaoaoaoao'oa0
・
TA
、，nuvnuvnuw《
unununununununununu-
TarERK-τ++4τ++4τ+4Y4冒
++4τ-
'AVAPLunrEEEE』戸
ヒ
EEPEEEEEFEFEEEPEEEm
nua"-nyAMaunU勾
AAM
、，‘ヲ'ヲ'ヲ'nV0・'AU
『
NUF23483173918957-
DRM4704760637849-
PL
・LHU'''''a『
44A'h-eOTJao''r3
・Aaoao-
F3PLVE3qdaO4A
噌品噌目eq'bq'b
勺ι司6『，』噌A
噌目e'
Dnrrvh
・・・・・・・・・・・・・-
E巴
E』，、nuvnuvnuvnuvnununununununununu-
F
T
-
F
a
a内
-
M
同
守
』
・
』
司
民同ロr
、，。A
噌A，，電dnu弓
ζ
。onu--.
、，』nu
令gnu-
nna"
句，haozd'句nv
噌A弓
ζ白
OEJ
ヲ'nvao'句ヲ'-
T
B
M問
Mnao
『ζEd
雪£4A
ヲ'ヲ，《U
ヲ'nw''h司噌Anu-
eE守
APiv--e
・・・0
・・・・・・-
T・
，
，AUAuo，ミd
ヲ'44AU44勾
A
O，Rdo，雪ι
-
a
"
u
n
H
W
4
A
4
A
『4『dTJTJ
『4『4噌目・『4
-
E
巴
，
、
.
u
n
-
-
句-
守
』
、
，
-
-nnM同PL4A'h--A'300
，。a。固Odeag
『4固OE3d
-EE・0586705022524-
-er
，A-，』Ednunw
噌A宅，』'h-cJ
ヲ'eo
内w，内w'nVAU-
-papLM円，匂，句，句'h-'句'h-'h-'句'h-'h-'句'a司Ed-
-
M
m
'
A
p
u
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-a内
rr''nuvnuvnuvnuvnMAUnu《
unununununu"・
-
R
E
M
-
-守』内u，
、
-
-
n
L
E
--E
・E・-----E
・E・--，，‘.，.，
... ，.a-E
・E-
JAE
RI-M
84- 162
H>
ft
st
lOr
OO
OO
OO
OO
OO
OO
OO
OO
(O
K1
00
't Z
»-
Ot
OO
O>
00
00
00
00
00
00
00
00
»N
-h
-K
t <
MU
J •
• •
I (
• i
t i
• i
i !
•<
*«
* J
UV
)O
OO
IV)
IM(
UIM
iV(
MIM
(\l(
\l<M
I\|fM
N(
VJ
OlO
O<
0O
OO
o
o **•
fM.'v
j«M
rMW
(\irjr«f\J
Mry
»\it>
jc\j<
\it\jfyry
ftjf^r^
O
-J E
4<
f
w
M m
<n K> m
*o to m m
to m w
to m
ill iiiiiiiiiiiiiiiiiiiiii Z) CO
£ rtO
OO
OH
rilMW
fgiOM
MM
^^-iOO
O
O
GO CO
O
OO
OO
OO
OO
OO
OO
OO
OO
OO
O
M *0
MO
**
OO
OO
OO
OO
OO
OO
OO
OO
OO
O
N«
UJ _J ID
OO
OO
OO
OO
OO
OO
OO
OO
OO
OO
Or
* oe
i* .
..
..
..
. a.
~ 0
00
00
00
00
00
00
00
00
00
00
0
.s^llaiiSS
iSIS
isisssiiseSS
O 00 00 ^
O* ^ 0* ^ ^ ^
O O
O O
00 x
or
-KN
i^r
^N
Nr
vo
oo
oo
oa
co
N
o O«N
NM
O0)00O
O>
0.(h0*O
O.
(HIM
IMW
^'O
NN
N'O
inilN
«-• I
03 I
.r^c
»K
i^N
>N
>t^
4o
oa
rhi
li
HW
IO
^i
n'
ON
(0
0>
Of
<W
rO
I-
hl
-h
t-
3 r
Ti
iH
d' X -I O
-I O
Z
HrJ
Ul
rvi ru ro fl X
XI
I X
X
X
X
«J <_»
I <
Oh
M
>I
U
NO
ZU
il
UO
OO
j
Q£ t-
h- lU
I
I l
Uh
hh
hO
: ;
UJL11 UJ
f- I
I t-
LU UJ ID UJ UJ
3 a. cc a: «t
i U
.3U
J J
a.-
j<i-
uJ
i<a
:a
:o
:c
£3
i a
. t— i—
_i
i i
_j
i-
h-
i-
i-
o 1
ntrtO
lOL
I I
Q.P
)IA
(A
V)
J J
—
__
__
__
..
_.
,_
—
I I H
>-^
Nro
^aco
oo
oo
coco
oo
o303cao
oo
oa>
coeo
co(>
oirtjp
j<4-
i Z
I-O
Kl'O
O'O
'O'O
'OO
'O'O
'O'O
'O'O
O'O
O'O
^O
'O-
vt
sJ
M
I <
HU
I .
. .
. .
• >
I J
UW
O(V
J(V
JO
«0
*&(M
>0
>*O
vO
'0'0
'CM
>O
I>(\IM
'0^
0 I
oo
**. m
m'fl<
{K)4
<o
«<
0'O
'04
<0
'O<
o4
<o
inin
nn
i O
-J £ H
H
I
aN
NN
I\l(M
(\in
r«
nr
)0
0O
0 fM
Ojn
jr\jiMrvj(\j(M
(\)fxjiMt\jn
jr\i
:s§iS
§M§sS
SS
5SI
_J r\J
OO
r<
Hr
tl
Vr
0l
O<
<t
UM
nO
NN
KI
0g
ia
C0
l0
Kl
t0
4C
0E
O
O
O
O
O
O
O
O
O
O
O
O
O
O
O
O
O
O
O
n «H
l\> (
-W
U
OO
OO
OO
OO
OO
OO
OO
OO
OO
OO
OO
o o **.
• h-
_J 13 O
OO
OO
OO
OO
OO
OO
OO
OO
OO
OO
O
3 CO
E
NO
rO
IM
OO
«I
O'
OH
MO
»*
JO
in
p*
NH
ON
«O
s*
| U
)(flU
OO
OO
OH
IM
(\
in
iO
<f
>f
lA
>0
4N
S0
04
00
> t
(OO
**
OO
OO
OO
OO
OO
OO
OO
OO
OO
OO
OO
I
UJ JO
O
OO
OO
OO
OO
OO
OO
OO
OO
OO
OO
O
I a
* i
a. •"*
00
00
00
00
00
00
00
00
00
00
00
i
sN^3S
SS
»S§iiS
&32ss§i8i§§
'NSNNNNNSNNNN\S
- 103-
9 PAGE CALCULATI0N DATE 84-07-02 CASE (IA- 1 JA・1>COOLOD --THERMAL HYDRAULIC CALCULATI0N
OUTER FUEL PLATES PRESSURE • ONB 畠 DNB CONDITI0N)
』〉何百
lgEl】巴
-・..・・・8羽..率...寧8
-
t・・・
'
E
S
-
-
-
-
•• -守EV.
、，，匂定J
定JnvnvnvnvnvnvnunvnvnvnvAunwnvnu
電J定Jnvnv'句"
-M刊マ
apL'an7内
vnHvnu白
uavavnwnwnwnwAVAVnunwnwAυny内
v'''''3
・
FAMn
，AF巴
----p・・・・・・・・・・・・・・・・・・・
-LCS0002222222222222220OBSo-
-aofEad2222222222222222277-
-nu'LMH
，‘，匂-
-
P
L
P
E
P
-
M
F
-
u
w
，
‘
-
----
-
、
，
.4
・A笥，L『4『d『4・3曹2・3'h司，匂，匂F3F2E3a。a。aoae
，。，。，。-
・'L
噌，
-nunwnununvnunwnwnwnwAunvnwnwAunvnwnvnvAU電
J0・'-
-a"CAWMHAUAunw内
unwAunwAUAHvnwAVnunwnunuAunL-nwnu内
U『
C'a-
・γseep--AUAunwAunwAunwnwnunwnununununununvnunununw
司晶、-
-nunu''
・・・・・・・・・・・・・・・・・・・・・・-
-TLED0000000000000000000oo-
-
U
R
n
-
-
，
、
-
-
-
-
-
-
E
E
-
-nwn
『
d
R
-USM-000011222333344400oo-
-FSabpL
内
U《
UAHvnuAUAU《
UAunUAUAUAU《
U《
UAHV《
U《
U《
U《
u
'
s
a
。，
-EJwnu''nunununuAununununununununununununununu
令
6
・A-
-F巳・LPU
《
U《
U《
U《
UAU《
UAUAununu内
UAUAU《
UAHV《
U《
unv《
U《
U《
U4A-
-
n
w
H
U
A
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-nr
，、
nununununununvnunwAununununununununununununu-
，
、
，
-
-
R』島内nwAU'匂，匂AU曹司
4
・EdnuRdnuEdnuEdAUEdAUEdauau'ARdnvnv-
-
n
k
.
，‘，匂，匂，匂'a-EJEdauao''
ヲ'O0
・0内ynvnHVAυAU
内U司4nveoa。-
-HU
，，‘『480
・0自
60000
・0006000000000000000
内vnvnv
内vnv
ヲ'''''-
-
p
b
u円・・・・・・・・・・・・・・・・・・・・・・・-
-SE11111111111321111111111-
-
r
E
T
'
'
'
-
n
n
a
M
n
p
u
-
-
n
v
v
a
n
-
‘
，
、
-
---------a， .. ，，，a'e
‘EE--E
・E・--EE--E... ， ......... R--aE-
3
M問n
u
M
刊
'
A
M
円T'T'EE-A
句a，a'h司F2
，。，，aonv《
u-A
『d'ST'T'T，T，マ』幽門
nu
マEH
u
r
E
H
U
P
・M
・A・A・A-A'AEEHUPEHUHU'A
-
-
-
M
阿
'LnuM刊
vaH'Lnu'LnuM同
γ
，
n
u
F
巳
M問
a“n
F
巳
M同制
問
EEa"
制
問
・
L
'
4
R
M
H
'
A
'
A
E
L
E
L
《
u
n
F
T
'
R
V
H
U
PL
、，、，M問
、
，
、
，
、
，
、
，
PL
a
a
-
-
E
2
2
3
3
L
E
E
-
I
l
l
i
t
-
-
l
i
l
-
-
f
f
f
f
A
u
n
u
n
-
-
u
n
H
n
u
n
H
n
p
L
PLPL-a"
胸、T，，AUWPE'ιnUM問
rE-PLPLPLPL
E
E
n
R
T
，守E
r
E
-
-
F
巳
T'T，守ET，RMnpb
h
k
F
巳
r
E
r
E
T
'
-
-
T
'
E
E
r
E
E
E
E
E
'
E
n
b
HUDrnknka"-ErHUz--』
nr
・L
島内T'E』
-a"nnm何
nkm何
H
・nu
e
a
n
r
T
，マE
・L-
-
・』T'T，マETEnu
・L
sussp-1111pili--l-pssssL
ZL
・L
nHH
・L
R
F
a
u
R
uw
-lil-Ill1111111111Iltill-----
RMH
-
-
n
u
-T'v.
、，，~nv
内yee
・o・0・00。。0
・0・0・0・O・O・0・0・00。nvnv
『ζ『C'匂-er
-
M阿守・piw
定JauauAMAMAMAU瓜MAMA-AuauauauAMAMauAuauAM
，匂，匂定J-
-AMn'A戸
E
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
R
U
--LPLPa
内U『Z『ζnv
内vnvnvnvnv
内ynvnv
白vnvnv
内V内V白ヲ『ζ
『gaoaunw-EL
anunu
，，E2EJA--aoaoaoaoauAuwAuwauauaoauauauaORJEJZJZJ-ce
-aUELM円
4A4A-HU
-
P
L
r
E
P
L
-
-
u
w
，‘
-nb
-
-
a
"
-
-
u
開
-
-
-
M
問
-nu
-
官
A
.、，，，，，nu-aao'句nuAu
，，h，，電JO，，，句nuEd
咽--ZJ'匂，吟唱.. ，，咽---守E
--L
『
gnwnu-A-A-A『
C
曹、d'a'匂
'a-EJEJao''''e0
・oaua。，3'3'a-a"
-a"
。aMn
内U内U内U内U内unuAU
内U内ununu
内U内U内U《
V
内U内U内U内u-A-A
『g-HU
-T-e-UPI-nununununvnunu
..竃率古車‘車率s・..・..r.HANNEL NO.2 SIDE ******・...主事室温......軍..軍軍掌..奪..・.CHAt‘NEL NO.1 SIDE
lHOωl
自DNB3183.94 183.75 183.48 183.02 182.36 181.45 1BO.25 178.76 177.08 175.39 173.83 172.54 171.32 171. 32
『44u'300
司品向V
ヲ'EJE2'匂nvEda。『ζAV
aueo
ヲ，，匂向V
内vaoeoEJ
内V『4000。AV
『，L
M
同--------------
nu
内vny
内VOO
ヲ，a。，匂『Cmy
ヲ，，匂『c-Aao
、，AU''''''
ヲ'ヲ'''''ヲ，aoauaoaoaoE3
-
c
'
コ曹、d's'S
曹、d's'コヲ、d，、d曹、d曹、d曹、d'3'3
MN p--f
uw-A
『4ヲ，『，hゅ，笥，L
，，『4
ヲ，『4
ヲ，.A
，O4A
『，‘
，‘白ロヲ'eOAU
司&曹、d'a-au
ヲ，内ynw
『d'aeヨヲ'
N--------------
RU00
・0内V向V向V内vn7ny
内YAVnw
内UAVeo
vaH
内u''
ヲ'ヲ'ヲ'ヲ'ヲ'''ヲ，，，O0
・00。・0
ヲ'
11111111111111
MM -L R
un-''anveoaO
『，‘，匂ao-AAunv
ヲ''a司『ζ
ErM刊
ao
ヲ，，，向V
司ζao
内V『ZEJ''
ヲ，ヲ，内U
向w，
n
u
-
-
-
-
-
-
-
-
-
-
-
-
-
-
nuao''
ヲ'''eOBOeonv
内V内vnvnVAυ
内M，
-ES
マaa内E
』hu'ζ
電JRdnw，。，，電dnuRJ
定J唱・・唱・・0・'au'd
島内'匂'anwa。，，nv
『ζ'コヲ'E2ao-A《
V
，，
MH
・a
・--------------
PL
・A-A『
Z『
4
曹、d'匂
au''''''auEdao
，，
TONB ( C)
120.25 120.16 120.25 120.37 120.49 120.63 120.77 120.90 121.01 121.12 121.21 121.29 121.41 12C.46
uNB 晶 DNB CONOITI0N
TSAT ( C)
117.10 117.18 117 .27 117.35 117.43 117.51 117.60 117.68 117.76 117.84 117.92 118.00 118.08 117.10
1 2 3 4 5 6 7 8 9
10 11 12 13
WORST
QDNB3 226.69 226.22 225.62 224.67 223.37 221. 65 219.47 216.84 213.95 211.11 208.57 206.57 204.72 204.72
笥4・A笥，L，‘，，内w，内400
内w''h司E360
，，AU's
au
，，『ZEd'aao'匂，句。。内w，内U転
aeo'匂内V
N--------------
nu
内U内U白veoao'a--A
，，曹、dnuao'J
・Aao
、，内祖内unu
。，。，，nV0・'o''auauau''''''au
『
ζ
'
匂
'h司
's'a'a-3'a'a's'a'a'3'a'a
M円FLW
I
MW
司4nv
司ζaunu'句。。『gaonyzJ
，，.4'匂nw，
fB68。，2235AU7。，0236
Mm
・-------------
nu''ヲ
'''860086000OBOeonV内
vnv
，，
VA内
回
《
U《
U《
UAunuAU内
unMAununuAυnunu
-ζ
『，‘『，h『，‘『Z
『，‘『，‘『，‘『，‘『，‘『Z
令，‘‘，‘『Z
HU E』
auEJ'匂唱.‘‘，‘『gnveonuEJ'匂nv'句'a
句a
FrM"'句。。nw，，匂唱A
，，，匂AV
内ua。.A
令ae3
・A
内u
・・・・・・・・・・・・・・
内UZJ00
・0nv
内U《
v-a
司ζ『z-A-Anv《
V
内U
，匂曹2'a'a
，‘，匂，匂，匂，匂，匂'h司，匂'h司'h司
?目a" Z』nua。EJEJnv
司&『，hnvEJ
，，内ya。，句ヲ'''
a"au
『ZEJ
『，』帽A''''
内u''nw，，匂-aAV
，，
HL--------------
PLaoaunyzJ''
司44u-A-AnvEJ《
V
『ζ司目・
司4・A内4『d's'S
内4『4・且『d'3
TONB ( C)
123.76 123.48 123.56 123.66 123.78 123.90 124.01 124.12 124.19 124.24 124.25 124.25 124.34 123.52
TSAT ( C)
117.05 117.12 117.19 117.27 117.34 117.41 117.49 117.56 117.-63 117.71 117.78 117.B5 117.92 117.05
自DNB3 BERNATH CORRELATI0N QDNB2 阿lRSHAK • OURANT 晶 TOWEL ---ーQDNB1 LABUNTSOV WITH ZERO SUBCOOLING
