summaryrefslogtreecommitdiff
path: root/Dragon/data/tdraglib_proc/TCDR05Lib.c2m
diff options
context:
space:
mode:
Diffstat (limited to 'Dragon/data/tdraglib_proc/TCDR05Lib.c2m')
-rw-r--r--Dragon/data/tdraglib_proc/TCDR05Lib.c2m65
1 files changed, 65 insertions, 0 deletions
diff --git a/Dragon/data/tdraglib_proc/TCDR05Lib.c2m b/Dragon/data/tdraglib_proc/TCDR05Lib.c2m
new file mode 100644
index 0000000..bd132b3
--- /dev/null
+++ b/Dragon/data/tdraglib_proc/TCDR05Lib.c2m
@@ -0,0 +1,65 @@
+*----
+* Procedure TCDR05Lib
+* Create Library for test CASE TCDR05
+* Calling :
+* LIBRARY := TCDR05Lib :: iedit ;
+* with :
+* LIBRARY = Linked list containing the result of LIB: for
+* TCDR05
+* iprint = print level for LIB: module
+*----
+* Define PARAMETERS,STRUCTURES and MODULES used
+*----
+PARAMETER LIBRARY :: ::: LINKED_LIST LIBRARY ; ;
+MODULE LIB: END: ;
+*----
+* Define and read LIB: EDIT option
+INTEGER iedit ;
+:: >>iedit<< ;
+*----
+* Depletion data from Jef 2.2 Draglib
+* Microscopic cross sections from Jef 2.2 Draglib
+*----
+LIBRARY := LIB: ::
+ EDIT <<iedit>>
+ NMIX 17 CTRA WIMS
+ DEPL LIB: DRAGON FIL: DLIB_J2
+ MIXS LIB: DRAGON FIL: DLIB_J2
+ MIX 1 560.66 0.81212 O16 = O16 7.99449E-1
+ D2D2O = H2_D2O 1.99768E-1 H1H2O = H1_H2O 7.83774E-4
+ MIX 2 560.66 6.57 Nb93 = Nb93 2.50000
+ B10 = B10 4.15800E-5 B11 = B11 1.68420E-4
+ Zr90 = Zr90 5.01150E+1 Zr91 = Zr91 1.09200E+1
+ Zr92 = Zr92 1.66725E+1 Zr94 = Zr94 1.70625E+1
+ MIX 3 345.66 0.0014 He4 = He4 1.00000E+2
+ MIX 4 345.66 6.44 Fe56 = Fe56 1.60000E-1
+ Ni58 = Ni58 6.00000E-2 Cr52 = Cr52 1.10000E-1
+ B10 = B10 6.13800E-5 B11 = B11 2.48620E-4
+ Zr90 = Zr90 5.12509E+1 Zr91 = Zr91 1.11675E+1
+ Zr92 = Zr92 1.70504E+1 Zr94 = Zr94 1.74493E+1
+ MIX 5 345.66 1.082885 O16 = O16 7.98895E-1
+ D2D2O = H2_D2O 2.01016E-1 H1H2O = H1_H2O 8.96000E-5
+ MIX 6 941.29 10.4375010 O16 = O16 1.18473E+1
+ Xe135 = Xe135 0.0
+ U235 = U235 6.27118E-1 1
+ U238 = U238 8.75256E+1 1
+ U236 = U236 0.0 1
+ Pu239 = Pu239 0.0 1
+ MIX 7 COMB 6 1.0
+ MIX 8 COMB 6 1.0
+ MIX 9 COMB 6 1.0
+ MIX 10 560.66 6.44 Fe56 = Fe56 1.60000E-1
+ Ni58 = Ni58 6.00000E-2 Cr52 = Cr52 1.10000E-1
+ B10 = B10 6.13800E-5 B11 = B11 2.48620E-4
+ Zr90 = Zr90 5.12509E+1 Zr91 = Zr91 1.11675E+1
+ Zr92 = Zr92 1.70504E+1 Zr94 = Zr94 1.74493E+1
+ MIX 11 COMB 10 1.0
+ MIX 12 COMB 10 1.0
+ MIX 13 COMB 10 1.0
+ MIX 14 COMB 1 1.0
+ MIX 15 COMB 1 1.0
+ MIX 16 COMB 1 1.0
+ MIX 17 COMB 1 1.0
+ ;
+END: ;
+QUIT "LIST" .