summaryrefslogtreecommitdiff
path: root/Dragon/data/UOX_TBH_eighth_1level_proc/MultLIBEQ_32.c2m
blob: e1220f90ed28db9ccf983067d329af1d01a812c4 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
*DECK MultLIBRARY2_32
*----
*  Name          : MultLIBRARY2_32.c2m
*  Type          : DRAGON procedure
*  Use           : Increase the number of mixes in the microlib
*  Author        : R. Vallerent
*
*  Procedure called as: 
*
*  LIBRARY2 := MultLIBRARY2_32 LIBRARY2 ;
*
*  Input data  :
*    LIBRARY2     : Microlib with the number of mixs of the self shielding
*                calculation
*
*  Output data :
*    LIBRARY2     : Microlib with the number of mixs of the Salome geometry


PARAMETER  LIBRARY2  ::  
       EDIT 0 
           ::: LINKED_LIST LIBRARY2  ; 
   ;
*                                                                      ;
MODULE LIB: END: ;

LIBRARY2 := LIB: LIBRARY2 ::
  EDIT 1
  SKIP MACR
  NMIX 161
  
  MIXS LIB: MICROLIB FIL: LIBRARY2

* Multiplication pour C1
MIX 13
    COMB 3 1.0
MIX 14
    COMB 4 1.0
MIX 15
    COMB 5 1.0
MIX 16
    COMB 6 1.0
    
MIX 26
    COMB 3 1.0
MIX 27
    COMB 4 1.0
MIX 28
    COMB 5 1.0
MIX 29
    COMB 6 1.0

MIX 30
    COMB 3 1.0
MIX 31
    COMB 4 1.0
MIX 32
    COMB 5 1.0
MIX 33
    COMB 6 1.0

MIX 34
    COMB 3 1.0
MIX 35
    COMB 4 1.0
MIX 36
    COMB 5 1.0
MIX 37
    COMB 6 1.0

MIX 46
    COMB 3 1.0
MIX 47
    COMB 4 1.0
MIX 48
    COMB 5 1.0
MIX 49
    COMB 6 1.0

MIX 54
    COMB 3 1.0
MIX 55
    COMB 4 1.0
MIX 56
    COMB 5 1.0
MIX 57
    COMB 6 1.0

MIX 66
    COMB 3 1.0
MIX 67
    COMB 4 1.0
MIX 68
    COMB 5 1.0
MIX 69
    COMB 6 1.0

MIX 70
    COMB 3 1.0
MIX 71
    COMB 4 1.0
MIX 72
    COMB 5 1.0
MIX 73
    COMB 6 1.0

MIX 74
    COMB 3 1.0
MIX 75
    COMB 4 1.0
MIX 76
    COMB 5 1.0
MIX 77
    COMB 6 1.0

MIX 78
    COMB 3 1.0
MIX 79
    COMB 4 1.0
MIX 80
    COMB 5 1.0
MIX 81
    COMB 6 1.0

MIX 82
    COMB 3 1.0
MIX 83
    COMB 4 1.0
MIX 84
    COMB 5 1.0
MIX 85
    COMB 6 1.0

MIX 86
    COMB 3 1.0
MIX 87
    COMB 4 1.0
MIX 88
    COMB 5 1.0
MIX 89
    COMB 6 1.0

* Multiplication pour C2
MIX 17
    COMB 9 1.0
MIX 18
    COMB 10 1.0
MIX 19
    COMB 11 1.0
MIX 20
    COMB 12 1.0

MIX 21
    COMB 9 1.0
MIX 22
    COMB 10 1.0
MIX 23
    COMB 11 1.0
MIX 24
    COMB 12 1.0

MIX 38
    COMB 9 1.0
MIX 39
    COMB 10 1.0
MIX 40
    COMB 11 1.0
MIX 41
    COMB 12 1.0

MIX 42
    COMB 9 1.0
MIX 43
    COMB 10 1.0
MIX 44
    COMB 11 1.0
MIX 45
    COMB 12 1.0

MIX 50
    COMB 9 1.0
MIX 51
    COMB 10 1.0
MIX 52
    COMB 11 1.0
MIX 53
    COMB 12 1.0

MIX 58
    COMB 9 1.0
MIX 59
    COMB 10 1.0
MIX 60
    COMB 11 1.0
MIX 61
    COMB 12 1.0

MIX 62
    COMB 9 1.0
MIX 63
    COMB 10 1.0
MIX 64
    COMB 11 1.0
MIX 65
    COMB 12 1.0

MIX 90
    COMB 9 1.0
MIX 91
    COMB 10 1.0
MIX 92
    COMB 11 1.0
MIX 93
    COMB 12 1.0

MIX 98
    COMB 9 1.0
MIX 99
    COMB 10 1.0
MIX 100
    COMB 11 1.0
MIX 101
    COMB 12 1.0

MIX 102
    COMB 9 1.0
MIX 103
    COMB 10 1.0
MIX 104
    COMB 11 1.0
MIX 105
    COMB 12 1.0

MIX 110
    COMB 9 1.0
MIX 111
    COMB 10 1.0
MIX 112
    COMB 11 1.0
MIX 113
    COMB 12 1.0

* Multiplication pour C3
MIX 118
    COMB 114 1.0
MIX 119
    COMB 115 1.0
MIX 120
    COMB 116 1.0
MIX 121
    COMB 117 1.0

* Multiplication pour C4
MIX 106
    COMB 94 1.0
MIX 107
    COMB 95 1.0
MIX 108
    COMB 96 1.0
MIX 109
    COMB 97 1.0

* Multiplication pour C6
MIX 130
    COMB 126 1.0
MIX 131
    COMB 127 1.0
MIX 132
    COMB 128 1.0
MIX 133
    COMB 129 1.0

MIX 134
    COMB 126 1.0
MIX 135
    COMB 127 1.0
MIX 136
    COMB 128 1.0
MIX 137
    COMB 129 1.0

MIX 138
    COMB 126 1.0
MIX 139
    COMB 127 1.0
MIX 140
    COMB 128 1.0
MIX 141
    COMB 129 1.0

MIX 142
    COMB 126 1.0
MIX 143
    COMB 127 1.0
MIX 144
    COMB 128 1.0
MIX 145
    COMB 129 1.0

MIX 146
    COMB 126 1.0
MIX 147
    COMB 127 1.0
MIX 148
    COMB 128 1.0
MIX 149
    COMB 129 1.0

MIX 150
    COMB 126 1.0
MIX 151
    COMB 127 1.0
MIX 152
    COMB 128 1.0
MIX 153
    COMB 129 1.0
;

END: ;
QUIT .