屏蔽计算代码

1、屏蔽计算代码.txt再过几十年，我们来相会，送到火葬场，全部烧成灰，你一堆，我一堆， 谁也不认识谁，全部送到农村做化肥。墙体通风管道模拟计算C * C通过MCNP计算分别计算有风洞混凝土屏蔽墙体和无风洞混凝土屏蔽墙体表面剂量率，将* C运算结果进行结果对比，找出墙体风洞对屏蔽效果影响 * C * C *CELL CARD*2 -3.82272 -6 8 -11 13 -12 IMP:P=1like1buttrcl=(00-8)IMP:P=2$* TOC o 1-5 h z like1buttrcl=(00-16)IMP:P=4$*like1buttrcl=(00-24)IMP:P=8$*lik

2、e1buttrcl=(00-32)IMP:P=16$完好墙体分层*like1buttrcl=(00-40)IMP:P=32$*like 1 but trcl=(0 0 -48) IMP:P=64 $ 每 8cm 分一层*like1buttrcl=(00-56)IMP:P=128$*like1buttrcl=(00-64)IMP:P=256$墙体长宽高*like1buttrcl=(00-72)IMP:P=512$*C 11 like 1 but trcl=(0 0 -80) IMP:P=1024 $500*90*300*C 12like1buttrcl=(00-66)IMP:P=2048$*C

3、13like1buttrcl=(00-72)IMP:P=4096$*C 14like1buttrcl=(00-78)IMP:P=8192$*C 15like1buttrcl=(00-84)IMP:P=8192$*C *无风洞墙体描述完成，C 后要空格*0 -21 -15 16 IMP:P=1C * 源栅元描述，抽样在此进行 *2 -3.8227 #(4 -5 9 -10) 2 -6 8 -11 19 -18 IMP:P=1like17buttrcl=(008)IMP:P=2$* TOC o 1-5 h z like17buttrcl=(0016)IMP:P=4$like17buttrcl=(0

4、024)IMP:P=8$like17buttrcl=(0032)IMP:P=16$有风洞墙体like17buttrcl=(0040)IMP:P=32$like17buttrcl=(0048)IMP:P=64$每 8cm 分一层like17buttrcl=(0056)IMP:P=128$like17buttrcl=(0064)IMP:P=256$风洞尺寸为 100*50like17buttrcl=(0072)IMP:P=512$C 27like17buttrcl=(0060)IMP:P=1024$C 28like17buttrcl=(0066)IMP:P=4096$C 29like17buttr

5、cl=(0072)IMP:P=8192$C 30like17buttrcl=(0078)IMP:P=8192$C 31like17buttrcl=(0084)IMP:P=8192$*C *左侧墙体部分描述完成，C后要空格*2 -3.82272 -7 -14 17 8 -11 IMP:P=1like 32 but trcl=(8 0 0)IMP:P=2$*like 32 but trcl=(16 0 0)IMP:P=4$ 左侧墙体35like 32but trcl=(24 0 0)IMP:P=8$36like 32but trcl=(32 0 0)IMP:P=16$ 每8cm分一层37like

6、32but trcl=(40 0 0)IMP:P=32$38like 32but trcl=(48 0 0)IMP:P=64$39like 32but trcl=(56 0 0)IMP:P=128$40like 32but trcl=(64 0 0)IMP:P=256$41like 40but trcl=(72 0 0)IMP:P=512$C 42 like 40 but trcl=(60 0 0) C 43 like 40 but trcl=(66 0 0) C 44 like 40 but trcl=(72 0 0) C 45 like 40 but trcl=(78 0 0) C 46

7、like 40 but trcl=(84 0 0)IMP:P=1024$IMP:P=2048$IMP:P=4096$IMP:P=8192$IMP:P=8192$*C *有裂缝墙体右部分描述完成，C后要空格*471-0.0129 4 -5 9 -10 19 -18 IMP:P=1 $48like 47 but trcl=(0 0 8) IMP:P=2 $49like 47 but trcl=(0 0 16) IMP:P=4 $50like 47 but trcl=(0 0 24) IMP:P=8 $51like 47 but trcl=(0 0 32) IMP:P=16 $ 风洞52like 4

8、7 but trcl=(0 0 40) IMP:P=32 $53like 47 but trcl=(0 0 48) IMP:P=64 $ 每 8cm 分一层54like 47 but trcl=(0 0 56) IMP:P=128 $55like 47 but trcl=(0 0 64) IMP:P=256 $风洞尺寸为 100*5056like 47 but trcl=(0 0 72) IMP:P=512 $ TOC o 1-5 h z C 57like47buttrcl=(0060)IMP:P=1024$C 58like47buttrcl=(0066)IMP:P=4096$C 59like

9、47buttrcl=(0072)IMP:P=8192$C 60like47buttrcl=(0078)IMP:P=8192$C 61like47buttrcl=(0084)IMP:P=8192$*1-0.0129 3 -6 -14 17 8 -11 #16 IMP:P=1$墙体内侧空间1-0.0129 -1 #1 #2 #3 #4 #5 #6 #7 #8 #9 #10  #17 #18 #19 #20 #21 #22 #23 #24 #25 #26 #33 #34 #35 #36 #37 #38 #39 #40 #41/ #48 #49 #50 #51 #52 #53 #

10、54 #55 #56> IMP:P=512$用一个大球体将整个系统包住C 47 1 -0.0129 -1 #1 #2 #3 #4 #5 #6 #7 #8 #9 #10 #11&C #12 #13 #14 #15 #16 #17 #24 #25 #32 #39 #40&C #18 #19 #20 #21 #22 #23 IMP:P=101 IMP:P=0$外部C *C栅元描述完毕*C *C *SURFACE CARD*S 0 0 0 500 TOC o 1-5 h z PX-250PX-170PX-150PX-50PX250PX-242PY0PY125PY175PY300PZ260PZ25

11、2PZ180PZ80PZ-80PZ-180PZ-252PZ-26021C/Z 136 150 76C *曲面描述完毕C *C *DATA CARD*C IMP:P 1 1 1 1 1 0SDEF X=D1 Y=D3 Z=D2 ERG=0.8 PAR=2 宽50的Y体源$栅元权重$定义一个能量为1Mev，长100,高100SP1SI2SP2SI3SP3750$X轴分布125 0 -80 015080$Z轴分布$Y轴分布MODE P$光子输运模式C *源项描述完毕C *F15:P 126 150 -350 0.5林墙体的外表面设置点探测DE15 0.01 0.03 0.05 0.07 0.1 0.

12、2 0.3 0.4 0.5 0.6 0.7 0.8 1DF15 3.96E-06 5.82E-07 2.90E-07 2.58E-07 2.83E-07 5.01E-07 7.59E-07 9.85E-07 & 1.17E-06 1.36E-06 1.52E-06 1.68E-06 1.98E-06C*25*F25:P 126 150 350 0.5DE25 0.01 0.03 0.05 0.07 0.1 0.2 0.3 0.4 0.5 0.6 0.7 0.8 1 DF25 3.96E-06 5.82E-07 2.90E-07 2.58E-07 2.83E-07 5.01E-07 7.59E-07 9.85E-07 & 1.17E-06 1.36E-06 1.52E-06 1.68E-06 1.98E-06C * C * C计数卡描述完毕*C * M1 8016 -0.247014 -0.76$空气