26.10.2014 Views

JAEA-Data/Code 2007-004 - Welcome to Research Group for ...

JAEA-Data/Code 2007-004 - Welcome to Research Group for ...

JAEA-Data/Code 2007-004 - Welcome to Research Group for ...

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

shown in Fig.7.1-7.<br />

In<strong>for</strong>mation contained in a record;<br />

W, L0, LLL, (T(k), k=1,2,...,LLL), (II(k), k=1,2,...,LLL)<br />

The optical length<br />

λ k is calculated by<br />

λ k = T(k)× {Cross section of II(k)} <strong>for</strong> k=1,2,..,LLL<br />

Loop of source region, repeated <strong>for</strong> k=1,2,...,L0<br />

i = II(k)<br />

; source region number<br />

λ i = λ k ; optical thickness of source region<br />

Set λ = 0 ; optical distance between source region and collision region<br />

ij<br />

Contribution <strong>to</strong> the diagonal element<br />

Δ ( ρ , ϕ)<br />

= F(0)<br />

× λ − F(0)<br />

+ F(<br />

λ )<br />

ii<br />

{<br />

i<br />

i<br />

} ΣiΣi<br />

Δ ii = ∫ W × Δ ii ( ρ,<br />

ϕ)<br />

dρdϕ<br />

Loop of collision region repeated <strong>for</strong> k'=k+1,...,LLL<br />

j = II(k') ; collision region number<br />

Set λ j ⇐ λij<br />

; optical thickness of collision region<br />

Contribution <strong>to</strong> the off-diagonal element<br />

Δ ( ρ , ϕ)<br />

= F(<br />

λ ) − F(<br />

λ + λ ) − F(<br />

λ + λ ) + F(<br />

λ + λ + λ )<br />

ij<br />

{<br />

ij ij i ij j<br />

ij i j<br />

} ΣiΣ<br />

j<br />

Δ ij = ∫W<br />

× Δ ij ( ρ,<br />

ϕ)<br />

dρdϕ<br />

Prepare optical distance <strong>for</strong> the next k’<br />

Set λ ij ⇐ λij<br />

+ λ j<br />

End loop <strong>for</strong> collision region k’<br />

unless the mirror condition (LLL > L0), then<br />

Contribution <strong>to</strong> the escape element<br />

Δ ( ρ , ϕ)<br />

= F(<br />

λ ) − F(<br />

λ + λ ) / Σ<br />

is<br />

{<br />

ij ij i<br />

}<br />

i<br />

Δ is = ∫ W × Δ is ( ρ,<br />

ϕ)<br />

dρdϕ<br />

End loop <strong>for</strong> source region k<br />

Fig.7.1-7 Computational flow-diagram <strong>for</strong> numerical integration by “Ray-Trace” method<br />

The function F(λ) appearing in the integrands in Fig.7.1-7 is given by<br />

F ( λ)<br />

= E 3 ( λ)<br />

<strong>for</strong> slab (7.1-75a)<br />

i<br />

F ( λ)<br />

= exp( −λ)<br />

<strong>for</strong> sphere (7.1-75b)<br />

F ( λ)<br />

= K 3 ( λ)<br />

<strong>for</strong> one- and two-dimensional cylinder (7.1-75c)<br />

i<br />

244

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!