From 7dfcc480ba1e19bd3232349fc733caef94034292 Mon Sep 17 00:00:00 2001 From: stainer_t Date: Mon, 8 Sep 2025 13:48:49 +0200 Subject: Initial commit from Polytechnique Montreal --- Dragon/Makefile | 82 + Dragon/data/ASSBLY_CASEA_1level_apex_boron.access | 48 + Dragon/data/ASSBLY_CASEA_1level_apex_boron.save | 20 + Dragon/data/ASSBLY_CASEA_1level_apex_boron.x2m | 205 + .../ASSBLY_CASEA_1level_apex_boron_proc/Geo_N2.c2m | 239 + .../ASSBLY_CASEA_1level_apex_boron_proc/Geo_SS.c2m | 213 + .../Mix_UOX.c2m | 544 + .../data/ASSBLY_CASEA_1level_apex_boron_xsm.access | 37 + .../data/ASSBLY_CASEA_1level_apex_boron_xsm.save | 20 + Dragon/data/ASSBLY_CASEA_1level_apex_boron_xsm.x2m | 205 + .../Geo_N2.c2m | 239 + .../Geo_SS.c2m | 213 + .../Mix_UOX.c2m | 547 + Dragon/data/ASSBLY_CASEA_1level_mpo.access | 48 + Dragon/data/ASSBLY_CASEA_1level_mpo.save | 20 + Dragon/data/ASSBLY_CASEA_1level_mpo.x2m | 167 + .../data/ASSBLY_CASEA_1level_mpo_proc/Geo_N2.c2m | 239 + .../data/ASSBLY_CASEA_1level_mpo_proc/Geo_SS.c2m | 213 + .../data/ASSBLY_CASEA_1level_mpo_proc/Mix_UOX.c2m | 544 + Dragon/data/ASSBLY_CASEA_1level_multicompo.access | 37 + Dragon/data/ASSBLY_CASEA_1level_multicompo.save | 21 + Dragon/data/ASSBLY_CASEA_1level_multicompo.x2m | 245 + .../ASSBLY_CASEA_1level_multicompo_proc/Geo_N2.c2m | 239 + .../ASSBLY_CASEA_1level_multicompo_proc/Geo_SS.c2m | 213 + .../Mix_UOX.c2m | 519 + Dragon/data/ASSBLY_VVER_1level_mpo.access | 50 + Dragon/data/ASSBLY_VVER_1level_mpo.save | 21 + Dragon/data/ASSBLY_VVER_1level_mpo.x2m | 125 + .../ASSBLY_VVER_1level_mpo_proc/13UAX_ARO_MOC.ap3 | 1306 + .../ASSBLY_VVER_1level_mpo_proc/13UAX_ARO_MOC.za | 118 + .../data/ASSBLY_VVER_1level_mpo_proc/Mix_UOX.c2m | 144 + Dragon/data/C2D20.access | 37 + Dragon/data/C2D20.x2m | 117 + Dragon/data/C2D20_proc/DimACRCell.c2m | 35 + Dragon/data/C2D20_proc/DimACRFuel.c2m | 73 + Dragon/data/C2D20_proc/GeoACRC2DN.c2m | 1293 + Dragon/data/C2D20_proc/MicACRE620.c2m | 295 + Dragon/data/C2D20_proc/MicACRE6UH.c2m | 87 + Dragon/data/C2D20_proc/MicACRE6UW.c2m | 114 + Dragon/data/CFC-CELL.access | 37 + Dragon/data/CFC-CELL.save | 19 + Dragon/data/CFC-CELL.x2m | 268 + Dragon/data/CFC-CELL_proc/CREEP.c2m | 32 + Dragon/data/CFC-CELL_proc/FLUX.c2m | 194 + Dragon/data/CFC-CELL_proc/FLUXP.c2m | 211 + Dragon/data/CFC-CELL_proc/GEOMTY.c2m | 359 + Dragon/data/CFC-CELL_proc/LIBRY.c2m | 238 + Dragon/data/CFC-CELL_proc/PERTRB.c2m | 114 + Dragon/data/CFC-CELL_proc/POWER.c2m | 67 + Dragon/data/DF_RTBeavrsPwrRefl.access | 39 + Dragon/data/DF_RTBeavrsPwrRefl.x2m | 440 + Dragon/data/ErmBeavrsPwrRefl.access | 38 + Dragon/data/ErmBeavrsPwrRefl.x2m | 510 + Dragon/data/ErmBeavrsPwrRefl_proc/AdaptIso.c2m | 527 + Dragon/data/ErmBeavrsPwrRefl_proc/CreaDilut.c2m | 518 + Dragon/data/ErmBeavrsPwrRefl_proc/CreaMix.c2m | 3020 + Dragon/data/ErmBeavrsPwrRefl_proc/CreaStepList.c2m | 532 + Dragon/data/ErmBeavrsPwrRefl_proc/DeplChain.c2m | 26 + Dragon/data/ErmBeavrsPwrRefl_proc/Geo15x15.c2m | 414 + Dragon/data/ErmBeavrsPwrRefl_proc/Geo17x17.c2m | 1671 + Dragon/data/ErmBeavrsPwrRefl_proc/GetMolarMass.c2m | 808 + Dragon/data/ErmBeavrsPwrRefl_proc/GetTechData.c2m | 852 + Dragon/data/ErmBeavrsPwrRefl_proc/MetalMix.c2m | 1548 + Dragon/data/ErmBeavrsPwrRefl_proc/ThermaExpans.c2m | 100 + Dragon/data/OSC_CASEA_1level_rse.access | 37 + Dragon/data/OSC_CASEA_1level_rse.save | 21 + Dragon/data/OSC_CASEA_1level_rse.x2m | 418 + Dragon/data/OSC_CASEA_1level_rse_proc/Geo_N2.c2m | 239 + Dragon/data/OSC_CASEA_1level_rse_proc/Geo_SS.c2m | 213 + Dragon/data/OSC_CASEA_1level_rse_proc/Mix_UOX.c2m | 529 + Dragon/data/OSC_CASEA_2level_rse.access | 37 + Dragon/data/OSC_CASEA_2level_rse.x2m | 320 + Dragon/data/OSC_CASEA_2level_rse_proc/Geo_N1.c2m | 154 + Dragon/data/OSC_CASEA_2level_rse_proc/Geo_N2.c2m | 239 + Dragon/data/OSC_CASEA_2level_rse_proc/Geo_SS.c2m | 144 + Dragon/data/OSC_CASEA_2level_rse_proc/Mix_UOX.c2m | 173 + .../data/OSC_CASEA_2level_rse_proc/MultLIBEQ.c2m | 378 + Dragon/data/OSC_openMP_tiso.access | 37 + Dragon/data/OSC_openMP_tiso.x2m | 110 + Dragon/data/OSC_openMP_tiso_proc/Geo_N2.c2m | 239 + Dragon/data/OSC_openMP_tiso_proc/Geo_SS.c2m | 213 + Dragon/data/OSC_openMP_tiso_proc/Mix_UOX.c2m | 529 + Dragon/data/RegtestCNG_mccg.access | 38 + Dragon/data/RegtestCNG_mccg.x2m | 256 + Dragon/data/RegtestLZC_mccg.access | 38 + Dragon/data/RegtestLZC_mccg.x2m | 151 + Dragon/data/TEST_GEO_hex_sect_tspc.access | 39 + Dragon/data/TEST_GEO_hex_sect_tspc.save | 21 + Dragon/data/TEST_GEO_hex_sect_tspc.x2m | 196 + .../TEST_GEO_hex_sect_tspc_proc/ALFRED_1cell.dat | 111 + .../ALFRED_1cell_sect.dat | 160 + Dragon/data/TEST_GEO_latt_tspc_S30.access | 38 + Dragon/data/TEST_GEO_latt_tspc_S30.x2m | 181 + .../lattice_hex_tspc_S30_7cells.dat | 251 + Dragon/data/UOX_5x5_TG6_sym8_multiDom.access | 10 + Dragon/data/UOX_5x5_TG6_sym8_multiDom.x2m | 46 + .../UOX_5x5_TG6_sym8_multiDom.h5 | Bin 0 -> 7432569 bytes Dragon/data/UOX_TBH_eighth_1level.access | 38 + Dragon/data/UOX_TBH_eighth_1level.x2m | 92 + .../data/UOX_TBH_eighth_1level_proc/Geo_SS_32.c2m | 147 + .../data/UOX_TBH_eighth_1level_proc/Mix_UOX_32.c2m | 305 + .../UOX_TBH_eighth_1level_proc/MultLIBEQ_32.c2m | 320 + Dragon/data/UOX_TBH_eighth_1level_proc/UOX_TBH.dat | 7902 ++ Dragon/data/VanDerGucht-295.access | 37 + Dragon/data/VanDerGucht-295.x2m | 11 + Dragon/data/VanDerGucht-295_proc/gd157_295.c2m | 50 + Dragon/data/VanDerGucht-295_proc/gd_295_c1aut.c2m | 117 + Dragon/data/VanDerGucht-295_proc/gd_295_c1rs.c2m | 118 + Dragon/data/VanDerGucht-295_proc/gd_295_c1us.c2m | 118 + Dragon/data/VanDerGucht-295_proc/svdg0_295.c2m | 53 + Dragon/data/VanDerGucht-295_proc/svdg0aut295.c2m | 51 + Dragon/data/VanDerGucht-295_proc/svdg0c_295.c2m | 51 + Dragon/data/VanDerGucht-295_proc/svdg0caut295.c2m | 52 + Dragon/data/VanDerGucht-295_proc/svdg0crse295.c2m | 52 + Dragon/data/VanDerGucht-295_proc/svdg0cuss295.c2m | 52 + Dragon/data/VanDerGucht-295_proc/svdg0rse295.c2m | 52 + Dragon/data/VanDerGucht-295_proc/svdg0uss295.c2m | 52 + Dragon/data/VanDerGucht-295_proc/svdg1c_295.c2m | 50 + Dragon/data/VanDerGucht-295_proc/svdg1caut295.c2m | 56 + Dragon/data/VanDerGucht-295_proc/svdg1crse295.c2m | 55 + Dragon/data/VanDerGucht-295_proc/svdg1cuss295.c2m | 55 + Dragon/data/VanDerGucht.access | 8 + Dragon/data/VanDerGucht.x2m | 18 + Dragon/data/VanDerGucht_proc/svdg0.c2m | 73 + Dragon/data/VanDerGucht_proc/svdg0_auto.c2m | 33 + Dragon/data/VanDerGucht_proc/svdg0_rse.c2m | 33 + Dragon/data/VanDerGucht_proc/svdg0_shiba.c2m | 32 + Dragon/data/VanDerGucht_proc/svdg0_uss.c2m | 32 + Dragon/data/VanDerGucht_proc/svdg0c.c2m | 55 + Dragon/data/VanDerGucht_proc/svdg0c_auto.c2m | 34 + Dragon/data/VanDerGucht_proc/svdg0c_rse.c2m | 33 + Dragon/data/VanDerGucht_proc/svdg0c_uss.c2m | 33 + Dragon/data/VanDerGucht_proc/svdg1.c2m | 74 + Dragon/data/VanDerGucht_proc/svdg12.c2m | 74 + Dragon/data/VanDerGucht_proc/svdg12_auto.c2m | 57 + Dragon/data/VanDerGucht_proc/svdg12_rse.c2m | 56 + Dragon/data/VanDerGucht_proc/svdg12_shiba.c2m | 56 + Dragon/data/VanDerGucht_proc/svdg12_uss.c2m | 56 + Dragon/data/VanDerGucht_proc/svdg12c.c2m | 36 + Dragon/data/VanDerGucht_proc/svdg12c_auto.c2m | 58 + Dragon/data/VanDerGucht_proc/svdg12c_uss.c2m | 57 + Dragon/data/VanDerGucht_proc/svdg13_auto.c2m | 72 + Dragon/data/VanDerGucht_proc/svdg13_uss.c2m | 72 + Dragon/data/VanDerGucht_proc/svdg13c.c2m | 36 + Dragon/data/VanDerGucht_proc/svdg13c_auto.c2m | 69 + Dragon/data/VanDerGucht_proc/svdg13c_uss.c2m | 69 + Dragon/data/VanDerGucht_proc/svdg14c.c2m | 55 + Dragon/data/VanDerGucht_proc/svdg14c_auto.c2m | 84 + Dragon/data/VanDerGucht_proc/svdg14c_rse.c2m | 84 + Dragon/data/VanDerGucht_proc/svdg14c_uss.c2m | 84 + Dragon/data/VanDerGucht_proc/svdg1_auto.c2m | 37 + Dragon/data/VanDerGucht_proc/svdg1_rse.c2m | 36 + Dragon/data/VanDerGucht_proc/svdg1_shiba.c2m | 36 + Dragon/data/VanDerGucht_proc/svdg1_uss.c2m | 36 + Dragon/data/VanDerGucht_proc/svdg1c.c2m | 36 + Dragon/data/VanDerGucht_proc/svdg1c_auto.c2m | 38 + Dragon/data/VanDerGucht_proc/svdg1c_uss.c2m | 37 + Dragon/data/VanDerGucht_proc/svdg2.c2m | 40 + Dragon/data/VanDerGucht_proc/svdg2_auto.c2m | 33 + Dragon/data/VanDerGucht_proc/svdg2_uss.c2m | 32 + Dragon/data/VanDerGucht_proc/svdg6c.c2m | 36 + Dragon/data/VanDerGucht_proc/svdg6c_auto.c2m | 63 + Dragon/data/VanDerGucht_proc/svdg6c_uss.c2m | 62 + .../data/a2b_drglib_apolib99_endfb8r0_v5p1.access | 17 + Dragon/data/a2b_drglib_apolib99_endfb8r0_v5p1.x2m | 10 + Dragon/data/a2b_drglib_apolib99_endfb8r1_v5p1.save | 31 + Dragon/data/a2b_drglib_apolib99_jef2p2_v5p1.access | 17 + Dragon/data/a2b_drglib_apolib99_jef2p2_v5p1.save | 31 + Dragon/data/a2b_drglib_apolib99_jef2p2_v5p1.x2m | 10 + .../data/a2b_drglib_apolib99_jeff4p0_v5p1.access | 17 + Dragon/data/a2b_drglib_apolib99_jeff4p0_v5p1.save | 31 + Dragon/data/a2b_drglib_apolib99_jeff4p0_v5p1.x2m | 10 + .../data/a2b_drglib_endfb7r1_shem315_v5p1.access | 17 + Dragon/data/a2b_drglib_endfb7r1_shem315_v5p1.save | 31 + Dragon/data/a2b_drglib_endfb7r1_shem315_v5p1.x2m | 10 + .../a2b_drglib_endfb8r1_ecco1962_light_v5p1.access | 17 + .../a2b_drglib_endfb8r1_ecco1962_light_v5p1.save | 31 + .../a2b_drglib_endfb8r1_ecco1962_light_v5p1.x2m | 10 + .../data/a2b_drglib_endfb8r1_shem281_v5p1.access | 17 + Dragon/data/a2b_drglib_endfb8r1_shem281_v5p1.save | 31 + Dragon/data/a2b_drglib_endfb8r1_shem281_v5p1.x2m | 10 + .../data/a2b_drglib_endfb8r1_shem295_v5p1.access | 17 + Dragon/data/a2b_drglib_endfb8r1_shem295_v5p1.save | 31 + Dragon/data/a2b_drglib_endfb8r1_shem295_v5p1.x2m | 10 + .../data/a2b_drglib_endfb8r1_shem315_v5p1.access | 17 + Dragon/data/a2b_drglib_endfb8r1_shem315_v5p1.save | 31 + Dragon/data/a2b_drglib_endfb8r1_shem315_v5p1.x2m | 10 + .../data/a2b_drglib_endfb8r1_shem361_v5p1.access | 17 + Dragon/data/a2b_drglib_endfb8r1_shem361_v5p1.save | 31 + Dragon/data/a2b_drglib_endfb8r1_shem361_v5p1.x2m | 10 + Dragon/data/a2b_drglib_endfb8r1_v5p1.access | 17 + Dragon/data/a2b_drglib_endfb8r1_v5p1.save | 31 + Dragon/data/a2b_drglib_endfb8r1_v5p1.x2m | 10 + Dragon/data/a2b_drglib_jef2p2_v5p1.access | 17 + Dragon/data/a2b_drglib_jef2p2_v5p1.save | 31 + Dragon/data/a2b_drglib_jef2p2_v5p1.x2m | 10 + Dragon/data/a2b_drglib_jeff4p0_v5p1.access | 17 + Dragon/data/a2b_drglib_jeff4p0_v5p1.save | 31 + Dragon/data/a2b_drglib_jeff4p0_v5p1.x2m | 10 + Dragon/data/a2b_drglib_shem281_jeff4p0_v5p1.access | 17 + Dragon/data/a2b_drglib_shem281_jeff4p0_v5p1.save | 31 + Dragon/data/a2b_drglib_shem281_jeff4p0_v5p1.x2m | 10 + Dragon/data/a2b_drglib_shem295_jef2p2_v5p1.access | 17 + Dragon/data/a2b_drglib_shem295_jef2p2_v5p1.save | 31 + Dragon/data/a2b_drglib_shem295_jef2p2_v5p1.x2m | 10 + .../data/a2b_drglib_shem295_jeff3p1p1_v5p1.access | 17 + Dragon/data/a2b_drglib_shem295_jeff3p1p1_v5p1.save | 31 + Dragon/data/a2b_drglib_shem295_jeff3p1p1_v5p1.x2m | 10 + .../a2b_drglib_shem295_jeff3p1p1_v5p1_kerma.access | 17 + .../a2b_drglib_shem295_jeff3p1p1_v5p1_kerma.save | 31 + .../a2b_drglib_shem295_jeff3p1p1_v5p1_kerma.x2m | 10 + Dragon/data/a2b_drglib_shem295_jeff4p0_v5p1.access | 17 + Dragon/data/a2b_drglib_shem295_jeff4p0_v5p1.save | 31 + Dragon/data/a2b_drglib_shem295_jeff4p0_v5p1.x2m | 10 + Dragon/data/a2b_drglib_shem315_jeff4p0_v5p1.access | 17 + Dragon/data/a2b_drglib_shem315_jeff4p0_v5p1.save | 31 + Dragon/data/a2b_drglib_shem315_jeff4p0_v5p1.x2m | 10 + Dragon/data/a2b_drglib_shem361_jeff4p0_v5p1.access | 17 + Dragon/data/a2b_drglib_shem361_jeff4p0_v5p1.save | 31 + Dragon/data/a2b_drglib_shem361_jeff4p0_v5p1.x2m | 10 + Dragon/data/assertS.c2m | 36 + Dragon/data/assertV.c2m | 32 + Dragon/data/fbr_colorset.access | 37 + Dragon/data/fbr_colorset.x2m | 288 + Dragon/data/fbr_colorset_proc/rnr_cc.c2m | 271 + Dragon/data/fbr_colorset_proc/rnr_interpol.c2m | 264 + Dragon/data/fbr_tone.access | 37 + Dragon/data/fbr_tone.x2m | 46 + Dragon/data/g2s_prestation.access | 10 + Dragon/data/g2s_prestation.save | 22 + Dragon/data/g2s_prestation.x2m | 74 + Dragon/data/g2s_prestation_proc/cP1_JST0_IS2.c2m | 37 + Dragon/data/g2s_prestation_proc/cP1_JST0_IS3.c2m | 37 + Dragon/data/g2s_prestation_proc/cP1_JST0_IS4.c2m | 38 + Dragon/data/g2s_prestation_proc/cP1_JST1_IS2.c2m | 37 + Dragon/data/g2s_prestation_proc/cP1_JST1_IS3.c2m | 37 + Dragon/data/g2s_prestation_proc/cP1_JST1_IS4.c2m | 37 + Dragon/data/g2s_prestation_proc/cP1_JST2_IS0.c2m | 37 + Dragon/data/g2s_prestation_proc/cP1_JST2_IS1.c2m | 37 + Dragon/data/g2s_prestation_proc/cP1_JST2_IS2.c2m | 37 + Dragon/data/g2s_prestation_proc/cP1_JST2_IS3.c2m | 37 + Dragon/data/g2s_prestation_proc/cP1_JST2_IS4.c2m | 37 + Dragon/data/g2s_prestation_proc/cP1_JST2_Im1.c2m | 37 + Dragon/data/g2s_prestation_proc/cR2_JST2_IS0.c2m | 37 + Dragon/data/g2s_prestation_proc/cR2_JST2_IS1.c2m | 37 + Dragon/data/g2s_prestation_proc/cR2_JST2_IS4.c2m | 37 + Dragon/data/g2s_prestation_proc/cR2_JST2_Im1.c2m | 37 + Dragon/data/g2s_prestation_proc/cS1_JST0_IS3.c2m | 38 + Dragon/data/g2s_prestation_proc/cS1_JST1_IS3.c2m | 38 + Dragon/data/g2s_prestation_proc/cS1_JST2_IS3.c2m | 37 + Dragon/data/g2s_prestation_proc/car_JST0_IS2.c2m | 36 + Dragon/data/g2s_prestation_proc/g2s_pincell.c2m | 34 + Dragon/data/g2s_prestation_proc/g2s_test.c2m | 221 + Dragon/data/g2s_prestation_proc/hex.c2m | 33 + Dragon/data/g2s_prestation_proc/hex_JST0.c2m | 34 + Dragon/data/g2s_prestation_proc/hex_JST1.c2m | 32 + Dragon/data/g2s_prestation_proc/hex_JST2.c2m | 33 + Dragon/data/g2s_prestation_proc/hex_P1_JST0.c2m | 34 + Dragon/data/g2s_prestation_proc/hex_P1_JST1.c2m | 32 + Dragon/data/g2s_prestation_proc/hex_P1_JST2.c2m | 34 + Dragon/data/g2s_prestation_proc/hex_P2_JST0.c2m | 34 + Dragon/data/g2s_prestation_proc/hex_P2_JST1.c2m | 34 + Dragon/data/g2s_prestation_proc/hex_P2_JST2.c2m | 34 + Dragon/data/g2s_prestation_proc/hex_P3_JST0.c2m | 35 + Dragon/data/g2s_prestation_proc/hex_P3_JST1.c2m | 35 + Dragon/data/g2s_prestation_proc/hex_P3_JST2.c2m | 35 + Dragon/data/g2s_prestation_proc/hex_P4_JST0.c2m | 34 + Dragon/data/g2s_prestation_proc/hex_P4_JST1.c2m | 34 + Dragon/data/g2s_prestation_proc/hex_P4_JST2.c2m | 34 + Dragon/data/g2s_prestation_proc/isocel_r60.tdt | 189 + Dragon/data/g2s_prestation_proc/lozenge_r120.tdt | 150 + Dragon/data/g2s_prestation_proc/tst2016_1.c2m | 88 + Dragon/data/g2s_prestation_proc/tst2016_2.c2m | 264 + Dragon/data/g2s_prestation_proc/tst2016_3.c2m | 276 + Dragon/data/g2s_prestation_proc/tst2016_4.c2m | 247 + Dragon/data/g2s_prestation_proc/tst2016_5.c2m | 107 + Dragon/data/g2s_prestation_proc/tst2016_6.c2m | 149 + Dragon/data/g2s_prestation_proc/tst2016_7.c2m | 72 + Dragon/data/g2s_prestation_proc/tst2019_1.c2m | 63 + Dragon/data/g2s_prestation_proc/tst2019_2.c2m | 59 + Dragon/data/g2s_prestation_proc/tst2019_3.c2m | 59 + Dragon/data/g2s_prestation_proc/tst2019_4.c2m | 151 + Dragon/data/g2s_prestation_proc/tst2023_1.c2m | 48 + Dragon/data/iaea2d.x2m | 97 + Dragon/data/lumpSS.access | 37 + Dragon/data/lumpSS.x2m | 268 + Dragon/data/lumpSS_proc/mixA1_lumpSS.c2m | 106 + Dragon/data/pincell_apx.access | 38 + Dragon/data/pincell_apx.save | 20 + Dragon/data/pincell_apx.x2m | 345 + Dragon/data/pincell_mco.access | 37 + Dragon/data/pincell_mco.save | 20 + Dragon/data/pincell_mco.x2m | 395 + Dragon/data/pincell_mco_proc/BranchFlux.c2m | 95 + Dragon/data/pincell_mco_proc/CalcFlux.c2m | 93 + Dragon/data/pincell_mco_proc/Mix_UOX.c2m | 231 + Dragon/data/pincell_mpo.access | 38 + Dragon/data/pincell_mpo.save | 20 + Dragon/data/pincell_mpo.x2m | 337 + Dragon/data/pincell_sap.access | 38 + Dragon/data/pincell_sap.save | 20 + Dragon/data/pincell_sap.x2m | 349 + Dragon/data/proc_CNG/CHB_NXT.c2m | 532 + Dragon/data/proc_CNG/LCNG_U2_nDf.c2m | 271 + Dragon/data/proc_LZC/DimCell.c2m | 29 + Dragon/data/proc_LZC/DimFuel.c2m | 49 + Dragon/data/proc_LZC/DimLZC.c2m | 52 + Dragon/data/proc_LZC/GeoCell.c2m | 306 + Dragon/data/proc_LZC/GeoLZC.c2m | 1020 + Dragon/data/proc_LZC/GeoLZCM.c2m | 1020 + Dragon/data/proc_LZC/MicLZC.c2m | 98 + Dragon/data/proc_LZC/MicWUC.c2m | 189 + Dragon/data/proc_LZC/MicWULZC.c2m | 395 + Dragon/data/rep900_het_gff.access | 41 + Dragon/data/rep900_het_gff.save | 24 + Dragon/data/rep900_het_gff.x2m | 846 + Dragon/data/rep900_het_gff_jef2p2.access | 37 + Dragon/data/rep900_het_gff_jef2p2.save | 23 + Dragon/data/rep900_het_gff_jef2p2.x2m | 322 + .../data/rep900_het_gff_jef2p2_proc/AddCompo.c2m | 158 + Dragon/data/rep900_het_gff_jef2p2_proc/Autop1.c2m | 110 + Dragon/data/rep900_het_gff_jef2p2_proc/Autop2.c2m | 111 + .../data/rep900_het_gff_jef2p2_proc/CalcFluxH.c2m | 174 + .../data/rep900_het_gff_jef2p2_proc/ConcLIBEQ.c2m | 60 + .../rep900_het_gff_jef2p2_proc/ConcLIBRARY2.c2m | 54 + .../rep900_het_gff_jef2p2_proc/CondHet_2gr.c2m | 765 + Dragon/data/rep900_het_gff_jef2p2_proc/GeoHom.c2m | 277 + .../data/rep900_het_gff_jef2p2_proc/Geo_N1_32.c2m | 148 + .../data/rep900_het_gff_jef2p2_proc/Geo_N2_32H.c2m | 805 + .../data/rep900_het_gff_jef2p2_proc/Geo_SS_32.c2m | 147 + Dragon/data/rep900_het_gff_jef2p2_proc/GetDim.c2m | 120 + .../data/rep900_het_gff_jef2p2_proc/Homogenize.c2m | 82 + .../data/rep900_het_gff_jef2p2_proc/IniCompo.c2m | 294 + .../data/rep900_het_gff_jef2p2_proc/Mix_UOX_32.c2m | 301 + .../rep900_het_gff_jef2p2_proc/MultLIBEQ32H.c2m | 348 + Dragon/data/rep900_het_gff_proc/AddCompo.c2m | 158 + Dragon/data/rep900_het_gff_proc/BranchFluxH.c2m | 167 + Dragon/data/rep900_het_gff_proc/CalcFluxH.c2m | 179 + Dragon/data/rep900_het_gff_proc/CondHet_2gr.c2m | 763 + Dragon/data/rep900_het_gff_proc/GeoHom.c2m | 277 + Dragon/data/rep900_het_gff_proc/Geo_N2_32H.c2m | 805 + Dragon/data/rep900_het_gff_proc/IniCompo.c2m | 294 + Dragon/data/rep900_het_gff_proc/MultLIBEQ32H.c2m | 348 + Dragon/data/rep900_mco.access | 37 + Dragon/data/rep900_mco.save | 20 + Dragon/data/rep900_mco.x2m | 933 + Dragon/data/rep900_mco_proc/Autop1.c2m | 137 + Dragon/data/rep900_mco_proc/Autop2.c2m | 138 + Dragon/data/rep900_mco_proc/BranchFlux.c2m | 167 + Dragon/data/rep900_mco_proc/CalcFlux.c2m | 179 + Dragon/data/rep900_mco_proc/ConcLIBEQ.c2m | 60 + Dragon/data/rep900_mco_proc/ConcLIBRARY2.c2m | 54 + Dragon/data/rep900_mco_proc/Condense_2gr.c2m | 137 + Dragon/data/rep900_mco_proc/Geo_N1_20.c2m | 139 + Dragon/data/rep900_mco_proc/Geo_N1_32.c2m | 148 + Dragon/data/rep900_mco_proc/Geo_N2_20.c2m | 797 + Dragon/data/rep900_mco_proc/Geo_N2_32.c2m | 797 + Dragon/data/rep900_mco_proc/Geo_SS_20.c2m | 138 + Dragon/data/rep900_mco_proc/Geo_SS_32.c2m | 147 + Dragon/data/rep900_mco_proc/GetDim.c2m | 120 + Dragon/data/rep900_mco_proc/Homogenize.c2m | 82 + Dragon/data/rep900_mco_proc/Mix_MOX_32.c2m | 453 + Dragon/data/rep900_mco_proc/Mix_UOX_20.c2m | 311 + Dragon/data/rep900_mco_proc/Mix_UOX_32.c2m | 341 + Dragon/data/rep900_mco_proc/MultLIBEQ_20.c2m | 349 + Dragon/data/rep900_mco_proc/MultLIBEQ_32.c2m | 318 + Dragon/data/rep900_sap.access | 38 + Dragon/data/rep900_sap.save | 20 + Dragon/data/rep900_sap.x2m | 920 + Dragon/data/salmacro.access | 17 + Dragon/data/salmacro.x2m | 42 + Dragon/data/salmacro_proc/30AV5_SSH.ap3 | 5453 ++ Dragon/data/salmacro_proc/439NR_SSH.sal | 1589 + Dragon/data/salmacro_proc/439NR_SSH_iso.sal | 1589 + Dragon/data/salmacro_proc/AIC_SN_CCOND2.ref | 2400 + Dragon/data/salmacro_proc/GeoNG2x2_iso.c2m | 259 + Dragon/data/salmacro_proc/GeoNG_spec.c2m | 200 + Dragon/data/salmacro_proc/GeoNG_square.c2m | 190 + Dragon/data/salmacro_proc/KML2_ARO_13AU_SSH.ap3 | 2642 + Dragon/data/salmacro_proc/KML2_ARO_13AU_SSH.za | 142 + Dragon/data/salmacro_proc/TDCM02.c2m | 83 + Dragon/data/salmacro_proc/TDCM03.c2m | 67 + Dragon/data/salmacro_proc/TDCM07.c2m | 75 + Dragon/data/salmacro_proc/TDCM08.c2m | 82 + Dragon/data/salmacro_proc/TDCM09.c2m | 73 + Dragon/data/salmacro_proc/TDCM31.c2m | 119 + Dragon/data/salmacro_proc/TDCM32.c2m | 104 + Dragon/data/salmacro_proc/TDCM33.c2m | 558 + Dragon/data/salmacro_proc/TDCM43.c2m | 123 + Dragon/data/salmacro_proc/TDCM44.c2m | 118 + Dragon/data/salmacro_proc/TDCM45.c2m | 163 + Dragon/data/salmacro_proc/TDCM46.c2m | 79 + Dragon/data/salmacro_proc/TDCM47.c2m | 99 + Dragon/data/salmacro_proc/TDCM48.c2m | 165 + Dragon/data/salmacro_proc/TDCM49.c2m | 174 + Dragon/data/salmacro_proc/TDCM50.c2m | 97 + Dragon/data/salmacro_proc/TDCM51.c2m | 122 + Dragon/data/salmacro_proc/TDCM52.c2m | 71 + Dragon/data/salmacro_proc/TDCM53.c2m | 92 + Dragon/data/salmacro_proc/TDCM54.c2m | 156 + Dragon/data/salmacro_proc/TDCM55.c2m | 78 + Dragon/data/salmacro_proc/TDCM56.c2m | 956 + Dragon/data/salmacro_proc/TDCM57.c2m | 229 + Dragon/data/salmacro_proc/TDCM58.c2m | 165 + Dragon/data/salmacro_proc/TDCM59.c2m | 98 + Dragon/data/salmacro_proc/TDCM60.c2m | 82 + Dragon/data/salmacro_proc/TDCM61.c2m | 393 + Dragon/data/salmacro_proc/TDCM62.c2m | 101 + Dragon/data/salmacro_proc/TDCM63.c2m | 139 + Dragon/data/salmacro_proc/TDCM64.c2m | 74 + Dragon/data/salmacro_proc/TDCM65.c2m | 113 + Dragon/data/salmacro_proc/TDCM66.c2m | 195 + Dragon/data/salmacro_proc/TDCM67.c2m | 50 + Dragon/data/salmacro_proc/geomProc.c2m | 41 + .../salmacro_proc/lattice_hex_tiso_S30_7cells.dat | 251 + .../lattice_hex_tiso_S30_7cells_macro.dat | 252 + .../salmacro_proc/lattice_hex_tspc_S30_7cells.dat | 251 + Dragon/data/sens.access | 37 + Dragon/data/sens.save | 40 + Dragon/data/sens.x2m | 115 + Dragon/data/tapollo1.access | 47 + Dragon/data/tapollo1.x2m | 8 + Dragon/data/tapollo1_proc/CEA93_V2_DPL.c2m | 552 + Dragon/data/tapollo1_proc/TCA131.c2m | 394 + Dragon/data/tapollo2.access | 47 + Dragon/data/tapollo2.x2m | 14 + Dragon/data/tapollo2_proc/CEA93_V4_DPL.c2m | 135 + Dragon/data/tapollo2_proc/CEA93_V6_DPL.c2m | 141 + Dragon/data/tapollo2_proc/TCA231.c2m | 273 + Dragon/data/tapollo2_proc/TCA232.c2m | 69 + Dragon/data/tapollo2_proc/TCA233.c2m | 132 + Dragon/data/tapollo2_proc/TCA234.c2m | 293 + Dragon/data/tapollo2_proc/TCA235.c2m | 322 + Dragon/data/tapollo2_proc/TCA241.c2m | 135 + Dragon/data/tdraglib.access | 37 + Dragon/data/tdraglib.save | 19 + Dragon/data/tdraglib.x2m | 47 + Dragon/data/tdraglib_proc/EvolRef.c2m | 120 + Dragon/data/tdraglib_proc/TCDR01.c2m | 115 + Dragon/data/tdraglib_proc/TCDR02.c2m | 162 + Dragon/data/tdraglib_proc/TCDR02_void.c2m | 140 + Dragon/data/tdraglib_proc/TCDR03.c2m | 153 + Dragon/data/tdraglib_proc/TCDR04.c2m | 158 + Dragon/data/tdraglib_proc/TCDR05.c2m | 187 + Dragon/data/tdraglib_proc/TCDR05Lib.c2m | 65 + Dragon/data/tdraglib_proc/TCDR06.c2m | 151 + Dragon/data/tdraglib_proc/TCDR07.c2m | 138 + Dragon/data/tdraglib_proc/TCDR08.c2m | 124 + Dragon/data/tdraglib_proc/TCDR09.c2m | 72 + Dragon/data/tdraglib_proc/TCDR10.c2m | 89 + Dragon/data/tdraglib_proc/TCDR11.c2m | 167 + Dragon/data/tdraglib_proc/TCDR12.c2m | 106 + Dragon/data/tdraglib_proc/TCDR13.c2m | 132 + Dragon/data/tdraglib_proc/TCDR14.c2m | 293 + Dragon/data/tdraglib_proc/TCDR15.c2m | 200 + Dragon/data/tdraglib_proc/TCDR16.c2m | 152 + Dragon/data/tdraglib_proc/TCDR17.c2m | 206 + Dragon/data/tdraglib_proc/TCDR18.c2m | 83 + Dragon/data/tdraglib_proc/TCDR19.c2m | 158 + Dragon/data/tdraglib_proc/TCDR20.c2m | 175 + Dragon/data/tdraglib_proc/TCDR21.c2m | 145 + Dragon/data/tdraglib_proc/TCDR22.c2m | 208 + Dragon/data/tdraglib_proc/TCDR31.c2m | 172 + Dragon/data/tdraglib_proc/TCDR32.c2m | 207 + Dragon/data/tdraglib_proc/TCDR33.c2m | 146 + Dragon/data/tdraglib_proc/TCDR34.c2m | 65 + Dragon/data/tdraglib_proc/TCDR35.c2m | 79 + Dragon/data/tdraglib_proc/TCDR36.c2m | 337 + Dragon/data/tdraglib_proc/TCDR37.c2m | 164 + Dragon/data/tdraglib_proc/TCDR38.c2m | 136 + Dragon/data/tdraglib_proc/TCDR41.c2m | 169 + Dragon/data/tdraglib_proc/TCDR42.c2m | 129 + Dragon/data/tdraglib_proc/TCDR43.c2m | 277 + Dragon/data/tdraglib_proc/TCDR44.c2m | 98 + Dragon/data/tdraglib_proc/TCDR45.c2m | 62 + Dragon/data/tdraglib_proc/TCDR46.c2m | 111 + Dragon/data/tdraglib_proc/TCDR47.c2m | 147 + Dragon/data/tdraglib_proc/TCDR48.c2m | 43 + Dragon/data/tdraglib_proc/TCDR49.c2m | 124 + Dragon/data/te6wlib.access | 37 + Dragon/data/te6wlib.x2m | 19 + Dragon/data/te6wlib_proc/TCW601.c2m | 116 + Dragon/data/te6wlib_proc/TCW602.c2m | 158 + Dragon/data/te6wlib_proc/TCW603.c2m | 150 + Dragon/data/te6wlib_proc/TCW604.c2m | 149 + Dragon/data/te6wlib_proc/TCW605.c2m | 229 + Dragon/data/te6wlib_proc/TCW606.c2m | 172 + Dragon/data/te6wlib_proc/TCW607.c2m | 162 + Dragon/data/te6wlib_proc/TCW608.c2m | 120 + Dragon/data/te6wlib_proc/TCW609.c2m | 72 + Dragon/data/te6wlib_proc/TCW610.c2m | 80 + Dragon/data/te6wlib_proc/TCW611.c2m | 204 + Dragon/data/te6wlib_proc/TCW612.c2m | 107 + Dragon/data/testDuo.access | 37 + Dragon/data/testDuo.x2m | 209 + Dragon/data/testDuo_B1.access | 37 + Dragon/data/testDuo_B1.x2m | 211 + Dragon/data/testVVER7.access | 38 + Dragon/data/testVVER7.save | 20 + Dragon/data/testVVER7.x2m | 60 + Dragon/data/testVVER7_proc/vverBU.c2m | 209 + Dragon/data/testVVER7_proc/vverGEO.c2m | 90 + Dragon/data/testVVER7_proc/vverMIX.c2m | 162 + Dragon/data/testVVER7_proc/vverTRACK.c2m | 73 + Dragon/data/tjeff31gx.access | 37 + Dragon/data/tjeff31gx.x2m | 21 + Dragon/data/tjeff31gx_proc/TCWU05Lib.c2m | 62 + Dragon/data/tjeff31gx_proc/TCWUX01.c2m | 115 + Dragon/data/tjeff31gx_proc/TCWUX02.c2m | 159 + Dragon/data/tjeff31gx_proc/TCWUX03.c2m | 150 + Dragon/data/tjeff31gx_proc/TCWUX04.c2m | 150 + Dragon/data/tjeff31gx_proc/TCWUX05.c2m | 188 + Dragon/data/tjeff31gx_proc/TCWUX06.c2m | 151 + Dragon/data/tjeff31gx_proc/TCWUX07.c2m | 138 + Dragon/data/tjeff31gx_proc/TCWUX08.c2m | 121 + Dragon/data/tjeff31gx_proc/TCWUX09.c2m | 72 + Dragon/data/tjeff31gx_proc/TCWUX10.c2m | 89 + Dragon/data/tjeff31gx_proc/TCWUX11.c2m | 167 + Dragon/data/tjeff31gx_proc/TCWUX12.c2m | 107 + Dragon/data/tjeff31gx_proc/TCWUX31.c2m | 173 + Dragon/data/tjeff31gx_proc/TCWUX41.c2m | 185 + Dragon/data/tmacro.access | 17 + Dragon/data/tmacro.x2m | 79 + Dragon/data/tmacro_proc/AIC_SN_CCOND2.ref | 2400 + Dragon/data/tmacro_proc/Al_1MeV_CSD_P7.txt | 2516 + Dragon/data/tmacro_proc/CHB_NXT_MC.c2m | 240 + .../data/tmacro_proc/Godiva_2001_Bugle96_47n.txt | 2245 + Dragon/data/tmacro_proc/TCM01.c2m | 78 + Dragon/data/tmacro_proc/TCM02.c2m | 78 + Dragon/data/tmacro_proc/TCM03.c2m | 232 + Dragon/data/tmacro_proc/TCM04.c2m | 140 + Dragon/data/tmacro_proc/TCM05.c2m | 204 + Dragon/data/tmacro_proc/TCM06.c2m | 62 + Dragon/data/tmacro_proc/TCM07.c2m | 68 + Dragon/data/tmacro_proc/TCM08.c2m | 124 + Dragon/data/tmacro_proc/TCM09.c2m | 117 + Dragon/data/tmacro_proc/TCM10.c2m | 137 + Dragon/data/tmacro_proc/TCM11.c2m | 167 + Dragon/data/tmacro_proc/TCM12.c2m | 56 + Dragon/data/tmacro_proc/TCM13.c2m | 105 + Dragon/data/tmacro_proc/TCM14.c2m | 184 + Dragon/data/tmacro_proc/TCM15.c2m | 72 + Dragon/data/tmacro_proc/TCM16.c2m | 64 + Dragon/data/tmacro_proc/TCM30.c2m | 66 + Dragon/data/tmacro_proc/TCM31.c2m | 112 + Dragon/data/tmacro_proc/TCM32.c2m | 178 + Dragon/data/tmacro_proc/TCM33.c2m | 65 + Dragon/data/tmacro_proc/TCM34.c2m | 204 + Dragon/data/tmacro_proc/TCM35.c2m | 89 + Dragon/data/tmacro_proc/TCM36.c2m | 176 + Dragon/data/tmacro_proc/TCM37.c2m | 151 + Dragon/data/tmacro_proc/TCM38.c2m | 167 + Dragon/data/tmacro_proc/TCM39.c2m | 87 + Dragon/data/tmacro_proc/TCM40.c2m | 122 + Dragon/data/tmacro_proc/TCM41.c2m | 219 + Dragon/data/tmacro_proc/TCM42.c2m | 140 + Dragon/data/tmacro_proc/TCM43.c2m | 615 + Dragon/data/tmacro_proc/TCM44.c2m | 193 + Dragon/data/tmacro_proc/TCM45.c2m | 299 + Dragon/data/tmacro_proc/TCM46.c2m | 190 + Dragon/data/tmacro_proc/TCM47.c2m | 249 + Dragon/data/tmacro_proc/TCM48.c2m | 163 + Dragon/data/tmacro_proc/TCM49.c2m | 133 + Dragon/data/tmacro_proc/TCM50.c2m | 156 + Dragon/data/tmacro_proc/TCM51.c2m | 145 + Dragon/data/tmacro_proc/TCM52.c2m | 194 + Dragon/data/tmacro_proc/TCM53.c2m | 190 + Dragon/data/tmacro_proc/TCM54.c2m | 130 + Dragon/data/tmacro_proc/TCM55.c2m | 120 + Dragon/data/tmacro_proc/TCM56.c2m | 77 + Dragon/data/tmacro_proc/TCM57.c2m | 373 + Dragon/data/tmacro_proc/TCM58.c2m | 190 + Dragon/data/tmacro_proc/TCM59.c2m | 75 + Dragon/data/tmacro_proc/TCM60.c2m | 139 + Dragon/data/tmacro_proc/TCM61.c2m | 191 + Dragon/data/tmacro_proc/TCM62.c2m | 669 + Dragon/data/tmacro_proc/TCM63.c2m | 133 + Dragon/data/tmacro_proc/TCM64.c2m | 36 + Dragon/data/tmacro_proc/TCM65.c2m | 74 + Dragon/data/tmacro_proc/TCM66.c2m | 65 + Dragon/data/tmacro_proc/TCM67.c2m | 154 + Dragon/data/tmacro_proc/TCM68.c2m | 103 + Dragon/data/tmacro_proc/TCM69.c2m | 155 + Dragon/data/tmacro_proc/TCM70.c2m | 64 + Dragon/data/tmacro_proc/TCM71.c2m | 59 + Dragon/data/tmacro_proc/TCM72.c2m | 62 + Dragon/data/tmacro_proc/TCM73.c2m | 73 + Dragon/data/tmacro_proc/TCM74.c2m | 145 + Dragon/data/tmacro_proc/TCM75.c2m | 105 + Dragon/data/tmacro_proc/TCM76.c2m | 68 + Dragon/data/tmacro_proc/TCM77.c2m | 199 + Dragon/data/tmacro_proc/TCM78.c2m | 234 + Dragon/data/tmacro_proc/W_6MeV_e_CSD.txt | 5115 ++ Dragon/data/tmacro_proc/W_6MeV_e_ph_CSD.txt | 22790 ++++++ Dragon/data/tmacro_proc/W_6MeV_ph_CSD.txt | 2072 + Dragon/data/tmacro_proc/air_water_bone_lung.txt | 28812 +++++++ Dragon/data/tmacro_proc/assertS_low.c2m | 37 + Dragon/data/tmacro_proc/caskmix_FMAC-M.txt | 3417 + Dragon/data/tmacro_proc/radiant_fmac.txt | 34281 +++++++++ Dragon/data/tmatxs2.access | 53 + Dragon/data/tmatxs2.x2m | 10 + Dragon/data/tmatxs2_proc/TMATXS21.c2m | 82 + Dragon/data/tmatxs2_proc/TMATXS22.c2m | 49 + Dragon/data/tmatxs2_proc/TMATXS23.c2m | 72 + Dragon/data/tmatxs2_proc/TMATXS24.c2m | 119 + Dragon/data/tmatxs2_proc/TMATXS25.c2m | 225 + Dragon/data/tmatxs2_proc/matxsH1_H2O.txt | 74682 +++++++++++++++++++ Dragon/data/tmatxs2_proc/matxsU238.txt | 46552 ++++++++++++ Dragon/data/tmatxs2_proc/matxsW.txt | 513 + Dragon/data/tmatxs2_proc/matxs_ZrH_295.txt | 24217 ++++++ .../matxs_mo_e_Beam_3.0MeV_P2_30_Groups_nc.txt | 11534 +++ Dragon/data/tmatxs7a.access | 37 + Dragon/data/tmatxs7a.x2m | 7 + Dragon/data/tmatxs7a_proc/TCXA01.c2m | 124 + Dragon/data/tndas.access | 62 + Dragon/data/tndas.x2m | 24 + Dragon/data/tndas_proc/TCND01.c2m | 116 + Dragon/data/tndas_proc/TCND02.c2m | 159 + Dragon/data/tndas_proc/TCND03.c2m | 154 + Dragon/data/tndas_proc/TCND04.c2m | 152 + Dragon/data/tndas_proc/TCND05.c2m | 188 + Dragon/data/tndas_proc/TCND05Lib.c2m | 65 + Dragon/data/tndas_proc/TCND06.c2m | 151 + Dragon/data/tndas_proc/TCND07.c2m | 136 + Dragon/data/tndas_proc/TCND08.c2m | 124 + Dragon/data/tndas_proc/TCND09.c2m | 72 + Dragon/data/tndas_proc/TCND10.c2m | 81 + Dragon/data/tndas_proc/TCND11.c2m | 167 + Dragon/data/tndas_proc/TCND12.c2m | 107 + Dragon/data/tndas_proc/TCND31.c2m | 172 + Dragon/data/tndas_proc/TCND32.c2m | 121 + Dragon/data/tndas_proc/TCND33.c2m | 149 + Dragon/data/tndas_proc/TCND34.c2m | 90 + Dragon/data/trowland.access | 37 + Dragon/data/trowland.x2m | 28 + Dragon/data/trowland_proc/mox_1c_case1.c2m | 165 + Dragon/data/trowland_proc/mox_1c_case2.c2m | 166 + Dragon/data/trowland_proc/mox_1c_case3.c2m | 167 + Dragon/data/trowland_proc/mox_1c_case4.c2m | 169 + Dragon/data/trowland_proc/mox_6c_case1.c2m | 205 + Dragon/data/trowland_proc/mox_6c_case2.c2m | 205 + Dragon/data/trowland_proc/mox_6c_case3.c2m | 205 + Dragon/data/trowland_proc/mox_6c_case4.c2m | 205 + Dragon/data/trowland_proc/mox_6c_case5.c2m | 119 + Dragon/data/trowland_proc/uo2_1c_case1.c2m | 139 + Dragon/data/trowland_proc/uo2_1c_case2.c2m | 139 + Dragon/data/trowland_proc/uo2_1c_case3.c2m | 143 + Dragon/data/trowland_proc/uo2_1c_case4.c2m | 139 + Dragon/data/trowland_proc/uo2_6c_case1.c2m | 182 + Dragon/data/trowland_proc/uo2_6c_case2.c2m | 182 + Dragon/data/trowland_proc/uo2_6c_case3.c2m | 182 + Dragon/data/trowland_proc/uo2_6c_case4.c2m | 182 + Dragon/data/trowland_proc/uo2_6c_case5.c2m | 83 + Dragon/data/trowland_shem.access | 37 + Dragon/data/trowland_shem.x2m | 19 + Dragon/data/trowland_shem295.access | 37 + Dragon/data/trowland_shem295.x2m | 23 + Dragon/data/trowland_shem295_jeff3.1.access | 37 + Dragon/data/trowland_shem295_jeff3.1.x2m | 24 + .../trowland_shem295_jeff3.1_proc/gd_295_kec1.c2m | 91 + .../trowland_shem295_jeff3.1_proc/mox_295_kec1.c2m | 176 + .../trowland_shem295_jeff3.1_proc/mox_295_kec2.c2m | 176 + .../trowland_shem295_jeff3.1_proc/mox_295_kec3.c2m | 176 + .../trowland_shem295_jeff3.1_proc/mox_295_kec4.c2m | 176 + .../trowland_shem295_jeff3.1_proc/mox_295_kec5.c2m | 311 + .../trowland_shem295_jeff3.1_proc/uo2_295_kec1.c2m | 193 + .../trowland_shem295_jeff3.1_proc/uo2_295_kec2.c2m | 158 + .../trowland_shem295_jeff3.1_proc/uo2_295_kec3.c2m | 158 + .../trowland_shem295_jeff3.1_proc/uo2_295_kec4.c2m | 158 + .../trowland_shem295_jeff3.1_proc/uo2_295_kec5.c2m | 203 + Dragon/data/trowland_shem295_proc/mox_295_kec1.c2m | 71 + Dragon/data/trowland_shem295_proc/mox_295_kec2.c2m | 71 + Dragon/data/trowland_shem295_proc/mox_295_kec3.c2m | 71 + Dragon/data/trowland_shem295_proc/mox_295_kec4.c2m | 71 + Dragon/data/trowland_shem295_proc/mox_295_kec5.c2m | 116 + Dragon/data/trowland_shem295_proc/uo2_295_kec1.c2m | 65 + Dragon/data/trowland_shem295_proc/uo2_295_kec2.c2m | 65 + Dragon/data/trowland_shem295_proc/uo2_295_kec3.c2m | 65 + Dragon/data/trowland_shem295_proc/uo2_295_kec4.c2m | 65 + Dragon/data/trowland_shem295_proc/uo2_295_kec5.c2m | 80 + Dragon/data/trowland_shem295_proc/uo2_295_kec6.c2m | 81 + Dragon/data/trowland_shem_proc/mox_6c_c1_sh.c2m | 205 + Dragon/data/trowland_shem_proc/mox_6c_c2_sh.c2m | 205 + Dragon/data/trowland_shem_proc/mox_6c_c3_sh.c2m | 205 + Dragon/data/trowland_shem_proc/mox_6c_c4_sh.c2m | 205 + Dragon/data/trowland_shem_proc/mox_6c_c5_sh.c2m | 119 + Dragon/data/trowland_shem_proc/uo2_6c_c1_sh.c2m | 182 + Dragon/data/trowland_shem_proc/uo2_6c_c2_sh.c2m | 182 + Dragon/data/trowland_shem_proc/uo2_6c_c3_sh.c2m | 182 + Dragon/data/trowland_shem_proc/uo2_6c_c4_sh.c2m | 182 + Dragon/data/trowland_shem_proc/uo2_6c_c5_sh.c2m | 83 + Dragon/data/twimsE.access | 37 + Dragon/data/twimsE.x2m | 27 + Dragon/data/twimsE_proc/TCWE01.c2m | 129 + Dragon/data/twimsE_proc/TCWE02.c2m | 179 + Dragon/data/twimsE_proc/TCWE03.c2m | 172 + Dragon/data/twimsE_proc/TCWE04.c2m | 151 + Dragon/data/twimsE_proc/TCWE05.c2m | 192 + Dragon/data/twimsE_proc/TCWE05Lib.c2m | 68 + Dragon/data/twimsE_proc/TCWE06.c2m | 155 + Dragon/data/twimsE_proc/TCWE07.c2m | 142 + Dragon/data/twimsE_proc/TCWE08.c2m | 121 + Dragon/data/twimsE_proc/TCWE09.c2m | 74 + Dragon/data/twimsE_proc/TCWE10.c2m | 104 + Dragon/data/twimsE_proc/TCWE11.c2m | 171 + Dragon/data/twimsE_proc/TCWE12.c2m | 107 + Dragon/data/twimsE_proc/TCWE13.c2m | 146 + Dragon/data/twimsE_proc/TCWE14.c2m | 121 + Dragon/data/twimsE_proc/TCWE15.c2m | 159 + Dragon/data/twimsE_proc/TCWE17.c2m | 337 + Dragon/data/twimsE_proc/TCWE17Lib.c2m | 97 + Dragon/data/twimsE_proc/TCWE31.c2m | 172 + Dragon/data/twimsE_proc/TCWE32.c2m | 97 + Dragon/data/twinfrith.access | 37 + Dragon/data/twinfrith.x2m | 24 + Dragon/data/twinfrith_proc/TCWW01.c2m | 115 + Dragon/data/twinfrith_proc/TCWW02.c2m | 159 + Dragon/data/twinfrith_proc/TCWW03.c2m | 149 + Dragon/data/twinfrith_proc/TCWW04.c2m | 151 + Dragon/data/twinfrith_proc/TCWW05.c2m | 218 + Dragon/data/twinfrith_proc/TCWW06.c2m | 173 + Dragon/data/twinfrith_proc/TCWW07.c2m | 162 + Dragon/data/twinfrith_proc/TCWW08.c2m | 121 + Dragon/data/twinfrith_proc/TCWW09.c2m | 72 + Dragon/data/twinfrith_proc/TCWW10.c2m | 78 + Dragon/data/twinfrith_proc/TCWW11.c2m | 204 + Dragon/data/twinfrith_proc/TCWW12.c2m | 107 + Dragon/data/twinfrith_proc/TCWW31.c2m | 211 + Dragon/data/twinfrith_proc/TCWW41.c2m | 223 + Dragon/data/twinfrith_proc/TCWW42.c2m | 160 + Dragon/data/twinfrith_proc/TCWW43.c2m | 242 + Dragon/data/twlup.access | 57 + Dragon/data/twlup.save | 19 + Dragon/data/twlup.x2m | 30 + Dragon/data/twlup_proc/Datos_pertur.c2m | 101 + Dragon/data/twlup_proc/TCWU01.c2m | 115 + Dragon/data/twlup_proc/TCWU02.c2m | 159 + Dragon/data/twlup_proc/TCWU03.c2m | 150 + Dragon/data/twlup_proc/TCWU04.c2m | 149 + Dragon/data/twlup_proc/TCWU05.c2m | 192 + Dragon/data/twlup_proc/TCWU05Lib.c2m | 62 + Dragon/data/twlup_proc/TCWU06.c2m | 155 + Dragon/data/twlup_proc/TCWU07.c2m | 142 + Dragon/data/twlup_proc/TCWU08.c2m | 121 + Dragon/data/twlup_proc/TCWU09.c2m | 72 + Dragon/data/twlup_proc/TCWU10.c2m | 78 + Dragon/data/twlup_proc/TCWU11.c2m | 171 + Dragon/data/twlup_proc/TCWU12.c2m | 139 + Dragon/data/twlup_proc/TCWU13.c2m | 126 + Dragon/data/twlup_proc/TCWU14.c2m | 121 + Dragon/data/twlup_proc/TCWU15.c2m | 157 + Dragon/data/twlup_proc/TCWU17.c2m | 337 + Dragon/data/twlup_proc/TCWU17Lib.c2m | 85 + Dragon/data/twlup_proc/TCWU18.c2m | 94 + Dragon/data/twlup_proc/TCWU31.c2m | 172 + Dragon/data/twlup_proc/TCWU32.c2m | 95 + Dragon/data/twlup_proc/TCWU33.c2m | 378 + Dragon/data/twlup_proc/TCWU41.c2m | 189 + Dragon/data/uo2_295_kec1_openMP.access | 37 + Dragon/data/uo2_295_kec1_openMP.x2m | 92 + Dragon/data/uo2_evo_hdf.access | 48 + Dragon/data/uo2_evo_hdf.x2m | 154 + Dragon/data/uo2_evo_xsm.access | 37 + Dragon/data/uo2_evo_xsm.x2m | 334 + Dragon/data/uo2_kec1_ecco1962_light.access | 37 + Dragon/data/uo2_kec1_ecco1962_light.x2m | 192 + Dragon/rdragon | 166 + Dragon/src/AEXCPC.f | 40 + Dragon/src/AEXDIR.f | 90 + Dragon/src/AEXGNV.f | 51 + Dragon/src/AEXTPA.f | 66 + Dragon/src/AEXTRT.f | 195 + Dragon/src/APX.f | 556 + Dragon/src/APXCA2.f | 405 + Dragon/src/APXCAL.f | 176 + Dragon/src/APXCAT.f | 258 + Dragon/src/APXGEM.f | 188 + Dragon/src/APXGEP.f | 234 + Dragon/src/APXGEY.f | 205 + Dragon/src/APXIDF.f | 146 + Dragon/src/APXPAV.f | 164 + Dragon/src/APXSX2.f | 529 + Dragon/src/APXTOC.f | 251 + Dragon/src/ASM.f | 335 + Dragon/src/ASMDRV.f | 361 + Dragon/src/AUTDRV.f | 455 + Dragon/src/AUTFLU.f | 379 + Dragon/src/AUTIT1.f | 224 + Dragon/src/AUTIT2.f | 241 + Dragon/src/AUTO.f | 383 + Dragon/src/AUTONE.f | 509 + Dragon/src/AUTPRD.f | 55 + Dragon/src/AUTSPH.f | 329 + Dragon/src/AUTTAB.f | 160 + Dragon/src/AXGDIA.f | 205 + Dragon/src/AXGGEO.f | 148 + Dragon/src/AXGSYM.f | 298 + Dragon/src/AXGTRN.f | 53 + Dragon/src/AXGTRS.f | 78 + Dragon/src/AXGXCW.f | 152 + Dragon/src/AXGXEL.f | 203 + Dragon/src/B1BETA.f | 73 + Dragon/src/B1DIF.f | 381 + Dragon/src/B1GAMA.f | 74 + Dragon/src/B1HOM.f | 221 + Dragon/src/B1HXS1.f | 447 + Dragon/src/B1SOL.f | 65 + Dragon/src/BIVAA.f | 149 + Dragon/src/BIVAF.f | 164 + Dragon/src/BIVFIS.f | 186 + Dragon/src/BIVS01.f | 117 + Dragon/src/BIVS02.f | 106 + Dragon/src/BIVS03.f | 145 + Dragon/src/BIVS04.f | 108 + Dragon/src/BIVS05.f | 112 + Dragon/src/BIVSOU.f | 277 + Dragon/src/BREANM.f | 340 + Dragon/src/BREDRV.f | 307 + Dragon/src/BREERA.f | 443 + Dragon/src/BREERM.f | 523 + Dragon/src/BREF.f | 260 + Dragon/src/BREKOE.f | 206 + Dragon/src/BRELLB.f | 157 + Dragon/src/BREMAC.f | 369 + Dragon/src/BRENEM.f | 352 + Dragon/src/BRERT.f | 414 + Dragon/src/BRERTD.f90 | 180 + Dragon/src/BRERTS.f90 | 267 + Dragon/src/BRESS1.f | 71 + Dragon/src/BRESS2.f | 52 + Dragon/src/BRESS3.f | 77 + Dragon/src/BRESS4.f | 53 + Dragon/src/CFC.f | 329 + Dragon/src/CFCDRV.f | 1117 + Dragon/src/CFCFBM.f | 1227 + Dragon/src/CFCGET.f | 210 + Dragon/src/CHAB.f | 247 + Dragon/src/CHAB01.f | 297 + Dragon/src/CHAB02.f | 84 + Dragon/src/CHAB03.f | 115 + Dragon/src/CHAB04.f | 151 + Dragon/src/CLM.f | 229 + Dragon/src/CLMGET.f | 200 + Dragon/src/COMACR.f | 276 + Dragon/src/COMARB.f | 165 + Dragon/src/COMBIB.f | 102 + Dragon/src/COMCAL.f | 165 + Dragon/src/COMCAT.f | 383 + Dragon/src/COMDEP.f | 135 + Dragon/src/COMGEM.f | 188 + Dragon/src/COMGEN.f | 176 + Dragon/src/COMGEP.f | 383 + Dragon/src/COMGFF.f | 118 + Dragon/src/COMISO.f | 103 + Dragon/src/COMMIC.f | 478 + Dragon/src/COMPAV.f | 147 + Dragon/src/COMPO.f | 711 + Dragon/src/COMRES.f | 337 + Dragon/src/COMSDB.f | 200 + Dragon/src/COMTRE.f | 76 + Dragon/src/CPO.f | 439 + Dragon/src/CPODRV.f | 366 + Dragon/src/CPOISO.f | 188 + Dragon/src/CPOLGX.f | 192 + Dragon/src/CPOMAR.f | 288 + Dragon/src/CPOMAW.f | 205 + Dragon/src/CPOMIC.f | 260 + Dragon/src/CPONED.f | 113 + Dragon/src/CPOREM.f | 79 + Dragon/src/DEPLIT.f | 437 + Dragon/src/DMA.f | 169 + Dragon/src/DMAGET.f | 203 + Dragon/src/DMASOU.f | 555 + Dragon/src/DOORAB.f | 196 + Dragon/src/DOORAV.f | 329 + Dragon/src/DOORFB2.f | 160 + Dragon/src/DOORFB3.f | 147 + Dragon/src/DOORFV.f | 336 + Dragon/src/DOORPV.f | 342 + Dragon/src/DOORS_BIV.f90 | 626 + Dragon/src/DOORS_MOD.f90 | 162 + Dragon/src/DOORS_SN.f90 | 175 + Dragon/src/DOORS_TRI.f90 | 252 + Dragon/src/DRAGON.f90 | 98 + Dragon/src/DUO.f | 121 + Dragon/src/DUO001.f | 174 + Dragon/src/DUO002.f | 158 + Dragon/src/DUO003.f | 225 + Dragon/src/DUO004.f | 179 + Dragon/src/DUO005.f | 88 + Dragon/src/DUO006.f | 206 + Dragon/src/DUO007.f | 125 + Dragon/src/DUODRV.f | 207 + Dragon/src/DUTURN.f | 506 + Dragon/src/EDI.f | 667 + Dragon/src/EDIACT.f | 455 + Dragon/src/EDIALB.f | 315 + Dragon/src/EDIBAL.f | 388 + Dragon/src/EDIBHX.f | 73 + Dragon/src/EDIDEL.f | 72 + Dragon/src/EDIDEP.f | 138 + Dragon/src/EDIDRV.f | 773 + Dragon/src/EDIDST.f | 431 + Dragon/src/EDIDTX.f | 945 + Dragon/src/EDIENE.f | 105 + Dragon/src/EDIG2S.f90 | 251 + Dragon/src/EDIGAP.f | 79 + Dragon/src/EDIGEO.f | 478 + Dragon/src/EDIGET.f | 724 + Dragon/src/EDIHFC.f | 295 + Dragon/src/EDIHFD.f | 233 + Dragon/src/EDIHMX.f | 77 + Dragon/src/EDIJO1.f | 172 + Dragon/src/EDIJO2.f | 113 + Dragon/src/EDIJO3.f | 160 + Dragon/src/EDILUM.f | 433 + Dragon/src/EDIMAX.f | 105 + Dragon/src/EDIMCN.f | 282 + Dragon/src/EDIMIC.f | 1096 + Dragon/src/EDIMRC.f | 91 + Dragon/src/EDIMRG.f | 235 + Dragon/src/EDIPRR.f | 192 + Dragon/src/EDIPXS.f | 571 + Dragon/src/EDIRAT.f | 136 + Dragon/src/EDIRES.f | 520 + Dragon/src/EDISTA.f | 127 + Dragon/src/EDITXS.f | 601 + Dragon/src/EDIUNF.f | 239 + Dragon/src/EDIWCU.f | 141 + Dragon/src/EDIWP1.f | 233 + Dragon/src/EPC.f | 238 + Dragon/src/EPCRMA.f | 279 + Dragon/src/EPCRMD.f | 234 + Dragon/src/EPCRMI.f | 131 + Dragon/src/EPCRMS.f | 171 + Dragon/src/EPCRMU.f | 201 + Dragon/src/EPCRMV.f | 197 + Dragon/src/EPCRPD.f | 133 + Dragon/src/EVO.f | 422 + Dragon/src/EVOBLD.f | 501 + Dragon/src/EVODPL.f | 425 + Dragon/src/EVODRV.f | 1034 + Dragon/src/EVOGET.f | 401 + Dragon/src/EVOKAP.f | 224 + Dragon/src/EVOMU1.f | 241 + Dragon/src/EVOODE.f | 114 + Dragon/src/EVORK.f | 193 + Dragon/src/EVOSAT.f | 380 + Dragon/src/EVOSIG.f | 327 + Dragon/src/EVOSOL.f | 229 + Dragon/src/EXCELP.f | 624 + Dragon/src/EXCELT.f | 350 + Dragon/src/FLU.f | 452 + Dragon/src/FLU2AC.f | 84 + Dragon/src/FLU2DR.f | 1284 + Dragon/src/FLUALB.f | 102 + Dragon/src/FLUBAL.f | 209 + Dragon/src/FLUBLN.f | 143 + Dragon/src/FLUDBV.f | 509 + Dragon/src/FLUDRV.f | 345 + Dragon/src/FLUGPI.f | 439 + Dragon/src/FLUGPT.f | 361 + Dragon/src/FLUKEF.f | 194 + Dragon/src/FLULPN.f | 227 + Dragon/src/FLUSOU.f90 | 202 + Dragon/src/FMAC.f | 259 + Dragon/src/FMAC01.f | 381 + Dragon/src/FMAC02.f | 63 + Dragon/src/FMAC03.f | 145 + Dragon/src/FMAC04.f | 55 + Dragon/src/FMT.f | 125 + Dragon/src/FMTBRN.f | 250 + Dragon/src/FMTDFD.f | 170 + Dragon/src/FMTDFL.f | 157 + Dragon/src/FMTGET.f | 125 + Dragon/src/FMTGIS.f | 134 + Dragon/src/FMTSUD.f | 421 + Dragon/src/FMTSUS.f | 208 + Dragon/src/FSDF.f90 | 190 + Dragon/src/GEO.f | 84 + Dragon/src/GEOIN1.f | 1375 + Dragon/src/GEOMIX.f | 246 + Dragon/src/HEADRV.f | 233 + Dragon/src/HEAT.f | 260 + Dragon/src/INF.f | 397 + Dragon/src/INFAPL.f | 110 + Dragon/src/INFDRA.f | 96 + Dragon/src/INFNDA.f | 97 + Dragon/src/INFPSA.f | 80 + Dragon/src/INFTR1.f | 163 + Dragon/src/INFTR2.f | 129 + Dragon/src/INFWAN.f | 62 + Dragon/src/INFWAT.f | 111 + Dragon/src/INFWD4.f | 199 + Dragon/src/INFWIM.f | 120 + Dragon/src/KDRDRV.F | 164 + Dragon/src/KELMRG.f | 69 + Dragon/src/KELRNG.f | 282 + Dragon/src/KELSYM.f | 96 + Dragon/src/LDRASS.f | 467 + Dragon/src/LDRCEL.f | 370 + Dragon/src/LDRGEO.f | 179 + Dragon/src/LELCHK.f | 140 + Dragon/src/LELCRN.f | 75 + Dragon/src/LELCSY.f | 785 + Dragon/src/LHXUNH.f | 1502 + Dragon/src/LIB.f | 562 + Dragon/src/LIBA20.f | 1346 + Dragon/src/LIBA21.f | 91 + Dragon/src/LIBA22.f | 117 + Dragon/src/LIBA23.f | 179 + Dragon/src/LIBA24.f | 423 + Dragon/src/LIBA25.f | 244 + Dragon/src/LIBA26.f | 159 + Dragon/src/LIBA27.f | 248 + Dragon/src/LIBA28.f | 117 + Dragon/src/LIBA2G.f | 137 + Dragon/src/LIBA30.f | 533 + Dragon/src/LIBA33.f | 151 + Dragon/src/LIBA34.f | 423 + Dragon/src/LIBADD.f | 181 + Dragon/src/LIBADJ.f | 161 + Dragon/src/LIBAPL.f | 1000 + Dragon/src/LIBBAS.f | 138 + Dragon/src/LIBCAT.f | 149 + Dragon/src/LIBCMB.f | 222 + Dragon/src/LIBCOM.f | 93 + Dragon/src/LIBCON.f | 118 + Dragon/src/LIBCOR.f | 177 + Dragon/src/LIBCOV.f | 57 + Dragon/src/LIBCTL.f | 475 + Dragon/src/LIBD10.F | 62 + Dragon/src/LIBDEN.f | 1150 + Dragon/src/LIBDEP.F | 313 + Dragon/src/LIBDI1.f | 52 + Dragon/src/LIBDI2.f | 168 + Dragon/src/LIBDI3.f | 167 + Dragon/src/LIBDI4.f | 123 + Dragon/src/LIBDI5.f | 149 + Dragon/src/LIBDI6.f | 213 + Dragon/src/LIBDI8.f | 198 + Dragon/src/LIBDI9.f | 198 + Dragon/src/LIBDRA.f | 418 + Dragon/src/LIBDRB.f | 773 + Dragon/src/LIBE3R.f | 298 + Dragon/src/LIBEAD.f | 224 + Dragon/src/LIBEAI.f | 124 + Dragon/src/LIBEAR.f | 580 + Dragon/src/LIBECT.f | 114 + Dragon/src/LIBEED.f90 | 166 + Dragon/src/LIBEIR.f | 224 + Dragon/src/LIBENI.f | 62 + Dragon/src/LIBENR.f | 204 + Dragon/src/LIBEPR.f | 349 + Dragon/src/LIBEST.f | 265 + Dragon/src/LIBEWI.f | 84 + Dragon/src/LIBEWR.f | 221 + Dragon/src/LIBEXT.f | 211 + Dragon/src/LIBFQD.f | 957 + Dragon/src/LIBINF.f | 221 + Dragon/src/LIBINP.f | 855 + Dragon/src/LIBIPS.f | 64 + Dragon/src/LIBLAG.f | 107 + Dragon/src/LIBLEX.f | 99 + Dragon/src/LIBLIB.f | 180 + Dragon/src/LIBLIC.F | 253 + Dragon/src/LIBMAC.f | 460 + Dragon/src/LIBMIC.f | 171 + Dragon/src/LIBMIX.f | 152 + Dragon/src/LIBMOM.f | 142 + Dragon/src/LIBMPA.f | 73 + Dragon/src/LIBND0.f | 55 + Dragon/src/LIBND1.f | 516 + Dragon/src/LIBND3.f | 185 + Dragon/src/LIBND5.f | 57 + Dragon/src/LIBND6.f | 165 + Dragon/src/LIBND7.f | 91 + Dragon/src/LIBNFI.f | 194 + Dragon/src/LIBNOT.f | 140 + Dragon/src/LIBNRG.F | 406 + Dragon/src/LIBOMG.f | 119 + Dragon/src/LIBPRI.f | 257 + Dragon/src/LIBPTT.f | 381 + Dragon/src/LIBPTW.f | 243 + Dragon/src/LIBRSC.f | 350 + Dragon/src/LIBRSE.f | 573 + Dragon/src/LIBSDC.f | 203 + Dragon/src/LIBSEC.f | 246 + Dragon/src/LIBSUB.f | 517 + Dragon/src/LIBTAB.f | 187 + Dragon/src/LIBTE2.f | 173 + Dragon/src/LIBTER.f | 124 + Dragon/src/LIBTR1.f | 793 + Dragon/src/LIBTR2.f | 894 + Dragon/src/LIBWD4.f | 788 + Dragon/src/LIBWE.f | 789 + Dragon/src/LIBWED.f | 181 + Dragon/src/LIBWET.f | 312 + Dragon/src/LIBWID.f | 51 + Dragon/src/LIBWIM.f | 776 + Dragon/src/LIBWRE.f | 270 + Dragon/src/LIBWRG.f | 148 + Dragon/src/LIBWRI.f | 91 + Dragon/src/LIBWRP.f | 111 + Dragon/src/LIBWSC.f | 73 + Dragon/src/LIBWTE.f | 132 + Dragon/src/LIBWTF.f | 61 + Dragon/src/LIBXS1.f | 44 + Dragon/src/LIBXS2.f | 292 + Dragon/src/LIBXS3.f | 50 + Dragon/src/LIBXS4.f | 958 + Dragon/src/LIBXS5.f | 146 + Dragon/src/LIBXS6.f | 92 + Dragon/src/M2T.f | 156 + Dragon/src/M2TDRV.f | 294 + Dragon/src/MAC.f | 281 + Dragon/src/MACDRV.f | 356 + Dragon/src/MACIXS.f | 295 + Dragon/src/MACNFI.f | 220 + Dragon/src/MACNXS.f | 141 + Dragon/src/MACOPT.f | 196 + Dragon/src/MACPRM.f | 178 + Dragon/src/MACPXS.f | 258 + Dragon/src/MACRDM.f | 267 + Dragon/src/MACUPD.f | 295 + Dragon/src/MACUPG.f | 125 + Dragon/src/MACWXS.f | 388 + Dragon/src/MACXSR.f | 690 + Dragon/src/MCCGA.f | 324 + Dragon/src/MCCGF.f | 536 + Dragon/src/MCCGT.f | 1050 + Dragon/src/MCGABG.f | 210 + Dragon/src/MCGABGR.f | 294 + Dragon/src/MCGACA.f | 149 + Dragon/src/MCGASM.f | 675 + Dragon/src/MCGBIC.f | 373 + Dragon/src/MCGCAL.f | 75 + Dragon/src/MCGCDD.f | 176 + Dragon/src/MCGCOEF.f | 106 + Dragon/src/MCGDDDF.f | 129 + Dragon/src/MCGDDF.f | 59 + Dragon/src/MCGDDFL.f | 69 + Dragon/src/MCGDDFS.f | 61 + Dragon/src/MCGDDFT.f | 59 + Dragon/src/MCGDS1.f | 116 + Dragon/src/MCGDS2.f | 232 + Dragon/src/MCGDS2A.f | 83 + Dragon/src/MCGDS2E.f | 74 + Dragon/src/MCGDS3.f | 111 + Dragon/src/MCGDS4.f | 108 + Dragon/src/MCGDS6.f | 55 + Dragon/src/MCGDSCA.f | 158 + Dragon/src/MCGDSCB.f | 187 + Dragon/src/MCGDSCE.f | 152 + Dragon/src/MCGDSD.f | 139 + Dragon/src/MCGDSP.f | 117 + Dragon/src/MCGDTV.f | 131 + Dragon/src/MCGDYA.f | 74 + Dragon/src/MCGFCA.f | 535 + Dragon/src/MCGFCF.f | 496 + Dragon/src/MCGFCR.f | 136 + Dragon/src/MCGFCS.f | 112 + Dragon/src/MCGFFAL.f | 138 + Dragon/src/MCGFFAR.f | 110 + Dragon/src/MCGFFAS.f | 110 + Dragon/src/MCGFFAT.f | 108 + Dragon/src/MCGFFIR.f | 131 + Dragon/src/MCGFFIS.f | 136 + Dragon/src/MCGFFIT.f | 124 + Dragon/src/MCGFL1.f | 342 + Dragon/src/MCGFLS.f | 134 + Dragon/src/MCGFLX.f | 214 + Dragon/src/MCGFMC.f | 73 + Dragon/src/MCGFST.f | 135 + Dragon/src/MCGMRE.f | 316 + Dragon/src/MCGPJJ.f | 109 + Dragon/src/MCGPRA.f | 159 + Dragon/src/MCGPT1.f | 154 + Dragon/src/MCGPT2.f | 112 + Dragon/src/MCGPTA.f | 402 + Dragon/src/MCGPTF.f | 663 + Dragon/src/MCGPTN.f | 177 + Dragon/src/MCGPTS.f | 332 + Dragon/src/MCGPTV.f | 332 + Dragon/src/MCGREC.f | 61 + Dragon/src/MCGSCA.f | 74 + Dragon/src/MCGSCAL.f | 103 + Dragon/src/MCGSCAS.f | 84 + Dragon/src/MCGSCAT.f | 65 + Dragon/src/MCGSCE.f | 71 + Dragon/src/MCGSCEL.f | 85 + Dragon/src/MCGSCES.f | 78 + Dragon/src/MCGSCET.f | 59 + Dragon/src/MCGSCR.f | 338 + Dragon/src/MCGSCS.f | 102 + Dragon/src/MCGSIG.f | 77 + Dragon/src/MCGTMT.f | 97 + Dragon/src/MCGTRK.f | 72 + Dragon/src/MCT.f | 202 + Dragon/src/MCTALLY.f | 131 + Dragon/src/MCTCCC.f | 125 + Dragon/src/MCTCTR.f | 233 + Dragon/src/MCTFLX.f | 437 + Dragon/src/MCTGET.f | 234 + Dragon/src/MCTLDC.f | 126 + Dragon/src/MCTLDP.f | 86 + Dragon/src/MCTLIB.f | 204 + Dragon/src/MCTOUT.f | 244 + Dragon/src/MCTPIR.f | 148 + Dragon/src/MCTPSP.f | 64 + Dragon/src/MCTPTR.f | 178 + Dragon/src/MCTRK.f | 399 + Dragon/src/MESHST.f | 1924 + Dragon/src/MOCCAL.f | 71 + Dragon/src/MOCCHR.f | 158 + Dragon/src/MOCDDF.f | 84 + Dragon/src/MOCDDFL.f | 99 + Dragon/src/MOCDDFS.f | 85 + Dragon/src/MOCDDFT.f | 79 + Dragon/src/MOCDS2.f | 207 + Dragon/src/MOCDSP.f | 121 + Dragon/src/MOCFCF.f | 412 + Dragon/src/MOCFFAL.f | 190 + Dragon/src/MOCFFAR.f | 158 + Dragon/src/MOCFFAS.f | 160 + Dragon/src/MOCFFAT.f | 140 + Dragon/src/MOCFFIR.f | 150 + Dragon/src/MOCFFIS.f | 149 + Dragon/src/MOCFFIT.f | 129 + Dragon/src/MOCIK3.f | 111 + Dragon/src/MOCSCA.f | 98 + Dragon/src/MOCSCAL.f | 133 + Dragon/src/MOCSCAS.f | 111 + Dragon/src/MOCSCAT.f | 85 + Dragon/src/MOCSCE.f | 98 + Dragon/src/MOCSCEL.f | 116 + Dragon/src/MOCSCES.f | 107 + Dragon/src/MOCSCET.f | 79 + Dragon/src/MPO.f | 700 + Dragon/src/MPOCA2.f | 1012 + Dragon/src/MPOCAL.f | 180 + Dragon/src/MPOCAT.f | 218 + Dragon/src/MPOGEP.f | 256 + Dragon/src/MPOGEY.f | 216 + Dragon/src/MPOIDF.f | 179 + Dragon/src/MPOPAV.f | 192 + Dragon/src/MPOTOC.f | 215 + Dragon/src/MRG.f | 380 + Dragon/src/MRGGET.f | 248 + Dragon/src/MRGLIN.f | 142 + Dragon/src/MRGVOL.f | 199 + Dragon/src/MRGVON.f | 208 + Dragon/src/MRGVST.f | 227 + Dragon/src/MRGXTC.f | 170 + Dragon/src/MUSA.f90 | 287 + Dragon/src/MUSACG.f90 | 723 + Dragon/src/MUSF.f90 | 155 + Dragon/src/MUSJJ2.f90 | 372 + Dragon/src/MUSP.f90 | 457 + Dragon/src/Makefile | 237 + Dragon/src/NUMER3.f | 745 + Dragon/src/NUMERH.f | 535 + Dragon/src/NXT.f | 299 + Dragon/src/NXT3T2.f | 310 + Dragon/src/NXTACG.f | 409 + Dragon/src/NXTAGM.f | 157 + Dragon/src/NXTAVS.f | 165 + Dragon/src/NXTBCG.f | 386 + Dragon/src/NXTBRT.f | 369 + Dragon/src/NXTCUA.f | 875 + Dragon/src/NXTCVM.f | 154 + Dragon/src/NXTCVS.f | 255 + Dragon/src/NXTEGI.f | 600 + Dragon/src/NXTETH.f | 198 + Dragon/src/NXTETS.f | 209 + Dragon/src/NXTFID.f | 93 + Dragon/src/NXTGET.f | 422 + Dragon/src/NXTGMD.f | 556 + Dragon/src/NXTHCL.f | 136 + Dragon/src/NXTHRS.f | 81 + Dragon/src/NXTHUA.f | 443 + Dragon/src/NXTIAA.f | 188 + Dragon/src/NXTIHA.f | 193 + Dragon/src/NXTIND.f | 161 + Dragon/src/NXTIRA.f | 213 + Dragon/src/NXTIRR.f | 132 + Dragon/src/NXTITA.f | 308 + Dragon/src/NXTLCA.f | 809 + Dragon/src/NXTLCU.f | 619 + Dragon/src/NXTLCY.f | 784 + Dragon/src/NXTLDC.f | 104 + Dragon/src/NXTLDP.f | 80 + Dragon/src/NXTLHA.f | 691 + Dragon/src/NXTLHT.f | 415 + Dragon/src/NXTLRH.f | 377 + Dragon/src/NXTLRS.f | 692 + Dragon/src/NXTLSN.f | 200 + Dragon/src/NXTMCA.f | 90 + Dragon/src/NXTMCB.f | 112 + Dragon/src/NXTMCC.f | 123 + Dragon/src/NXTMCD.f | 667 + Dragon/src/NXTPCA.f | 399 + Dragon/src/NXTPCC.f | 609 + Dragon/src/NXTPHC.f | 484 + Dragon/src/NXTPHT.f | 326 + Dragon/src/NXTPR3.f | 292 + Dragon/src/NXTPRA.f | 789 + Dragon/src/NXTPRI.f | 294 + Dragon/src/NXTPRR.f | 81 + Dragon/src/NXTQAC.f | 249 + Dragon/src/NXTQAS.f | 150 + Dragon/src/NXTQEW.f | 168 + Dragon/src/NXTQLC.f | 388 + Dragon/src/NXTQLT.f | 560 + Dragon/src/NXTQPS.f | 108 + Dragon/src/NXTQRN.f | 976 + Dragon/src/NXTQSC.f | 134 + Dragon/src/NXTQSS.f | 173 + Dragon/src/NXTRCS.f | 155 + Dragon/src/NXTRIS.f | 740 + Dragon/src/NXTRPS.f | 190 + Dragon/src/NXTRTL.f | 176 + Dragon/src/NXTRTS.f | 314 + Dragon/src/NXTSGI.f | 885 + Dragon/src/NXTSGT.f | 636 + Dragon/src/NXTSQD.f | 109 + Dragon/src/NXTTCG.f | 614 + Dragon/src/NXTTCR.f | 513 + Dragon/src/NXTTGC.f | 457 + Dragon/src/NXTTGS.f | 510 + Dragon/src/NXTTLC.f | 1046 + Dragon/src/NXTTLO.f | 147 + Dragon/src/NXTTLS.f | 901 + Dragon/src/NXTTNS.f | 214 + Dragon/src/NXTTPO.f | 315 + Dragon/src/NXTTPS.f | 218 + Dragon/src/NXTTRM.f | 93 + Dragon/src/NXTTRS.f | 83 + Dragon/src/NXTVCA.f | 277 + Dragon/src/NXTVCC.f | 467 + Dragon/src/NXTVHC.f | 310 + Dragon/src/NXTVHT.f | 449 + Dragon/src/NXTVOL.f | 333 + Dragon/src/NXTXYZ.f | 169 + Dragon/src/PIJAAA.f | 74 + Dragon/src/PIJABC.f | 122 + Dragon/src/PIJCMP.f | 121 + Dragon/src/PIJD2R.f | 57 + Dragon/src/PIJD2S.f | 53 + Dragon/src/PIJI2D.f | 271 + Dragon/src/PIJI3D.f | 277 + Dragon/src/PIJKST.f | 90 + Dragon/src/PIJRDG.f | 91 + Dragon/src/PIJRGL.f | 151 + Dragon/src/PIJRHL.f | 194 + Dragon/src/PIJRNL.f | 285 + Dragon/src/PIJS2D.f | 222 + Dragon/src/PIJS3D.f | 188 + Dragon/src/PIJSMD.f | 152 + Dragon/src/PIJWIJ.f | 330 + Dragon/src/PIJWPR.f | 222 + Dragon/src/PIJXL3.f | 449 + Dragon/src/PNFLV.f | 207 + Dragon/src/PNSH.f90 | 149 + Dragon/src/PRECISION_AND_KINDS.f90 | 20 + Dragon/src/PSOISO.f | 295 + Dragon/src/PSOMON.f | 523 + Dragon/src/PSOUR.f | 706 + Dragon/src/PSOUSN.f | 241 + Dragon/src/PSP.f | 292 + Dragon/src/PSPCOL.f | 156 + Dragon/src/PSPFCD.f | 69 + Dragon/src/PSPFIL.f | 89 + Dragon/src/PSPGET.f | 237 + Dragon/src/PSPLEG.f | 311 + Dragon/src/PSPMCP.f | 139 + Dragon/src/PSPNXT.f | 276 + Dragon/src/PSPRAI.f | 185 + Dragon/src/PSPTCR.f | 331 + Dragon/src/PSPTHR.f | 503 + Dragon/src/PSPTRK.f | 283 + Dragon/src/PSPXCG.f | 295 + Dragon/src/PSPXEL.f | 200 + Dragon/src/QIJCMP.f | 115 + Dragon/src/QIJI3D.f | 188 + Dragon/src/READBH.f | 220 + Dragon/src/READEU.f | 693 + Dragon/src/READMT.f | 220 + Dragon/src/RECT1.f | 195 + Dragon/src/RECT2.f | 371 + Dragon/src/S2M.f | 191 + Dragon/src/S2MGET.f | 67 + Dragon/src/SALACG.f90 | 309 + Dragon/src/SALEND.f90 | 47 + Dragon/src/SALGET_FUNS_MOD.f90 | 373 + Dragon/src/SALMUS.f90 | 282 + Dragon/src/SALT.f90 | 292 + Dragon/src/SALTCG.f | 606 + Dragon/src/SALTLC.f90 | 360 + Dragon/src/SALTLS.f90 | 299 + Dragon/src/SAL_AUX_MOD.f90 | 496 + Dragon/src/SAL_GEOMETRY_MOD.f90 | 3756 + Dragon/src/SAL_GEOMETRY_TYPES.f90 | 227 + Dragon/src/SAL_NUMERIC_MOD.f90 | 151 + Dragon/src/SAL_TRACKING_TYPES.f90 | 113 + Dragon/src/SAL_TRAJECTORY_MOD.f90 | 1141 + Dragon/src/SAP.f | 838 + Dragon/src/SAPCA2.f | 956 + Dragon/src/SAPCAL.f | 213 + Dragon/src/SAPCAT.f | 295 + Dragon/src/SAPFLU.f | 88 + Dragon/src/SAPFWC.f | 93 + Dragon/src/SAPGEP.f | 378 + Dragon/src/SAPGEY.f | 219 + Dragon/src/SAPIDF.f | 104 + Dragon/src/SAPPAV.f | 152 + Dragon/src/SAPSPH.f | 82 + Dragon/src/SEN.f | 206 + Dragon/src/SENCAL.f | 620 + Dragon/src/SENCNT.f | 148 + Dragon/src/SENDRV.f | 302 + Dragon/src/SENGET.f | 89 + Dragon/src/SHI.f | 285 + Dragon/src/SHIDIL.f | 235 + Dragon/src/SHIDRV.f | 443 + Dragon/src/SHIDST.f | 199 + Dragon/src/SHIEQU.f | 244 + Dragon/src/SHIRAT.f | 222 + Dragon/src/SHISN2.f | 435 + Dragon/src/SHISN3.f | 464 + Dragon/src/SNADPT.f | 90 + Dragon/src/SNDSA.f | 936 + Dragon/src/SNEST.f | 169 + Dragon/src/SNF.f | 257 + Dragon/src/SNFBC1.f | 304 + Dragon/src/SNFBC2.F | 512 + Dragon/src/SNFBC3.F | 679 + Dragon/src/SNFBH2.F | 598 + Dragon/src/SNFBH3.F | 793 + Dragon/src/SNFC12.f | 178 + Dragon/src/SNFE1D.f | 431 + Dragon/src/SNFE2D.F | 610 + Dragon/src/SNFE3D.F | 778 + Dragon/src/SNFG2D.F | 512 + Dragon/src/SNFG3D.F | 682 + Dragon/src/SNFKC2.F | 562 + Dragon/src/SNFKC3.F | 755 + Dragon/src/SNFKH2.F | 614 + Dragon/src/SNFKH3.F | 857 + Dragon/src/SNFLUX.f | 1129 + Dragon/src/SNFT12.F | 506 + Dragon/src/SNFT1C.f | 211 + Dragon/src/SNFT1S.f | 185 + Dragon/src/SNGMRE.f | 229 + Dragon/src/SNQU01.f | 143 + Dragon/src/SNQU02.f | 158 + Dragon/src/SNQU03.f | 121 + Dragon/src/SNQU04.f | 76 + Dragon/src/SNQU05.f | 367 + Dragon/src/SNQU06.f | 949 + Dragon/src/SNQU07.f | 73 + Dragon/src/SNQU10.f | 74 + Dragon/src/SNSBFP.f | 190 + Dragon/src/SNSOUR.f | 188 + Dragon/src/SNT.f | 395 + Dragon/src/SNT1DC.f | 184 + Dragon/src/SNT1DP.f | 241 + Dragon/src/SNT1DS.f | 135 + Dragon/src/SNTRK.f | 686 + Dragon/src/SNTSFH.f | 253 + Dragon/src/SNTT2D.f | 572 + Dragon/src/SNTT3D.f | 609 + Dragon/src/SPH.F | 900 + Dragon/src/SPHAPX.f | 621 + Dragon/src/SPHCMA.f | 385 + Dragon/src/SPHCMI.f | 276 + Dragon/src/SPHCPO.f | 431 + Dragon/src/SPHDRV.f | 215 + Dragon/src/SPHEMB.f | 137 + Dragon/src/SPHEQU.f | 757 + Dragon/src/SPHGAP.f | 297 + Dragon/src/SPHMAC.f | 336 + Dragon/src/SPHMOL.f | 101 + Dragon/src/SPHMPO.f | 716 + Dragon/src/SPHSAP.f | 732 + Dragon/src/SPHSCO.f | 83 + Dragon/src/SPHSTM.f | 119 + Dragon/src/SPHSTO.f | 141 + Dragon/src/SPHSX5.f | 132 + Dragon/src/SPHSXS.f | 145 + Dragon/src/SPHTRA.f | 181 + Dragon/src/SYB001.f | 171 + Dragon/src/SYB002.f | 243 + Dragon/src/SYB003.f | 304 + Dragon/src/SYB004.f | 241 + Dragon/src/SYB005.f | 243 + Dragon/src/SYB31C.f | 141 + Dragon/src/SYB32C.f | 55 + Dragon/src/SYB33C.f | 44 + Dragon/src/SYB41C.f | 72 + Dragon/src/SYB43C.f | 42 + Dragon/src/SYB4QG.f | 277 + Dragon/src/SYB4T1.f | 65 + Dragon/src/SYB4T2.f | 72 + Dragon/src/SYB4T3.f | 71 + Dragon/src/SYB4T4.f | 66 + Dragon/src/SYB4TC.f | 235 + Dragon/src/SYB4TH.f | 375 + Dragon/src/SYB4TI.f | 123 + Dragon/src/SYB4TN.f | 99 + Dragon/src/SYB4TR.f | 333 + Dragon/src/SYB4TS.f | 242 + Dragon/src/SYB4VO.f | 142 + Dragon/src/SYB7QG.f | 302 + Dragon/src/SYB7T0.f | 387 + Dragon/src/SYB7TC.f | 132 + Dragon/src/SYB7TE.f | 78 + Dragon/src/SYB7TN.f | 108 + Dragon/src/SYB7TR.f | 150 + Dragon/src/SYB7TS.f | 222 + Dragon/src/SYB7TW.f | 111 + Dragon/src/SYB7VO.f | 119 + Dragon/src/SYBALC.f | 212 + Dragon/src/SYBALP.f | 217 + Dragon/src/SYBALS.f | 171 + Dragon/src/SYBCP1.f | 192 + Dragon/src/SYBEUR.f | 506 + Dragon/src/SYBHN2.f | 398 + Dragon/src/SYBHTK.f | 512 + Dragon/src/SYBILA.f | 234 + Dragon/src/SYBILF.f | 227 + Dragon/src/SYBILP.f | 128 + Dragon/src/SYBILT.f | 286 + Dragon/src/SYBJJ0.f | 275 + Dragon/src/SYBJJ1.f | 370 + Dragon/src/SYBJJ2.f | 343 + Dragon/src/SYBPRX.f | 72 + Dragon/src/SYBRHL.f | 181 + Dragon/src/SYBRII.f | 39 + Dragon/src/SYBRIJ.f | 54 + Dragon/src/SYBRN2.f | 429 + Dragon/src/SYBRTK.f | 517 + Dragon/src/SYBRX2.f | 191 + Dragon/src/SYBRX3.f | 216 + Dragon/src/SYBRXE.f | 126 + Dragon/src/SYBT1D.f | 93 + Dragon/src/SYBTRK.f | 290 + Dragon/src/SYBUP0.f | 206 + Dragon/src/SYBUP1.f | 227 + Dragon/src/SYBUQ0.f | 409 + Dragon/src/SYBUQV.f | 243 + Dragon/src/SYBWIJ.f | 57 + Dragon/src/TLM.f | 425 + Dragon/src/TLMDIR.f | 407 + Dragon/src/TLMGEO.f | 206 + Dragon/src/TLMGET.f | 283 + Dragon/src/TLMPLA.f | 254 + Dragon/src/TLMPLP.f | 271 + Dragon/src/TLMPNT.f | 222 + Dragon/src/TLMREG.f | 246 + Dragon/src/TLMVPL.f | 359 + Dragon/src/TONCMI.f | 239 + Dragon/src/TONDRV.f | 471 + Dragon/src/TONDST.f | 205 + Dragon/src/TONE.f | 276 + Dragon/src/TONSN3.f | 267 + Dragon/src/TONSPH.f | 351 + Dragon/src/TRA.f | 94 + Dragon/src/TRAGRO.f | 209 + Dragon/src/TRAXS.f | 96 + Dragon/src/TRFICF.f | 123 + Dragon/src/TRIFIS.f | 178 + Dragon/src/TRIFLV.f | 158 + Dragon/src/TRIVA.f | 156 + Dragon/src/TRIVSO.f | 248 + Dragon/src/TRKHEX.f | 2954 + Dragon/src/USS.f | 346 + Dragon/src/USSCOR.f | 232 + Dragon/src/USSDRV.f | 492 + Dragon/src/USSEXC.f | 383 + Dragon/src/USSEXD.f | 377 + Dragon/src/USSFLU.f | 499 + Dragon/src/USSIN1.f | 296 + Dragon/src/USSIST.f | 509 + Dragon/src/USSIT0.f | 670 + Dragon/src/USSIT1.f | 441 + Dragon/src/USSIT2.f | 277 + Dragon/src/USSIT3.f | 466 + Dragon/src/USSIT4.f | 187 + Dragon/src/USSONE.f | 190 + Dragon/src/USSRSE.f | 458 + Dragon/src/USSSEK.f | 117 + Dragon/src/USSSPH.f | 386 + Dragon/src/VDG.f | 420 + Dragon/src/XCGBCM.f | 54 + Dragon/src/XCGDIM.f | 210 + Dragon/src/XCGGEO.f | 801 + Dragon/src/XCGROD.f | 234 + Dragon/src/XCWHEX.f | 229 + Dragon/src/XCWICL.f | 347 + Dragon/src/XCWREC.f | 229 + Dragon/src/XCWROD.f | 195 + Dragon/src/XCWSCL.f | 580 + Dragon/src/XCWSRT.f | 154 + Dragon/src/XCWTRK.f | 318 + Dragon/src/XDDCOM.f | 46 + Dragon/src/XDRCRE.f | 222 + Dragon/src/XDREXP.f | 106 + Dragon/src/XDRH11.f | 228 + Dragon/src/XDRH12.f | 211 + Dragon/src/XDRH13.f | 205 + Dragon/src/XDRH20.f | 182 + Dragon/src/XDRH23.f | 116 + Dragon/src/XDRH30.f | 212 + Dragon/src/XDRH33.f | 117 + Dragon/src/XDRKIN.f | 135 + Dragon/src/XDRLGS.f | 300 + Dragon/src/XDRLXS.f | 119 + Dragon/src/XDRNRM.f | 75 + Dragon/src/XDRTA2.f | 98 + Dragon/src/XDRTBH.f | 165 + Dragon/src/XEL3T2.f | 372 + Dragon/src/XELBIN.f | 457 + Dragon/src/XELCMP.f | 131 + Dragon/src/XELCOP.f | 118 + Dragon/src/XELCOR.f | 183 + Dragon/src/XELCRN.f | 251 + Dragon/src/XELCTR.f | 154 + Dragon/src/XELDCL.f | 603 + Dragon/src/XELDRV.f | 620 + Dragon/src/XELEDC.f | 172 + Dragon/src/XELEQN.f | 262 + Dragon/src/XELETR.f | 458 + Dragon/src/XELGPR.f | 303 + Dragon/src/XELGRD.f | 288 + Dragon/src/XELLIN.f | 211 + Dragon/src/XELLSR.f | 187 + Dragon/src/XELMRG.f | 502 + Dragon/src/XELNTR.f | 609 + Dragon/src/XELPR3.f | 164 + Dragon/src/XELPRC.f | 233 + Dragon/src/XELPRP.f | 364 + Dragon/src/XELPSC.f | 49 + Dragon/src/XELPSI.f | 93 + Dragon/src/XELTCW.f | 63 + Dragon/src/XELTI2.f | 350 + Dragon/src/XELTI3.f | 433 + Dragon/src/XELTRK.f | 541 + Dragon/src/XELTRP.f | 171 + Dragon/src/XELTS2.f | 575 + Dragon/src/XELTSA.f | 89 + Dragon/src/XELTSW.f | 130 + Dragon/src/XELVOL.f | 228 + Dragon/src/XHX2D0.f | 207 + Dragon/src/XHX2D1.f | 322 + Dragon/src/XHXTRK.f | 646 + Dragon/src/XL3NTR.f | 216 + Dragon/src/XL3SIG.f | 82 + Dragon/src/XL3TI3.f | 464 + Dragon/src/dramod.f90 | 90 + Dragon/src/g2s_boundCond.f90 | 1738 + Dragon/src/g2s_cast.f90 | 63 + Dragon/src/g2s_celluleBase.f90 | 679 + Dragon/src/g2s_cellulePlaced.f90 | 300 + Dragon/src/g2s_constType.f90 | 91 + Dragon/src/g2s_constUtil.f90 | 292 + Dragon/src/g2s_construire.f90 | 1144 + Dragon/src/g2s_convert.f90 | 530 + Dragon/src/g2s_g2mc.f90 | 225 + Dragon/src/g2s_g2s.f90 | 299 + Dragon/src/g2s_generateTabSegArc.f90 | 145 + Dragon/src/g2s_generatingMC.f90 | 825 + Dragon/src/g2s_generatingPS.f90 | 920 + Dragon/src/g2s_generatingSAL.f90 | 317 + Dragon/src/g2s_generatingTrack.f90 | 150 + Dragon/src/g2s_nodes.f90 | 1204 + Dragon/src/g2s_pretraitement.f90 | 2243 + Dragon/src/g2s_segArc.f90 | 2310 + Dragon/src/g2s_unfold.f90 | 65 + Dragon/src/sdbm.c | 482 + Dragon/src/sdbm.h | 80 + Dragon/src/xsdb-defs.h | 46 + Dragon/src/xsdbops-sdbm.c | 184 + Dragon/src/xsdbops.h | 84 + Dragon/src/xsdf.c | 1026 + 1685 files changed, 665535 insertions(+) create mode 100644 Dragon/Makefile create mode 100755 Dragon/data/ASSBLY_CASEA_1level_apex_boron.access create mode 100755 Dragon/data/ASSBLY_CASEA_1level_apex_boron.save create mode 100644 Dragon/data/ASSBLY_CASEA_1level_apex_boron.x2m create mode 100644 Dragon/data/ASSBLY_CASEA_1level_apex_boron_proc/Geo_N2.c2m create mode 100644 Dragon/data/ASSBLY_CASEA_1level_apex_boron_proc/Geo_SS.c2m create mode 100644 Dragon/data/ASSBLY_CASEA_1level_apex_boron_proc/Mix_UOX.c2m create mode 100755 Dragon/data/ASSBLY_CASEA_1level_apex_boron_xsm.access create mode 100755 Dragon/data/ASSBLY_CASEA_1level_apex_boron_xsm.save create mode 100644 Dragon/data/ASSBLY_CASEA_1level_apex_boron_xsm.x2m create mode 100644 Dragon/data/ASSBLY_CASEA_1level_apex_boron_xsm_proc/Geo_N2.c2m create mode 100644 Dragon/data/ASSBLY_CASEA_1level_apex_boron_xsm_proc/Geo_SS.c2m create mode 100644 Dragon/data/ASSBLY_CASEA_1level_apex_boron_xsm_proc/Mix_UOX.c2m create mode 100755 Dragon/data/ASSBLY_CASEA_1level_mpo.access create mode 100755 Dragon/data/ASSBLY_CASEA_1level_mpo.save create mode 100644 Dragon/data/ASSBLY_CASEA_1level_mpo.x2m create mode 100644 Dragon/data/ASSBLY_CASEA_1level_mpo_proc/Geo_N2.c2m create mode 100644 Dragon/data/ASSBLY_CASEA_1level_mpo_proc/Geo_SS.c2m create mode 100644 Dragon/data/ASSBLY_CASEA_1level_mpo_proc/Mix_UOX.c2m create mode 100755 Dragon/data/ASSBLY_CASEA_1level_multicompo.access create mode 100755 Dragon/data/ASSBLY_CASEA_1level_multicompo.save create mode 100644 Dragon/data/ASSBLY_CASEA_1level_multicompo.x2m create mode 100644 Dragon/data/ASSBLY_CASEA_1level_multicompo_proc/Geo_N2.c2m create mode 100644 Dragon/data/ASSBLY_CASEA_1level_multicompo_proc/Geo_SS.c2m create mode 100644 Dragon/data/ASSBLY_CASEA_1level_multicompo_proc/Mix_UOX.c2m create mode 100755 Dragon/data/ASSBLY_VVER_1level_mpo.access create mode 100755 Dragon/data/ASSBLY_VVER_1level_mpo.save create mode 100644 Dragon/data/ASSBLY_VVER_1level_mpo.x2m create mode 100644 Dragon/data/ASSBLY_VVER_1level_mpo_proc/13UAX_ARO_MOC.ap3 create mode 100644 Dragon/data/ASSBLY_VVER_1level_mpo_proc/13UAX_ARO_MOC.za create mode 100644 Dragon/data/ASSBLY_VVER_1level_mpo_proc/Mix_UOX.c2m create mode 100755 Dragon/data/C2D20.access create mode 100644 Dragon/data/C2D20.x2m create mode 100644 Dragon/data/C2D20_proc/DimACRCell.c2m create mode 100644 Dragon/data/C2D20_proc/DimACRFuel.c2m create mode 100644 Dragon/data/C2D20_proc/GeoACRC2DN.c2m create mode 100644 Dragon/data/C2D20_proc/MicACRE620.c2m create mode 100644 Dragon/data/C2D20_proc/MicACRE6UH.c2m create mode 100644 Dragon/data/C2D20_proc/MicACRE6UW.c2m create mode 100755 Dragon/data/CFC-CELL.access create mode 100755 Dragon/data/CFC-CELL.save create mode 100644 Dragon/data/CFC-CELL.x2m create mode 100644 Dragon/data/CFC-CELL_proc/CREEP.c2m create mode 100644 Dragon/data/CFC-CELL_proc/FLUX.c2m create mode 100644 Dragon/data/CFC-CELL_proc/FLUXP.c2m create mode 100644 Dragon/data/CFC-CELL_proc/GEOMTY.c2m create mode 100644 Dragon/data/CFC-CELL_proc/LIBRY.c2m create mode 100644 Dragon/data/CFC-CELL_proc/PERTRB.c2m create mode 100644 Dragon/data/CFC-CELL_proc/POWER.c2m create mode 100755 Dragon/data/DF_RTBeavrsPwrRefl.access create mode 100644 Dragon/data/DF_RTBeavrsPwrRefl.x2m create mode 100755 Dragon/data/ErmBeavrsPwrRefl.access create mode 100644 Dragon/data/ErmBeavrsPwrRefl.x2m create mode 100644 Dragon/data/ErmBeavrsPwrRefl_proc/AdaptIso.c2m create mode 100644 Dragon/data/ErmBeavrsPwrRefl_proc/CreaDilut.c2m create mode 100644 Dragon/data/ErmBeavrsPwrRefl_proc/CreaMix.c2m create mode 100644 Dragon/data/ErmBeavrsPwrRefl_proc/CreaStepList.c2m create mode 100644 Dragon/data/ErmBeavrsPwrRefl_proc/DeplChain.c2m create mode 100644 Dragon/data/ErmBeavrsPwrRefl_proc/Geo15x15.c2m create mode 100644 Dragon/data/ErmBeavrsPwrRefl_proc/Geo17x17.c2m create mode 100644 Dragon/data/ErmBeavrsPwrRefl_proc/GetMolarMass.c2m create mode 100644 Dragon/data/ErmBeavrsPwrRefl_proc/GetTechData.c2m create mode 100644 Dragon/data/ErmBeavrsPwrRefl_proc/MetalMix.c2m create mode 100644 Dragon/data/ErmBeavrsPwrRefl_proc/ThermaExpans.c2m create mode 100755 Dragon/data/OSC_CASEA_1level_rse.access create mode 100755 Dragon/data/OSC_CASEA_1level_rse.save create mode 100644 Dragon/data/OSC_CASEA_1level_rse.x2m create mode 100644 Dragon/data/OSC_CASEA_1level_rse_proc/Geo_N2.c2m create mode 100644 Dragon/data/OSC_CASEA_1level_rse_proc/Geo_SS.c2m create mode 100644 Dragon/data/OSC_CASEA_1level_rse_proc/Mix_UOX.c2m create mode 100755 Dragon/data/OSC_CASEA_2level_rse.access create mode 100644 Dragon/data/OSC_CASEA_2level_rse.x2m create mode 100644 Dragon/data/OSC_CASEA_2level_rse_proc/Geo_N1.c2m create mode 100644 Dragon/data/OSC_CASEA_2level_rse_proc/Geo_N2.c2m create mode 100644 Dragon/data/OSC_CASEA_2level_rse_proc/Geo_SS.c2m create mode 100644 Dragon/data/OSC_CASEA_2level_rse_proc/Mix_UOX.c2m create mode 100644 Dragon/data/OSC_CASEA_2level_rse_proc/MultLIBEQ.c2m create mode 100755 Dragon/data/OSC_openMP_tiso.access create mode 100644 Dragon/data/OSC_openMP_tiso.x2m create mode 100644 Dragon/data/OSC_openMP_tiso_proc/Geo_N2.c2m create mode 100644 Dragon/data/OSC_openMP_tiso_proc/Geo_SS.c2m create mode 100644 Dragon/data/OSC_openMP_tiso_proc/Mix_UOX.c2m create mode 100755 Dragon/data/RegtestCNG_mccg.access create mode 100644 Dragon/data/RegtestCNG_mccg.x2m create mode 100755 Dragon/data/RegtestLZC_mccg.access create mode 100644 Dragon/data/RegtestLZC_mccg.x2m create mode 100755 Dragon/data/TEST_GEO_hex_sect_tspc.access create mode 100755 Dragon/data/TEST_GEO_hex_sect_tspc.save create mode 100644 Dragon/data/TEST_GEO_hex_sect_tspc.x2m create mode 100644 Dragon/data/TEST_GEO_hex_sect_tspc_proc/ALFRED_1cell.dat create mode 100644 Dragon/data/TEST_GEO_hex_sect_tspc_proc/ALFRED_1cell_sect.dat create mode 100755 Dragon/data/TEST_GEO_latt_tspc_S30.access create mode 100644 Dragon/data/TEST_GEO_latt_tspc_S30.x2m create mode 100644 Dragon/data/TEST_GEO_latt_tspc_S30_proc/lattice_hex_tspc_S30_7cells.dat create mode 100755 Dragon/data/UOX_5x5_TG6_sym8_multiDom.access create mode 100644 Dragon/data/UOX_5x5_TG6_sym8_multiDom.x2m create mode 100644 Dragon/data/UOX_5x5_TG6_sym8_multiDom_proc/UOX_5x5_TG6_sym8_multiDom.h5 create mode 100755 Dragon/data/UOX_TBH_eighth_1level.access create mode 100644 Dragon/data/UOX_TBH_eighth_1level.x2m create mode 100644 Dragon/data/UOX_TBH_eighth_1level_proc/Geo_SS_32.c2m create mode 100644 Dragon/data/UOX_TBH_eighth_1level_proc/Mix_UOX_32.c2m create mode 100644 Dragon/data/UOX_TBH_eighth_1level_proc/MultLIBEQ_32.c2m create mode 100644 Dragon/data/UOX_TBH_eighth_1level_proc/UOX_TBH.dat create mode 100755 Dragon/data/VanDerGucht-295.access create mode 100644 Dragon/data/VanDerGucht-295.x2m create mode 100644 Dragon/data/VanDerGucht-295_proc/gd157_295.c2m create mode 100644 Dragon/data/VanDerGucht-295_proc/gd_295_c1aut.c2m create mode 100644 Dragon/data/VanDerGucht-295_proc/gd_295_c1rs.c2m create mode 100644 Dragon/data/VanDerGucht-295_proc/gd_295_c1us.c2m create mode 100644 Dragon/data/VanDerGucht-295_proc/svdg0_295.c2m create mode 100644 Dragon/data/VanDerGucht-295_proc/svdg0aut295.c2m create mode 100644 Dragon/data/VanDerGucht-295_proc/svdg0c_295.c2m create mode 100644 Dragon/data/VanDerGucht-295_proc/svdg0caut295.c2m create mode 100644 Dragon/data/VanDerGucht-295_proc/svdg0crse295.c2m create mode 100644 Dragon/data/VanDerGucht-295_proc/svdg0cuss295.c2m create mode 100644 Dragon/data/VanDerGucht-295_proc/svdg0rse295.c2m create mode 100644 Dragon/data/VanDerGucht-295_proc/svdg0uss295.c2m create mode 100644 Dragon/data/VanDerGucht-295_proc/svdg1c_295.c2m create mode 100644 Dragon/data/VanDerGucht-295_proc/svdg1caut295.c2m create mode 100644 Dragon/data/VanDerGucht-295_proc/svdg1crse295.c2m create mode 100644 Dragon/data/VanDerGucht-295_proc/svdg1cuss295.c2m create mode 100755 Dragon/data/VanDerGucht.access create mode 100644 Dragon/data/VanDerGucht.x2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg0.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg0_auto.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg0_rse.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg0_shiba.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg0_uss.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg0c.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg0c_auto.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg0c_rse.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg0c_uss.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg1.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg12.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg12_auto.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg12_rse.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg12_shiba.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg12_uss.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg12c.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg12c_auto.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg12c_uss.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg13_auto.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg13_uss.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg13c.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg13c_auto.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg13c_uss.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg14c.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg14c_auto.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg14c_rse.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg14c_uss.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg1_auto.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg1_rse.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg1_shiba.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg1_uss.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg1c.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg1c_auto.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg1c_uss.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg2.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg2_auto.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg2_uss.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg6c.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg6c_auto.c2m create mode 100644 Dragon/data/VanDerGucht_proc/svdg6c_uss.c2m create mode 100755 Dragon/data/a2b_drglib_apolib99_endfb8r0_v5p1.access create mode 100644 Dragon/data/a2b_drglib_apolib99_endfb8r0_v5p1.x2m create mode 100755 Dragon/data/a2b_drglib_apolib99_endfb8r1_v5p1.save create mode 100755 Dragon/data/a2b_drglib_apolib99_jef2p2_v5p1.access create mode 100755 Dragon/data/a2b_drglib_apolib99_jef2p2_v5p1.save create mode 100644 Dragon/data/a2b_drglib_apolib99_jef2p2_v5p1.x2m create mode 100755 Dragon/data/a2b_drglib_apolib99_jeff4p0_v5p1.access create mode 100755 Dragon/data/a2b_drglib_apolib99_jeff4p0_v5p1.save create mode 100644 Dragon/data/a2b_drglib_apolib99_jeff4p0_v5p1.x2m create mode 100755 Dragon/data/a2b_drglib_endfb7r1_shem315_v5p1.access create mode 100755 Dragon/data/a2b_drglib_endfb7r1_shem315_v5p1.save create mode 100644 Dragon/data/a2b_drglib_endfb7r1_shem315_v5p1.x2m create mode 100755 Dragon/data/a2b_drglib_endfb8r1_ecco1962_light_v5p1.access create mode 100755 Dragon/data/a2b_drglib_endfb8r1_ecco1962_light_v5p1.save create mode 100644 Dragon/data/a2b_drglib_endfb8r1_ecco1962_light_v5p1.x2m create mode 100755 Dragon/data/a2b_drglib_endfb8r1_shem281_v5p1.access create mode 100755 Dragon/data/a2b_drglib_endfb8r1_shem281_v5p1.save create mode 100644 Dragon/data/a2b_drglib_endfb8r1_shem281_v5p1.x2m create mode 100755 Dragon/data/a2b_drglib_endfb8r1_shem295_v5p1.access create mode 100755 Dragon/data/a2b_drglib_endfb8r1_shem295_v5p1.save create mode 100644 Dragon/data/a2b_drglib_endfb8r1_shem295_v5p1.x2m create mode 100755 Dragon/data/a2b_drglib_endfb8r1_shem315_v5p1.access create mode 100755 Dragon/data/a2b_drglib_endfb8r1_shem315_v5p1.save create mode 100644 Dragon/data/a2b_drglib_endfb8r1_shem315_v5p1.x2m create mode 100755 Dragon/data/a2b_drglib_endfb8r1_shem361_v5p1.access create mode 100755 Dragon/data/a2b_drglib_endfb8r1_shem361_v5p1.save create mode 100644 Dragon/data/a2b_drglib_endfb8r1_shem361_v5p1.x2m create mode 100755 Dragon/data/a2b_drglib_endfb8r1_v5p1.access create mode 100755 Dragon/data/a2b_drglib_endfb8r1_v5p1.save create mode 100644 Dragon/data/a2b_drglib_endfb8r1_v5p1.x2m create mode 100755 Dragon/data/a2b_drglib_jef2p2_v5p1.access create mode 100755 Dragon/data/a2b_drglib_jef2p2_v5p1.save create mode 100644 Dragon/data/a2b_drglib_jef2p2_v5p1.x2m create mode 100755 Dragon/data/a2b_drglib_jeff4p0_v5p1.access create mode 100755 Dragon/data/a2b_drglib_jeff4p0_v5p1.save create mode 100644 Dragon/data/a2b_drglib_jeff4p0_v5p1.x2m create mode 100755 Dragon/data/a2b_drglib_shem281_jeff4p0_v5p1.access create mode 100755 Dragon/data/a2b_drglib_shem281_jeff4p0_v5p1.save create mode 100644 Dragon/data/a2b_drglib_shem281_jeff4p0_v5p1.x2m create mode 100755 Dragon/data/a2b_drglib_shem295_jef2p2_v5p1.access create mode 100755 Dragon/data/a2b_drglib_shem295_jef2p2_v5p1.save create mode 100644 Dragon/data/a2b_drglib_shem295_jef2p2_v5p1.x2m create mode 100755 Dragon/data/a2b_drglib_shem295_jeff3p1p1_v5p1.access create mode 100755 Dragon/data/a2b_drglib_shem295_jeff3p1p1_v5p1.save create mode 100644 Dragon/data/a2b_drglib_shem295_jeff3p1p1_v5p1.x2m create mode 100755 Dragon/data/a2b_drglib_shem295_jeff3p1p1_v5p1_kerma.access create mode 100755 Dragon/data/a2b_drglib_shem295_jeff3p1p1_v5p1_kerma.save create mode 100644 Dragon/data/a2b_drglib_shem295_jeff3p1p1_v5p1_kerma.x2m create mode 100755 Dragon/data/a2b_drglib_shem295_jeff4p0_v5p1.access create mode 100755 Dragon/data/a2b_drglib_shem295_jeff4p0_v5p1.save create mode 100644 Dragon/data/a2b_drglib_shem295_jeff4p0_v5p1.x2m create mode 100755 Dragon/data/a2b_drglib_shem315_jeff4p0_v5p1.access create mode 100755 Dragon/data/a2b_drglib_shem315_jeff4p0_v5p1.save create mode 100644 Dragon/data/a2b_drglib_shem315_jeff4p0_v5p1.x2m create mode 100755 Dragon/data/a2b_drglib_shem361_jeff4p0_v5p1.access create mode 100755 Dragon/data/a2b_drglib_shem361_jeff4p0_v5p1.save create mode 100644 Dragon/data/a2b_drglib_shem361_jeff4p0_v5p1.x2m create mode 100644 Dragon/data/assertS.c2m create mode 100644 Dragon/data/assertV.c2m create mode 100755 Dragon/data/fbr_colorset.access create mode 100644 Dragon/data/fbr_colorset.x2m create mode 100644 Dragon/data/fbr_colorset_proc/rnr_cc.c2m create mode 100644 Dragon/data/fbr_colorset_proc/rnr_interpol.c2m create mode 100755 Dragon/data/fbr_tone.access create mode 100644 Dragon/data/fbr_tone.x2m create mode 100755 Dragon/data/g2s_prestation.access create mode 100755 Dragon/data/g2s_prestation.save create mode 100644 Dragon/data/g2s_prestation.x2m create mode 100644 Dragon/data/g2s_prestation_proc/cP1_JST0_IS2.c2m create mode 100644 Dragon/data/g2s_prestation_proc/cP1_JST0_IS3.c2m create mode 100644 Dragon/data/g2s_prestation_proc/cP1_JST0_IS4.c2m create mode 100644 Dragon/data/g2s_prestation_proc/cP1_JST1_IS2.c2m create mode 100644 Dragon/data/g2s_prestation_proc/cP1_JST1_IS3.c2m create mode 100644 Dragon/data/g2s_prestation_proc/cP1_JST1_IS4.c2m create mode 100644 Dragon/data/g2s_prestation_proc/cP1_JST2_IS0.c2m create mode 100644 Dragon/data/g2s_prestation_proc/cP1_JST2_IS1.c2m create mode 100644 Dragon/data/g2s_prestation_proc/cP1_JST2_IS2.c2m create mode 100644 Dragon/data/g2s_prestation_proc/cP1_JST2_IS3.c2m create mode 100644 Dragon/data/g2s_prestation_proc/cP1_JST2_IS4.c2m create mode 100644 Dragon/data/g2s_prestation_proc/cP1_JST2_Im1.c2m create mode 100644 Dragon/data/g2s_prestation_proc/cR2_JST2_IS0.c2m create mode 100644 Dragon/data/g2s_prestation_proc/cR2_JST2_IS1.c2m create mode 100644 Dragon/data/g2s_prestation_proc/cR2_JST2_IS4.c2m create mode 100644 Dragon/data/g2s_prestation_proc/cR2_JST2_Im1.c2m create mode 100644 Dragon/data/g2s_prestation_proc/cS1_JST0_IS3.c2m create mode 100644 Dragon/data/g2s_prestation_proc/cS1_JST1_IS3.c2m create mode 100644 Dragon/data/g2s_prestation_proc/cS1_JST2_IS3.c2m create mode 100644 Dragon/data/g2s_prestation_proc/car_JST0_IS2.c2m create mode 100644 Dragon/data/g2s_prestation_proc/g2s_pincell.c2m create mode 100644 Dragon/data/g2s_prestation_proc/g2s_test.c2m create mode 100644 Dragon/data/g2s_prestation_proc/hex.c2m create mode 100644 Dragon/data/g2s_prestation_proc/hex_JST0.c2m create mode 100644 Dragon/data/g2s_prestation_proc/hex_JST1.c2m create mode 100644 Dragon/data/g2s_prestation_proc/hex_JST2.c2m create mode 100644 Dragon/data/g2s_prestation_proc/hex_P1_JST0.c2m create mode 100644 Dragon/data/g2s_prestation_proc/hex_P1_JST1.c2m create mode 100644 Dragon/data/g2s_prestation_proc/hex_P1_JST2.c2m create mode 100644 Dragon/data/g2s_prestation_proc/hex_P2_JST0.c2m create mode 100644 Dragon/data/g2s_prestation_proc/hex_P2_JST1.c2m create mode 100644 Dragon/data/g2s_prestation_proc/hex_P2_JST2.c2m create mode 100644 Dragon/data/g2s_prestation_proc/hex_P3_JST0.c2m create mode 100644 Dragon/data/g2s_prestation_proc/hex_P3_JST1.c2m create mode 100644 Dragon/data/g2s_prestation_proc/hex_P3_JST2.c2m create mode 100644 Dragon/data/g2s_prestation_proc/hex_P4_JST0.c2m create mode 100644 Dragon/data/g2s_prestation_proc/hex_P4_JST1.c2m create mode 100644 Dragon/data/g2s_prestation_proc/hex_P4_JST2.c2m create mode 100644 Dragon/data/g2s_prestation_proc/isocel_r60.tdt create mode 100644 Dragon/data/g2s_prestation_proc/lozenge_r120.tdt create mode 100644 Dragon/data/g2s_prestation_proc/tst2016_1.c2m create mode 100644 Dragon/data/g2s_prestation_proc/tst2016_2.c2m create mode 100644 Dragon/data/g2s_prestation_proc/tst2016_3.c2m create mode 100644 Dragon/data/g2s_prestation_proc/tst2016_4.c2m create mode 100644 Dragon/data/g2s_prestation_proc/tst2016_5.c2m create mode 100644 Dragon/data/g2s_prestation_proc/tst2016_6.c2m create mode 100644 Dragon/data/g2s_prestation_proc/tst2016_7.c2m create mode 100644 Dragon/data/g2s_prestation_proc/tst2019_1.c2m create mode 100644 Dragon/data/g2s_prestation_proc/tst2019_2.c2m create mode 100644 Dragon/data/g2s_prestation_proc/tst2019_3.c2m create mode 100644 Dragon/data/g2s_prestation_proc/tst2019_4.c2m create mode 100644 Dragon/data/g2s_prestation_proc/tst2023_1.c2m create mode 100644 Dragon/data/iaea2d.x2m create mode 100755 Dragon/data/lumpSS.access create mode 100644 Dragon/data/lumpSS.x2m create mode 100644 Dragon/data/lumpSS_proc/mixA1_lumpSS.c2m create mode 100755 Dragon/data/pincell_apx.access create mode 100755 Dragon/data/pincell_apx.save create mode 100644 Dragon/data/pincell_apx.x2m create mode 100755 Dragon/data/pincell_mco.access create mode 100755 Dragon/data/pincell_mco.save create mode 100644 Dragon/data/pincell_mco.x2m create mode 100644 Dragon/data/pincell_mco_proc/BranchFlux.c2m create mode 100644 Dragon/data/pincell_mco_proc/CalcFlux.c2m create mode 100644 Dragon/data/pincell_mco_proc/Mix_UOX.c2m create mode 100755 Dragon/data/pincell_mpo.access create mode 100755 Dragon/data/pincell_mpo.save create mode 100644 Dragon/data/pincell_mpo.x2m create mode 100755 Dragon/data/pincell_sap.access create mode 100755 Dragon/data/pincell_sap.save create mode 100644 Dragon/data/pincell_sap.x2m create mode 100644 Dragon/data/proc_CNG/CHB_NXT.c2m create mode 100644 Dragon/data/proc_CNG/LCNG_U2_nDf.c2m create mode 100644 Dragon/data/proc_LZC/DimCell.c2m create mode 100644 Dragon/data/proc_LZC/DimFuel.c2m create mode 100644 Dragon/data/proc_LZC/DimLZC.c2m create mode 100755 Dragon/data/proc_LZC/GeoCell.c2m create mode 100755 Dragon/data/proc_LZC/GeoLZC.c2m create mode 100755 Dragon/data/proc_LZC/GeoLZCM.c2m create mode 100644 Dragon/data/proc_LZC/MicLZC.c2m create mode 100644 Dragon/data/proc_LZC/MicWUC.c2m create mode 100644 Dragon/data/proc_LZC/MicWULZC.c2m create mode 100755 Dragon/data/rep900_het_gff.access create mode 100755 Dragon/data/rep900_het_gff.save create mode 100644 Dragon/data/rep900_het_gff.x2m create mode 100755 Dragon/data/rep900_het_gff_jef2p2.access create mode 100755 Dragon/data/rep900_het_gff_jef2p2.save create mode 100644 Dragon/data/rep900_het_gff_jef2p2.x2m create mode 100644 Dragon/data/rep900_het_gff_jef2p2_proc/AddCompo.c2m create mode 100644 Dragon/data/rep900_het_gff_jef2p2_proc/Autop1.c2m create mode 100644 Dragon/data/rep900_het_gff_jef2p2_proc/Autop2.c2m create mode 100644 Dragon/data/rep900_het_gff_jef2p2_proc/CalcFluxH.c2m create mode 100644 Dragon/data/rep900_het_gff_jef2p2_proc/ConcLIBEQ.c2m create mode 100644 Dragon/data/rep900_het_gff_jef2p2_proc/ConcLIBRARY2.c2m create mode 100644 Dragon/data/rep900_het_gff_jef2p2_proc/CondHet_2gr.c2m create mode 100644 Dragon/data/rep900_het_gff_jef2p2_proc/GeoHom.c2m create mode 100644 Dragon/data/rep900_het_gff_jef2p2_proc/Geo_N1_32.c2m create mode 100644 Dragon/data/rep900_het_gff_jef2p2_proc/Geo_N2_32H.c2m create mode 100644 Dragon/data/rep900_het_gff_jef2p2_proc/Geo_SS_32.c2m create mode 100644 Dragon/data/rep900_het_gff_jef2p2_proc/GetDim.c2m create mode 100644 Dragon/data/rep900_het_gff_jef2p2_proc/Homogenize.c2m create mode 100644 Dragon/data/rep900_het_gff_jef2p2_proc/IniCompo.c2m create mode 100644 Dragon/data/rep900_het_gff_jef2p2_proc/Mix_UOX_32.c2m create mode 100644 Dragon/data/rep900_het_gff_jef2p2_proc/MultLIBEQ32H.c2m create mode 100644 Dragon/data/rep900_het_gff_proc/AddCompo.c2m create mode 100644 Dragon/data/rep900_het_gff_proc/BranchFluxH.c2m create mode 100644 Dragon/data/rep900_het_gff_proc/CalcFluxH.c2m create mode 100644 Dragon/data/rep900_het_gff_proc/CondHet_2gr.c2m create mode 100644 Dragon/data/rep900_het_gff_proc/GeoHom.c2m create mode 100644 Dragon/data/rep900_het_gff_proc/Geo_N2_32H.c2m create mode 100644 Dragon/data/rep900_het_gff_proc/IniCompo.c2m create mode 100644 Dragon/data/rep900_het_gff_proc/MultLIBEQ32H.c2m create mode 100755 Dragon/data/rep900_mco.access create mode 100755 Dragon/data/rep900_mco.save create mode 100644 Dragon/data/rep900_mco.x2m create mode 100644 Dragon/data/rep900_mco_proc/Autop1.c2m create mode 100644 Dragon/data/rep900_mco_proc/Autop2.c2m create mode 100644 Dragon/data/rep900_mco_proc/BranchFlux.c2m create mode 100644 Dragon/data/rep900_mco_proc/CalcFlux.c2m create mode 100644 Dragon/data/rep900_mco_proc/ConcLIBEQ.c2m create mode 100644 Dragon/data/rep900_mco_proc/ConcLIBRARY2.c2m create mode 100644 Dragon/data/rep900_mco_proc/Condense_2gr.c2m create mode 100644 Dragon/data/rep900_mco_proc/Geo_N1_20.c2m create mode 100644 Dragon/data/rep900_mco_proc/Geo_N1_32.c2m create mode 100644 Dragon/data/rep900_mco_proc/Geo_N2_20.c2m create mode 100644 Dragon/data/rep900_mco_proc/Geo_N2_32.c2m create mode 100644 Dragon/data/rep900_mco_proc/Geo_SS_20.c2m create mode 100644 Dragon/data/rep900_mco_proc/Geo_SS_32.c2m create mode 100644 Dragon/data/rep900_mco_proc/GetDim.c2m create mode 100644 Dragon/data/rep900_mco_proc/Homogenize.c2m create mode 100644 Dragon/data/rep900_mco_proc/Mix_MOX_32.c2m create mode 100644 Dragon/data/rep900_mco_proc/Mix_UOX_20.c2m create mode 100644 Dragon/data/rep900_mco_proc/Mix_UOX_32.c2m create mode 100644 Dragon/data/rep900_mco_proc/MultLIBEQ_20.c2m create mode 100644 Dragon/data/rep900_mco_proc/MultLIBEQ_32.c2m create mode 100755 Dragon/data/rep900_sap.access create mode 100755 Dragon/data/rep900_sap.save create mode 100644 Dragon/data/rep900_sap.x2m create mode 100755 Dragon/data/salmacro.access create mode 100644 Dragon/data/salmacro.x2m create mode 100644 Dragon/data/salmacro_proc/30AV5_SSH.ap3 create mode 100644 Dragon/data/salmacro_proc/439NR_SSH.sal create mode 100644 Dragon/data/salmacro_proc/439NR_SSH_iso.sal create mode 100644 Dragon/data/salmacro_proc/AIC_SN_CCOND2.ref create mode 100644 Dragon/data/salmacro_proc/GeoNG2x2_iso.c2m create mode 100644 Dragon/data/salmacro_proc/GeoNG_spec.c2m create mode 100644 Dragon/data/salmacro_proc/GeoNG_square.c2m create mode 100755 Dragon/data/salmacro_proc/KML2_ARO_13AU_SSH.ap3 create mode 100644 Dragon/data/salmacro_proc/KML2_ARO_13AU_SSH.za create mode 100644 Dragon/data/salmacro_proc/TDCM02.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM03.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM07.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM08.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM09.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM31.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM32.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM33.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM43.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM44.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM45.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM46.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM47.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM48.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM49.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM50.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM51.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM52.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM53.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM54.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM55.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM56.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM57.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM58.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM59.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM60.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM61.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM62.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM63.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM64.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM65.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM66.c2m create mode 100644 Dragon/data/salmacro_proc/TDCM67.c2m create mode 100644 Dragon/data/salmacro_proc/geomProc.c2m create mode 100644 Dragon/data/salmacro_proc/lattice_hex_tiso_S30_7cells.dat create mode 100644 Dragon/data/salmacro_proc/lattice_hex_tiso_S30_7cells_macro.dat create mode 100644 Dragon/data/salmacro_proc/lattice_hex_tspc_S30_7cells.dat create mode 100755 Dragon/data/sens.access create mode 100755 Dragon/data/sens.save create mode 100644 Dragon/data/sens.x2m create mode 100755 Dragon/data/tapollo1.access create mode 100644 Dragon/data/tapollo1.x2m create mode 100644 Dragon/data/tapollo1_proc/CEA93_V2_DPL.c2m create mode 100644 Dragon/data/tapollo1_proc/TCA131.c2m create mode 100755 Dragon/data/tapollo2.access create mode 100644 Dragon/data/tapollo2.x2m create mode 100644 Dragon/data/tapollo2_proc/CEA93_V4_DPL.c2m create mode 100644 Dragon/data/tapollo2_proc/CEA93_V6_DPL.c2m create mode 100644 Dragon/data/tapollo2_proc/TCA231.c2m create mode 100644 Dragon/data/tapollo2_proc/TCA232.c2m create mode 100644 Dragon/data/tapollo2_proc/TCA233.c2m create mode 100644 Dragon/data/tapollo2_proc/TCA234.c2m create mode 100644 Dragon/data/tapollo2_proc/TCA235.c2m create mode 100644 Dragon/data/tapollo2_proc/TCA241.c2m create mode 100755 Dragon/data/tdraglib.access create mode 100755 Dragon/data/tdraglib.save create mode 100644 Dragon/data/tdraglib.x2m create mode 100644 Dragon/data/tdraglib_proc/EvolRef.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR01.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR02.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR02_void.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR03.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR04.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR05.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR05Lib.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR06.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR07.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR08.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR09.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR10.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR11.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR12.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR13.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR14.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR15.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR16.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR17.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR18.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR19.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR20.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR21.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR22.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR31.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR32.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR33.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR34.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR35.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR36.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR37.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR38.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR41.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR42.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR43.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR44.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR45.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR46.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR47.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR48.c2m create mode 100644 Dragon/data/tdraglib_proc/TCDR49.c2m create mode 100755 Dragon/data/te6wlib.access create mode 100644 Dragon/data/te6wlib.x2m create mode 100644 Dragon/data/te6wlib_proc/TCW601.c2m create mode 100644 Dragon/data/te6wlib_proc/TCW602.c2m create mode 100644 Dragon/data/te6wlib_proc/TCW603.c2m create mode 100644 Dragon/data/te6wlib_proc/TCW604.c2m create mode 100644 Dragon/data/te6wlib_proc/TCW605.c2m create mode 100644 Dragon/data/te6wlib_proc/TCW606.c2m create mode 100644 Dragon/data/te6wlib_proc/TCW607.c2m create mode 100644 Dragon/data/te6wlib_proc/TCW608.c2m create mode 100644 Dragon/data/te6wlib_proc/TCW609.c2m create mode 100644 Dragon/data/te6wlib_proc/TCW610.c2m create mode 100644 Dragon/data/te6wlib_proc/TCW611.c2m create mode 100644 Dragon/data/te6wlib_proc/TCW612.c2m create mode 100755 Dragon/data/testDuo.access create mode 100644 Dragon/data/testDuo.x2m create mode 100755 Dragon/data/testDuo_B1.access create mode 100644 Dragon/data/testDuo_B1.x2m create mode 100755 Dragon/data/testVVER7.access create mode 100755 Dragon/data/testVVER7.save create mode 100644 Dragon/data/testVVER7.x2m create mode 100644 Dragon/data/testVVER7_proc/vverBU.c2m create mode 100644 Dragon/data/testVVER7_proc/vverGEO.c2m create mode 100644 Dragon/data/testVVER7_proc/vverMIX.c2m create mode 100644 Dragon/data/testVVER7_proc/vverTRACK.c2m create mode 100755 Dragon/data/tjeff31gx.access create mode 100644 Dragon/data/tjeff31gx.x2m create mode 100644 Dragon/data/tjeff31gx_proc/TCWU05Lib.c2m create mode 100644 Dragon/data/tjeff31gx_proc/TCWUX01.c2m create mode 100644 Dragon/data/tjeff31gx_proc/TCWUX02.c2m create mode 100644 Dragon/data/tjeff31gx_proc/TCWUX03.c2m create mode 100644 Dragon/data/tjeff31gx_proc/TCWUX04.c2m create mode 100644 Dragon/data/tjeff31gx_proc/TCWUX05.c2m create mode 100644 Dragon/data/tjeff31gx_proc/TCWUX06.c2m create mode 100644 Dragon/data/tjeff31gx_proc/TCWUX07.c2m create mode 100644 Dragon/data/tjeff31gx_proc/TCWUX08.c2m create mode 100644 Dragon/data/tjeff31gx_proc/TCWUX09.c2m create mode 100644 Dragon/data/tjeff31gx_proc/TCWUX10.c2m create mode 100644 Dragon/data/tjeff31gx_proc/TCWUX11.c2m create mode 100644 Dragon/data/tjeff31gx_proc/TCWUX12.c2m create mode 100644 Dragon/data/tjeff31gx_proc/TCWUX31.c2m create mode 100644 Dragon/data/tjeff31gx_proc/TCWUX41.c2m create mode 100755 Dragon/data/tmacro.access create mode 100644 Dragon/data/tmacro.x2m create mode 100644 Dragon/data/tmacro_proc/AIC_SN_CCOND2.ref create mode 100644 Dragon/data/tmacro_proc/Al_1MeV_CSD_P7.txt create mode 100644 Dragon/data/tmacro_proc/CHB_NXT_MC.c2m create mode 100644 Dragon/data/tmacro_proc/Godiva_2001_Bugle96_47n.txt create mode 100644 Dragon/data/tmacro_proc/TCM01.c2m create mode 100644 Dragon/data/tmacro_proc/TCM02.c2m create mode 100644 Dragon/data/tmacro_proc/TCM03.c2m create mode 100644 Dragon/data/tmacro_proc/TCM04.c2m create mode 100644 Dragon/data/tmacro_proc/TCM05.c2m create mode 100644 Dragon/data/tmacro_proc/TCM06.c2m create mode 100644 Dragon/data/tmacro_proc/TCM07.c2m create mode 100644 Dragon/data/tmacro_proc/TCM08.c2m create mode 100644 Dragon/data/tmacro_proc/TCM09.c2m create mode 100644 Dragon/data/tmacro_proc/TCM10.c2m create mode 100644 Dragon/data/tmacro_proc/TCM11.c2m create mode 100644 Dragon/data/tmacro_proc/TCM12.c2m create mode 100644 Dragon/data/tmacro_proc/TCM13.c2m create mode 100644 Dragon/data/tmacro_proc/TCM14.c2m create mode 100644 Dragon/data/tmacro_proc/TCM15.c2m create mode 100644 Dragon/data/tmacro_proc/TCM16.c2m create mode 100644 Dragon/data/tmacro_proc/TCM30.c2m create mode 100644 Dragon/data/tmacro_proc/TCM31.c2m create mode 100644 Dragon/data/tmacro_proc/TCM32.c2m create mode 100644 Dragon/data/tmacro_proc/TCM33.c2m create mode 100644 Dragon/data/tmacro_proc/TCM34.c2m create mode 100644 Dragon/data/tmacro_proc/TCM35.c2m create mode 100644 Dragon/data/tmacro_proc/TCM36.c2m create mode 100644 Dragon/data/tmacro_proc/TCM37.c2m create mode 100644 Dragon/data/tmacro_proc/TCM38.c2m create mode 100644 Dragon/data/tmacro_proc/TCM39.c2m create mode 100644 Dragon/data/tmacro_proc/TCM40.c2m create mode 100644 Dragon/data/tmacro_proc/TCM41.c2m create mode 100644 Dragon/data/tmacro_proc/TCM42.c2m create mode 100644 Dragon/data/tmacro_proc/TCM43.c2m create mode 100644 Dragon/data/tmacro_proc/TCM44.c2m create mode 100644 Dragon/data/tmacro_proc/TCM45.c2m create mode 100644 Dragon/data/tmacro_proc/TCM46.c2m create mode 100644 Dragon/data/tmacro_proc/TCM47.c2m create mode 100644 Dragon/data/tmacro_proc/TCM48.c2m create mode 100644 Dragon/data/tmacro_proc/TCM49.c2m create mode 100644 Dragon/data/tmacro_proc/TCM50.c2m create mode 100644 Dragon/data/tmacro_proc/TCM51.c2m create mode 100644 Dragon/data/tmacro_proc/TCM52.c2m create mode 100644 Dragon/data/tmacro_proc/TCM53.c2m create mode 100644 Dragon/data/tmacro_proc/TCM54.c2m create mode 100644 Dragon/data/tmacro_proc/TCM55.c2m create mode 100644 Dragon/data/tmacro_proc/TCM56.c2m create mode 100644 Dragon/data/tmacro_proc/TCM57.c2m create mode 100644 Dragon/data/tmacro_proc/TCM58.c2m create mode 100644 Dragon/data/tmacro_proc/TCM59.c2m create mode 100644 Dragon/data/tmacro_proc/TCM60.c2m create mode 100644 Dragon/data/tmacro_proc/TCM61.c2m create mode 100644 Dragon/data/tmacro_proc/TCM62.c2m create mode 100755 Dragon/data/tmacro_proc/TCM63.c2m create mode 100644 Dragon/data/tmacro_proc/TCM64.c2m create mode 100644 Dragon/data/tmacro_proc/TCM65.c2m create mode 100644 Dragon/data/tmacro_proc/TCM66.c2m create mode 100644 Dragon/data/tmacro_proc/TCM67.c2m create mode 100644 Dragon/data/tmacro_proc/TCM68.c2m create mode 100644 Dragon/data/tmacro_proc/TCM69.c2m create mode 100644 Dragon/data/tmacro_proc/TCM70.c2m create mode 100644 Dragon/data/tmacro_proc/TCM71.c2m create mode 100644 Dragon/data/tmacro_proc/TCM72.c2m create mode 100644 Dragon/data/tmacro_proc/TCM73.c2m create mode 100644 Dragon/data/tmacro_proc/TCM74.c2m create mode 100644 Dragon/data/tmacro_proc/TCM75.c2m create mode 100644 Dragon/data/tmacro_proc/TCM76.c2m create mode 100644 Dragon/data/tmacro_proc/TCM77.c2m create mode 100644 Dragon/data/tmacro_proc/TCM78.c2m create mode 100644 Dragon/data/tmacro_proc/W_6MeV_e_CSD.txt create mode 100644 Dragon/data/tmacro_proc/W_6MeV_e_ph_CSD.txt create mode 100644 Dragon/data/tmacro_proc/W_6MeV_ph_CSD.txt create mode 100644 Dragon/data/tmacro_proc/air_water_bone_lung.txt create mode 100644 Dragon/data/tmacro_proc/assertS_low.c2m create mode 100644 Dragon/data/tmacro_proc/caskmix_FMAC-M.txt create mode 100644 Dragon/data/tmacro_proc/radiant_fmac.txt create mode 100755 Dragon/data/tmatxs2.access create mode 100644 Dragon/data/tmatxs2.x2m create mode 100644 Dragon/data/tmatxs2_proc/TMATXS21.c2m create mode 100644 Dragon/data/tmatxs2_proc/TMATXS22.c2m create mode 100644 Dragon/data/tmatxs2_proc/TMATXS23.c2m create mode 100644 Dragon/data/tmatxs2_proc/TMATXS24.c2m create mode 100644 Dragon/data/tmatxs2_proc/TMATXS25.c2m create mode 100644 Dragon/data/tmatxs2_proc/matxsH1_H2O.txt create mode 100644 Dragon/data/tmatxs2_proc/matxsU238.txt create mode 100644 Dragon/data/tmatxs2_proc/matxsW.txt create mode 100644 Dragon/data/tmatxs2_proc/matxs_ZrH_295.txt create mode 100755 Dragon/data/tmatxs2_proc/matxs_mo_e_Beam_3.0MeV_P2_30_Groups_nc.txt create mode 100755 Dragon/data/tmatxs7a.access create mode 100644 Dragon/data/tmatxs7a.x2m create mode 100644 Dragon/data/tmatxs7a_proc/TCXA01.c2m create mode 100755 Dragon/data/tndas.access create mode 100644 Dragon/data/tndas.x2m create mode 100644 Dragon/data/tndas_proc/TCND01.c2m create mode 100644 Dragon/data/tndas_proc/TCND02.c2m create mode 100644 Dragon/data/tndas_proc/TCND03.c2m create mode 100644 Dragon/data/tndas_proc/TCND04.c2m create mode 100644 Dragon/data/tndas_proc/TCND05.c2m create mode 100644 Dragon/data/tndas_proc/TCND05Lib.c2m create mode 100644 Dragon/data/tndas_proc/TCND06.c2m create mode 100644 Dragon/data/tndas_proc/TCND07.c2m create mode 100644 Dragon/data/tndas_proc/TCND08.c2m create mode 100644 Dragon/data/tndas_proc/TCND09.c2m create mode 100644 Dragon/data/tndas_proc/TCND10.c2m create mode 100644 Dragon/data/tndas_proc/TCND11.c2m create mode 100644 Dragon/data/tndas_proc/TCND12.c2m create mode 100644 Dragon/data/tndas_proc/TCND31.c2m create mode 100644 Dragon/data/tndas_proc/TCND32.c2m create mode 100644 Dragon/data/tndas_proc/TCND33.c2m create mode 100644 Dragon/data/tndas_proc/TCND34.c2m create mode 100755 Dragon/data/trowland.access create mode 100644 Dragon/data/trowland.x2m create mode 100644 Dragon/data/trowland_proc/mox_1c_case1.c2m create mode 100644 Dragon/data/trowland_proc/mox_1c_case2.c2m create mode 100644 Dragon/data/trowland_proc/mox_1c_case3.c2m create mode 100644 Dragon/data/trowland_proc/mox_1c_case4.c2m create mode 100644 Dragon/data/trowland_proc/mox_6c_case1.c2m create mode 100644 Dragon/data/trowland_proc/mox_6c_case2.c2m create mode 100644 Dragon/data/trowland_proc/mox_6c_case3.c2m create mode 100644 Dragon/data/trowland_proc/mox_6c_case4.c2m create mode 100644 Dragon/data/trowland_proc/mox_6c_case5.c2m create mode 100644 Dragon/data/trowland_proc/uo2_1c_case1.c2m create mode 100644 Dragon/data/trowland_proc/uo2_1c_case2.c2m create mode 100644 Dragon/data/trowland_proc/uo2_1c_case3.c2m create mode 100644 Dragon/data/trowland_proc/uo2_1c_case4.c2m create mode 100644 Dragon/data/trowland_proc/uo2_6c_case1.c2m create mode 100644 Dragon/data/trowland_proc/uo2_6c_case2.c2m create mode 100644 Dragon/data/trowland_proc/uo2_6c_case3.c2m create mode 100644 Dragon/data/trowland_proc/uo2_6c_case4.c2m create mode 100644 Dragon/data/trowland_proc/uo2_6c_case5.c2m create mode 100755 Dragon/data/trowland_shem.access create mode 100644 Dragon/data/trowland_shem.x2m create mode 100755 Dragon/data/trowland_shem295.access create mode 100644 Dragon/data/trowland_shem295.x2m create mode 100755 Dragon/data/trowland_shem295_jeff3.1.access create mode 100644 Dragon/data/trowland_shem295_jeff3.1.x2m create mode 100644 Dragon/data/trowland_shem295_jeff3.1_proc/gd_295_kec1.c2m create mode 100644 Dragon/data/trowland_shem295_jeff3.1_proc/mox_295_kec1.c2m create mode 100644 Dragon/data/trowland_shem295_jeff3.1_proc/mox_295_kec2.c2m create mode 100644 Dragon/data/trowland_shem295_jeff3.1_proc/mox_295_kec3.c2m create mode 100644 Dragon/data/trowland_shem295_jeff3.1_proc/mox_295_kec4.c2m create mode 100644 Dragon/data/trowland_shem295_jeff3.1_proc/mox_295_kec5.c2m create mode 100644 Dragon/data/trowland_shem295_jeff3.1_proc/uo2_295_kec1.c2m create mode 100644 Dragon/data/trowland_shem295_jeff3.1_proc/uo2_295_kec2.c2m create mode 100644 Dragon/data/trowland_shem295_jeff3.1_proc/uo2_295_kec3.c2m create mode 100644 Dragon/data/trowland_shem295_jeff3.1_proc/uo2_295_kec4.c2m create mode 100644 Dragon/data/trowland_shem295_jeff3.1_proc/uo2_295_kec5.c2m create mode 100644 Dragon/data/trowland_shem295_proc/mox_295_kec1.c2m create mode 100644 Dragon/data/trowland_shem295_proc/mox_295_kec2.c2m create mode 100644 Dragon/data/trowland_shem295_proc/mox_295_kec3.c2m create mode 100644 Dragon/data/trowland_shem295_proc/mox_295_kec4.c2m create mode 100644 Dragon/data/trowland_shem295_proc/mox_295_kec5.c2m create mode 100644 Dragon/data/trowland_shem295_proc/uo2_295_kec1.c2m create mode 100644 Dragon/data/trowland_shem295_proc/uo2_295_kec2.c2m create mode 100644 Dragon/data/trowland_shem295_proc/uo2_295_kec3.c2m create mode 100644 Dragon/data/trowland_shem295_proc/uo2_295_kec4.c2m create mode 100644 Dragon/data/trowland_shem295_proc/uo2_295_kec5.c2m create mode 100644 Dragon/data/trowland_shem295_proc/uo2_295_kec6.c2m create mode 100644 Dragon/data/trowland_shem_proc/mox_6c_c1_sh.c2m create mode 100644 Dragon/data/trowland_shem_proc/mox_6c_c2_sh.c2m create mode 100644 Dragon/data/trowland_shem_proc/mox_6c_c3_sh.c2m create mode 100644 Dragon/data/trowland_shem_proc/mox_6c_c4_sh.c2m create mode 100644 Dragon/data/trowland_shem_proc/mox_6c_c5_sh.c2m create mode 100644 Dragon/data/trowland_shem_proc/uo2_6c_c1_sh.c2m create mode 100644 Dragon/data/trowland_shem_proc/uo2_6c_c2_sh.c2m create mode 100644 Dragon/data/trowland_shem_proc/uo2_6c_c3_sh.c2m create mode 100644 Dragon/data/trowland_shem_proc/uo2_6c_c4_sh.c2m create mode 100644 Dragon/data/trowland_shem_proc/uo2_6c_c5_sh.c2m create mode 100755 Dragon/data/twimsE.access create mode 100644 Dragon/data/twimsE.x2m create mode 100644 Dragon/data/twimsE_proc/TCWE01.c2m create mode 100644 Dragon/data/twimsE_proc/TCWE02.c2m create mode 100644 Dragon/data/twimsE_proc/TCWE03.c2m create mode 100644 Dragon/data/twimsE_proc/TCWE04.c2m create mode 100644 Dragon/data/twimsE_proc/TCWE05.c2m create mode 100644 Dragon/data/twimsE_proc/TCWE05Lib.c2m create mode 100644 Dragon/data/twimsE_proc/TCWE06.c2m create mode 100644 Dragon/data/twimsE_proc/TCWE07.c2m create mode 100644 Dragon/data/twimsE_proc/TCWE08.c2m create mode 100644 Dragon/data/twimsE_proc/TCWE09.c2m create mode 100644 Dragon/data/twimsE_proc/TCWE10.c2m create mode 100644 Dragon/data/twimsE_proc/TCWE11.c2m create mode 100644 Dragon/data/twimsE_proc/TCWE12.c2m create mode 100644 Dragon/data/twimsE_proc/TCWE13.c2m create mode 100644 Dragon/data/twimsE_proc/TCWE14.c2m create mode 100644 Dragon/data/twimsE_proc/TCWE15.c2m create mode 100644 Dragon/data/twimsE_proc/TCWE17.c2m create mode 100644 Dragon/data/twimsE_proc/TCWE17Lib.c2m create mode 100644 Dragon/data/twimsE_proc/TCWE31.c2m create mode 100644 Dragon/data/twimsE_proc/TCWE32.c2m create mode 100755 Dragon/data/twinfrith.access create mode 100644 Dragon/data/twinfrith.x2m create mode 100644 Dragon/data/twinfrith_proc/TCWW01.c2m create mode 100644 Dragon/data/twinfrith_proc/TCWW02.c2m create mode 100644 Dragon/data/twinfrith_proc/TCWW03.c2m create mode 100644 Dragon/data/twinfrith_proc/TCWW04.c2m create mode 100644 Dragon/data/twinfrith_proc/TCWW05.c2m create mode 100644 Dragon/data/twinfrith_proc/TCWW06.c2m create mode 100644 Dragon/data/twinfrith_proc/TCWW07.c2m create mode 100644 Dragon/data/twinfrith_proc/TCWW08.c2m create mode 100644 Dragon/data/twinfrith_proc/TCWW09.c2m create mode 100644 Dragon/data/twinfrith_proc/TCWW10.c2m create mode 100644 Dragon/data/twinfrith_proc/TCWW11.c2m create mode 100644 Dragon/data/twinfrith_proc/TCWW12.c2m create mode 100644 Dragon/data/twinfrith_proc/TCWW31.c2m create mode 100644 Dragon/data/twinfrith_proc/TCWW41.c2m create mode 100644 Dragon/data/twinfrith_proc/TCWW42.c2m create mode 100644 Dragon/data/twinfrith_proc/TCWW43.c2m create mode 100755 Dragon/data/twlup.access create mode 100755 Dragon/data/twlup.save create mode 100644 Dragon/data/twlup.x2m create mode 100644 Dragon/data/twlup_proc/Datos_pertur.c2m create mode 100644 Dragon/data/twlup_proc/TCWU01.c2m create mode 100644 Dragon/data/twlup_proc/TCWU02.c2m create mode 100644 Dragon/data/twlup_proc/TCWU03.c2m create mode 100644 Dragon/data/twlup_proc/TCWU04.c2m create mode 100644 Dragon/data/twlup_proc/TCWU05.c2m create mode 100644 Dragon/data/twlup_proc/TCWU05Lib.c2m create mode 100644 Dragon/data/twlup_proc/TCWU06.c2m create mode 100644 Dragon/data/twlup_proc/TCWU07.c2m create mode 100644 Dragon/data/twlup_proc/TCWU08.c2m create mode 100644 Dragon/data/twlup_proc/TCWU09.c2m create mode 100644 Dragon/data/twlup_proc/TCWU10.c2m create mode 100644 Dragon/data/twlup_proc/TCWU11.c2m create mode 100644 Dragon/data/twlup_proc/TCWU12.c2m create mode 100644 Dragon/data/twlup_proc/TCWU13.c2m create mode 100644 Dragon/data/twlup_proc/TCWU14.c2m create mode 100644 Dragon/data/twlup_proc/TCWU15.c2m create mode 100644 Dragon/data/twlup_proc/TCWU17.c2m create mode 100644 Dragon/data/twlup_proc/TCWU17Lib.c2m create mode 100644 Dragon/data/twlup_proc/TCWU18.c2m create mode 100644 Dragon/data/twlup_proc/TCWU31.c2m create mode 100644 Dragon/data/twlup_proc/TCWU32.c2m create mode 100644 Dragon/data/twlup_proc/TCWU33.c2m create mode 100644 Dragon/data/twlup_proc/TCWU41.c2m create mode 100755 Dragon/data/uo2_295_kec1_openMP.access create mode 100644 Dragon/data/uo2_295_kec1_openMP.x2m create mode 100755 Dragon/data/uo2_evo_hdf.access create mode 100644 Dragon/data/uo2_evo_hdf.x2m create mode 100755 Dragon/data/uo2_evo_xsm.access create mode 100644 Dragon/data/uo2_evo_xsm.x2m create mode 100755 Dragon/data/uo2_kec1_ecco1962_light.access create mode 100644 Dragon/data/uo2_kec1_ecco1962_light.x2m create mode 100755 Dragon/rdragon create mode 100644 Dragon/src/AEXCPC.f create mode 100644 Dragon/src/AEXDIR.f create mode 100644 Dragon/src/AEXGNV.f create mode 100644 Dragon/src/AEXTPA.f create mode 100644 Dragon/src/AEXTRT.f create mode 100644 Dragon/src/APX.f create mode 100644 Dragon/src/APXCA2.f create mode 100644 Dragon/src/APXCAL.f create mode 100644 Dragon/src/APXCAT.f create mode 100644 Dragon/src/APXGEM.f create mode 100644 Dragon/src/APXGEP.f create mode 100644 Dragon/src/APXGEY.f create mode 100644 Dragon/src/APXIDF.f create mode 100644 Dragon/src/APXPAV.f create mode 100644 Dragon/src/APXSX2.f create mode 100644 Dragon/src/APXTOC.f create mode 100644 Dragon/src/ASM.f create mode 100644 Dragon/src/ASMDRV.f create mode 100644 Dragon/src/AUTDRV.f create mode 100644 Dragon/src/AUTFLU.f create mode 100644 Dragon/src/AUTIT1.f create mode 100644 Dragon/src/AUTIT2.f create mode 100644 Dragon/src/AUTO.f create mode 100644 Dragon/src/AUTONE.f create mode 100644 Dragon/src/AUTPRD.f create mode 100644 Dragon/src/AUTSPH.f create mode 100644 Dragon/src/AUTTAB.f create mode 100644 Dragon/src/AXGDIA.f create mode 100644 Dragon/src/AXGGEO.f create mode 100644 Dragon/src/AXGSYM.f create mode 100644 Dragon/src/AXGTRN.f create mode 100644 Dragon/src/AXGTRS.f create mode 100644 Dragon/src/AXGXCW.f create mode 100644 Dragon/src/AXGXEL.f create mode 100644 Dragon/src/B1BETA.f create mode 100644 Dragon/src/B1DIF.f create mode 100644 Dragon/src/B1GAMA.f create mode 100644 Dragon/src/B1HOM.f create mode 100644 Dragon/src/B1HXS1.f create mode 100644 Dragon/src/B1SOL.f create mode 100644 Dragon/src/BIVAA.f create mode 100644 Dragon/src/BIVAF.f create mode 100644 Dragon/src/BIVFIS.f create mode 100644 Dragon/src/BIVS01.f create mode 100644 Dragon/src/BIVS02.f create mode 100644 Dragon/src/BIVS03.f create mode 100644 Dragon/src/BIVS04.f create mode 100644 Dragon/src/BIVS05.f create mode 100644 Dragon/src/BIVSOU.f create mode 100644 Dragon/src/BREANM.f create mode 100644 Dragon/src/BREDRV.f create mode 100644 Dragon/src/BREERA.f create mode 100644 Dragon/src/BREERM.f create mode 100644 Dragon/src/BREF.f create mode 100644 Dragon/src/BREKOE.f create mode 100644 Dragon/src/BRELLB.f create mode 100644 Dragon/src/BREMAC.f create mode 100644 Dragon/src/BRENEM.f create mode 100644 Dragon/src/BRERT.f create mode 100644 Dragon/src/BRERTD.f90 create mode 100644 Dragon/src/BRERTS.f90 create mode 100644 Dragon/src/BRESS1.f create mode 100644 Dragon/src/BRESS2.f create mode 100644 Dragon/src/BRESS3.f create mode 100644 Dragon/src/BRESS4.f create mode 100644 Dragon/src/CFC.f create mode 100644 Dragon/src/CFCDRV.f create mode 100644 Dragon/src/CFCFBM.f create mode 100644 Dragon/src/CFCGET.f create mode 100644 Dragon/src/CHAB.f create mode 100644 Dragon/src/CHAB01.f create mode 100644 Dragon/src/CHAB02.f create mode 100644 Dragon/src/CHAB03.f create mode 100644 Dragon/src/CHAB04.f create mode 100644 Dragon/src/CLM.f create mode 100644 Dragon/src/CLMGET.f create mode 100644 Dragon/src/COMACR.f create mode 100644 Dragon/src/COMARB.f create mode 100644 Dragon/src/COMBIB.f create mode 100644 Dragon/src/COMCAL.f create mode 100644 Dragon/src/COMCAT.f create mode 100644 Dragon/src/COMDEP.f create mode 100644 Dragon/src/COMGEM.f create mode 100644 Dragon/src/COMGEN.f create mode 100644 Dragon/src/COMGEP.f create mode 100644 Dragon/src/COMGFF.f create mode 100644 Dragon/src/COMISO.f create mode 100644 Dragon/src/COMMIC.f create mode 100644 Dragon/src/COMPAV.f create mode 100644 Dragon/src/COMPO.f create mode 100644 Dragon/src/COMRES.f create mode 100644 Dragon/src/COMSDB.f create mode 100644 Dragon/src/COMTRE.f create mode 100644 Dragon/src/CPO.f create mode 100644 Dragon/src/CPODRV.f create mode 100644 Dragon/src/CPOISO.f create mode 100644 Dragon/src/CPOLGX.f create mode 100644 Dragon/src/CPOMAR.f create mode 100644 Dragon/src/CPOMAW.f create mode 100644 Dragon/src/CPOMIC.f create mode 100644 Dragon/src/CPONED.f create mode 100644 Dragon/src/CPOREM.f create mode 100644 Dragon/src/DEPLIT.f create mode 100644 Dragon/src/DMA.f create mode 100644 Dragon/src/DMAGET.f create mode 100644 Dragon/src/DMASOU.f create mode 100644 Dragon/src/DOORAB.f create mode 100644 Dragon/src/DOORAV.f create mode 100644 Dragon/src/DOORFB2.f create mode 100644 Dragon/src/DOORFB3.f create mode 100644 Dragon/src/DOORFV.f create mode 100644 Dragon/src/DOORPV.f create mode 100644 Dragon/src/DOORS_BIV.f90 create mode 100644 Dragon/src/DOORS_MOD.f90 create mode 100644 Dragon/src/DOORS_SN.f90 create mode 100644 Dragon/src/DOORS_TRI.f90 create mode 100644 Dragon/src/DRAGON.f90 create mode 100644 Dragon/src/DUO.f create mode 100644 Dragon/src/DUO001.f create mode 100644 Dragon/src/DUO002.f create mode 100644 Dragon/src/DUO003.f create mode 100644 Dragon/src/DUO004.f create mode 100644 Dragon/src/DUO005.f create mode 100644 Dragon/src/DUO006.f create mode 100644 Dragon/src/DUO007.f create mode 100644 Dragon/src/DUODRV.f create mode 100644 Dragon/src/DUTURN.f create mode 100644 Dragon/src/EDI.f create mode 100644 Dragon/src/EDIACT.f create mode 100644 Dragon/src/EDIALB.f create mode 100644 Dragon/src/EDIBAL.f create mode 100644 Dragon/src/EDIBHX.f create mode 100644 Dragon/src/EDIDEL.f create mode 100644 Dragon/src/EDIDEP.f create mode 100644 Dragon/src/EDIDRV.f create mode 100644 Dragon/src/EDIDST.f create mode 100644 Dragon/src/EDIDTX.f create mode 100644 Dragon/src/EDIENE.f create mode 100644 Dragon/src/EDIG2S.f90 create mode 100644 Dragon/src/EDIGAP.f create mode 100644 Dragon/src/EDIGEO.f create mode 100644 Dragon/src/EDIGET.f create mode 100644 Dragon/src/EDIHFC.f create mode 100644 Dragon/src/EDIHFD.f create mode 100644 Dragon/src/EDIHMX.f create mode 100644 Dragon/src/EDIJO1.f create mode 100644 Dragon/src/EDIJO2.f create mode 100644 Dragon/src/EDIJO3.f create mode 100644 Dragon/src/EDILUM.f create mode 100644 Dragon/src/EDIMAX.f create mode 100644 Dragon/src/EDIMCN.f create mode 100644 Dragon/src/EDIMIC.f create mode 100644 Dragon/src/EDIMRC.f create mode 100644 Dragon/src/EDIMRG.f create mode 100644 Dragon/src/EDIPRR.f create mode 100644 Dragon/src/EDIPXS.f create mode 100644 Dragon/src/EDIRAT.f create mode 100644 Dragon/src/EDIRES.f create mode 100644 Dragon/src/EDISTA.f create mode 100644 Dragon/src/EDITXS.f create mode 100644 Dragon/src/EDIUNF.f create mode 100644 Dragon/src/EDIWCU.f create mode 100644 Dragon/src/EDIWP1.f create mode 100644 Dragon/src/EPC.f create mode 100644 Dragon/src/EPCRMA.f create mode 100644 Dragon/src/EPCRMD.f create mode 100644 Dragon/src/EPCRMI.f create mode 100644 Dragon/src/EPCRMS.f create mode 100644 Dragon/src/EPCRMU.f create mode 100644 Dragon/src/EPCRMV.f create mode 100644 Dragon/src/EPCRPD.f create mode 100644 Dragon/src/EVO.f create mode 100644 Dragon/src/EVOBLD.f create mode 100644 Dragon/src/EVODPL.f create mode 100644 Dragon/src/EVODRV.f create mode 100644 Dragon/src/EVOGET.f create mode 100644 Dragon/src/EVOKAP.f create mode 100644 Dragon/src/EVOMU1.f create mode 100644 Dragon/src/EVOODE.f create mode 100644 Dragon/src/EVORK.f create mode 100644 Dragon/src/EVOSAT.f create mode 100644 Dragon/src/EVOSIG.f create mode 100644 Dragon/src/EVOSOL.f create mode 100644 Dragon/src/EXCELP.f create mode 100644 Dragon/src/EXCELT.f create mode 100644 Dragon/src/FLU.f create mode 100644 Dragon/src/FLU2AC.f create mode 100644 Dragon/src/FLU2DR.f create mode 100644 Dragon/src/FLUALB.f create mode 100644 Dragon/src/FLUBAL.f create mode 100644 Dragon/src/FLUBLN.f create mode 100644 Dragon/src/FLUDBV.f create mode 100644 Dragon/src/FLUDRV.f create mode 100644 Dragon/src/FLUGPI.f create mode 100644 Dragon/src/FLUGPT.f create mode 100644 Dragon/src/FLUKEF.f create mode 100644 Dragon/src/FLULPN.f create mode 100644 Dragon/src/FLUSOU.f90 create mode 100644 Dragon/src/FMAC.f create mode 100644 Dragon/src/FMAC01.f create mode 100644 Dragon/src/FMAC02.f create mode 100644 Dragon/src/FMAC03.f create mode 100644 Dragon/src/FMAC04.f create mode 100644 Dragon/src/FMT.f create mode 100644 Dragon/src/FMTBRN.f create mode 100644 Dragon/src/FMTDFD.f create mode 100644 Dragon/src/FMTDFL.f create mode 100644 Dragon/src/FMTGET.f create mode 100644 Dragon/src/FMTGIS.f create mode 100644 Dragon/src/FMTSUD.f create mode 100644 Dragon/src/FMTSUS.f create mode 100644 Dragon/src/FSDF.f90 create mode 100644 Dragon/src/GEO.f create mode 100644 Dragon/src/GEOIN1.f create mode 100644 Dragon/src/GEOMIX.f create mode 100644 Dragon/src/HEADRV.f create mode 100644 Dragon/src/HEAT.f create mode 100644 Dragon/src/INF.f create mode 100644 Dragon/src/INFAPL.f create mode 100644 Dragon/src/INFDRA.f create mode 100644 Dragon/src/INFNDA.f create mode 100644 Dragon/src/INFPSA.f create mode 100644 Dragon/src/INFTR1.f create mode 100644 Dragon/src/INFTR2.f create mode 100644 Dragon/src/INFWAN.f create mode 100644 Dragon/src/INFWAT.f create mode 100644 Dragon/src/INFWD4.f create mode 100644 Dragon/src/INFWIM.f create mode 100644 Dragon/src/KDRDRV.F create mode 100644 Dragon/src/KELMRG.f create mode 100644 Dragon/src/KELRNG.f create mode 100644 Dragon/src/KELSYM.f create mode 100644 Dragon/src/LDRASS.f create mode 100644 Dragon/src/LDRCEL.f create mode 100644 Dragon/src/LDRGEO.f create mode 100644 Dragon/src/LELCHK.f create mode 100644 Dragon/src/LELCRN.f create mode 100644 Dragon/src/LELCSY.f create mode 100644 Dragon/src/LHXUNH.f create mode 100644 Dragon/src/LIB.f create mode 100644 Dragon/src/LIBA20.f create mode 100644 Dragon/src/LIBA21.f create mode 100644 Dragon/src/LIBA22.f create mode 100644 Dragon/src/LIBA23.f create mode 100644 Dragon/src/LIBA24.f create mode 100644 Dragon/src/LIBA25.f create mode 100644 Dragon/src/LIBA26.f create mode 100644 Dragon/src/LIBA27.f create mode 100644 Dragon/src/LIBA28.f create mode 100644 Dragon/src/LIBA2G.f create mode 100644 Dragon/src/LIBA30.f create mode 100644 Dragon/src/LIBA33.f create mode 100644 Dragon/src/LIBA34.f create mode 100644 Dragon/src/LIBADD.f create mode 100644 Dragon/src/LIBADJ.f create mode 100644 Dragon/src/LIBAPL.f create mode 100644 Dragon/src/LIBBAS.f create mode 100644 Dragon/src/LIBCAT.f create mode 100644 Dragon/src/LIBCMB.f create mode 100644 Dragon/src/LIBCOM.f create mode 100644 Dragon/src/LIBCON.f create mode 100644 Dragon/src/LIBCOR.f create mode 100644 Dragon/src/LIBCOV.f create mode 100644 Dragon/src/LIBCTL.f create mode 100644 Dragon/src/LIBD10.F create mode 100644 Dragon/src/LIBDEN.f create mode 100644 Dragon/src/LIBDEP.F create mode 100644 Dragon/src/LIBDI1.f create mode 100644 Dragon/src/LIBDI2.f create mode 100644 Dragon/src/LIBDI3.f create mode 100644 Dragon/src/LIBDI4.f create mode 100644 Dragon/src/LIBDI5.f create mode 100644 Dragon/src/LIBDI6.f create mode 100644 Dragon/src/LIBDI8.f create mode 100644 Dragon/src/LIBDI9.f create mode 100644 Dragon/src/LIBDRA.f create mode 100644 Dragon/src/LIBDRB.f create mode 100644 Dragon/src/LIBE3R.f create mode 100644 Dragon/src/LIBEAD.f create mode 100644 Dragon/src/LIBEAI.f create mode 100644 Dragon/src/LIBEAR.f create mode 100644 Dragon/src/LIBECT.f create mode 100644 Dragon/src/LIBEED.f90 create mode 100644 Dragon/src/LIBEIR.f create mode 100644 Dragon/src/LIBENI.f create mode 100644 Dragon/src/LIBENR.f create mode 100644 Dragon/src/LIBEPR.f create mode 100644 Dragon/src/LIBEST.f create mode 100644 Dragon/src/LIBEWI.f create mode 100644 Dragon/src/LIBEWR.f create mode 100644 Dragon/src/LIBEXT.f create mode 100644 Dragon/src/LIBFQD.f create mode 100644 Dragon/src/LIBINF.f create mode 100644 Dragon/src/LIBINP.f create mode 100644 Dragon/src/LIBIPS.f create mode 100644 Dragon/src/LIBLAG.f create mode 100644 Dragon/src/LIBLEX.f create mode 100644 Dragon/src/LIBLIB.f create mode 100644 Dragon/src/LIBLIC.F create mode 100644 Dragon/src/LIBMAC.f create mode 100644 Dragon/src/LIBMIC.f create mode 100644 Dragon/src/LIBMIX.f create mode 100644 Dragon/src/LIBMOM.f create mode 100644 Dragon/src/LIBMPA.f create mode 100644 Dragon/src/LIBND0.f create mode 100644 Dragon/src/LIBND1.f create mode 100644 Dragon/src/LIBND3.f create mode 100644 Dragon/src/LIBND5.f create mode 100644 Dragon/src/LIBND6.f create mode 100644 Dragon/src/LIBND7.f create mode 100644 Dragon/src/LIBNFI.f create mode 100644 Dragon/src/LIBNOT.f create mode 100644 Dragon/src/LIBNRG.F create mode 100644 Dragon/src/LIBOMG.f create mode 100644 Dragon/src/LIBPRI.f create mode 100644 Dragon/src/LIBPTT.f create mode 100644 Dragon/src/LIBPTW.f create mode 100644 Dragon/src/LIBRSC.f create mode 100644 Dragon/src/LIBRSE.f create mode 100644 Dragon/src/LIBSDC.f create mode 100644 Dragon/src/LIBSEC.f create mode 100644 Dragon/src/LIBSUB.f create mode 100644 Dragon/src/LIBTAB.f create mode 100644 Dragon/src/LIBTE2.f create mode 100644 Dragon/src/LIBTER.f create mode 100644 Dragon/src/LIBTR1.f create mode 100644 Dragon/src/LIBTR2.f create mode 100644 Dragon/src/LIBWD4.f create mode 100644 Dragon/src/LIBWE.f create mode 100644 Dragon/src/LIBWED.f create mode 100644 Dragon/src/LIBWET.f create mode 100644 Dragon/src/LIBWID.f create mode 100644 Dragon/src/LIBWIM.f create mode 100644 Dragon/src/LIBWRE.f create mode 100644 Dragon/src/LIBWRG.f create mode 100644 Dragon/src/LIBWRI.f create mode 100644 Dragon/src/LIBWRP.f create mode 100644 Dragon/src/LIBWSC.f create mode 100644 Dragon/src/LIBWTE.f create mode 100644 Dragon/src/LIBWTF.f create mode 100644 Dragon/src/LIBXS1.f create mode 100644 Dragon/src/LIBXS2.f create mode 100644 Dragon/src/LIBXS3.f create mode 100644 Dragon/src/LIBXS4.f create mode 100644 Dragon/src/LIBXS5.f create mode 100644 Dragon/src/LIBXS6.f create mode 100644 Dragon/src/M2T.f create mode 100644 Dragon/src/M2TDRV.f create mode 100644 Dragon/src/MAC.f create mode 100644 Dragon/src/MACDRV.f create mode 100644 Dragon/src/MACIXS.f create mode 100644 Dragon/src/MACNFI.f create mode 100644 Dragon/src/MACNXS.f create mode 100644 Dragon/src/MACOPT.f create mode 100644 Dragon/src/MACPRM.f create mode 100644 Dragon/src/MACPXS.f create mode 100644 Dragon/src/MACRDM.f create mode 100644 Dragon/src/MACUPD.f create mode 100644 Dragon/src/MACUPG.f create mode 100644 Dragon/src/MACWXS.f create mode 100644 Dragon/src/MACXSR.f create mode 100644 Dragon/src/MCCGA.f create mode 100644 Dragon/src/MCCGF.f create mode 100644 Dragon/src/MCCGT.f create mode 100644 Dragon/src/MCGABG.f create mode 100644 Dragon/src/MCGABGR.f create mode 100644 Dragon/src/MCGACA.f create mode 100644 Dragon/src/MCGASM.f create mode 100644 Dragon/src/MCGBIC.f create mode 100644 Dragon/src/MCGCAL.f create mode 100644 Dragon/src/MCGCDD.f create mode 100644 Dragon/src/MCGCOEF.f create mode 100644 Dragon/src/MCGDDDF.f create mode 100644 Dragon/src/MCGDDF.f create mode 100644 Dragon/src/MCGDDFL.f create mode 100644 Dragon/src/MCGDDFS.f create mode 100644 Dragon/src/MCGDDFT.f create mode 100644 Dragon/src/MCGDS1.f create mode 100644 Dragon/src/MCGDS2.f create mode 100644 Dragon/src/MCGDS2A.f create mode 100644 Dragon/src/MCGDS2E.f create mode 100644 Dragon/src/MCGDS3.f create mode 100644 Dragon/src/MCGDS4.f create mode 100644 Dragon/src/MCGDS6.f create mode 100644 Dragon/src/MCGDSCA.f create mode 100644 Dragon/src/MCGDSCB.f create mode 100644 Dragon/src/MCGDSCE.f create mode 100644 Dragon/src/MCGDSD.f create mode 100644 Dragon/src/MCGDSP.f create mode 100644 Dragon/src/MCGDTV.f create mode 100644 Dragon/src/MCGDYA.f create mode 100644 Dragon/src/MCGFCA.f create mode 100644 Dragon/src/MCGFCF.f create mode 100644 Dragon/src/MCGFCR.f create mode 100644 Dragon/src/MCGFCS.f create mode 100644 Dragon/src/MCGFFAL.f create mode 100644 Dragon/src/MCGFFAR.f create mode 100644 Dragon/src/MCGFFAS.f create mode 100644 Dragon/src/MCGFFAT.f create mode 100644 Dragon/src/MCGFFIR.f create mode 100644 Dragon/src/MCGFFIS.f create mode 100644 Dragon/src/MCGFFIT.f create mode 100644 Dragon/src/MCGFL1.f create mode 100644 Dragon/src/MCGFLS.f create mode 100644 Dragon/src/MCGFLX.f create mode 100644 Dragon/src/MCGFMC.f create mode 100644 Dragon/src/MCGFST.f create mode 100644 Dragon/src/MCGMRE.f create mode 100644 Dragon/src/MCGPJJ.f create mode 100644 Dragon/src/MCGPRA.f create mode 100644 Dragon/src/MCGPT1.f create mode 100644 Dragon/src/MCGPT2.f create mode 100644 Dragon/src/MCGPTA.f create mode 100644 Dragon/src/MCGPTF.f create mode 100644 Dragon/src/MCGPTN.f create mode 100644 Dragon/src/MCGPTS.f create mode 100644 Dragon/src/MCGPTV.f create mode 100644 Dragon/src/MCGREC.f create mode 100644 Dragon/src/MCGSCA.f create mode 100644 Dragon/src/MCGSCAL.f create mode 100644 Dragon/src/MCGSCAS.f create mode 100644 Dragon/src/MCGSCAT.f create mode 100644 Dragon/src/MCGSCE.f create mode 100644 Dragon/src/MCGSCEL.f create mode 100644 Dragon/src/MCGSCES.f create mode 100644 Dragon/src/MCGSCET.f create mode 100644 Dragon/src/MCGSCR.f create mode 100644 Dragon/src/MCGSCS.f create mode 100644 Dragon/src/MCGSIG.f create mode 100644 Dragon/src/MCGTMT.f create mode 100644 Dragon/src/MCGTRK.f create mode 100644 Dragon/src/MCT.f create mode 100644 Dragon/src/MCTALLY.f create mode 100644 Dragon/src/MCTCCC.f create mode 100644 Dragon/src/MCTCTR.f create mode 100644 Dragon/src/MCTFLX.f create mode 100644 Dragon/src/MCTGET.f create mode 100644 Dragon/src/MCTLDC.f create mode 100644 Dragon/src/MCTLDP.f create mode 100644 Dragon/src/MCTLIB.f create mode 100644 Dragon/src/MCTOUT.f create mode 100644 Dragon/src/MCTPIR.f create mode 100644 Dragon/src/MCTPSP.f create mode 100644 Dragon/src/MCTPTR.f create mode 100644 Dragon/src/MCTRK.f create mode 100644 Dragon/src/MESHST.f create mode 100644 Dragon/src/MOCCAL.f create mode 100644 Dragon/src/MOCCHR.f create mode 100644 Dragon/src/MOCDDF.f create mode 100644 Dragon/src/MOCDDFL.f create mode 100644 Dragon/src/MOCDDFS.f create mode 100644 Dragon/src/MOCDDFT.f create mode 100644 Dragon/src/MOCDS2.f create mode 100644 Dragon/src/MOCDSP.f create mode 100644 Dragon/src/MOCFCF.f create mode 100644 Dragon/src/MOCFFAL.f create mode 100644 Dragon/src/MOCFFAR.f create mode 100644 Dragon/src/MOCFFAS.f create mode 100644 Dragon/src/MOCFFAT.f create mode 100644 Dragon/src/MOCFFIR.f create mode 100644 Dragon/src/MOCFFIS.f create mode 100644 Dragon/src/MOCFFIT.f create mode 100644 Dragon/src/MOCIK3.f create mode 100644 Dragon/src/MOCSCA.f create mode 100644 Dragon/src/MOCSCAL.f create mode 100644 Dragon/src/MOCSCAS.f create mode 100644 Dragon/src/MOCSCAT.f create mode 100644 Dragon/src/MOCSCE.f create mode 100644 Dragon/src/MOCSCEL.f create mode 100644 Dragon/src/MOCSCES.f create mode 100644 Dragon/src/MOCSCET.f create mode 100644 Dragon/src/MPO.f create mode 100644 Dragon/src/MPOCA2.f create mode 100644 Dragon/src/MPOCAL.f create mode 100644 Dragon/src/MPOCAT.f create mode 100644 Dragon/src/MPOGEP.f create mode 100644 Dragon/src/MPOGEY.f create mode 100644 Dragon/src/MPOIDF.f create mode 100644 Dragon/src/MPOPAV.f create mode 100644 Dragon/src/MPOTOC.f create mode 100644 Dragon/src/MRG.f create mode 100644 Dragon/src/MRGGET.f create mode 100644 Dragon/src/MRGLIN.f create mode 100644 Dragon/src/MRGVOL.f create mode 100644 Dragon/src/MRGVON.f create mode 100644 Dragon/src/MRGVST.f create mode 100644 Dragon/src/MRGXTC.f create mode 100644 Dragon/src/MUSA.f90 create mode 100644 Dragon/src/MUSACG.f90 create mode 100644 Dragon/src/MUSF.f90 create mode 100644 Dragon/src/MUSJJ2.f90 create mode 100644 Dragon/src/MUSP.f90 create mode 100644 Dragon/src/Makefile create mode 100644 Dragon/src/NUMER3.f create mode 100644 Dragon/src/NUMERH.f create mode 100644 Dragon/src/NXT.f create mode 100644 Dragon/src/NXT3T2.f create mode 100644 Dragon/src/NXTACG.f create mode 100644 Dragon/src/NXTAGM.f create mode 100644 Dragon/src/NXTAVS.f create mode 100644 Dragon/src/NXTBCG.f create mode 100644 Dragon/src/NXTBRT.f create mode 100644 Dragon/src/NXTCUA.f create mode 100644 Dragon/src/NXTCVM.f create mode 100644 Dragon/src/NXTCVS.f create mode 100644 Dragon/src/NXTEGI.f create mode 100644 Dragon/src/NXTETH.f create mode 100644 Dragon/src/NXTETS.f create mode 100644 Dragon/src/NXTFID.f create mode 100644 Dragon/src/NXTGET.f create mode 100644 Dragon/src/NXTGMD.f create mode 100644 Dragon/src/NXTHCL.f create mode 100644 Dragon/src/NXTHRS.f create mode 100644 Dragon/src/NXTHUA.f create mode 100644 Dragon/src/NXTIAA.f create mode 100644 Dragon/src/NXTIHA.f create mode 100644 Dragon/src/NXTIND.f create mode 100644 Dragon/src/NXTIRA.f create mode 100644 Dragon/src/NXTIRR.f create mode 100644 Dragon/src/NXTITA.f create mode 100644 Dragon/src/NXTLCA.f create mode 100644 Dragon/src/NXTLCU.f create mode 100644 Dragon/src/NXTLCY.f create mode 100644 Dragon/src/NXTLDC.f create mode 100644 Dragon/src/NXTLDP.f create mode 100644 Dragon/src/NXTLHA.f create mode 100644 Dragon/src/NXTLHT.f create mode 100644 Dragon/src/NXTLRH.f create mode 100644 Dragon/src/NXTLRS.f create mode 100644 Dragon/src/NXTLSN.f create mode 100644 Dragon/src/NXTMCA.f create mode 100644 Dragon/src/NXTMCB.f create mode 100644 Dragon/src/NXTMCC.f create mode 100644 Dragon/src/NXTMCD.f create mode 100644 Dragon/src/NXTPCA.f create mode 100644 Dragon/src/NXTPCC.f create mode 100644 Dragon/src/NXTPHC.f create mode 100644 Dragon/src/NXTPHT.f create mode 100644 Dragon/src/NXTPR3.f create mode 100644 Dragon/src/NXTPRA.f create mode 100644 Dragon/src/NXTPRI.f create mode 100644 Dragon/src/NXTPRR.f create mode 100644 Dragon/src/NXTQAC.f create mode 100644 Dragon/src/NXTQAS.f create mode 100644 Dragon/src/NXTQEW.f create mode 100644 Dragon/src/NXTQLC.f create mode 100644 Dragon/src/NXTQLT.f create mode 100644 Dragon/src/NXTQPS.f create mode 100644 Dragon/src/NXTQRN.f create mode 100644 Dragon/src/NXTQSC.f create mode 100644 Dragon/src/NXTQSS.f create mode 100644 Dragon/src/NXTRCS.f create mode 100644 Dragon/src/NXTRIS.f create mode 100644 Dragon/src/NXTRPS.f create mode 100644 Dragon/src/NXTRTL.f create mode 100644 Dragon/src/NXTRTS.f create mode 100644 Dragon/src/NXTSGI.f create mode 100644 Dragon/src/NXTSGT.f create mode 100644 Dragon/src/NXTSQD.f create mode 100644 Dragon/src/NXTTCG.f create mode 100644 Dragon/src/NXTTCR.f create mode 100644 Dragon/src/NXTTGC.f create mode 100644 Dragon/src/NXTTGS.f create mode 100644 Dragon/src/NXTTLC.f create mode 100644 Dragon/src/NXTTLO.f create mode 100644 Dragon/src/NXTTLS.f create mode 100644 Dragon/src/NXTTNS.f create mode 100644 Dragon/src/NXTTPO.f create mode 100644 Dragon/src/NXTTPS.f create mode 100644 Dragon/src/NXTTRM.f create mode 100644 Dragon/src/NXTTRS.f create mode 100644 Dragon/src/NXTVCA.f create mode 100644 Dragon/src/NXTVCC.f create mode 100644 Dragon/src/NXTVHC.f create mode 100644 Dragon/src/NXTVHT.f create mode 100644 Dragon/src/NXTVOL.f create mode 100644 Dragon/src/NXTXYZ.f create mode 100644 Dragon/src/PIJAAA.f create mode 100644 Dragon/src/PIJABC.f create mode 100644 Dragon/src/PIJCMP.f create mode 100644 Dragon/src/PIJD2R.f create mode 100644 Dragon/src/PIJD2S.f create mode 100644 Dragon/src/PIJI2D.f create mode 100644 Dragon/src/PIJI3D.f create mode 100644 Dragon/src/PIJKST.f create mode 100644 Dragon/src/PIJRDG.f create mode 100644 Dragon/src/PIJRGL.f create mode 100644 Dragon/src/PIJRHL.f create mode 100644 Dragon/src/PIJRNL.f create mode 100644 Dragon/src/PIJS2D.f create mode 100644 Dragon/src/PIJS3D.f create mode 100644 Dragon/src/PIJSMD.f create mode 100644 Dragon/src/PIJWIJ.f create mode 100644 Dragon/src/PIJWPR.f create mode 100644 Dragon/src/PIJXL3.f create mode 100644 Dragon/src/PNFLV.f create mode 100644 Dragon/src/PNSH.f90 create mode 100644 Dragon/src/PRECISION_AND_KINDS.f90 create mode 100644 Dragon/src/PSOISO.f create mode 100644 Dragon/src/PSOMON.f create mode 100644 Dragon/src/PSOUR.f create mode 100644 Dragon/src/PSOUSN.f create mode 100644 Dragon/src/PSP.f create mode 100644 Dragon/src/PSPCOL.f create mode 100644 Dragon/src/PSPFCD.f create mode 100644 Dragon/src/PSPFIL.f create mode 100644 Dragon/src/PSPGET.f create mode 100644 Dragon/src/PSPLEG.f create mode 100644 Dragon/src/PSPMCP.f create mode 100644 Dragon/src/PSPNXT.f create mode 100644 Dragon/src/PSPRAI.f create mode 100644 Dragon/src/PSPTCR.f create mode 100644 Dragon/src/PSPTHR.f create mode 100644 Dragon/src/PSPTRK.f create mode 100644 Dragon/src/PSPXCG.f create mode 100644 Dragon/src/PSPXEL.f create mode 100644 Dragon/src/QIJCMP.f create mode 100644 Dragon/src/QIJI3D.f create mode 100644 Dragon/src/READBH.f create mode 100644 Dragon/src/READEU.f create mode 100644 Dragon/src/READMT.f create mode 100644 Dragon/src/RECT1.f create mode 100644 Dragon/src/RECT2.f create mode 100644 Dragon/src/S2M.f create mode 100644 Dragon/src/S2MGET.f create mode 100644 Dragon/src/SALACG.f90 create mode 100644 Dragon/src/SALEND.f90 create mode 100644 Dragon/src/SALGET_FUNS_MOD.f90 create mode 100644 Dragon/src/SALMUS.f90 create mode 100644 Dragon/src/SALT.f90 create mode 100644 Dragon/src/SALTCG.f create mode 100644 Dragon/src/SALTLC.f90 create mode 100644 Dragon/src/SALTLS.f90 create mode 100644 Dragon/src/SAL_AUX_MOD.f90 create mode 100644 Dragon/src/SAL_GEOMETRY_MOD.f90 create mode 100644 Dragon/src/SAL_GEOMETRY_TYPES.f90 create mode 100644 Dragon/src/SAL_NUMERIC_MOD.f90 create mode 100644 Dragon/src/SAL_TRACKING_TYPES.f90 create mode 100644 Dragon/src/SAL_TRAJECTORY_MOD.f90 create mode 100644 Dragon/src/SAP.f create mode 100644 Dragon/src/SAPCA2.f create mode 100644 Dragon/src/SAPCAL.f create mode 100644 Dragon/src/SAPCAT.f create mode 100644 Dragon/src/SAPFLU.f create mode 100644 Dragon/src/SAPFWC.f create mode 100644 Dragon/src/SAPGEP.f create mode 100644 Dragon/src/SAPGEY.f create mode 100644 Dragon/src/SAPIDF.f create mode 100644 Dragon/src/SAPPAV.f create mode 100644 Dragon/src/SAPSPH.f create mode 100644 Dragon/src/SEN.f create mode 100644 Dragon/src/SENCAL.f create mode 100644 Dragon/src/SENCNT.f create mode 100644 Dragon/src/SENDRV.f create mode 100644 Dragon/src/SENGET.f create mode 100644 Dragon/src/SHI.f create mode 100644 Dragon/src/SHIDIL.f create mode 100644 Dragon/src/SHIDRV.f create mode 100644 Dragon/src/SHIDST.f create mode 100644 Dragon/src/SHIEQU.f create mode 100644 Dragon/src/SHIRAT.f create mode 100644 Dragon/src/SHISN2.f create mode 100644 Dragon/src/SHISN3.f create mode 100644 Dragon/src/SNADPT.f create mode 100644 Dragon/src/SNDSA.f create mode 100644 Dragon/src/SNEST.f create mode 100644 Dragon/src/SNF.f create mode 100644 Dragon/src/SNFBC1.f create mode 100644 Dragon/src/SNFBC2.F create mode 100644 Dragon/src/SNFBC3.F create mode 100644 Dragon/src/SNFBH2.F create mode 100644 Dragon/src/SNFBH3.F create mode 100644 Dragon/src/SNFC12.f create mode 100644 Dragon/src/SNFE1D.f create mode 100644 Dragon/src/SNFE2D.F create mode 100644 Dragon/src/SNFE3D.F create mode 100644 Dragon/src/SNFG2D.F create mode 100644 Dragon/src/SNFG3D.F create mode 100644 Dragon/src/SNFKC2.F create mode 100644 Dragon/src/SNFKC3.F create mode 100644 Dragon/src/SNFKH2.F create mode 100644 Dragon/src/SNFKH3.F create mode 100644 Dragon/src/SNFLUX.f create mode 100644 Dragon/src/SNFT12.F create mode 100644 Dragon/src/SNFT1C.f create mode 100644 Dragon/src/SNFT1S.f create mode 100644 Dragon/src/SNGMRE.f create mode 100644 Dragon/src/SNQU01.f create mode 100644 Dragon/src/SNQU02.f create mode 100644 Dragon/src/SNQU03.f create mode 100644 Dragon/src/SNQU04.f create mode 100644 Dragon/src/SNQU05.f create mode 100644 Dragon/src/SNQU06.f create mode 100644 Dragon/src/SNQU07.f create mode 100644 Dragon/src/SNQU10.f create mode 100644 Dragon/src/SNSBFP.f create mode 100644 Dragon/src/SNSOUR.f create mode 100644 Dragon/src/SNT.f create mode 100644 Dragon/src/SNT1DC.f create mode 100644 Dragon/src/SNT1DP.f create mode 100644 Dragon/src/SNT1DS.f create mode 100644 Dragon/src/SNTRK.f create mode 100644 Dragon/src/SNTSFH.f create mode 100644 Dragon/src/SNTT2D.f create mode 100644 Dragon/src/SNTT3D.f create mode 100644 Dragon/src/SPH.F create mode 100644 Dragon/src/SPHAPX.f create mode 100644 Dragon/src/SPHCMA.f create mode 100644 Dragon/src/SPHCMI.f create mode 100644 Dragon/src/SPHCPO.f create mode 100644 Dragon/src/SPHDRV.f create mode 100644 Dragon/src/SPHEMB.f create mode 100644 Dragon/src/SPHEQU.f create mode 100644 Dragon/src/SPHGAP.f create mode 100644 Dragon/src/SPHMAC.f create mode 100644 Dragon/src/SPHMOL.f create mode 100644 Dragon/src/SPHMPO.f create mode 100644 Dragon/src/SPHSAP.f create mode 100644 Dragon/src/SPHSCO.f create mode 100644 Dragon/src/SPHSTM.f create mode 100644 Dragon/src/SPHSTO.f create mode 100644 Dragon/src/SPHSX5.f create mode 100644 Dragon/src/SPHSXS.f create mode 100644 Dragon/src/SPHTRA.f create mode 100644 Dragon/src/SYB001.f create mode 100644 Dragon/src/SYB002.f create mode 100644 Dragon/src/SYB003.f create mode 100644 Dragon/src/SYB004.f create mode 100644 Dragon/src/SYB005.f create mode 100644 Dragon/src/SYB31C.f create mode 100644 Dragon/src/SYB32C.f create mode 100644 Dragon/src/SYB33C.f create mode 100644 Dragon/src/SYB41C.f create mode 100644 Dragon/src/SYB43C.f create mode 100644 Dragon/src/SYB4QG.f create mode 100644 Dragon/src/SYB4T1.f create mode 100644 Dragon/src/SYB4T2.f create mode 100644 Dragon/src/SYB4T3.f create mode 100644 Dragon/src/SYB4T4.f create mode 100644 Dragon/src/SYB4TC.f create mode 100644 Dragon/src/SYB4TH.f create mode 100644 Dragon/src/SYB4TI.f create mode 100644 Dragon/src/SYB4TN.f create mode 100644 Dragon/src/SYB4TR.f create mode 100644 Dragon/src/SYB4TS.f create mode 100644 Dragon/src/SYB4VO.f create mode 100644 Dragon/src/SYB7QG.f create mode 100644 Dragon/src/SYB7T0.f create mode 100644 Dragon/src/SYB7TC.f create mode 100644 Dragon/src/SYB7TE.f create mode 100644 Dragon/src/SYB7TN.f create mode 100644 Dragon/src/SYB7TR.f create mode 100644 Dragon/src/SYB7TS.f create mode 100644 Dragon/src/SYB7TW.f create mode 100644 Dragon/src/SYB7VO.f create mode 100644 Dragon/src/SYBALC.f create mode 100644 Dragon/src/SYBALP.f create mode 100644 Dragon/src/SYBALS.f create mode 100644 Dragon/src/SYBCP1.f create mode 100644 Dragon/src/SYBEUR.f create mode 100644 Dragon/src/SYBHN2.f create mode 100644 Dragon/src/SYBHTK.f create mode 100644 Dragon/src/SYBILA.f create mode 100644 Dragon/src/SYBILF.f create mode 100644 Dragon/src/SYBILP.f create mode 100644 Dragon/src/SYBILT.f create mode 100644 Dragon/src/SYBJJ0.f create mode 100644 Dragon/src/SYBJJ1.f create mode 100644 Dragon/src/SYBJJ2.f create mode 100644 Dragon/src/SYBPRX.f create mode 100644 Dragon/src/SYBRHL.f create mode 100644 Dragon/src/SYBRII.f create mode 100644 Dragon/src/SYBRIJ.f create mode 100644 Dragon/src/SYBRN2.f create mode 100644 Dragon/src/SYBRTK.f create mode 100644 Dragon/src/SYBRX2.f create mode 100644 Dragon/src/SYBRX3.f create mode 100644 Dragon/src/SYBRXE.f create mode 100644 Dragon/src/SYBT1D.f create mode 100644 Dragon/src/SYBTRK.f create mode 100644 Dragon/src/SYBUP0.f create mode 100644 Dragon/src/SYBUP1.f create mode 100644 Dragon/src/SYBUQ0.f create mode 100644 Dragon/src/SYBUQV.f create mode 100644 Dragon/src/SYBWIJ.f create mode 100644 Dragon/src/TLM.f create mode 100644 Dragon/src/TLMDIR.f create mode 100644 Dragon/src/TLMGEO.f create mode 100644 Dragon/src/TLMGET.f create mode 100644 Dragon/src/TLMPLA.f create mode 100644 Dragon/src/TLMPLP.f create mode 100644 Dragon/src/TLMPNT.f create mode 100644 Dragon/src/TLMREG.f create mode 100644 Dragon/src/TLMVPL.f create mode 100644 Dragon/src/TONCMI.f create mode 100644 Dragon/src/TONDRV.f create mode 100644 Dragon/src/TONDST.f create mode 100644 Dragon/src/TONE.f create mode 100644 Dragon/src/TONSN3.f create mode 100644 Dragon/src/TONSPH.f create mode 100644 Dragon/src/TRA.f create mode 100644 Dragon/src/TRAGRO.f create mode 100644 Dragon/src/TRAXS.f create mode 100644 Dragon/src/TRFICF.f create mode 100644 Dragon/src/TRIFIS.f create mode 100644 Dragon/src/TRIFLV.f create mode 100644 Dragon/src/TRIVA.f create mode 100644 Dragon/src/TRIVSO.f create mode 100644 Dragon/src/TRKHEX.f create mode 100644 Dragon/src/USS.f create mode 100644 Dragon/src/USSCOR.f create mode 100644 Dragon/src/USSDRV.f create mode 100644 Dragon/src/USSEXC.f create mode 100644 Dragon/src/USSEXD.f create mode 100644 Dragon/src/USSFLU.f create mode 100644 Dragon/src/USSIN1.f create mode 100644 Dragon/src/USSIST.f create mode 100644 Dragon/src/USSIT0.f create mode 100644 Dragon/src/USSIT1.f create mode 100644 Dragon/src/USSIT2.f create mode 100644 Dragon/src/USSIT3.f create mode 100644 Dragon/src/USSIT4.f create mode 100644 Dragon/src/USSONE.f create mode 100644 Dragon/src/USSRSE.f create mode 100644 Dragon/src/USSSEK.f create mode 100644 Dragon/src/USSSPH.f create mode 100644 Dragon/src/VDG.f create mode 100644 Dragon/src/XCGBCM.f create mode 100644 Dragon/src/XCGDIM.f create mode 100644 Dragon/src/XCGGEO.f create mode 100644 Dragon/src/XCGROD.f create mode 100644 Dragon/src/XCWHEX.f create mode 100644 Dragon/src/XCWICL.f create mode 100644 Dragon/src/XCWREC.f create mode 100644 Dragon/src/XCWROD.f create mode 100644 Dragon/src/XCWSCL.f create mode 100644 Dragon/src/XCWSRT.f create mode 100644 Dragon/src/XCWTRK.f create mode 100644 Dragon/src/XDDCOM.f create mode 100644 Dragon/src/XDRCRE.f create mode 100644 Dragon/src/XDREXP.f create mode 100644 Dragon/src/XDRH11.f create mode 100644 Dragon/src/XDRH12.f create mode 100644 Dragon/src/XDRH13.f create mode 100644 Dragon/src/XDRH20.f create mode 100644 Dragon/src/XDRH23.f create mode 100644 Dragon/src/XDRH30.f create mode 100644 Dragon/src/XDRH33.f create mode 100644 Dragon/src/XDRKIN.f create mode 100644 Dragon/src/XDRLGS.f create mode 100644 Dragon/src/XDRLXS.f create mode 100644 Dragon/src/XDRNRM.f create mode 100644 Dragon/src/XDRTA2.f create mode 100644 Dragon/src/XDRTBH.f create mode 100644 Dragon/src/XEL3T2.f create mode 100644 Dragon/src/XELBIN.f create mode 100644 Dragon/src/XELCMP.f create mode 100644 Dragon/src/XELCOP.f create mode 100644 Dragon/src/XELCOR.f create mode 100644 Dragon/src/XELCRN.f create mode 100644 Dragon/src/XELCTR.f create mode 100644 Dragon/src/XELDCL.f create mode 100644 Dragon/src/XELDRV.f create mode 100644 Dragon/src/XELEDC.f create mode 100644 Dragon/src/XELEQN.f create mode 100644 Dragon/src/XELETR.f create mode 100644 Dragon/src/XELGPR.f create mode 100644 Dragon/src/XELGRD.f create mode 100644 Dragon/src/XELLIN.f create mode 100644 Dragon/src/XELLSR.f create mode 100644 Dragon/src/XELMRG.f create mode 100644 Dragon/src/XELNTR.f create mode 100644 Dragon/src/XELPR3.f create mode 100644 Dragon/src/XELPRC.f create mode 100644 Dragon/src/XELPRP.f create mode 100644 Dragon/src/XELPSC.f create mode 100644 Dragon/src/XELPSI.f create mode 100644 Dragon/src/XELTCW.f create mode 100644 Dragon/src/XELTI2.f create mode 100644 Dragon/src/XELTI3.f create mode 100644 Dragon/src/XELTRK.f create mode 100644 Dragon/src/XELTRP.f create mode 100644 Dragon/src/XELTS2.f create mode 100644 Dragon/src/XELTSA.f create mode 100644 Dragon/src/XELTSW.f create mode 100644 Dragon/src/XELVOL.f create mode 100644 Dragon/src/XHX2D0.f create mode 100644 Dragon/src/XHX2D1.f create mode 100644 Dragon/src/XHXTRK.f create mode 100644 Dragon/src/XL3NTR.f create mode 100644 Dragon/src/XL3SIG.f create mode 100644 Dragon/src/XL3TI3.f create mode 100644 Dragon/src/dramod.f90 create mode 100644 Dragon/src/g2s_boundCond.f90 create mode 100644 Dragon/src/g2s_cast.f90 create mode 100644 Dragon/src/g2s_celluleBase.f90 create mode 100644 Dragon/src/g2s_cellulePlaced.f90 create mode 100644 Dragon/src/g2s_constType.f90 create mode 100644 Dragon/src/g2s_constUtil.f90 create mode 100644 Dragon/src/g2s_construire.f90 create mode 100644 Dragon/src/g2s_convert.f90 create mode 100644 Dragon/src/g2s_g2mc.f90 create mode 100644 Dragon/src/g2s_g2s.f90 create mode 100644 Dragon/src/g2s_generateTabSegArc.f90 create mode 100644 Dragon/src/g2s_generatingMC.f90 create mode 100644 Dragon/src/g2s_generatingPS.f90 create mode 100644 Dragon/src/g2s_generatingSAL.f90 create mode 100644 Dragon/src/g2s_generatingTrack.f90 create mode 100644 Dragon/src/g2s_nodes.f90 create mode 100644 Dragon/src/g2s_pretraitement.f90 create mode 100644 Dragon/src/g2s_segArc.f90 create mode 100644 Dragon/src/g2s_unfold.f90 create mode 100644 Dragon/src/sdbm.c create mode 100644 Dragon/src/sdbm.h create mode 100644 Dragon/src/xsdb-defs.h create mode 100644 Dragon/src/xsdbops-sdbm.c create mode 100644 Dragon/src/xsdbops.h create mode 100644 Dragon/src/xsdf.c (limited to 'Dragon') diff --git a/Dragon/Makefile b/Dragon/Makefile new file mode 100644 index 0000000..026013c --- /dev/null +++ b/Dragon/Makefile @@ -0,0 +1,82 @@ +#--------------------------------------------------------------------------- +# +# Makefile for executing the Dragon non-regression tests +# Author : A. Hebert (2018-5-10) +# +#--------------------------------------------------------------------------- +# +OS = $(shell uname -s | cut -d"_" -f1) +ifneq (,$(filter $(OS),SunOS AIX)) + MAKE = gmake +endif +ifeq ($(openmp),1) + nomp = 16 +else + nomp = 0 +endif +ifeq ($(intel),1) + fcompilerSuite = intel +else + ifeq ($(nvidia),1) + fcompilerSuite = nvidia + else + ifeq ($(llvm),1) + fcompilerSuite = llvm + else + fcompilerSuite = custom + endif + endif +endif +all : + $(MAKE) -C src +clean : + $(MAKE) clean -C src +tests : + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q iaea2d.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q g2s_prestation.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q salmacro.x2m +# ./rdragon -c $(fcompilerSuite) -p $(nomp) -q tmacro.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q VanDerGucht.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q VanDerGucht-295.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q uo2_295_kec1_openMP.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q tdraglib.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q twimsE.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q twlup.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q tndas.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q tmatxs2.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q trowland_shem295_jeff3.1.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q uo2_kec1_ecco1962_light.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q lumpSS.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q ASSBLY_CASEA_1level_multicompo.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q OSC_CASEA_1level_rse.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q OSC_CASEA_2level_rse.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q OSC_openMP_tiso.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q sens.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q testVVER7.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q fbr_colorset.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q fbr_tone.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q TEST_GEO_hex_sect_tspc.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q TEST_GEO_latt_tspc_S30.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q testDuo.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q testDuo_B1.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q C2D20.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q CFC-CELL.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q ErmBeavrsPwrRefl.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q DF_RTBeavrsPwrRefl.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q rep900_het_gff_jef2p2.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q RegtestCNG_mccg.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q RegtestLZC_mccg.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q pincell_mco.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q pincell_sap.x2m +ifeq ($(apolib),1) + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q uo2_evo_xsm.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q uo2_evo_hdf.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q ASSBLY_CASEA_1level_apex_boron.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q ASSBLY_CASEA_1level_mpo.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q ASSBLY_VVER_1level_mpo.x2m +endif +ifeq ($(hdf5),1) + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q UOX_5x5_TG6_sym8_multiDom.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q pincell_apx.x2m + ./rdragon -c $(fcompilerSuite) -p $(nomp) -q pincell_mpo.x2m +endif diff --git a/Dragon/data/ASSBLY_CASEA_1level_apex_boron.access b/Dragon/data/ASSBLY_CASEA_1level_apex_boron.access new file mode 100755 index 0000000..72a00c8 --- /dev/null +++ b/Dragon/data/ASSBLY_CASEA_1level_apex_boron.access @@ -0,0 +1,48 @@ +#!/bin/sh +if [ $# = 0 ] + then + echo "usage: ASSBLY_CASEA_1level_apex_boron.access directory" 1>&2 + exit 1 +fi +MACH=`uname -s` +Sysx="`echo $MACH | cut -b -6`" +if [ $Sysx = "CYGWIN" ]; then + MACH=`uname -o` +elif [ $Sysx = "Darwin" ]; then + MACH=`uname -sm` +elif [ $Sysx = "SunOS" ]; then + MACH=`uname -sm` +fi +pos=$1/../../libraries/hdf5 +if [ -f "$pos"/ap3lib-xsect-CEA93_CLA99_GV0LUX_N.h5.gz ] + then + echo 'gunzipping CLA99CEA93' + chmod 755 "$pos" + gunzip "$pos"/ap3lib-xsect-CEA93_CLA99_GV0LUX_N.h5.gz +fi +if [ -f "$pos"/ap3lib-xsect-CEA93_CLA99_GV0LUX_N.h5 ] + then + ln -s "$pos"/ap3lib-xsect-CEA93_CLA99_GV0LUX_N.h5 CLA99CEA93 +fi +if [ -f "$pos"/ap3lib-autop-1-CEA93_CLA99_GV0LUX_N.h5.gz ] + then + echo 'gunzipping CLA99CEA93_SS' + chmod 755 "$pos" + gunzip "$pos"/ap3lib-autop-1-CEA93_CLA99_GV0LUX_N.h5.gz +fi +if [ -f "$pos"/ap3lib-autop-1-CEA93_CLA99_GV0LUX_N.h5 ] + then + ln -s "$pos"/ap3lib-autop-1-CEA93_CLA99_GV0LUX_N.h5 CLA99CEA93_SS +fi +if [ -f "$pos"/Depletion_Data_CH_STD_CEA93_V10_withYields.h5.gz ] + then + echo 'gunzipping CLA99CEA93_EVO' + chmod 755 "$pos" + gunzip "$pos"/Depletion_Data_CH_STD_CEA93_V10_withYields.h5.gz +fi +if [ -f "$pos"/Depletion_Data_CH_STD_CEA93_V10_withYields.h5 ] + then + ln -s "$pos"/Depletion_Data_CH_STD_CEA93_V10_withYields.h5 CLA99CEA93_EVO +fi +ls -l +echo "ASSBLY_CASEA_1level_apex_boron access script terminated" diff --git a/Dragon/data/ASSBLY_CASEA_1level_apex_boron.save b/Dragon/data/ASSBLY_CASEA_1level_apex_boron.save new file mode 100755 index 0000000..1287926 --- /dev/null +++ b/Dragon/data/ASSBLY_CASEA_1level_apex_boron.save @@ -0,0 +1,20 @@ +#!/bin/sh +# +if [ $# = 0 ] + then + echo "usage: ASSBLY_CASEA_1level_apex_boron.save directory" 1>&2 + exit 1 +fi +echo access ASSBLY_CASEA_1level_apex_boron.save +MACH=`uname -s` +Sysx="`echo $MACH | cut -b -6`" +if [ $Sysx = "CYGWIN" ]; then + MACH=`uname -o` +elif [ $Sysx = "AIX" ]; then + MACH=`uname -s` +else + MACH=`uname -sm | sed 's/[ ]/_/'` +fi +ls -l +mv MyApex.hdf $1/"$MACH"/assbly_caseA_apex.hdf +echo "ASSBLY_CASEA_1level_apex_boron.save completed" diff --git a/Dragon/data/ASSBLY_CASEA_1level_apex_boron.x2m b/Dragon/data/ASSBLY_CASEA_1level_apex_boron.x2m new file mode 100644 index 0000000..bcc3295 --- /dev/null +++ b/Dragon/data/ASSBLY_CASEA_1level_apex_boron.x2m @@ -0,0 +1,205 @@ +*---- +* case ASSBLY_CASEA_1level_apex_boron +* 99-group eighth assembly in DRAGON -- 1-level scheme +* production of an Apex file for reflector feeding +* Author: A. Hebert +*---- +HDF5_FILE MyApex :: FILE './MyApex.hdf' ; +LINKED_LIST DONNEES GEOSS GEON2 TRACKSS TRACKN2 LIBRARY LIBRARY2 SYS FLUX2 EDIOBJ ; +MODULE GREP: SYBILT: G2S: SALT: MCCGT: USS: ASM: FLU: EDI: UTL: DELETE: LIB: APX: END: ; +REAL Rcomb1 Rcomb2 Rcomb3 Rcomb4 R_int_TG R_ext_TG R_int_TI R_ext_TI + R_int_G R_ext_G Cote CoteL RmodeN1 Lame pbore ; +SEQ_ASCII ASSBLY_CASEA :: FILE './ASSBLY_CASEA_1level_g2s.txt' ; +SEQ_ASCII FIGASB_CASEA :: FILE './ASSBLY_CASEA_1level_g2s.eps' ; +SEQ_BINARY TF_EXC ; +INTEGER an2d := 8 ; +REAL densur := 20.0 ; +PROCEDURE Geo_SS Geo_N2 Mix_UOX ; +PROCEDURE assertS ; + +************************************************************************ +* BEGIN DECLARATION * +************************************************************************ +INTEGER iBoreMax := 5 ; +DONNEES := UTL: :: + CREA + PPMBORE <> = + 0.0 350.0 700.0 1000.0 1400.0 + ; +************************************************************************ +* END DECLARATION * +************************************************************************ + +************************************************************************ +* BEGIN GEOMETRY * +************************************************************************ +EVALUATE Rcomb4 := 0.4096 ; +EVALUATE Rcomb1 := 0.5 SQRT Rcomb4 * ; +EVALUATE Rcomb2 := 0.8 SQRT Rcomb4 * ; +EVALUATE Rcomb3 := 0.95 SQRT Rcomb4 * ; +EVALUATE R_int_TG := 0.5605 ; +EVALUATE R_ext_TG := 0.6225 ; +EVALUATE R_int_TI := 0.5725 ; +EVALUATE R_ext_TI := 0.6225 ; +EVALUATE R_int_G := 0.4180 ; +EVALUATE R_ext_G := 0.4750 ; +EVALUATE Cote := 1.26 ; +EVALUATE CoteL := 1.302 ; +EVALUATE Lame := CoteL Cote - ; +EVALUATE RmodeN1 := 0.670 ; + +GEOSS := Geo_SS :: <> <> <> <> + <> <> <> + <> <> <> <> + <> ; + +GEON2 := Geo_N2 :: <> <> <> <> + <> <> <> + <> <> <> <> + <> ; +ASSBLY_CASEA FIGASB_CASEA := G2S: GEON2 ; + +************************************************************************ +* BEGIN TRACKING * +************************************************************************ +! Level One +TRACKSS := SYBILT: GEOSS :: + EDIT 0 + MAXR 500 + MAXZ 1000000 + TITLE 'TRACKING FOR ASSEMBLY SS' + QUA2 20 3 + DP01 ; +! MOC tracking for flux calculation +TRACKN2 TF_EXC := SALT: ASSBLY_CASEA :: + EDIT 3 + ALLG + TSPC EQW2 <> <> REND +; +TRACKN2 := MCCGT: TRACKN2 TF_EXC :: + CACB 4 AAC 80 TMT EPSI 1E-5 MCU 10000 ; + +************************************************************************ +* END TRACKING * +************************************************************************ + +************************************************************************ +* BEGIN MyApex INITIALIZATION * +************************************************************************ + MyApex := APX: :: + EDIT 10 + NOML pincell_apex + PARA 'BoronPPM' VALE FLOT + MACR TOUT + REAC TOTA N2N FISS CHI NUFI ENER LEAK DIFF SCAT ABSO + ; +************************************************************************ +* END MyApex INITIALIZATION * +************************************************************************ + +************************************************************************ +* BRANCH BORON LOOP * +************************************************************************ +ECHO "$$$ Branch Boron loop" ; +STRING Library := "CLA99CEA93:CLA99CEA93_SS" ; +REAL dens_mod := 0.85 ; + +INTEGER iBoreStep := 0 ; +WHILE iBoreStep iBoreMax < DO + EVALUATE iBoreStep := iBoreStep 1 + ; + GREP: DONNEES :: GETVAL 'PPMBORE' <> >>pbore<< ; + ECHO "Boron step: " iBoreStep "/" iBoreMax " Boron=" pbore " ppm" ; + +************************************************************************ +* BEGIN LIBRARY READING * +************************************************************************ + LIBRARY := Mix_UOX :: <> <> <> ; + +************************************************************************ +* END LIBRARY READING * +************************************************************************ + +************************************************************************ +* RESONANCE SELF-SHIELDING * +************************************************************************ + LIBRARY2 := USS: LIBRARY TRACKSS :: EDIT 1 PASS 2 ARM GRMIN 18 + + CALC REGI W1 U235 ALL + + REGI W1 U238 3 + REGI W2 U238 4 + REGI W3 U238 5 + REGI W4 U238 6 + + REGI W1 U238 9 + REGI W2 U238 10 + REGI W3 U238 11 + REGI W4 U238 12 + + REGI W1 U238 94 + REGI W2 U238 95 + REGI W3 U238 96 + REGI W4 U238 97 + + REGI W1 U238 114 + REGI W2 U238 115 + REGI W3 U238 116 + REGI W4 U238 117 + + REGI W1 U238 122 + REGI W2 U238 123 + REGI W3 U238 124 + REGI W4 U238 125 + + REGI W1 U238 126 + REGI W2 U238 127 + REGI W3 U238 128 + REGI W4 U238 129 + + REGI W1 U238 154 + REGI W2 U238 155 + REGI W3 U238 156 + REGI W4 U238 157 + + REGI W1 U238 158 + REGI W2 U238 159 + REGI W3 U238 160 + REGI W4 U238 161 + + ENDC ; + +************************************************************************ +* BEGIN MOC FLUX CALCULATION * +************************************************************************ + SYS := ASM: LIBRARY2 TRACKN2 TF_EXC :: ARM EDIT 1 ; + + IF iBoreStep 1 = THEN + FLUX2 := FLU: LIBRARY2 SYS TRACKN2 TF_EXC :: EDIT 1 TYPE B B1 SIGS ; + ELSE + FLUX2 := FLU: FLUX2 LIBRARY2 SYS TRACKN2 TF_EXC :: EDIT 1 TYPE B B1 SIGS ; + ENDIF ; + + EDIOBJ := EDI: FLUX2 LIBRARY2 TRACKN2 :: EDIT 5 + MERG COMP + MICR RES + SAVE ON COND2 + ; + +************************************************************************ +* MyApex FEEDING * +************************************************************************ + MyApex := APX: MyApex EDIOBJ :: + EDIT 2 + BoronPPM <> ; + + LIBRARY LIBRARY2 SYS EDIOBJ := DELETE: LIBRARY LIBRARY2 SYS EDIOBJ ; +ENDWHILE ; ! boron loop +************************************************************************ +* END OF BORON LOOP * +************************************************************************ +************************************************************************ +************************************************************************ + +assertS FLUX2 :: K-INFINITY 1 0.9537736 ; +ECHO "test ASSBLY_CASEA_1level_apex_boron completed" ; +END: ; diff --git a/Dragon/data/ASSBLY_CASEA_1level_apex_boron_proc/Geo_N2.c2m b/Dragon/data/ASSBLY_CASEA_1level_apex_boron_proc/Geo_N2.c2m new file mode 100644 index 0000000..24790cf --- /dev/null +++ b/Dragon/data/ASSBLY_CASEA_1level_apex_boron_proc/Geo_N2.c2m @@ -0,0 +1,239 @@ +*DECK Geo_N2 +*---- +* Name : Geo_N2.c2m +* Type : DRAGON procedure +* Use : Geometry generation for 2nd Level Flux Calculation +* of the CASEA assembly +* Author : A. Hebert +* +* Procedure called as: +* +*GEON2 := Geo_N2 :: <> <> <> <> +* <> <> <> +* <> <> <> <> +* <> ; +* +* Input data : +* Rcomb1 : 50/100 of outer radius of fuel (cm) +* Rcomb2 : 80/100 of outer radius of fuel (cm) +* Rcomb3 : 95/100 of outer radius of fuel (cm) +* Rcomb4 : 100/100 of outer radius of fuel (cm) +* R_int_TG : Inner radius of cladding of guide tube (cm) +* R_ext_TG : Outer radius of cladding of guide tube (cm) +* R_int_TI : Inner radius of cladding of guide tube (cm) +* R_ext_TI : Outer radius of cladding of guide tube (cm) +* R_int_G : Inner radius of cladding of fuel tube (cm) +* R_ext_G : Outer radius of cladding of fuel tube (cm) +* Cote : Lattice pitch (cm) +* Lame : Water space (cm) +* +* Output data : +* GEON2 : Geometry for 2nd Level Flux Calculation + +PARAMETER GEON2 :: + EDIT 0 + ::: LINKED_LIST GEON2 ; + ; +*---- +* Modules used in this procedure +*---- +MODULE GEO: END: ; + +*---- +* Input data recovery +*---- +* ; +REAL Rcomb1 Rcomb2 Rcomb3 Rcomb4 ; +:: >>Rcomb1<< >>Rcomb2<< >>Rcomb3<< >>Rcomb4<< ; +REAL R_int_TG R_ext_TG R_int_TI R_ext_TI ; +:: >>R_int_TG<< >>R_ext_TG<< >>R_int_TI<< >>R_ext_TI<< ; +REAL R_int_G R_ext_G Cote Lame ; +:: >>R_int_G<< >>R_ext_G<< >>Cote<< >>Lame<< ; + +REAL mesh1 := Cote ; +REAL mesh2 := mesh1 Cote + ; +REAL mesh3 := mesh2 Cote + ; +REAL mesh4 := mesh3 Cote + ; +REAL mesh5 := mesh4 Cote + ; +REAL mesh6 := mesh5 Cote + ; +REAL mesh7 := mesh6 Cote + ; +REAL mesh8 := mesh7 Cote + ; +REAL mesh9 := mesh8 Cote + ; +REAL mesh10 := mesh9 Lame + ; + +REAL Rtub1_TG := R_int_TG 3.0 / ; +REAL Rtub2_TG := R_int_TG 1.5 / ; +REAL Rtub1_TI := R_int_TI 3.0 / ; +REAL Rtub2_TI := R_int_TI 1.5 / ; +* +GEON2 := GEO: :: CAR2D 10 10 + EDIT 0 + X- DIAG X+ REFL + Y- SYME Y+ DIAG + CELL + TI C0201 C0301 TG C0501 C0601 TG C0801 C0901 Lame_S + C0202 C0302 C0402 C0502 C0602 C0702 C0802 C0902 Lame_S + C0303 C0403 C0503 C0603 C0703 C0803 C0903 Lame_S + TG C0504 C0604 TG C0804 C0904 Lame_S + C0505 C0605 C0705 C0805 C0905 Lame_S + TG C0706 C0806 C0906 Lame_S + C0707 C0807 C0907 Lame_S + C0808 C0908 Lame_S + C0909 Lame_S + Lame_C + MESHX 0.0 <> <> <> <> <> <> + <> <> <> <> + MESHY 0.0 <> <> <> <> <> <> + <> <> <> <> + ::: Lame_C := GEO: CAR2D 1 1 + MESHX 0.0 <> MESHY 0.0 <> + MIX 1 ; + + ::: Lame_S := GEO: CAR2D 1 1 + MESHX 0.0 <> MESHY 0.0 <> + SPLITY 3 MIX 1 ; + + ::: C0201 := GEO: CARCEL 6 + MESHX 0.0 <> + MESHY 0.0 <> + SECT 4 6 + RADIUS 0.0 <> <> <> <> + <> <> + MIX 3 4 5 6 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0202 := GEO: C0201 + MIX 9 10 11 12 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0301 := GEO: C0201 + MIX 13 14 15 16 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0302 := GEO: C0201 + MIX 17 18 19 20 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0303 := GEO: C0201 + MIX 21 22 23 24 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0402 := GEO: C0201 + MIX 26 27 28 29 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0403 := GEO: C0201 + MIX 30 31 32 33 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0501 := GEO: C0201 + MIX 34 35 36 37 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0502 := GEO: C0201 + MIX 38 39 40 41 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0503 := GEO: C0201 + MIX 42 43 44 45 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0504 := GEO: C0201 + MIX 46 47 48 49 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0505 := GEO: C0201 + MIX 50 51 52 53 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0601 := GEO: C0201 + MIX 54 55 56 57 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0602 := GEO: C0201 + MIX 58 59 60 61 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0603 := GEO: C0201 + MIX 62 63 64 65 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0604 := GEO: C0201 + MIX 66 67 68 69 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0605 := GEO: C0201 + MIX 70 71 72 73 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0702 := GEO: C0201 + MIX 74 75 76 77 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0703 := GEO: C0201 + MIX 78 79 80 81 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0705 := GEO: C0201 + MIX 82 83 84 85 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0706 := GEO: C0201 + MIX 86 87 88 89 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0707 := GEO: C0201 + MIX 90 91 92 93 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0801 := GEO: C0201 + MIX 94 95 96 97 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0802 := GEO: C0201 + MIX 98 99 100 101 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0803 := GEO: C0201 + MIX 102 103 104 105 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0804 := GEO: C0201 + MIX 106 107 108 109 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0805 := GEO: C0201 + MIX 110 111 112 113 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0806 := GEO: C0201 + MIX 114 115 116 117 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0807 := GEO: C0201 + MIX 118 119 120 121 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0808 := GEO: C0201 + MIX 122 123 124 125 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0901 := GEO: C0201 + MIX 126 127 128 129 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0902 := GEO: C0201 + MIX 130 131 132 133 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0903 := GEO: C0201 + MIX 134 135 136 137 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0904 := GEO: C0201 + MIX 138 139 140 141 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0905 := GEO: C0201 + MIX 142 143 144 145 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0906 := GEO: C0201 + MIX 146 147 148 149 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0907 := GEO: C0201 + MIX 150 151 152 153 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0908 := GEO: C0201 + MIX 154 155 156 157 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0909 := GEO: C0201 + MIX 158 159 160 161 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: TG := GEO: CARCEL 4 + MESHX 0.0 <> + MESHY 0.0 <> + SECT 3 1 + RADIUS 0.0 <> <> <> <> + MIX 1 + 1 1 1 1 1 1 1 1 + 1 1 1 1 1 1 1 1 + 25 25 25 25 25 25 25 25 + 1 1 1 1 1 1 1 1 ; + + ::: TI := GEO: CARCEL 4 + MESHX 0.0 <> + MESHY 0.0 <> + SECT 3 1 + RADIUS 0.0 <> <> <> <> + MIX 1 + 1 1 1 1 1 1 1 1 + 1 1 1 1 1 1 1 1 + 2 2 2 2 2 2 2 2 + 1 1 1 1 1 1 1 1 ; +; diff --git a/Dragon/data/ASSBLY_CASEA_1level_apex_boron_proc/Geo_SS.c2m b/Dragon/data/ASSBLY_CASEA_1level_apex_boron_proc/Geo_SS.c2m new file mode 100644 index 0000000..3bb7fe5 --- /dev/null +++ b/Dragon/data/ASSBLY_CASEA_1level_apex_boron_proc/Geo_SS.c2m @@ -0,0 +1,213 @@ +*DECK Geo_SS +*---- +* Name : Geo_SS.c2m +* Type : DRAGON procedure +* Use : Geometry generation for Self-Shielding Calculation +* of the CASEA assembly +* Author : A. Canbakan +* +* Procedure called as: +* +*GEOSS := Geo_SS :: <> <> <> <> +* <> <> <> +* <> <> <> <> +* <> ; +* +* Input data : +* Rcomb1 : 50/100 of outer radius of fuel (cm) +* Rcomb2 : 80/100 of outer radius of fuel (cm) +* Rcomb3 : 95/100 of outer radius of fuel (cm) +* Rcomb4 : 100/100 of outer radius of fuel (cm) +* R_int_TG : Inner radius of cladding of guide tube (cm) +* R_ext_TG : Outer radius of cladding of guide tube (cm) +* R_int_TI : Inner radius of cladding of guide tube (cm) +* R_ext_TI : Outer radius of cladding of guide tube (cm) +* R_int_G : Inner radius of cladding of fuel tube (cm) +* R_ext_G : Outer radius of cladding of fuel tube (cm) +* Cote : Lattice pitch (cm) +* CoteL : Lattice pitch + Water space (cm) +* +* Output data : +* GEOSS : Geometry for Self-Shielding Calculation + +PARAMETER GEOSS :: + EDIT 0 + ::: LINKED_LIST GEOSS ; + ; +*---- +* Modules used in this procedure +*---- +MODULE GEO: END: ; + +*---- +* Input data recovery +*---- +* ; +REAL Rcomb1 Rcomb2 Rcomb3 Rcomb4 ; +:: >>Rcomb1<< >>Rcomb2<< >>Rcomb3<< >>Rcomb4<< ; +REAL R_int_TG R_ext_TG R_int_TI R_ext_TI ; +:: >>R_int_TG<< >>R_ext_TG<< >>R_int_TI<< >>R_ext_TI<< ; +REAL R_int_G R_ext_G Cote CoteL ; +:: >>R_int_G<< >>R_ext_G<< >>Cote<< >>CoteL<< ; + + + +GEOSS := GEO: :: CAR2D 9 9 + EDIT 0 + X- DIAG X+ REFL + Y- SYME Y+ DIAG + CELL + TI C0201 C0301 TG C0501 C0601 TG C0801 C0901 + C0202 C0302 C0402 C0502 C0602 C0702 C0802 C0902 + C0303 C0403 C0503 C0603 C0703 C0803 C0903 + TG C0504 C0604 TG C0804 C0904 + C0505 C0605 C0705 C0805 C0905 + TG C0706 C0806 C0906 + C0707 C0807 C0907 + C0808 C0908 + C0909 + ::: C0201 := GEO: CARCEL 6 + MESHX 0.0 <> + MESHY 0.0 <> + RADIUS 0.0 <> <> <> <> + <> <> + MIX 3 4 5 6 7 8 1 + ; + ::: C0202 := GEO: C0201 + MIX 9 10 11 12 7 8 1 + ; + ::: C0301 := GEO: C0201 + MIX 13 14 15 16 7 8 1 + ; + ::: C0302 := GEO: C0201 + MIX 17 18 19 20 7 8 1 + ; + ::: C0303 := GEO: C0201 + MIX 21 22 23 24 7 8 1 + ; + ::: C0402 := GEO: C0201 + MIX 26 27 28 29 7 8 1 + ; + ::: C0403 := GEO: C0201 + MIX 30 31 32 33 7 8 1 + ; + ::: C0501 := GEO: C0201 + MIX 34 35 36 37 7 8 1 + ; + ::: C0502 := GEO: C0201 + MIX 38 39 40 41 7 8 1 + ; + ::: C0503 := GEO: C0201 + MIX 42 43 44 45 7 8 1 + ; + ::: C0504 := GEO: C0201 + MIX 46 47 48 49 7 8 1 + ; + ::: C0505 := GEO: C0201 + MIX 50 51 52 53 7 8 1 + ; + ::: C0601 := GEO: C0201 + MIX 54 55 56 57 7 8 1 + ; + ::: C0602 := GEO: C0201 + MIX 58 59 60 61 7 8 1 + ; + ::: C0603 := GEO: C0201 + MIX 62 63 64 65 7 8 1 + ; + ::: C0604 := GEO: C0201 + MIX 66 67 68 69 7 8 1 + ; + ::: C0605 := GEO: C0201 + MIX 70 71 72 73 7 8 1 + ; + ::: C0702 := GEO: C0201 + MIX 74 75 76 77 7 8 1 + ; + ::: C0703 := GEO: C0201 + MIX 78 79 80 81 7 8 1 + ; + ::: C0705 := GEO: C0201 + MIX 82 83 84 85 7 8 1 + ; + ::: C0706 := GEO: C0201 + MIX 86 87 88 89 7 8 1 + ; + ::: C0707 := GEO: C0201 + MIX 90 91 92 93 7 8 1 + ; + ::: C0801 := GEO: C0201 + MIX 94 95 96 97 7 8 1 + ; + ::: C0802 := GEO: C0201 + MIX 98 99 100 101 7 8 1 + ; + ::: C0803 := GEO: C0201 + MIX 102 103 104 105 7 8 1 + ; + ::: C0804 := GEO: C0201 + MIX 106 107 108 109 7 8 1 + ; + ::: C0805 := GEO: C0201 + MIX 110 111 112 113 7 8 1 + ; + ::: C0806 := GEO: C0201 + MIX 114 115 116 117 7 8 1 + ; + ::: C0807 := GEO: C0201 + MIX 118 119 120 121 7 8 1 + ; + ::: C0808 := GEO: C0201 + MIX 122 123 124 125 7 8 1 + ; + ::: C0901 := GEO: CARCEL 6 + MESHX 0.0 <> + MESHY 0.0 <> + RADIUS 0.0 <> <> <> <> + <> <> + MIX 126 127 128 129 7 8 1 + ; + ::: C0902 := GEO: C0901 + MIX 130 131 132 133 7 8 1 + ; + ::: C0903 := GEO: C0901 + MIX 134 135 136 137 7 8 1 + ; + ::: C0904 := GEO: C0901 + MIX 138 139 140 141 7 8 1 + ; + ::: C0905 := GEO: C0901 + MIX 142 143 144 145 7 8 1 + ; + ::: C0906 := GEO: C0901 + MIX 146 147 148 149 7 8 1 + ; + ::: C0907 := GEO: C0901 + MIX 150 151 152 153 7 8 1 + ; + ::: C0908 := GEO: C0901 + MIX 154 155 156 157 7 8 1 + ; + ::: C0909 := GEO: CARCEL 6 + MESHX 0.0 <> + MESHY 0.0 <> + RADIUS 0.0 <> <> <> <> + <> <> + MIX 158 159 160 161 7 8 1 + ; + ::: TG := GEO: CARCEL 2 + MESHX 0.0 <> + MESHY 0.0 <> + RADIUS 0.0 <> <> + MIX 1 25 1 + ; + ::: TI := GEO: CARCEL 2 + MESHX 0.0 <> + MESHY 0.0 <> + RADIUS 0.0 <> <> + MIX 1 2 1 + ; +; + +END: ; +QUIT . diff --git a/Dragon/data/ASSBLY_CASEA_1level_apex_boron_proc/Mix_UOX.c2m b/Dragon/data/ASSBLY_CASEA_1level_apex_boron_proc/Mix_UOX.c2m new file mode 100644 index 0000000..0fa7dc9 --- /dev/null +++ b/Dragon/data/ASSBLY_CASEA_1level_apex_boron_proc/Mix_UOX.c2m @@ -0,0 +1,544 @@ +*DECK Mix_UOX +*---- +* Name : Mix_UOX.c2m +* Type : DRAGON procedure +* Use : Microlib generation with Apolib3 for +* UOX calculation with 37 fuel regions +* Author : A. Hebert +* +* Procedure called as: +* +* LIBRARY := Mix_UOX :: +* <> <> <> ; +* +* Input data : +* Library : Cross-section library name +* dens_mod : Coolant density +* pbore : Natural boron concentration (ppm) +* +* Output data : +* LIBRARY : Microlib with table of probabilities + + +PARAMETER LIBRARY :: + EDIT 0 + ::: LINKED_LIST LIBRARY ; + ; + +*---- +* Input data recovery +*---- +STRING Library ; +:: >>Library<< ; + +REAL dens_mod pbore ; +:: >>dens_mod<< >>pbore<< ; + +*---- +* Modules used in this procedure +*---- +MODULE LIB: UTL: DELETE: END: ABORT: ; + +* Calculation of moderator data +REAL A := 6.022094E-1 ; ! Avogadro number + +REAL P_B10 P_B11 := 0.202 0.798 ; +REAL M_H2O := 15.9994 2.0 1.00794 * + ; +REAL M_B := P_B10 10.012938 * P_B11 11.009276 * + ; +REAL f1 := 1.0 1.0E-06 pbore * - ; +REAL f2 := 1.0E-06 pbore * ; +REAL N_H2O := dens_mod f1 A * * M_H2O / ; +REAL N_B10 := P_B10 dens_mod f2 A * * * M_B / ; +REAL N_B11 := P_B11 dens_mod f2 A * * * M_B / ; +ECHO "Mix_UOX H2O=" N_H2O ; +ECHO "Mix_UOX B10=" N_B10 ; +ECHO "Mix_UOX B11=" N_B11 ; + +LIBRARY := LIB: :: + EDIT 2 + NMIX 161 (*MAXIMUM OF MATERIAL MIXTURES*) + CTRA APOL (*APOLLO TYPE TRANSPORT CORRECTION*) + ANIS 2 + ADED 4 NELAS N4N N2N N3N + SUBG (*HELIOS TYPE PROBABILITY TABLES*) + +*---- +* Depletion Chain +*---- + MIXS LIB: APLIB3 FIL: <> +*---- +* Moderator +*---- + MIX 1 600.0 NOEV + H2O = H2O <> + B10 = B10 <> + B11 = B11 <> + +*---- +* Cladding TI +*---- + MIX 2 600.0 NOEV + Zr90 = Zr90 2.16576E-2 2 + Zr91 = Zr91 4.72300E-3 2 + Zr92 = Zr92 7.21921E-3 2 + Zr94 = Zr94 7.31603E-3 2 + Zr96 = Zr96 1.17864E-3 2 + +*---- +* Fuel -> 8 * 4 evolving mixes +*---- +* C1 Cell + MIX 3 900.0 + U235 = U235 4.08785E-4 1 + U238 = U238 2.20157E-2 1 + O16 = O16 4.48565E-2 + MIX 4 + COMB 3 1.0 + MIX 5 + COMB 3 1.0 + MIX 6 + COMB 3 1.0 + +*---- +* Gap +*---- + MIX 7 600.0 NOEV + O16 = O16 3.76439E-6 + +*---- +* Cladding fuel +*---- + MIX 8 600.0 NOEV + Zr90 = Zr90 2.16576E-2 2 + Zr91 = Zr91 4.72300E-3 2 + Zr92 = Zr92 7.21921E-3 2 + Zr94 = Zr94 7.31603E-3 + Zr96 = Zr96 1.17864E-3 + +* C2 Cell + MIX 9 + COMB 3 1.0 + MIX 10 + COMB 3 1.0 + MIX 11 + COMB 3 1.0 + MIX 12 + COMB 3 1.0 + +******* +*C0301* *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 +******* +*C0302* *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 +******* +*C0303* *C2 +******* +MIX 21 + COMB 9 1.0 +MIX 22 + COMB 10 1.0 +MIX 23 + COMB 11 1.0 +MIX 24 + COMB 12 1.0 + +*---- +* Cladding TG +*---- +MIX 25 COMB 2 1.0 + +******* +*C0402* *C1 +******* +MIX 26 + COMB 3 1.0 +MIX 27 + COMB 4 1.0 +MIX 28 + COMB 5 1.0 +MIX 29 + COMB 6 1.0 +******* +*C0403* *C1 +******* +MIX 30 + COMB 3 1.0 +MIX 31 + COMB 4 1.0 +MIX 32 + COMB 5 1.0 +MIX 33 + COMB 6 1.0 +******* +*C0501* *C1 +******* +MIX 34 + COMB 3 1.0 +MIX 35 + COMB 4 1.0 +MIX 36 + COMB 5 1.0 +MIX 37 + COMB 6 1.0 +******* +*C0502* *C2 +******* +MIX 38 + COMB 9 1.0 +MIX 39 + COMB 10 1.0 +MIX 40 + COMB 11 1.0 +MIX 41 + COMB 12 1.0 +******* +*C0503* *C2 +******* +MIX 42 + COMB 9 1.0 +MIX 43 + COMB 10 1.0 +MIX 44 + COMB 11 1.0 +MIX 45 + COMB 12 1.0 +******* +*C0504* *C1 +******* +MIX 46 + COMB 3 1.0 +MIX 47 + COMB 4 1.0 +MIX 48 + COMB 5 1.0 +MIX 49 + COMB 6 1.0 +******* +*C0505* *C2 +******* +MIX 50 + COMB 9 1.0 +MIX 51 + COMB 10 1.0 +MIX 52 + COMB 11 1.0 +MIX 53 + COMB 12 1.0 +******* +*C0601* *C1 +******* +MIX 54 + COMB 3 1.0 +MIX 55 + COMB 4 1.0 +MIX 56 + COMB 5 1.0 +MIX 57 + COMB 6 1.0 +******* +*C0602* *C2 +******* +MIX 58 + COMB 9 1.0 +MIX 59 + COMB 10 1.0 +MIX 60 + COMB 11 1.0 +MIX 61 + COMB 12 1.0 +******* +*C0603* *C2 +******* +MIX 62 + COMB 9 1.0 +MIX 63 + COMB 10 1.0 +MIX 64 + COMB 11 1.0 +MIX 65 + COMB 12 1.0 +******* +*C0604* *C1 +******* +MIX 66 + COMB 3 1.0 +MIX 67 + COMB 4 1.0 +MIX 68 + COMB 5 1.0 +MIX 69 + COMB 6 1.0 +******* +*C0605* *C1 +******* +MIX 70 + COMB 3 1.0 +MIX 71 + COMB 4 1.0 +MIX 72 + COMB 5 1.0 +MIX 73 + COMB 6 1.0 +******* +*C0702* *C1 +******* +MIX 74 + COMB 3 1.0 +MIX 75 + COMB 4 1.0 +MIX 76 + COMB 5 1.0 +MIX 77 + COMB 6 1.0 +******* +*C0703* *C1 +******* +MIX 78 + COMB 3 1.0 +MIX 79 + COMB 4 1.0 +MIX 80 + COMB 5 1.0 +MIX 81 + COMB 6 1.0 +******* +*C0705* *C1 +******* +MIX 82 + COMB 3 1.0 +MIX 83 + COMB 4 1.0 +MIX 84 + COMB 5 1.0 +MIX 85 + COMB 6 1.0 +******* +*C0706* *C1 +******* +MIX 86 + COMB 3 1.0 +MIX 87 + COMB 4 1.0 +MIX 88 + COMB 5 1.0 +MIX 89 + COMB 6 1.0 +******* +*C0707* *C2 +******* +MIX 90 + COMB 9 1.0 +MIX 91 + COMB 10 1.0 +MIX 92 + COMB 11 1.0 +MIX 93 + COMB 12 1.0 +******* +*C0801* *C4 +******* + +* C4 Cell + MIX 94 + COMB 3 1.0 + MIX 95 + COMB 3 1.0 + MIX 96 + COMB 3 1.0 + MIX 97 + COMB 3 1.0 + +******* +*C0802* *C2 +******* +MIX 98 + COMB 9 1.0 +MIX 99 + COMB 10 1.0 +MIX 100 + COMB 11 1.0 +MIX 101 + COMB 12 1.0 +******* +*C0803* *C2 +******* +MIX 102 + COMB 9 1.0 +MIX 103 + COMB 10 1.0 +MIX 104 + COMB 11 1.0 +MIX 105 + COMB 12 1.0 +******* +*C0804* *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 +******* +*C0805* *C2 +******* +MIX 110 + COMB 9 1.0 +MIX 111 + COMB 10 1.0 +MIX 112 + COMB 11 1.0 +MIX 113 + COMB 12 1.0 + +* C3 Cell + MIX 114 + COMB 3 1.0 + MIX 115 + COMB 3 1.0 + MIX 116 + COMB 3 1.0 + MIX 117 + COMB 3 1.0 + +******* +*C0807* *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 + +* C5 Cell + MIX 122 + COMB 3 1.0 + MIX 123 + COMB 3 1.0 + MIX 124 + COMB 3 1.0 + MIX 125 + COMB 3 1.0 + +* C6 Cell + MIX 126 + COMB 3 1.0 + MIX 127 + COMB 3 1.0 + MIX 128 + COMB 3 1.0 + MIX 129 + COMB 3 1.0 + +******* +*C0902* *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 +******* +*C0903* *C6 +******* +MIX 134 + COMB 126 1.0 +MIX 135 + COMB 127 1.0 +MIX 136 + COMB 128 1.0 +MIX 137 + COMB 129 1.0 +******* +*C0904* *C6 +******* +MIX 138 + COMB 126 1.0 +MIX 139 + COMB 127 1.0 +MIX 140 + COMB 128 1.0 +MIX 141 + COMB 129 1.0 +******* +*C0905* *C6 +******* +MIX 142 + COMB 126 1.0 +MIX 143 + COMB 127 1.0 +MIX 144 + COMB 128 1.0 +MIX 145 + COMB 129 1.0 +******* +*C0906* *C6 +******* +MIX 146 + COMB 126 1.0 +MIX 147 + COMB 127 1.0 +MIX 148 + COMB 128 1.0 +MIX 149 + COMB 129 1.0 +******* +*C0907* *C6 +******* +MIX 150 + COMB 126 1.0 +MIX 151 + COMB 127 1.0 +MIX 152 + COMB 128 1.0 +MIX 153 + COMB 129 1.0 + +* C7 Cell + MIX 154 + COMB 3 1.0 + MIX 155 + COMB 3 1.0 + MIX 156 + COMB 3 1.0 + MIX 157 + COMB 3 1.0 + +* C8 Cell + MIX 158 + COMB 3 1.0 + MIX 159 + COMB 3 1.0 + MIX 160 + COMB 3 1.0 + MIX 161 + COMB 3 1.0 +; + +END: ; +QUIT . diff --git a/Dragon/data/ASSBLY_CASEA_1level_apex_boron_xsm.access b/Dragon/data/ASSBLY_CASEA_1level_apex_boron_xsm.access new file mode 100755 index 0000000..752e5fa --- /dev/null +++ b/Dragon/data/ASSBLY_CASEA_1level_apex_boron_xsm.access @@ -0,0 +1,37 @@ +#!/bin/sh +if [ $# = 0 ] + then + echo "usage: ASSBLY_CASEA_1level_apex_boron_xsm.access directory" 1>&2 + exit 1 +fi +MACH=`uname -s` +Sysx="`echo $MACH | cut -b -6`" +if [ $Sysx = "CYGWIN" ]; then + MACH=`uname -o` +elif [ $Sysx = "Darwin" ]; then + MACH=`uname -sm | sed 's/[ ]/_/'` +elif [ $Sysx = "SunOS" ]; then + MACH=`uname -sm | sed 's/[ ]/_/'` +fi +if [ "$MACH" = "Linux" -o "$MACH" = "OSF1" -o "$MACH" = "Cygwin" -o "$MACH" = "SunOS_i86pc" \ +-o "$MACH" = "Darwin_i386" -o "$MACH" = "Darwin_x86_64" -o "$MACH" = "Darwin_arm64" \ +-o "$MACH" = "Linux_aarch64" ] +then + echo 'use little endian libraries' + pos=$1/../../libraries/l_endian +else + echo 'use big endian libraries' + pos=$1/../../libraries/b_endian +fi +if [ -f "$pos"/CEAV5_1.G281.V5.1.xsm.gz ] + then + echo 'gunzipping D281CEAV5' + chmod 755 "$pos" + gunzip "$pos"/CEAV5_1.G281.V5.1.xsm.gz +fi +if [ -f "$pos"/CEAV5_1.G281.V5.1.xsm ] + then + ln -s "$pos"/CEAV5_1.G281.V5.1.xsm D281CEAV5 +fi +ls -l +echo "ASSBLY_CASEA_1level_apex_boron_xsm access script terminated" diff --git a/Dragon/data/ASSBLY_CASEA_1level_apex_boron_xsm.save b/Dragon/data/ASSBLY_CASEA_1level_apex_boron_xsm.save new file mode 100755 index 0000000..1f19645 --- /dev/null +++ b/Dragon/data/ASSBLY_CASEA_1level_apex_boron_xsm.save @@ -0,0 +1,20 @@ +#!/bin/sh +# +if [ $# = 0 ] + then + echo "usage: ASSBLY_CASEA_1level_apex_boron_xsm.save directory" 1>&2 + exit 1 +fi +echo access ASSBLY_CASEA_1level_apex_boron_xsm.save +MACH=`uname -s` +Sysx="`echo $MACH | cut -b -6`" +if [ $Sysx = "CYGWIN" ]; then + MACH=`uname -o` +elif [ $Sysx = "AIX" ]; then + MACH=`uname -s` +else + MACH=`uname -sm | sed 's/[ ]/_/'` +fi +ls -l +mv MyApex.hdf $1/"$MACH"/assbly_caseA_apex.hdf +echo "ASSBLY_CASEA_1level_apex_boron_xsm.save completed" diff --git a/Dragon/data/ASSBLY_CASEA_1level_apex_boron_xsm.x2m b/Dragon/data/ASSBLY_CASEA_1level_apex_boron_xsm.x2m new file mode 100644 index 0000000..bc29cfc --- /dev/null +++ b/Dragon/data/ASSBLY_CASEA_1level_apex_boron_xsm.x2m @@ -0,0 +1,205 @@ +*---- +* case ASSBLY_CASEA_1level_apex_boron_xsm +* 281-group eighth assembly in DRAGON -- 1-level scheme +* production of an Apex file for reflector feeding +* Author: A. Hebert +*---- +HDF5_FILE MyApex :: FILE './MyApex.hdf' ; +LINKED_LIST DONNEES GEOSS GEON2 TRACKSS TRACKN2 LIBRARY LIBRARY2 SYS FLUX2 EDIOBJ ; +MODULE GREP: SYBILT: G2S: SALT: MCCGT: USS: ASM: FLU: EDI: UTL: DELETE: LIB: APX: END: ; +REAL Rcomb1 Rcomb2 Rcomb3 Rcomb4 R_int_TG R_ext_TG R_int_TI R_ext_TI + R_int_G R_ext_G Cote CoteL RmodeN1 Lame pbore ; +SEQ_ASCII ASSBLY_CASEA :: FILE './ASSBLY_CASEA_1level_g2s.txt' ; +SEQ_ASCII FIGASB_CASEA :: FILE './ASSBLY_CASEA_1level_g2s.eps' ; +SEQ_BINARY TF_EXC ; +INTEGER an2d := 8 ; +REAL densur := 20.0 ; +PROCEDURE Geo_SS Geo_N2 Mix_UOX ; +PROCEDURE assertS ; + +************************************************************************ +* BEGIN DECLARATION * +************************************************************************ +INTEGER iBoreMax := 5 ; +DONNEES := UTL: :: + CREA + PPMBORE <> = + 0.0 350.0 700.0 1000.0 1400.0 + ; +************************************************************************ +* END DECLARATION * +************************************************************************ + +************************************************************************ +* BEGIN GEOMETRY * +************************************************************************ +EVALUATE Rcomb4 := 0.4096 ; +EVALUATE Rcomb1 := 0.5 SQRT Rcomb4 * ; +EVALUATE Rcomb2 := 0.8 SQRT Rcomb4 * ; +EVALUATE Rcomb3 := 0.95 SQRT Rcomb4 * ; +EVALUATE R_int_TG := 0.5605 ; +EVALUATE R_ext_TG := 0.6225 ; +EVALUATE R_int_TI := 0.5725 ; +EVALUATE R_ext_TI := 0.6225 ; +EVALUATE R_int_G := 0.4180 ; +EVALUATE R_ext_G := 0.4750 ; +EVALUATE Cote := 1.26 ; +EVALUATE CoteL := 1.302 ; +EVALUATE Lame := CoteL Cote - ; +EVALUATE RmodeN1 := 0.670 ; + +GEOSS := Geo_SS :: <> <> <> <> + <> <> <> + <> <> <> <> + <> ; + +GEON2 := Geo_N2 :: <> <> <> <> + <> <> <> + <> <> <> <> + <> ; +ASSBLY_CASEA FIGASB_CASEA := G2S: GEON2 ; + +************************************************************************ +* BEGIN TRACKING * +************************************************************************ +! Level One +TRACKSS := SYBILT: GEOSS :: + EDIT 0 + MAXR 500 + MAXZ 1000000 + TITLE 'TRACKING FOR ASSEMBLY SS' + QUA2 20 3 + DP01 ; +! MOC tracking for flux calculation +TRACKN2 TF_EXC := SALT: ASSBLY_CASEA :: + EDIT 3 + ALLG + TSPC EQW2 <> <> REND +; +TRACKN2 := MCCGT: TRACKN2 TF_EXC :: + CACB 4 AAC 80 TMT EPSI 1E-5 MCU 10000 ; + +************************************************************************ +* END TRACKING * +************************************************************************ + +************************************************************************ +* BEGIN MyApex INITIALIZATION * +************************************************************************ + MyApex := APX: :: + EDIT 10 + NOML pincell_apex + PARA 'BoronPPM' VALE FLOT + MACR TOUT + REAC TOTA N2N FISS CHI NUFI ENER LEAK DIFF SCAT ABSO + ; +************************************************************************ +* END MyApex INITIALIZATION * +************************************************************************ + +************************************************************************ +* BRANCH BORON LOOP * +************************************************************************ +ECHO "$$$ Branch Boron loop" ; +STRING Library := "D281CEAV5" ; +REAL dens_mod := 0.85 ; + +INTEGER iBoreStep := 0 ; +WHILE iBoreStep iBoreMax < DO + EVALUATE iBoreStep := iBoreStep 1 + ; + GREP: DONNEES :: GETVAL 'PPMBORE' <> >>pbore<< ; + ECHO "Boron step: " iBoreStep "/" iBoreMax " Boron=" pbore " ppm" ; + +************************************************************************ +* BEGIN LIBRARY READING * +************************************************************************ + LIBRARY := Mix_UOX :: <> <> <> ; + +************************************************************************ +* END LIBRARY READING * +************************************************************************ + +************************************************************************ +* RESONANCE SELF-SHIELDING * +************************************************************************ + LIBRARY2 := USS: LIBRARY TRACKSS :: EDIT 1 PASS 2 ARM GRMAX 93 + + CALC REGI W1 U235 ALL + + REGI W1 U238 3 + REGI W2 U238 4 + REGI W3 U238 5 + REGI W4 U238 6 + + REGI W1 U238 9 + REGI W2 U238 10 + REGI W3 U238 11 + REGI W4 U238 12 + + REGI W1 U238 94 + REGI W2 U238 95 + REGI W3 U238 96 + REGI W4 U238 97 + + REGI W1 U238 114 + REGI W2 U238 115 + REGI W3 U238 116 + REGI W4 U238 117 + + REGI W1 U238 122 + REGI W2 U238 123 + REGI W3 U238 124 + REGI W4 U238 125 + + REGI W1 U238 126 + REGI W2 U238 127 + REGI W3 U238 128 + REGI W4 U238 129 + + REGI W1 U238 154 + REGI W2 U238 155 + REGI W3 U238 156 + REGI W4 U238 157 + + REGI W1 U238 158 + REGI W2 U238 159 + REGI W3 U238 160 + REGI W4 U238 161 + + ENDC ; + +************************************************************************ +* BEGIN MOC FLUX CALCULATION * +************************************************************************ + SYS := ASM: LIBRARY2 TRACKN2 TF_EXC :: ARM EDIT 1 ; + + IF iBoreStep 1 = THEN + FLUX2 := FLU: LIBRARY2 SYS TRACKN2 TF_EXC :: EDIT 1 TYPE B B1 SIGS ; + ELSE + FLUX2 := FLU: FLUX2 LIBRARY2 SYS TRACKN2 TF_EXC :: EDIT 1 TYPE B B1 SIGS ; + ENDIF ; + + EDIOBJ := EDI: FLUX2 LIBRARY2 TRACKN2 :: EDIT 5 + MERG COMP + MICR RES + SAVE ON COND2 + ; + +************************************************************************ +* MyApex FEEDING * +************************************************************************ + MyApex := APX: MyApex EDIOBJ :: + EDIT 2 + BoronPPM <> ; + + LIBRARY LIBRARY2 SYS EDIOBJ := DELETE: LIBRARY LIBRARY2 SYS EDIOBJ ; +ENDWHILE ; ! boron loop +************************************************************************ +* END OF BORON LOOP * +************************************************************************ +************************************************************************ +************************************************************************ + +assertS FLUX2 :: K-INFINITY 1 0.9571407 ; +ECHO "test ASSBLY_CASEA_1level_apex_boron_xsm completed" ; +END: ; diff --git a/Dragon/data/ASSBLY_CASEA_1level_apex_boron_xsm_proc/Geo_N2.c2m b/Dragon/data/ASSBLY_CASEA_1level_apex_boron_xsm_proc/Geo_N2.c2m new file mode 100644 index 0000000..24790cf --- /dev/null +++ b/Dragon/data/ASSBLY_CASEA_1level_apex_boron_xsm_proc/Geo_N2.c2m @@ -0,0 +1,239 @@ +*DECK Geo_N2 +*---- +* Name : Geo_N2.c2m +* Type : DRAGON procedure +* Use : Geometry generation for 2nd Level Flux Calculation +* of the CASEA assembly +* Author : A. Hebert +* +* Procedure called as: +* +*GEON2 := Geo_N2 :: <> <> <> <> +* <> <> <> +* <> <> <> <> +* <> ; +* +* Input data : +* Rcomb1 : 50/100 of outer radius of fuel (cm) +* Rcomb2 : 80/100 of outer radius of fuel (cm) +* Rcomb3 : 95/100 of outer radius of fuel (cm) +* Rcomb4 : 100/100 of outer radius of fuel (cm) +* R_int_TG : Inner radius of cladding of guide tube (cm) +* R_ext_TG : Outer radius of cladding of guide tube (cm) +* R_int_TI : Inner radius of cladding of guide tube (cm) +* R_ext_TI : Outer radius of cladding of guide tube (cm) +* R_int_G : Inner radius of cladding of fuel tube (cm) +* R_ext_G : Outer radius of cladding of fuel tube (cm) +* Cote : Lattice pitch (cm) +* Lame : Water space (cm) +* +* Output data : +* GEON2 : Geometry for 2nd Level Flux Calculation + +PARAMETER GEON2 :: + EDIT 0 + ::: LINKED_LIST GEON2 ; + ; +*---- +* Modules used in this procedure +*---- +MODULE GEO: END: ; + +*---- +* Input data recovery +*---- +* ; +REAL Rcomb1 Rcomb2 Rcomb3 Rcomb4 ; +:: >>Rcomb1<< >>Rcomb2<< >>Rcomb3<< >>Rcomb4<< ; +REAL R_int_TG R_ext_TG R_int_TI R_ext_TI ; +:: >>R_int_TG<< >>R_ext_TG<< >>R_int_TI<< >>R_ext_TI<< ; +REAL R_int_G R_ext_G Cote Lame ; +:: >>R_int_G<< >>R_ext_G<< >>Cote<< >>Lame<< ; + +REAL mesh1 := Cote ; +REAL mesh2 := mesh1 Cote + ; +REAL mesh3 := mesh2 Cote + ; +REAL mesh4 := mesh3 Cote + ; +REAL mesh5 := mesh4 Cote + ; +REAL mesh6 := mesh5 Cote + ; +REAL mesh7 := mesh6 Cote + ; +REAL mesh8 := mesh7 Cote + ; +REAL mesh9 := mesh8 Cote + ; +REAL mesh10 := mesh9 Lame + ; + +REAL Rtub1_TG := R_int_TG 3.0 / ; +REAL Rtub2_TG := R_int_TG 1.5 / ; +REAL Rtub1_TI := R_int_TI 3.0 / ; +REAL Rtub2_TI := R_int_TI 1.5 / ; +* +GEON2 := GEO: :: CAR2D 10 10 + EDIT 0 + X- DIAG X+ REFL + Y- SYME Y+ DIAG + CELL + TI C0201 C0301 TG C0501 C0601 TG C0801 C0901 Lame_S + C0202 C0302 C0402 C0502 C0602 C0702 C0802 C0902 Lame_S + C0303 C0403 C0503 C0603 C0703 C0803 C0903 Lame_S + TG C0504 C0604 TG C0804 C0904 Lame_S + C0505 C0605 C0705 C0805 C0905 Lame_S + TG C0706 C0806 C0906 Lame_S + C0707 C0807 C0907 Lame_S + C0808 C0908 Lame_S + C0909 Lame_S + Lame_C + MESHX 0.0 <> <> <> <> <> <> + <> <> <> <> + MESHY 0.0 <> <> <> <> <> <> + <> <> <> <> + ::: Lame_C := GEO: CAR2D 1 1 + MESHX 0.0 <> MESHY 0.0 <> + MIX 1 ; + + ::: Lame_S := GEO: CAR2D 1 1 + MESHX 0.0 <> MESHY 0.0 <> + SPLITY 3 MIX 1 ; + + ::: C0201 := GEO: CARCEL 6 + MESHX 0.0 <> + MESHY 0.0 <> + SECT 4 6 + RADIUS 0.0 <> <> <> <> + <> <> + MIX 3 4 5 6 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0202 := GEO: C0201 + MIX 9 10 11 12 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0301 := GEO: C0201 + MIX 13 14 15 16 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0302 := GEO: C0201 + MIX 17 18 19 20 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0303 := GEO: C0201 + MIX 21 22 23 24 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0402 := GEO: C0201 + MIX 26 27 28 29 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0403 := GEO: C0201 + MIX 30 31 32 33 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0501 := GEO: C0201 + MIX 34 35 36 37 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0502 := GEO: C0201 + MIX 38 39 40 41 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0503 := GEO: C0201 + MIX 42 43 44 45 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0504 := GEO: C0201 + MIX 46 47 48 49 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0505 := GEO: C0201 + MIX 50 51 52 53 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0601 := GEO: C0201 + MIX 54 55 56 57 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0602 := GEO: C0201 + MIX 58 59 60 61 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0603 := GEO: C0201 + MIX 62 63 64 65 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0604 := GEO: C0201 + MIX 66 67 68 69 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0605 := GEO: C0201 + MIX 70 71 72 73 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0702 := GEO: C0201 + MIX 74 75 76 77 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0703 := GEO: C0201 + MIX 78 79 80 81 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0705 := GEO: C0201 + MIX 82 83 84 85 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0706 := GEO: C0201 + MIX 86 87 88 89 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0707 := GEO: C0201 + MIX 90 91 92 93 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0801 := GEO: C0201 + MIX 94 95 96 97 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0802 := GEO: C0201 + MIX 98 99 100 101 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0803 := GEO: C0201 + MIX 102 103 104 105 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0804 := GEO: C0201 + MIX 106 107 108 109 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0805 := GEO: C0201 + MIX 110 111 112 113 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0806 := GEO: C0201 + MIX 114 115 116 117 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0807 := GEO: C0201 + MIX 118 119 120 121 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0808 := GEO: C0201 + MIX 122 123 124 125 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0901 := GEO: C0201 + MIX 126 127 128 129 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0902 := GEO: C0201 + MIX 130 131 132 133 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0903 := GEO: C0201 + MIX 134 135 136 137 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0904 := GEO: C0201 + MIX 138 139 140 141 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0905 := GEO: C0201 + MIX 142 143 144 145 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0906 := GEO: C0201 + MIX 146 147 148 149 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0907 := GEO: C0201 + MIX 150 151 152 153 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0908 := GEO: C0201 + MIX 154 155 156 157 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0909 := GEO: C0201 + MIX 158 159 160 161 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: TG := GEO: CARCEL 4 + MESHX 0.0 <> + MESHY 0.0 <> + SECT 3 1 + RADIUS 0.0 <> <> <> <> + MIX 1 + 1 1 1 1 1 1 1 1 + 1 1 1 1 1 1 1 1 + 25 25 25 25 25 25 25 25 + 1 1 1 1 1 1 1 1 ; + + ::: TI := GEO: CARCEL 4 + MESHX 0.0 <> + MESHY 0.0 <> + SECT 3 1 + RADIUS 0.0 <> <> <> <> + MIX 1 + 1 1 1 1 1 1 1 1 + 1 1 1 1 1 1 1 1 + 2 2 2 2 2 2 2 2 + 1 1 1 1 1 1 1 1 ; +; diff --git a/Dragon/data/ASSBLY_CASEA_1level_apex_boron_xsm_proc/Geo_SS.c2m b/Dragon/data/ASSBLY_CASEA_1level_apex_boron_xsm_proc/Geo_SS.c2m new file mode 100644 index 0000000..3bb7fe5 --- /dev/null +++ b/Dragon/data/ASSBLY_CASEA_1level_apex_boron_xsm_proc/Geo_SS.c2m @@ -0,0 +1,213 @@ +*DECK Geo_SS +*---- +* Name : Geo_SS.c2m +* Type : DRAGON procedure +* Use : Geometry generation for Self-Shielding Calculation +* of the CASEA assembly +* Author : A. Canbakan +* +* Procedure called as: +* +*GEOSS := Geo_SS :: <> <> <> <> +* <> <> <> +* <> <> <> <> +* <> ; +* +* Input data : +* Rcomb1 : 50/100 of outer radius of fuel (cm) +* Rcomb2 : 80/100 of outer radius of fuel (cm) +* Rcomb3 : 95/100 of outer radius of fuel (cm) +* Rcomb4 : 100/100 of outer radius of fuel (cm) +* R_int_TG : Inner radius of cladding of guide tube (cm) +* R_ext_TG : Outer radius of cladding of guide tube (cm) +* R_int_TI : Inner radius of cladding of guide tube (cm) +* R_ext_TI : Outer radius of cladding of guide tube (cm) +* R_int_G : Inner radius of cladding of fuel tube (cm) +* R_ext_G : Outer radius of cladding of fuel tube (cm) +* Cote : Lattice pitch (cm) +* CoteL : Lattice pitch + Water space (cm) +* +* Output data : +* GEOSS : Geometry for Self-Shielding Calculation + +PARAMETER GEOSS :: + EDIT 0 + ::: LINKED_LIST GEOSS ; + ; +*---- +* Modules used in this procedure +*---- +MODULE GEO: END: ; + +*---- +* Input data recovery +*---- +* ; +REAL Rcomb1 Rcomb2 Rcomb3 Rcomb4 ; +:: >>Rcomb1<< >>Rcomb2<< >>Rcomb3<< >>Rcomb4<< ; +REAL R_int_TG R_ext_TG R_int_TI R_ext_TI ; +:: >>R_int_TG<< >>R_ext_TG<< >>R_int_TI<< >>R_ext_TI<< ; +REAL R_int_G R_ext_G Cote CoteL ; +:: >>R_int_G<< >>R_ext_G<< >>Cote<< >>CoteL<< ; + + + +GEOSS := GEO: :: CAR2D 9 9 + EDIT 0 + X- DIAG X+ REFL + Y- SYME Y+ DIAG + CELL + TI C0201 C0301 TG C0501 C0601 TG C0801 C0901 + C0202 C0302 C0402 C0502 C0602 C0702 C0802 C0902 + C0303 C0403 C0503 C0603 C0703 C0803 C0903 + TG C0504 C0604 TG C0804 C0904 + C0505 C0605 C0705 C0805 C0905 + TG C0706 C0806 C0906 + C0707 C0807 C0907 + C0808 C0908 + C0909 + ::: C0201 := GEO: CARCEL 6 + MESHX 0.0 <> + MESHY 0.0 <> + RADIUS 0.0 <> <> <> <> + <> <> + MIX 3 4 5 6 7 8 1 + ; + ::: C0202 := GEO: C0201 + MIX 9 10 11 12 7 8 1 + ; + ::: C0301 := GEO: C0201 + MIX 13 14 15 16 7 8 1 + ; + ::: C0302 := GEO: C0201 + MIX 17 18 19 20 7 8 1 + ; + ::: C0303 := GEO: C0201 + MIX 21 22 23 24 7 8 1 + ; + ::: C0402 := GEO: C0201 + MIX 26 27 28 29 7 8 1 + ; + ::: C0403 := GEO: C0201 + MIX 30 31 32 33 7 8 1 + ; + ::: C0501 := GEO: C0201 + MIX 34 35 36 37 7 8 1 + ; + ::: C0502 := GEO: C0201 + MIX 38 39 40 41 7 8 1 + ; + ::: C0503 := GEO: C0201 + MIX 42 43 44 45 7 8 1 + ; + ::: C0504 := GEO: C0201 + MIX 46 47 48 49 7 8 1 + ; + ::: C0505 := GEO: C0201 + MIX 50 51 52 53 7 8 1 + ; + ::: C0601 := GEO: C0201 + MIX 54 55 56 57 7 8 1 + ; + ::: C0602 := GEO: C0201 + MIX 58 59 60 61 7 8 1 + ; + ::: C0603 := GEO: C0201 + MIX 62 63 64 65 7 8 1 + ; + ::: C0604 := GEO: C0201 + MIX 66 67 68 69 7 8 1 + ; + ::: C0605 := GEO: C0201 + MIX 70 71 72 73 7 8 1 + ; + ::: C0702 := GEO: C0201 + MIX 74 75 76 77 7 8 1 + ; + ::: C0703 := GEO: C0201 + MIX 78 79 80 81 7 8 1 + ; + ::: C0705 := GEO: C0201 + MIX 82 83 84 85 7 8 1 + ; + ::: C0706 := GEO: C0201 + MIX 86 87 88 89 7 8 1 + ; + ::: C0707 := GEO: C0201 + MIX 90 91 92 93 7 8 1 + ; + ::: C0801 := GEO: C0201 + MIX 94 95 96 97 7 8 1 + ; + ::: C0802 := GEO: C0201 + MIX 98 99 100 101 7 8 1 + ; + ::: C0803 := GEO: C0201 + MIX 102 103 104 105 7 8 1 + ; + ::: C0804 := GEO: C0201 + MIX 106 107 108 109 7 8 1 + ; + ::: C0805 := GEO: C0201 + MIX 110 111 112 113 7 8 1 + ; + ::: C0806 := GEO: C0201 + MIX 114 115 116 117 7 8 1 + ; + ::: C0807 := GEO: C0201 + MIX 118 119 120 121 7 8 1 + ; + ::: C0808 := GEO: C0201 + MIX 122 123 124 125 7 8 1 + ; + ::: C0901 := GEO: CARCEL 6 + MESHX 0.0 <> + MESHY 0.0 <> + RADIUS 0.0 <> <> <> <> + <> <> + MIX 126 127 128 129 7 8 1 + ; + ::: C0902 := GEO: C0901 + MIX 130 131 132 133 7 8 1 + ; + ::: C0903 := GEO: C0901 + MIX 134 135 136 137 7 8 1 + ; + ::: C0904 := GEO: C0901 + MIX 138 139 140 141 7 8 1 + ; + ::: C0905 := GEO: C0901 + MIX 142 143 144 145 7 8 1 + ; + ::: C0906 := GEO: C0901 + MIX 146 147 148 149 7 8 1 + ; + ::: C0907 := GEO: C0901 + MIX 150 151 152 153 7 8 1 + ; + ::: C0908 := GEO: C0901 + MIX 154 155 156 157 7 8 1 + ; + ::: C0909 := GEO: CARCEL 6 + MESHX 0.0 <> + MESHY 0.0 <> + RADIUS 0.0 <> <> <> <> + <> <> + MIX 158 159 160 161 7 8 1 + ; + ::: TG := GEO: CARCEL 2 + MESHX 0.0 <> + MESHY 0.0 <> + RADIUS 0.0 <> <> + MIX 1 25 1 + ; + ::: TI := GEO: CARCEL 2 + MESHX 0.0 <> + MESHY 0.0 <> + RADIUS 0.0 <> <> + MIX 1 2 1 + ; +; + +END: ; +QUIT . diff --git a/Dragon/data/ASSBLY_CASEA_1level_apex_boron_xsm_proc/Mix_UOX.c2m b/Dragon/data/ASSBLY_CASEA_1level_apex_boron_xsm_proc/Mix_UOX.c2m new file mode 100644 index 0000000..78f428c --- /dev/null +++ b/Dragon/data/ASSBLY_CASEA_1level_apex_boron_xsm_proc/Mix_UOX.c2m @@ -0,0 +1,547 @@ +*DECK Mix_UOX +*---- +* Name : Mix_UOX.c2m +* Type : DRAGON procedure +* Use : Microlib generation with Apolib2 for +* UOX calculation with 37 fuel regions +* Author : A. Hebert +* +* Procedure called as: +* +* LIBRARY := Mix_UOX :: +* <> <> <> ; +* +* Input data : +* Library : Cross-section library name +* dens_mod : Coolant density +* pbore : Natural boron concentration (ppm) +* +* Output data : +* LIBRARY : Microlib with table of probabilities + + +PARAMETER LIBRARY :: + EDIT 0 + ::: LINKED_LIST LIBRARY ; + ; + +*---- +* Input data recovery +*---- +STRING Library ; +:: >>Library<< ; + +REAL dens_mod pbore ; +:: >>dens_mod<< >>pbore<< ; + +*---- +* Modules used in this procedure +*---- +MODULE LIB: UTL: DELETE: END: ABORT: ; + +* Calculation of moderator data +REAL A := 6.022094E-1 ; ! Avogadro number + +REAL P_B10 P_B11 := 0.202 0.798 ; +REAL M_H2O := 15.9994 2.0 1.00794 * + ; +REAL M_B := P_B10 10.012938 * P_B11 11.009276 * + ; +REAL f1 := 1.0 1.0E-06 pbore * - ; +REAL f2 := 1.0E-06 pbore * ; +REAL N_O16 := dens_mod f1 A * * M_H2O / ; +REAL N_H1 := 2.0 N_O16 * ; +REAL N_B10 := P_B10 dens_mod f2 A * * * M_B / ; +REAL N_B11 := P_B11 dens_mod f2 A * * * M_B / ; +ECHO "Mix_UOX H1=" N_H1 ; +ECHO "Mix_UOX O16=" N_O16 ; +ECHO "Mix_UOX B10=" N_B10 ; +ECHO "Mix_UOX B11=" N_B11 ; + +LIBRARY := LIB: :: + EDIT 2 + NMIX 161 (*MAXIMUM OF MATERIAL MIXTURES*) + CTRA APOL (*APOLLO TYPE TRANSPORT CORRECTION*) + ANIS 2 + ADED 4 NELAS N4N N2N N3N + SUBG (*HELIOS TYPE PROBABILITY TABLES*) + +*---- +* Depletion Chain +*---- + MIXS LIB: APXSM FIL: <> +*---- +* Moderator +*---- + MIX 1 600.0 NOEV + H1 = H1_H2O <> + O16 = O16 <> + B10 = B10 <> + B11 = B11 <> + +*---- +* Cladding TI +*---- + MIX 2 600.0 NOEV + Zr90 = Zr90 2.16576E-2 2 SHIB Zr90SS + Zr91 = Zr91 4.72300E-3 2 SHIB Zr91SS + Zr92 = Zr92 7.21921E-3 2 SHIB Zr92SS + Zr94 = Zr94 7.31603E-3 2 SHIB Zr94SS + Zr96 = Zr96 1.17864E-3 2 SHIB Zr96SS + +*---- +* Fuel -> 8 * 4 evolving mixes +*---- +* C1 Cell + MIX 3 900.0 + U235 = U235 4.08785E-4 1 SHIB U235SS + U238 = U238 2.20157E-2 1 SHIB U238SS + O16 = O16 4.48565E-2 + MIX 4 + COMB 3 1.0 + MIX 5 + COMB 3 1.0 + MIX 6 + COMB 3 1.0 + +*---- +* Gap +*---- + MIX 7 600.0 NOEV + O16 = O16 3.76439E-6 + +*---- +* Cladding fuel +*---- + MIX 8 600.0 NOEV + Zr90 = Zr90 2.16576E-2 2 SHIB Zr90SS + Zr91 = Zr91 4.72300E-3 2 SHIB Zr91SS + Zr92 = Zr92 7.21921E-3 2 SHIB Zr92SS + Zr94 = Zr94 7.31603E-3 + Zr96 = Zr96 1.17864E-3 + +* C2 Cell + MIX 9 + COMB 3 1.0 + MIX 10 + COMB 3 1.0 + MIX 11 + COMB 3 1.0 + MIX 12 + COMB 3 1.0 + +******* +*C0301* *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 +******* +*C0302* *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 +******* +*C0303* *C2 +******* +MIX 21 + COMB 9 1.0 +MIX 22 + COMB 10 1.0 +MIX 23 + COMB 11 1.0 +MIX 24 + COMB 12 1.0 + +*---- +* Cladding TG +*---- +MIX 25 COMB 2 1.0 + +******* +*C0402* *C1 +******* +MIX 26 + COMB 3 1.0 +MIX 27 + COMB 4 1.0 +MIX 28 + COMB 5 1.0 +MIX 29 + COMB 6 1.0 +******* +*C0403* *C1 +******* +MIX 30 + COMB 3 1.0 +MIX 31 + COMB 4 1.0 +MIX 32 + COMB 5 1.0 +MIX 33 + COMB 6 1.0 +******* +*C0501* *C1 +******* +MIX 34 + COMB 3 1.0 +MIX 35 + COMB 4 1.0 +MIX 36 + COMB 5 1.0 +MIX 37 + COMB 6 1.0 +******* +*C0502* *C2 +******* +MIX 38 + COMB 9 1.0 +MIX 39 + COMB 10 1.0 +MIX 40 + COMB 11 1.0 +MIX 41 + COMB 12 1.0 +******* +*C0503* *C2 +******* +MIX 42 + COMB 9 1.0 +MIX 43 + COMB 10 1.0 +MIX 44 + COMB 11 1.0 +MIX 45 + COMB 12 1.0 +******* +*C0504* *C1 +******* +MIX 46 + COMB 3 1.0 +MIX 47 + COMB 4 1.0 +MIX 48 + COMB 5 1.0 +MIX 49 + COMB 6 1.0 +******* +*C0505* *C2 +******* +MIX 50 + COMB 9 1.0 +MIX 51 + COMB 10 1.0 +MIX 52 + COMB 11 1.0 +MIX 53 + COMB 12 1.0 +******* +*C0601* *C1 +******* +MIX 54 + COMB 3 1.0 +MIX 55 + COMB 4 1.0 +MIX 56 + COMB 5 1.0 +MIX 57 + COMB 6 1.0 +******* +*C0602* *C2 +******* +MIX 58 + COMB 9 1.0 +MIX 59 + COMB 10 1.0 +MIX 60 + COMB 11 1.0 +MIX 61 + COMB 12 1.0 +******* +*C0603* *C2 +******* +MIX 62 + COMB 9 1.0 +MIX 63 + COMB 10 1.0 +MIX 64 + COMB 11 1.0 +MIX 65 + COMB 12 1.0 +******* +*C0604* *C1 +******* +MIX 66 + COMB 3 1.0 +MIX 67 + COMB 4 1.0 +MIX 68 + COMB 5 1.0 +MIX 69 + COMB 6 1.0 +******* +*C0605* *C1 +******* +MIX 70 + COMB 3 1.0 +MIX 71 + COMB 4 1.0 +MIX 72 + COMB 5 1.0 +MIX 73 + COMB 6 1.0 +******* +*C0702* *C1 +******* +MIX 74 + COMB 3 1.0 +MIX 75 + COMB 4 1.0 +MIX 76 + COMB 5 1.0 +MIX 77 + COMB 6 1.0 +******* +*C0703* *C1 +******* +MIX 78 + COMB 3 1.0 +MIX 79 + COMB 4 1.0 +MIX 80 + COMB 5 1.0 +MIX 81 + COMB 6 1.0 +******* +*C0705* *C1 +******* +MIX 82 + COMB 3 1.0 +MIX 83 + COMB 4 1.0 +MIX 84 + COMB 5 1.0 +MIX 85 + COMB 6 1.0 +******* +*C0706* *C1 +******* +MIX 86 + COMB 3 1.0 +MIX 87 + COMB 4 1.0 +MIX 88 + COMB 5 1.0 +MIX 89 + COMB 6 1.0 +******* +*C0707* *C2 +******* +MIX 90 + COMB 9 1.0 +MIX 91 + COMB 10 1.0 +MIX 92 + COMB 11 1.0 +MIX 93 + COMB 12 1.0 +******* +*C0801* *C4 +******* + +* C4 Cell + MIX 94 + COMB 3 1.0 + MIX 95 + COMB 3 1.0 + MIX 96 + COMB 3 1.0 + MIX 97 + COMB 3 1.0 + +******* +*C0802* *C2 +******* +MIX 98 + COMB 9 1.0 +MIX 99 + COMB 10 1.0 +MIX 100 + COMB 11 1.0 +MIX 101 + COMB 12 1.0 +******* +*C0803* *C2 +******* +MIX 102 + COMB 9 1.0 +MIX 103 + COMB 10 1.0 +MIX 104 + COMB 11 1.0 +MIX 105 + COMB 12 1.0 +******* +*C0804* *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 +******* +*C0805* *C2 +******* +MIX 110 + COMB 9 1.0 +MIX 111 + COMB 10 1.0 +MIX 112 + COMB 11 1.0 +MIX 113 + COMB 12 1.0 + +* C3 Cell + MIX 114 + COMB 3 1.0 + MIX 115 + COMB 3 1.0 + MIX 116 + COMB 3 1.0 + MIX 117 + COMB 3 1.0 + +******* +*C0807* *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 + +* C5 Cell + MIX 122 + COMB 3 1.0 + MIX 123 + COMB 3 1.0 + MIX 124 + COMB 3 1.0 + MIX 125 + COMB 3 1.0 + +* C6 Cell + MIX 126 + COMB 3 1.0 + MIX 127 + COMB 3 1.0 + MIX 128 + COMB 3 1.0 + MIX 129 + COMB 3 1.0 + +******* +*C0902* *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 +******* +*C0903* *C6 +******* +MIX 134 + COMB 126 1.0 +MIX 135 + COMB 127 1.0 +MIX 136 + COMB 128 1.0 +MIX 137 + COMB 129 1.0 +******* +*C0904* *C6 +******* +MIX 138 + COMB 126 1.0 +MIX 139 + COMB 127 1.0 +MIX 140 + COMB 128 1.0 +MIX 141 + COMB 129 1.0 +******* +*C0905* *C6 +******* +MIX 142 + COMB 126 1.0 +MIX 143 + COMB 127 1.0 +MIX 144 + COMB 128 1.0 +MIX 145 + COMB 129 1.0 +******* +*C0906* *C6 +******* +MIX 146 + COMB 126 1.0 +MIX 147 + COMB 127 1.0 +MIX 148 + COMB 128 1.0 +MIX 149 + COMB 129 1.0 +******* +*C0907* *C6 +******* +MIX 150 + COMB 126 1.0 +MIX 151 + COMB 127 1.0 +MIX 152 + COMB 128 1.0 +MIX 153 + COMB 129 1.0 + +* C7 Cell + MIX 154 + COMB 3 1.0 + MIX 155 + COMB 3 1.0 + MIX 156 + COMB 3 1.0 + MIX 157 + COMB 3 1.0 + +* C8 Cell + MIX 158 + COMB 3 1.0 + MIX 159 + COMB 3 1.0 + MIX 160 + COMB 3 1.0 + MIX 161 + COMB 3 1.0 +; + +END: ; +QUIT . diff --git a/Dragon/data/ASSBLY_CASEA_1level_mpo.access b/Dragon/data/ASSBLY_CASEA_1level_mpo.access new file mode 100755 index 0000000..61cf315 --- /dev/null +++ b/Dragon/data/ASSBLY_CASEA_1level_mpo.access @@ -0,0 +1,48 @@ +#!/bin/sh +if [ $# = 0 ] + then + echo "usage: ASSBLY_CASEA_1level_mpo.access directory" 1>&2 + exit 1 +fi +MACH=`uname -s` +Sysx="`echo $MACH | cut -b -6`" +if [ $Sysx = "CYGWIN" ]; then + MACH=`uname -o` +elif [ $Sysx = "Darwin" ]; then + MACH=`uname -sm` +elif [ $Sysx = "SunOS" ]; then + MACH=`uname -sm` +fi +pos=$1/../../libraries/hdf5 +if [ -f "$pos"/ap3lib-xsect-CEA93_CLA99_GV0LUX_N.h5.gz ] + then + echo 'gunzipping CLA99CEA93' + chmod 755 "$pos" + gunzip "$pos"/ap3lib-xsect-CEA93_CLA99_GV0LUX_N.h5.gz +fi +if [ -f "$pos"/ap3lib-xsect-CEA93_CLA99_GV0LUX_N.h5 ] + then + ln -s "$pos"/ap3lib-xsect-CEA93_CLA99_GV0LUX_N.h5 CLA99CEA93 +fi +if [ -f "$pos"/ap3lib-autop-1-CEA93_CLA99_GV0LUX_N.h5.gz ] + then + echo 'gunzipping CLA99CEA93_SS' + chmod 755 "$pos" + gunzip "$pos"/ap3lib-autop-1-CEA93_CLA99_GV0LUX_N.h5.gz +fi +if [ -f "$pos"/ap3lib-autop-1-CEA93_CLA99_GV0LUX_N.h5 ] + then + ln -s "$pos"/ap3lib-autop-1-CEA93_CLA99_GV0LUX_N.h5 CLA99CEA93_SS +fi +if [ -f "$pos"/Depletion_Data_CH_STD_CEA93_V10_withYields.h5.gz ] + then + echo 'gunzipping CLA99CEA93_EVO' + chmod 755 "$pos" + gunzip "$pos"/Depletion_Data_CH_STD_CEA93_V10_withYields.h5.gz +fi +if [ -f "$pos"/Depletion_Data_CH_STD_CEA93_V10_withYields.h5 ] + then + ln -s "$pos"/Depletion_Data_CH_STD_CEA93_V10_withYields.h5 CLA99CEA93_EVO +fi +ls -l +echo "ASSBLY_CASEA_1level_mpo access script terminated" diff --git a/Dragon/data/ASSBLY_CASEA_1level_mpo.save b/Dragon/data/ASSBLY_CASEA_1level_mpo.save new file mode 100755 index 0000000..6f3adc3 --- /dev/null +++ b/Dragon/data/ASSBLY_CASEA_1level_mpo.save @@ -0,0 +1,20 @@ +#!/bin/sh +# +if [ $# = 0 ] + then + echo "usage: ASSBLY_CASEA_1level_mpo.save directory" 1>&2 + exit 1 +fi +echo access ASSBLY_CASEA_1level_mpo.save +MACH=`uname -s` +Sysx="`echo $MACH | cut -b -6`" +if [ $Sysx = "CYGWIN" ]; then + MACH=`uname -o` +elif [ $Sysx = "AIX" ]; then + MACH=`uname -s` +else + MACH=`uname -sm | sed 's/[ ]/_/'` +fi +ls -l +mv MyMpo.hdf $1/"$MACH"/assbly_caseA_mpo.hdf +echo "ASSBLY_CASEA_1level_mpo.save completed" diff --git a/Dragon/data/ASSBLY_CASEA_1level_mpo.x2m b/Dragon/data/ASSBLY_CASEA_1level_mpo.x2m new file mode 100644 index 0000000..f61d833 --- /dev/null +++ b/Dragon/data/ASSBLY_CASEA_1level_mpo.x2m @@ -0,0 +1,167 @@ +*---- +* case ASSBLY_CASEA_1level_mpo +* 99-group eighth assembly in DRAGON -- 1-level scheme +* production of an MPO file for reflector feeding +* Author: A. Hebert +*---- +HDF5_FILE MyMpo :: FILE './MyMpo.hdf' ; +LINKED_LIST GEOSS GEON2 TRACKSS TRACKN2 LIBRARY LIBRARY2 SYS FLUX2 EDIOBJ ; +MODULE SYBILT: G2S: SALT: MCCGT: USS: ASM: FLU: EDI: UTL: DELETE: LIB: MPO: END: ; +REAL Rcomb1 Rcomb2 Rcomb3 Rcomb4 R_int_TG R_ext_TG R_int_TI R_ext_TI + R_int_G R_ext_G Cote CoteL RmodeN1 Lame ; +SEQ_ASCII ASSBLY_CASEA :: FILE './ASSBLY_CASEA_1level_g2s.txt' ; +SEQ_ASCII FIGASB_CASEA :: FILE './ASSBLY_CASEA_1level_g2s.eps' ; +SEQ_BINARY TF_EXC ; +INTEGER an2d := 8 ; +REAL densur := 20.0 ; +INTEGER istep maxstep istepNext maxautop iAutop := 0 77 0 8 1 ; +PROCEDURE Geo_SS Geo_N2 Mix_UOX ; +PROCEDURE assertS ; + +************************************************************************ +* BEGIN GEOMETRY * +************************************************************************ +EVALUATE Rcomb4 := 0.4096 ; +EVALUATE Rcomb1 := 0.5 SQRT Rcomb4 * ; +EVALUATE Rcomb2 := 0.8 SQRT Rcomb4 * ; +EVALUATE Rcomb3 := 0.95 SQRT Rcomb4 * ; +EVALUATE R_int_TG := 0.5605 ; +EVALUATE R_ext_TG := 0.6225 ; +EVALUATE R_int_TI := 0.5725 ; +EVALUATE R_ext_TI := 0.6225 ; +EVALUATE R_int_G := 0.4180 ; +EVALUATE R_ext_G := 0.4750 ; +EVALUATE Cote := 1.26 ; +EVALUATE CoteL := 1.302 ; +EVALUATE Lame := CoteL Cote - ; +EVALUATE RmodeN1 := 0.670 ; + +GEOSS := Geo_SS :: <> <> <> <> + <> <> <> + <> <> <> <> + <> ; + +GEON2 := Geo_N2 :: <> <> <> <> + <> <> <> + <> <> <> <> + <> ; +ASSBLY_CASEA FIGASB_CASEA := G2S: GEON2 ; + +************************************************************************ +* BEGIN TRACKING * +************************************************************************ +! Level One +TRACKSS := SYBILT: GEOSS :: + EDIT 0 + MAXR 500 + MAXZ 1000000 + TITLE 'TRACKING FOR ASSEMBLY SS' + QUA2 20 3 + DP01 ; +! MOC tracking for flux calculation +TRACKN2 TF_EXC := SALT: ASSBLY_CASEA :: + EDIT 3 + ALLG + TSPC EQW2 <> <> REND +; +TRACKN2 := MCCGT: TRACKN2 TF_EXC :: + CACB 4 AAC 80 TMT EPSI 1E-5 MCU 10000 ; + +************************************************************************ +* END TRACKING * +************************************************************************ +************************************************************************ +* BEGIN LIBRARY READING * +************************************************************************ +STRING Library := 'CLA99CEA93:CLA99CEA93_SS' ; +REAL dens_mod := 0.85 ; +REAL pbore := 975.0 ; +LIBRARY := Mix_UOX :: <> <> <> ; + +************************************************************************ +* END LIBRARY READING * +************************************************************************ + +************************************************************************ +* BEGIN MyMpo INITIALIZATION * +************************************************************************ + MyMpo := MPO: LIBRARY :: + EDIT 10 + COMM '99-group feeding assembly' + REAC Total Absorption Fission FissionSpectrum NuFission CaptureEnergyCapture + FissionEnergyFission Diffusion Scattering + ; +************************************************************************ +* END MyMpo INITIALIZATION * +************************************************************************ + +************************************************************************ +* RESONANCE SELF-SHIELDING * +************************************************************************ +LIBRARY2 := USS: LIBRARY TRACKSS :: EDIT 1 PASS 2 ARM GRMIN 18 + + CALC REGI W1 U235 ALL + + REGI W1 U238 3 + REGI W2 U238 4 + REGI W3 U238 5 + REGI W4 U238 6 + + REGI W1 U238 9 + REGI W2 U238 10 + REGI W3 U238 11 + REGI W4 U238 12 + + REGI W1 U238 94 + REGI W2 U238 95 + REGI W3 U238 96 + REGI W4 U238 97 + + REGI W1 U238 114 + REGI W2 U238 115 + REGI W3 U238 116 + REGI W4 U238 117 + + REGI W1 U238 122 + REGI W2 U238 123 + REGI W3 U238 124 + REGI W4 U238 125 + + REGI W1 U238 126 + REGI W2 U238 127 + REGI W3 U238 128 + REGI W4 U238 129 + + REGI W1 U238 154 + REGI W2 U238 155 + REGI W3 U238 156 + REGI W4 U238 157 + + REGI W1 U238 158 + REGI W2 U238 159 + REGI W3 U238 160 + REGI W4 U238 161 + + ENDC ; + +************************************************************************ +* BEGIN MOC FLUX CALCULATION * +************************************************************************ +SYS := ASM: LIBRARY2 TRACKN2 TF_EXC :: ARM EDIT 1 ; + +FLUX2 := FLU: LIBRARY2 SYS TRACKN2 TF_EXC :: EDIT 1 TYPE B B1 SIGS ; + +EDIOBJ := EDI: FLUX2 LIBRARY2 TRACKN2 :: EDIT 5 + MERG COMP + MICR RES + SAVE ON COND2 + ; + +************************************************************************ +* MyMpo FEEDING * +************************************************************************ +MyMpo := MPO: MyMpo EDIOBJ :: EDIT 2 ; + +assertS FLUX2 :: K-INFINITY 1 1.018207 ; +ECHO "test ASSBLY_CASEA_1level_mpo completed" ; +END: ; diff --git a/Dragon/data/ASSBLY_CASEA_1level_mpo_proc/Geo_N2.c2m b/Dragon/data/ASSBLY_CASEA_1level_mpo_proc/Geo_N2.c2m new file mode 100644 index 0000000..24790cf --- /dev/null +++ b/Dragon/data/ASSBLY_CASEA_1level_mpo_proc/Geo_N2.c2m @@ -0,0 +1,239 @@ +*DECK Geo_N2 +*---- +* Name : Geo_N2.c2m +* Type : DRAGON procedure +* Use : Geometry generation for 2nd Level Flux Calculation +* of the CASEA assembly +* Author : A. Hebert +* +* Procedure called as: +* +*GEON2 := Geo_N2 :: <> <> <> <> +* <> <> <> +* <> <> <> <> +* <> ; +* +* Input data : +* Rcomb1 : 50/100 of outer radius of fuel (cm) +* Rcomb2 : 80/100 of outer radius of fuel (cm) +* Rcomb3 : 95/100 of outer radius of fuel (cm) +* Rcomb4 : 100/100 of outer radius of fuel (cm) +* R_int_TG : Inner radius of cladding of guide tube (cm) +* R_ext_TG : Outer radius of cladding of guide tube (cm) +* R_int_TI : Inner radius of cladding of guide tube (cm) +* R_ext_TI : Outer radius of cladding of guide tube (cm) +* R_int_G : Inner radius of cladding of fuel tube (cm) +* R_ext_G : Outer radius of cladding of fuel tube (cm) +* Cote : Lattice pitch (cm) +* Lame : Water space (cm) +* +* Output data : +* GEON2 : Geometry for 2nd Level Flux Calculation + +PARAMETER GEON2 :: + EDIT 0 + ::: LINKED_LIST GEON2 ; + ; +*---- +* Modules used in this procedure +*---- +MODULE GEO: END: ; + +*---- +* Input data recovery +*---- +* ; +REAL Rcomb1 Rcomb2 Rcomb3 Rcomb4 ; +:: >>Rcomb1<< >>Rcomb2<< >>Rcomb3<< >>Rcomb4<< ; +REAL R_int_TG R_ext_TG R_int_TI R_ext_TI ; +:: >>R_int_TG<< >>R_ext_TG<< >>R_int_TI<< >>R_ext_TI<< ; +REAL R_int_G R_ext_G Cote Lame ; +:: >>R_int_G<< >>R_ext_G<< >>Cote<< >>Lame<< ; + +REAL mesh1 := Cote ; +REAL mesh2 := mesh1 Cote + ; +REAL mesh3 := mesh2 Cote + ; +REAL mesh4 := mesh3 Cote + ; +REAL mesh5 := mesh4 Cote + ; +REAL mesh6 := mesh5 Cote + ; +REAL mesh7 := mesh6 Cote + ; +REAL mesh8 := mesh7 Cote + ; +REAL mesh9 := mesh8 Cote + ; +REAL mesh10 := mesh9 Lame + ; + +REAL Rtub1_TG := R_int_TG 3.0 / ; +REAL Rtub2_TG := R_int_TG 1.5 / ; +REAL Rtub1_TI := R_int_TI 3.0 / ; +REAL Rtub2_TI := R_int_TI 1.5 / ; +* +GEON2 := GEO: :: CAR2D 10 10 + EDIT 0 + X- DIAG X+ REFL + Y- SYME Y+ DIAG + CELL + TI C0201 C0301 TG C0501 C0601 TG C0801 C0901 Lame_S + C0202 C0302 C0402 C0502 C0602 C0702 C0802 C0902 Lame_S + C0303 C0403 C0503 C0603 C0703 C0803 C0903 Lame_S + TG C0504 C0604 TG C0804 C0904 Lame_S + C0505 C0605 C0705 C0805 C0905 Lame_S + TG C0706 C0806 C0906 Lame_S + C0707 C0807 C0907 Lame_S + C0808 C0908 Lame_S + C0909 Lame_S + Lame_C + MESHX 0.0 <> <> <> <> <> <> + <> <> <> <> + MESHY 0.0 <> <> <> <> <> <> + <> <> <> <> + ::: Lame_C := GEO: CAR2D 1 1 + MESHX 0.0 <> MESHY 0.0 <> + MIX 1 ; + + ::: Lame_S := GEO: CAR2D 1 1 + MESHX 0.0 <> MESHY 0.0 <> + SPLITY 3 MIX 1 ; + + ::: C0201 := GEO: CARCEL 6 + MESHX 0.0 <> + MESHY 0.0 <> + SECT 4 6 + RADIUS 0.0 <> <> <> <> + <> <> + MIX 3 4 5 6 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0202 := GEO: C0201 + MIX 9 10 11 12 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0301 := GEO: C0201 + MIX 13 14 15 16 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0302 := GEO: C0201 + MIX 17 18 19 20 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0303 := GEO: C0201 + MIX 21 22 23 24 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0402 := GEO: C0201 + MIX 26 27 28 29 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0403 := GEO: C0201 + MIX 30 31 32 33 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0501 := GEO: C0201 + MIX 34 35 36 37 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0502 := GEO: C0201 + MIX 38 39 40 41 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0503 := GEO: C0201 + MIX 42 43 44 45 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0504 := GEO: C0201 + MIX 46 47 48 49 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0505 := GEO: C0201 + MIX 50 51 52 53 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0601 := GEO: C0201 + MIX 54 55 56 57 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0602 := GEO: C0201 + MIX 58 59 60 61 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0603 := GEO: C0201 + MIX 62 63 64 65 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0604 := GEO: C0201 + MIX 66 67 68 69 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0605 := GEO: C0201 + MIX 70 71 72 73 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0702 := GEO: C0201 + MIX 74 75 76 77 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0703 := GEO: C0201 + MIX 78 79 80 81 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0705 := GEO: C0201 + MIX 82 83 84 85 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0706 := GEO: C0201 + MIX 86 87 88 89 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0707 := GEO: C0201 + MIX 90 91 92 93 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0801 := GEO: C0201 + MIX 94 95 96 97 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0802 := GEO: C0201 + MIX 98 99 100 101 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0803 := GEO: C0201 + MIX 102 103 104 105 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0804 := GEO: C0201 + MIX 106 107 108 109 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0805 := GEO: C0201 + MIX 110 111 112 113 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0806 := GEO: C0201 + MIX 114 115 116 117 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0807 := GEO: C0201 + MIX 118 119 120 121 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0808 := GEO: C0201 + MIX 122 123 124 125 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0901 := GEO: C0201 + MIX 126 127 128 129 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0902 := GEO: C0201 + MIX 130 131 132 133 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0903 := GEO: C0201 + MIX 134 135 136 137 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0904 := GEO: C0201 + MIX 138 139 140 141 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0905 := GEO: C0201 + MIX 142 143 144 145 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0906 := GEO: C0201 + MIX 146 147 148 149 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0907 := GEO: C0201 + MIX 150 151 152 153 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0908 := GEO: C0201 + MIX 154 155 156 157 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0909 := GEO: C0201 + MIX 158 159 160 161 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: TG := GEO: CARCEL 4 + MESHX 0.0 <> + MESHY 0.0 <> + SECT 3 1 + RADIUS 0.0 <> <> <> <> + MIX 1 + 1 1 1 1 1 1 1 1 + 1 1 1 1 1 1 1 1 + 25 25 25 25 25 25 25 25 + 1 1 1 1 1 1 1 1 ; + + ::: TI := GEO: CARCEL 4 + MESHX 0.0 <> + MESHY 0.0 <> + SECT 3 1 + RADIUS 0.0 <> <> <> <> + MIX 1 + 1 1 1 1 1 1 1 1 + 1 1 1 1 1 1 1 1 + 2 2 2 2 2 2 2 2 + 1 1 1 1 1 1 1 1 ; +; diff --git a/Dragon/data/ASSBLY_CASEA_1level_mpo_proc/Geo_SS.c2m b/Dragon/data/ASSBLY_CASEA_1level_mpo_proc/Geo_SS.c2m new file mode 100644 index 0000000..3bb7fe5 --- /dev/null +++ b/Dragon/data/ASSBLY_CASEA_1level_mpo_proc/Geo_SS.c2m @@ -0,0 +1,213 @@ +*DECK Geo_SS +*---- +* Name : Geo_SS.c2m +* Type : DRAGON procedure +* Use : Geometry generation for Self-Shielding Calculation +* of the CASEA assembly +* Author : A. Canbakan +* +* Procedure called as: +* +*GEOSS := Geo_SS :: <> <> <> <> +* <> <> <> +* <> <> <> <> +* <> ; +* +* Input data : +* Rcomb1 : 50/100 of outer radius of fuel (cm) +* Rcomb2 : 80/100 of outer radius of fuel (cm) +* Rcomb3 : 95/100 of outer radius of fuel (cm) +* Rcomb4 : 100/100 of outer radius of fuel (cm) +* R_int_TG : Inner radius of cladding of guide tube (cm) +* R_ext_TG : Outer radius of cladding of guide tube (cm) +* R_int_TI : Inner radius of cladding of guide tube (cm) +* R_ext_TI : Outer radius of cladding of guide tube (cm) +* R_int_G : Inner radius of cladding of fuel tube (cm) +* R_ext_G : Outer radius of cladding of fuel tube (cm) +* Cote : Lattice pitch (cm) +* CoteL : Lattice pitch + Water space (cm) +* +* Output data : +* GEOSS : Geometry for Self-Shielding Calculation + +PARAMETER GEOSS :: + EDIT 0 + ::: LINKED_LIST GEOSS ; + ; +*---- +* Modules used in this procedure +*---- +MODULE GEO: END: ; + +*---- +* Input data recovery +*---- +* ; +REAL Rcomb1 Rcomb2 Rcomb3 Rcomb4 ; +:: >>Rcomb1<< >>Rcomb2<< >>Rcomb3<< >>Rcomb4<< ; +REAL R_int_TG R_ext_TG R_int_TI R_ext_TI ; +:: >>R_int_TG<< >>R_ext_TG<< >>R_int_TI<< >>R_ext_TI<< ; +REAL R_int_G R_ext_G Cote CoteL ; +:: >>R_int_G<< >>R_ext_G<< >>Cote<< >>CoteL<< ; + + + +GEOSS := GEO: :: CAR2D 9 9 + EDIT 0 + X- DIAG X+ REFL + Y- SYME Y+ DIAG + CELL + TI C0201 C0301 TG C0501 C0601 TG C0801 C0901 + C0202 C0302 C0402 C0502 C0602 C0702 C0802 C0902 + C0303 C0403 C0503 C0603 C0703 C0803 C0903 + TG C0504 C0604 TG C0804 C0904 + C0505 C0605 C0705 C0805 C0905 + TG C0706 C0806 C0906 + C0707 C0807 C0907 + C0808 C0908 + C0909 + ::: C0201 := GEO: CARCEL 6 + MESHX 0.0 <> + MESHY 0.0 <> + RADIUS 0.0 <> <> <> <> + <> <> + MIX 3 4 5 6 7 8 1 + ; + ::: C0202 := GEO: C0201 + MIX 9 10 11 12 7 8 1 + ; + ::: C0301 := GEO: C0201 + MIX 13 14 15 16 7 8 1 + ; + ::: C0302 := GEO: C0201 + MIX 17 18 19 20 7 8 1 + ; + ::: C0303 := GEO: C0201 + MIX 21 22 23 24 7 8 1 + ; + ::: C0402 := GEO: C0201 + MIX 26 27 28 29 7 8 1 + ; + ::: C0403 := GEO: C0201 + MIX 30 31 32 33 7 8 1 + ; + ::: C0501 := GEO: C0201 + MIX 34 35 36 37 7 8 1 + ; + ::: C0502 := GEO: C0201 + MIX 38 39 40 41 7 8 1 + ; + ::: C0503 := GEO: C0201 + MIX 42 43 44 45 7 8 1 + ; + ::: C0504 := GEO: C0201 + MIX 46 47 48 49 7 8 1 + ; + ::: C0505 := GEO: C0201 + MIX 50 51 52 53 7 8 1 + ; + ::: C0601 := GEO: C0201 + MIX 54 55 56 57 7 8 1 + ; + ::: C0602 := GEO: C0201 + MIX 58 59 60 61 7 8 1 + ; + ::: C0603 := GEO: C0201 + MIX 62 63 64 65 7 8 1 + ; + ::: C0604 := GEO: C0201 + MIX 66 67 68 69 7 8 1 + ; + ::: C0605 := GEO: C0201 + MIX 70 71 72 73 7 8 1 + ; + ::: C0702 := GEO: C0201 + MIX 74 75 76 77 7 8 1 + ; + ::: C0703 := GEO: C0201 + MIX 78 79 80 81 7 8 1 + ; + ::: C0705 := GEO: C0201 + MIX 82 83 84 85 7 8 1 + ; + ::: C0706 := GEO: C0201 + MIX 86 87 88 89 7 8 1 + ; + ::: C0707 := GEO: C0201 + MIX 90 91 92 93 7 8 1 + ; + ::: C0801 := GEO: C0201 + MIX 94 95 96 97 7 8 1 + ; + ::: C0802 := GEO: C0201 + MIX 98 99 100 101 7 8 1 + ; + ::: C0803 := GEO: C0201 + MIX 102 103 104 105 7 8 1 + ; + ::: C0804 := GEO: C0201 + MIX 106 107 108 109 7 8 1 + ; + ::: C0805 := GEO: C0201 + MIX 110 111 112 113 7 8 1 + ; + ::: C0806 := GEO: C0201 + MIX 114 115 116 117 7 8 1 + ; + ::: C0807 := GEO: C0201 + MIX 118 119 120 121 7 8 1 + ; + ::: C0808 := GEO: C0201 + MIX 122 123 124 125 7 8 1 + ; + ::: C0901 := GEO: CARCEL 6 + MESHX 0.0 <> + MESHY 0.0 <> + RADIUS 0.0 <> <> <> <> + <> <> + MIX 126 127 128 129 7 8 1 + ; + ::: C0902 := GEO: C0901 + MIX 130 131 132 133 7 8 1 + ; + ::: C0903 := GEO: C0901 + MIX 134 135 136 137 7 8 1 + ; + ::: C0904 := GEO: C0901 + MIX 138 139 140 141 7 8 1 + ; + ::: C0905 := GEO: C0901 + MIX 142 143 144 145 7 8 1 + ; + ::: C0906 := GEO: C0901 + MIX 146 147 148 149 7 8 1 + ; + ::: C0907 := GEO: C0901 + MIX 150 151 152 153 7 8 1 + ; + ::: C0908 := GEO: C0901 + MIX 154 155 156 157 7 8 1 + ; + ::: C0909 := GEO: CARCEL 6 + MESHX 0.0 <> + MESHY 0.0 <> + RADIUS 0.0 <> <> <> <> + <> <> + MIX 158 159 160 161 7 8 1 + ; + ::: TG := GEO: CARCEL 2 + MESHX 0.0 <> + MESHY 0.0 <> + RADIUS 0.0 <> <> + MIX 1 25 1 + ; + ::: TI := GEO: CARCEL 2 + MESHX 0.0 <> + MESHY 0.0 <> + RADIUS 0.0 <> <> + MIX 1 2 1 + ; +; + +END: ; +QUIT . diff --git a/Dragon/data/ASSBLY_CASEA_1level_mpo_proc/Mix_UOX.c2m b/Dragon/data/ASSBLY_CASEA_1level_mpo_proc/Mix_UOX.c2m new file mode 100644 index 0000000..0fa7dc9 --- /dev/null +++ b/Dragon/data/ASSBLY_CASEA_1level_mpo_proc/Mix_UOX.c2m @@ -0,0 +1,544 @@ +*DECK Mix_UOX +*---- +* Name : Mix_UOX.c2m +* Type : DRAGON procedure +* Use : Microlib generation with Apolib3 for +* UOX calculation with 37 fuel regions +* Author : A. Hebert +* +* Procedure called as: +* +* LIBRARY := Mix_UOX :: +* <> <> <> ; +* +* Input data : +* Library : Cross-section library name +* dens_mod : Coolant density +* pbore : Natural boron concentration (ppm) +* +* Output data : +* LIBRARY : Microlib with table of probabilities + + +PARAMETER LIBRARY :: + EDIT 0 + ::: LINKED_LIST LIBRARY ; + ; + +*---- +* Input data recovery +*---- +STRING Library ; +:: >>Library<< ; + +REAL dens_mod pbore ; +:: >>dens_mod<< >>pbore<< ; + +*---- +* Modules used in this procedure +*---- +MODULE LIB: UTL: DELETE: END: ABORT: ; + +* Calculation of moderator data +REAL A := 6.022094E-1 ; ! Avogadro number + +REAL P_B10 P_B11 := 0.202 0.798 ; +REAL M_H2O := 15.9994 2.0 1.00794 * + ; +REAL M_B := P_B10 10.012938 * P_B11 11.009276 * + ; +REAL f1 := 1.0 1.0E-06 pbore * - ; +REAL f2 := 1.0E-06 pbore * ; +REAL N_H2O := dens_mod f1 A * * M_H2O / ; +REAL N_B10 := P_B10 dens_mod f2 A * * * M_B / ; +REAL N_B11 := P_B11 dens_mod f2 A * * * M_B / ; +ECHO "Mix_UOX H2O=" N_H2O ; +ECHO "Mix_UOX B10=" N_B10 ; +ECHO "Mix_UOX B11=" N_B11 ; + +LIBRARY := LIB: :: + EDIT 2 + NMIX 161 (*MAXIMUM OF MATERIAL MIXTURES*) + CTRA APOL (*APOLLO TYPE TRANSPORT CORRECTION*) + ANIS 2 + ADED 4 NELAS N4N N2N N3N + SUBG (*HELIOS TYPE PROBABILITY TABLES*) + +*---- +* Depletion Chain +*---- + MIXS LIB: APLIB3 FIL: <> +*---- +* Moderator +*---- + MIX 1 600.0 NOEV + H2O = H2O <> + B10 = B10 <> + B11 = B11 <> + +*---- +* Cladding TI +*---- + MIX 2 600.0 NOEV + Zr90 = Zr90 2.16576E-2 2 + Zr91 = Zr91 4.72300E-3 2 + Zr92 = Zr92 7.21921E-3 2 + Zr94 = Zr94 7.31603E-3 2 + Zr96 = Zr96 1.17864E-3 2 + +*---- +* Fuel -> 8 * 4 evolving mixes +*---- +* C1 Cell + MIX 3 900.0 + U235 = U235 4.08785E-4 1 + U238 = U238 2.20157E-2 1 + O16 = O16 4.48565E-2 + MIX 4 + COMB 3 1.0 + MIX 5 + COMB 3 1.0 + MIX 6 + COMB 3 1.0 + +*---- +* Gap +*---- + MIX 7 600.0 NOEV + O16 = O16 3.76439E-6 + +*---- +* Cladding fuel +*---- + MIX 8 600.0 NOEV + Zr90 = Zr90 2.16576E-2 2 + Zr91 = Zr91 4.72300E-3 2 + Zr92 = Zr92 7.21921E-3 2 + Zr94 = Zr94 7.31603E-3 + Zr96 = Zr96 1.17864E-3 + +* C2 Cell + MIX 9 + COMB 3 1.0 + MIX 10 + COMB 3 1.0 + MIX 11 + COMB 3 1.0 + MIX 12 + COMB 3 1.0 + +******* +*C0301* *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 +******* +*C0302* *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 +******* +*C0303* *C2 +******* +MIX 21 + COMB 9 1.0 +MIX 22 + COMB 10 1.0 +MIX 23 + COMB 11 1.0 +MIX 24 + COMB 12 1.0 + +*---- +* Cladding TG +*---- +MIX 25 COMB 2 1.0 + +******* +*C0402* *C1 +******* +MIX 26 + COMB 3 1.0 +MIX 27 + COMB 4 1.0 +MIX 28 + COMB 5 1.0 +MIX 29 + COMB 6 1.0 +******* +*C0403* *C1 +******* +MIX 30 + COMB 3 1.0 +MIX 31 + COMB 4 1.0 +MIX 32 + COMB 5 1.0 +MIX 33 + COMB 6 1.0 +******* +*C0501* *C1 +******* +MIX 34 + COMB 3 1.0 +MIX 35 + COMB 4 1.0 +MIX 36 + COMB 5 1.0 +MIX 37 + COMB 6 1.0 +******* +*C0502* *C2 +******* +MIX 38 + COMB 9 1.0 +MIX 39 + COMB 10 1.0 +MIX 40 + COMB 11 1.0 +MIX 41 + COMB 12 1.0 +******* +*C0503* *C2 +******* +MIX 42 + COMB 9 1.0 +MIX 43 + COMB 10 1.0 +MIX 44 + COMB 11 1.0 +MIX 45 + COMB 12 1.0 +******* +*C0504* *C1 +******* +MIX 46 + COMB 3 1.0 +MIX 47 + COMB 4 1.0 +MIX 48 + COMB 5 1.0 +MIX 49 + COMB 6 1.0 +******* +*C0505* *C2 +******* +MIX 50 + COMB 9 1.0 +MIX 51 + COMB 10 1.0 +MIX 52 + COMB 11 1.0 +MIX 53 + COMB 12 1.0 +******* +*C0601* *C1 +******* +MIX 54 + COMB 3 1.0 +MIX 55 + COMB 4 1.0 +MIX 56 + COMB 5 1.0 +MIX 57 + COMB 6 1.0 +******* +*C0602* *C2 +******* +MIX 58 + COMB 9 1.0 +MIX 59 + COMB 10 1.0 +MIX 60 + COMB 11 1.0 +MIX 61 + COMB 12 1.0 +******* +*C0603* *C2 +******* +MIX 62 + COMB 9 1.0 +MIX 63 + COMB 10 1.0 +MIX 64 + COMB 11 1.0 +MIX 65 + COMB 12 1.0 +******* +*C0604* *C1 +******* +MIX 66 + COMB 3 1.0 +MIX 67 + COMB 4 1.0 +MIX 68 + COMB 5 1.0 +MIX 69 + COMB 6 1.0 +******* +*C0605* *C1 +******* +MIX 70 + COMB 3 1.0 +MIX 71 + COMB 4 1.0 +MIX 72 + COMB 5 1.0 +MIX 73 + COMB 6 1.0 +******* +*C0702* *C1 +******* +MIX 74 + COMB 3 1.0 +MIX 75 + COMB 4 1.0 +MIX 76 + COMB 5 1.0 +MIX 77 + COMB 6 1.0 +******* +*C0703* *C1 +******* +MIX 78 + COMB 3 1.0 +MIX 79 + COMB 4 1.0 +MIX 80 + COMB 5 1.0 +MIX 81 + COMB 6 1.0 +******* +*C0705* *C1 +******* +MIX 82 + COMB 3 1.0 +MIX 83 + COMB 4 1.0 +MIX 84 + COMB 5 1.0 +MIX 85 + COMB 6 1.0 +******* +*C0706* *C1 +******* +MIX 86 + COMB 3 1.0 +MIX 87 + COMB 4 1.0 +MIX 88 + COMB 5 1.0 +MIX 89 + COMB 6 1.0 +******* +*C0707* *C2 +******* +MIX 90 + COMB 9 1.0 +MIX 91 + COMB 10 1.0 +MIX 92 + COMB 11 1.0 +MIX 93 + COMB 12 1.0 +******* +*C0801* *C4 +******* + +* C4 Cell + MIX 94 + COMB 3 1.0 + MIX 95 + COMB 3 1.0 + MIX 96 + COMB 3 1.0 + MIX 97 + COMB 3 1.0 + +******* +*C0802* *C2 +******* +MIX 98 + COMB 9 1.0 +MIX 99 + COMB 10 1.0 +MIX 100 + COMB 11 1.0 +MIX 101 + COMB 12 1.0 +******* +*C0803* *C2 +******* +MIX 102 + COMB 9 1.0 +MIX 103 + COMB 10 1.0 +MIX 104 + COMB 11 1.0 +MIX 105 + COMB 12 1.0 +******* +*C0804* *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 +******* +*C0805* *C2 +******* +MIX 110 + COMB 9 1.0 +MIX 111 + COMB 10 1.0 +MIX 112 + COMB 11 1.0 +MIX 113 + COMB 12 1.0 + +* C3 Cell + MIX 114 + COMB 3 1.0 + MIX 115 + COMB 3 1.0 + MIX 116 + COMB 3 1.0 + MIX 117 + COMB 3 1.0 + +******* +*C0807* *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 + +* C5 Cell + MIX 122 + COMB 3 1.0 + MIX 123 + COMB 3 1.0 + MIX 124 + COMB 3 1.0 + MIX 125 + COMB 3 1.0 + +* C6 Cell + MIX 126 + COMB 3 1.0 + MIX 127 + COMB 3 1.0 + MIX 128 + COMB 3 1.0 + MIX 129 + COMB 3 1.0 + +******* +*C0902* *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 +******* +*C0903* *C6 +******* +MIX 134 + COMB 126 1.0 +MIX 135 + COMB 127 1.0 +MIX 136 + COMB 128 1.0 +MIX 137 + COMB 129 1.0 +******* +*C0904* *C6 +******* +MIX 138 + COMB 126 1.0 +MIX 139 + COMB 127 1.0 +MIX 140 + COMB 128 1.0 +MIX 141 + COMB 129 1.0 +******* +*C0905* *C6 +******* +MIX 142 + COMB 126 1.0 +MIX 143 + COMB 127 1.0 +MIX 144 + COMB 128 1.0 +MIX 145 + COMB 129 1.0 +******* +*C0906* *C6 +******* +MIX 146 + COMB 126 1.0 +MIX 147 + COMB 127 1.0 +MIX 148 + COMB 128 1.0 +MIX 149 + COMB 129 1.0 +******* +*C0907* *C6 +******* +MIX 150 + COMB 126 1.0 +MIX 151 + COMB 127 1.0 +MIX 152 + COMB 128 1.0 +MIX 153 + COMB 129 1.0 + +* C7 Cell + MIX 154 + COMB 3 1.0 + MIX 155 + COMB 3 1.0 + MIX 156 + COMB 3 1.0 + MIX 157 + COMB 3 1.0 + +* C8 Cell + MIX 158 + COMB 3 1.0 + MIX 159 + COMB 3 1.0 + MIX 160 + COMB 3 1.0 + MIX 161 + COMB 3 1.0 +; + +END: ; +QUIT . diff --git a/Dragon/data/ASSBLY_CASEA_1level_multicompo.access b/Dragon/data/ASSBLY_CASEA_1level_multicompo.access new file mode 100755 index 0000000..e4b598f --- /dev/null +++ b/Dragon/data/ASSBLY_CASEA_1level_multicompo.access @@ -0,0 +1,37 @@ +#!/bin/sh +if [ $# = 0 ] + then + echo "usage: ASSBLY_CASEA_1level_multicompo.access directory" 1>&2 + exit 1 +fi +MACH=`uname -s` +Sysx="`echo $MACH | cut -b -6`" +if [ $Sysx = "CYGWIN" ]; then + MACH=`uname -o` +elif [ $Sysx = "Darwin" ]; then + MACH=`uname -sm | sed 's/[ ]/_/'` +elif [ $Sysx = "SunOS" ]; then + MACH=`uname -sm | sed 's/[ ]/_/'` +fi +if [ "$MACH" = "Linux" -o "$MACH" = "OSF1" -o "$MACH" = "Cygwin" -o "$MACH" = "SunOS_i86pc" \ +-o "$MACH" = "Darwin_i386" -o "$MACH" = "Darwin_x86_64" -o "$MACH" = "Darwin_arm64" \ +-o "$MACH" = "Linux_aarch64" ] +then + echo 'use little endian libraries' + pos=$1/../../libraries/l_endian +else + echo 'use big endian libraries' + pos=$1/../../libraries/b_endian +fi +if [ -f "$pos"/draglibJeff3p1p1SHEM295_v5p1.gz ] + then + echo 'gunzipping DLIB_J2' + chmod 755 "$pos" + gunzip "$pos"/draglibJeff3p1p1SHEM295_v5p1.gz +fi +if [ -f "$pos"/draglibJeff3p1p1SHEM295_v5p1 ] + then + ln -s "$pos"/draglibJeff3p1p1SHEM295_v5p1 DLIB_J3 +fi +ls -l +echo "ASSBLY_CASEA_1level_multicompo access script terminated" diff --git a/Dragon/data/ASSBLY_CASEA_1level_multicompo.save b/Dragon/data/ASSBLY_CASEA_1level_multicompo.save new file mode 100755 index 0000000..918b745 --- /dev/null +++ b/Dragon/data/ASSBLY_CASEA_1level_multicompo.save @@ -0,0 +1,21 @@ +#!/bin/sh +# +if [ $# = 0 ] + then + echo "usage: ASSBLY_CASEA_1level_multicompo.save directory" 1>&2 + exit 1 +fi +echo access ASSBLY_CASEA_1level_multicompo.save +MACH=`uname -s` +Sysx="`echo $MACH | cut -b -6`" +if [ $Sysx = "CYGWIN" ]; then + MACH=`uname -o` +elif [ $Sysx = "AIX" ]; then + MACH=`uname -s` +else + MACH=`uname -sm | sed 's/[ ]/_/'` +fi +ls -l +mv MyCompo.txt $1/"$MACH"/assbly_CASEA_multicompo_draglib.txt +mv *.ps $1/"$MACH" +echo "ASSBLY_CASEA_1level_multicompo.save completed" diff --git a/Dragon/data/ASSBLY_CASEA_1level_multicompo.x2m b/Dragon/data/ASSBLY_CASEA_1level_multicompo.x2m new file mode 100644 index 0000000..15f28e2 --- /dev/null +++ b/Dragon/data/ASSBLY_CASEA_1level_multicompo.x2m @@ -0,0 +1,245 @@ +************************************************************************* +* case ASSBLY_CASEA * +* 295-group 1/8-th assembly in DRAGON -- 1-level scheme * +* production of a Multicompo file for TC_EVO and TC_XENON Donjon cases * +* Author: A. Canbakan * +************************************************************************* + +! BEGIN STRUCTURES and MODULES +SEQ_ASCII _MyCompo :: FILE './MyCompo.txt' ; +LINKED_LIST MyCompo GEOSS GEON2 TRACKSS TRACKN2 LIBRARY LIBRARY2 + SYS FLUX2 EDIOBJ DONNEES BURNUP ; +MODULE SYBILT: G2S: SALT: MCCGT: USS: ASM: FLU: EDI: UTL: DELETE: + END: EVO: GREP: LIB: COMPO: SPH: ABORT: ; +REAL Rcomb1 Rcomb2 Rcomb3 Rcomb4 R_int_TG R_ext_TG R_int_TI R_ext_TI + R_int_G R_ext_G Cote CoteL RmodeN1 Lame ; +SEQ_ASCII ASSBLY_CASEA :: FILE './ASSBLY_CASEA_g2s.txt' ; +SEQ_ASCII FIGASB_CASEA :: FILE './FIGASB_CASEA.ps' ; +SEQ_BINARY TF_EXC ; +INTEGER an2d := 8 ; +REAL densur := 20.0 ; +INTEGER ical ; +INTEGER istep maxstep istepNext maxautop iAutop iEdit := 0 20 0 16 1 1 ; +REAL delr BUbeg BUend Tbeg Tend := 0.01 0.0 0.0 0.0 0.0 ; +REAL Fuelpwr Kinf := 39.0 0.0 ; +REAL BU BUautop := 0.0 0.0 ; +STRING Library := "DLIB_J3" ; +PROCEDURE Geo_SS Geo_N2 Mix_UOX ; +PROCEDURE assertS ; +! END STRUCTURES AND MODULES + +! BEGIN GEOMETRY +EVALUATE Rcomb4 := 0.4096 ; +EVALUATE Rcomb1 := 0.5 SQRT Rcomb4 * ; +EVALUATE Rcomb2 := 0.8 SQRT Rcomb4 * ; +EVALUATE Rcomb3 := 0.95 SQRT Rcomb4 * ; +EVALUATE R_int_TG := 0.5605 ; +EVALUATE R_ext_TG := 0.6225 ; +EVALUATE R_int_TI := 0.5725 ; +EVALUATE R_ext_TI := 0.6225 ; +EVALUATE R_int_G := 0.4180 ; +EVALUATE R_ext_G := 0.4750 ; +EVALUATE Cote := 1.26 ; +EVALUATE CoteL := 1.302 ; +EVALUATE Lame := CoteL Cote - ; +EVALUATE RmodeN1 := 0.670 ; + +GEOSS := Geo_SS :: <> <> <> <> + <> <> <> + <> <> <> <> + <> ; + +GEON2 := Geo_N2 :: <> <> <> <> + <> <> <> + <> <> <> <> + <> ; + +ASSBLY_CASEA FIGASB_CASEA := G2S: GEON2 ; +! END GEOMETRY + +! BEGIN DECLARATION +DONNEES := UTL: :: + CREA + BURN <> = + 0.0 10.0 30.0 50.0 75.0 150.0 + 250.0 375.0 500.0 625.0 750.0 1000.0 + 1250.0 1500.0 1750.0 2000.0 2500.0 3000.0 + 3500.0 4000.0 +; +DONNEES := UTL: DONNEES :: + CREA + AUTOP <> = + 10.0 150.0 250.0 375.0 500.0 625.0 + 750.0 1000.0 1250.0 1500.0 1750.0 2000.0 + 2500.0 3000.0 3500.0 4000.0 +; +! END DECLARATION + +! BEGIN TRACKING +! Level One +TRACKSS := SYBILT: GEOSS :: + EDIT 0 + MAXR 500 + MAXZ 1000000 + TITLE 'TRACKING FOR ASSEMBLY SS' + QUA2 20 3 + DP01 +; +! MOC tracking for flux calculation +TRACKN2 TF_EXC := SALT: ASSBLY_CASEA :: + EDIT 3 + ALLG BATCH 300 + TSPC EQW2 <> <> REND +; +TRACKN2 := MCCGT: TRACKN2 TF_EXC :: + CACB 4 AAC 80 TMT EPSI 1E-5 MCU 10000 +; +! END TRACKING + +************************************************************************ +* BEGIN MyCompo INITIALIZATION * +************************************************************************ + MyCompo := COMPO: :: + EDIT 10 + STEP UP 'fuel' + MAXCAL 5 + COMM 'Burnup-dependent assembly' ENDC + PARA 'BURN' IRRA + ISOT 20 U235 U238 Np239 Pu239 Pu240 Pu241 Pm147 Pm148 Pm148m Pm149 + Sm147 Sm148 Sm149 Sm150 Nd146 Nd147 Nd148 Nd150 Xe135 I135 + INIT + ; +************************************************************************ +* END MyCompo INITIALIZATION * +************************************************************************ + +! BEGIN LIBRARY READING +LIBRARY := Mix_UOX :: <> ; +! END LIBRARY READING + +! BEGIN DEPLETION +WHILE istep maxstep < DO + + ! BEGIN FIRST LEVEL FLUX CALCULATION + EVALUATE istep := istep 1 + ; + ECHO "istep: " istep "/" maxstep ; + + EVALUATE BUbeg Tbeg := BUend Tend ; + GREP: DONNEES :: GETVAL 'BURN' <> >>BUend<< ; + EVALUATE Tend := BUend Fuelpwr / ; + ECHO Tbeg ; + ECHO Tend ; + + ! BEGIN SELF-SHIELDING CALCULATION + IF istep 1 = THEN + LIBRARY2 := USS: LIBRARY TRACKSS :: EDIT 1 PASS 2 GRMIN 52 ARM + CALC REGI W1 U235 ALL + REGI W1 U236 ALL + REGI W1 Pu239 ALL + REGI W1 Pu240 ALL + REGI W1 Pu241 ALL + REGI W1 Pu242 ALL + ENDC ; + ELSE + GREP: DONNEES :: GETVAL "AUTOP" <> >>BUautop<< ; + GREP: DONNEES :: GETVAL "BURN" <> >>BU<< ; + IF BUautop BU = THEN + LIBRARY2 := USS: LIBRARY LIBRARY2 TRACKSS :: EDIT 1 PASS 2 ARM + GRMIN 52 + CALC REGI W1 U235 ALL + REGI W1 U236 ALL + REGI W1 Pu239 ALL + REGI W1 Pu240 ALL + REGI W1 Pu241 ALL + REGI W1 Pu242 ALL + ENDC ; + EVALUATE iAutop := iAutop 1 + ; + ENDIF ; + ENDIF ; + ! END SELF-SHIELDING CALCULATION + + ! BEGIN MOC FLUX CALCULATION + SYS := ASM: LIBRARY2 TRACKN2 TF_EXC :: ARM EDIT 1 ; + + IF istep 1 = THEN + FLUX2 := FLU: LIBRARY2 SYS TRACKN2 TF_EXC :: + EDIT 1 TYPE B B1 SIGS ; + ELSE + FLUX2 := FLU: FLUX2 LIBRARY2 SYS TRACKN2 TF_EXC :: + EDIT 1 TYPE B B1 SIGS ; + ENDIF ; + SYS := DELETE: SYS ; + + GREP: FLUX2 :: GETVAL 'K-INFINITY ' 1 1 1 >>Kinf<< ; + ECHO "+++ Burnup=" BUend " Kinf=" Kinf ; + +************************************************************************ +* SAVE BURNUP INFORMATION AT Tbeg * +************************************************************************ + IF istep 1 = THEN + BURNUP LIBRARY2 := EVO: LIBRARY2 FLUX2 TRACKN2 :: + EDIT 0 SAVE <> DAY POWR <> ; + ELSE + BURNUP LIBRARY2 := EVO: BURNUP LIBRARY2 FLUX2 TRACKN2 :: + EDIT 0 SAVE <> DAY POWR <> ; + ENDIF ; + +************************************************************************ +* EDITION AND MyCompo FEEDING * +************************************************************************ + GREP: DONNEES :: GETVAL "AUTOP" <> >>BUautop<< ; + GREP: DONNEES :: GETVAL "BURN" <> >>BU<< ; + IF istep 1 = BUautop BU = + THEN + EDIOBJ := EDI: FLUX2 LIBRARY2 TRACKN2 :: EDIT 1 + MICR 34 U234 U235 U236 U237 U238 Np237 Np238 Np239 Pu238 + Am243 Pu239 Pu240 Pu241 Pu242 Cm242 Cm243 Cm244 Cm245 Am241 + Am242m Pm147 Pm148 Pm148m Pm149 Sm147 Sm148 Sm149 Sm150 Nd146 + Nd147 Nd148 Nd150 Xe135 I135 + MERG COMP + ADF 'FD_B' MIX 162 ENDM + COND 0.625 + SAVE ON fuel + ; + ! Perform Selengut normalization of Multicompo contents + MyCompo := COMPO: MyCompo EDIOBJ BURNUP :: EDIT 5 + STEP UP 'fuel' + SET <> DAY + ICAL >>ical<< + ; + MyCompo := SPH: MyCompo :: EDIT 1 + STEP UP 'fuel' STEP AT <> + SELE_FD + ; + EDIOBJ := DELETE: EDIOBJ ; + EVALUATE iEdit := iEdit 1 + ; + ENDIF ; + +************************************************************************ +* SOLUTION OF BATEMAN EQUATIONS * +************************************************************************ + IF istep maxstep < THEN + EVALUATE istepNext := istep 1 + ; + GREP: DONNEES :: GETVAL 'BURN' <> >>BUend<< ; + EVALUATE Tend := BUend Fuelpwr / ; + + IF istep 5 < THEN + BURNUP LIBRARY2 := EVO: BURNUP LIBRARY2 FLUX2 TRACKN2 :: + EDIT 0 DEPL <> <> DAY POWR <> NOEX ; + ELSE + BURNUP LIBRARY2 := EVO: BURNUP LIBRARY2 FLUX2 TRACKN2 :: + EDIT 0 DEPL <> <> DAY POWR <> ; + ENDIF ; + ENDIF ; + +ENDWHILE ; +! END DEPLETION CALCULATION + +************************************************************************ +* EXPORT MULTICOMPO IN ASCII FORMAT * +************************************************************************ +_MyCompo := MyCompo ; + +assertS FLUX2 :: K-INFINITY 1 1.014858 ; + +ECHO "test ASSBLY_CASEA_1level_multicompo completed" ; +END: ; diff --git a/Dragon/data/ASSBLY_CASEA_1level_multicompo_proc/Geo_N2.c2m b/Dragon/data/ASSBLY_CASEA_1level_multicompo_proc/Geo_N2.c2m new file mode 100644 index 0000000..fdd338d --- /dev/null +++ b/Dragon/data/ASSBLY_CASEA_1level_multicompo_proc/Geo_N2.c2m @@ -0,0 +1,239 @@ +*DECK Geo_N2 +*---- +* Name : Geo_N2.c2m +* Type : DRAGON procedure +* Use : Geometry generation for 2nd Level Flux Calculation +* of the CASEA assembly +* Author : A. Hebert +* +* Procedure called as: +* +*GEON2 := Geo_N2 :: <> <> <> <> +* <> <> <> +* <> <> <> <> +* <> ; +* +* Input data : +* Rcomb1 : 50/100 of outer radius of fuel (cm) +* Rcomb2 : 80/100 of outer radius of fuel (cm) +* Rcomb3 : 95/100 of outer radius of fuel (cm) +* Rcomb4 : 100/100 of outer radius of fuel (cm) +* R_int_TG : Inner radius of cladding of guide tube (cm) +* R_ext_TG : Outer radius of cladding of guide tube (cm) +* R_int_TI : Inner radius of cladding of guide tube (cm) +* R_ext_TI : Outer radius of cladding of guide tube (cm) +* R_int_G : Inner radius of cladding of fuel tube (cm) +* R_ext_G : Outer radius of cladding of fuel tube (cm) +* Cote : Lattice pitch (cm) +* Lame : Water space (cm) +* +* Output data : +* GEON2 : Geometry for 2nd Level Flux Calculation + +PARAMETER GEON2 :: + EDIT 0 + ::: LINKED_LIST GEON2 ; + ; +*---- +* Modules used in this procedure +*---- +MODULE GEO: END: ; + +*---- +* Input data recovery +*---- +* ; +REAL Rcomb1 Rcomb2 Rcomb3 Rcomb4 ; +:: >>Rcomb1<< >>Rcomb2<< >>Rcomb3<< >>Rcomb4<< ; +REAL R_int_TG R_ext_TG R_int_TI R_ext_TI ; +:: >>R_int_TG<< >>R_ext_TG<< >>R_int_TI<< >>R_ext_TI<< ; +REAL R_int_G R_ext_G Cote Lame ; +:: >>R_int_G<< >>R_ext_G<< >>Cote<< >>Lame<< ; + +REAL mesh1 := Cote ; +REAL mesh2 := mesh1 Cote + ; +REAL mesh3 := mesh2 Cote + ; +REAL mesh4 := mesh3 Cote + ; +REAL mesh5 := mesh4 Cote + ; +REAL mesh6 := mesh5 Cote + ; +REAL mesh7 := mesh6 Cote + ; +REAL mesh8 := mesh7 Cote + ; +REAL mesh9 := mesh8 Cote + ; +REAL mesh10 := mesh9 Lame + ; + +REAL Rtub1_TG := R_int_TG 3.0 / ; +REAL Rtub2_TG := R_int_TG 1.5 / ; +REAL Rtub1_TI := R_int_TI 3.0 / ; +REAL Rtub2_TI := R_int_TI 1.5 / ; +* +GEON2 := GEO: :: CAR2D 10 10 + EDIT 0 + X- DIAG X+ REFL + Y- SYME Y+ DIAG + CELL + TI C0201 C0301 TG C0501 C0601 TG C0801 C0901 Lame_V + C0202 C0302 C0402 C0502 C0602 C0702 C0802 C0902 Lame_V + C0303 C0403 C0503 C0603 C0703 C0803 C0903 Lame_V + TG C0504 C0604 TG C0804 C0904 Lame_V + C0505 C0605 C0705 C0805 C0905 Lame_V + TG C0706 C0806 C0906 Lame_V + C0707 C0807 C0907 Lame_V + C0808 C0908 Lame_V + C0909 Lame_V + Lame_C + MESHX 0.0 <> <> <> <> <> <> + <> <> <> <> + MESHY 0.0 <> <> <> <> <> <> + <> <> <> <> + ::: Lame_C := GEO: CAR2D 1 1 + MESHX 0.0 <> MESHY 0.0 <> + MIX 162 ; + + ::: Lame_V := GEO: CAR2D 1 1 + MESHX 0.0 <> MESHY 0.0 <> + SPLITY 3 MIX 162 ; + + ::: C0201 := GEO: CARCEL 6 + MESHX 0.0 <> + MESHY 0.0 <> + SECT 4 6 + RADIUS 0.0 <> <> <> <> + <> <> + MIX 3 4 5 6 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0202 := GEO: C0201 + MIX 9 10 11 12 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0301 := GEO: C0201 + MIX 13 14 15 16 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0302 := GEO: C0201 + MIX 17 18 19 20 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0303 := GEO: C0201 + MIX 21 22 23 24 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0402 := GEO: C0201 + MIX 26 27 28 29 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0403 := GEO: C0201 + MIX 30 31 32 33 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0501 := GEO: C0201 + MIX 34 35 36 37 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0502 := GEO: C0201 + MIX 38 39 40 41 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0503 := GEO: C0201 + MIX 42 43 44 45 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0504 := GEO: C0201 + MIX 46 47 48 49 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0505 := GEO: C0201 + MIX 50 51 52 53 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0601 := GEO: C0201 + MIX 54 55 56 57 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0602 := GEO: C0201 + MIX 58 59 60 61 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0603 := GEO: C0201 + MIX 62 63 64 65 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0604 := GEO: C0201 + MIX 66 67 68 69 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0605 := GEO: C0201 + MIX 70 71 72 73 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0702 := GEO: C0201 + MIX 74 75 76 77 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0703 := GEO: C0201 + MIX 78 79 80 81 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0705 := GEO: C0201 + MIX 82 83 84 85 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0706 := GEO: C0201 + MIX 86 87 88 89 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0707 := GEO: C0201 + MIX 90 91 92 93 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0801 := GEO: C0201 + MIX 94 95 96 97 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0802 := GEO: C0201 + MIX 98 99 100 101 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0803 := GEO: C0201 + MIX 102 103 104 105 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0804 := GEO: C0201 + MIX 106 107 108 109 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0805 := GEO: C0201 + MIX 110 111 112 113 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0806 := GEO: C0201 + MIX 114 115 116 117 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0807 := GEO: C0201 + MIX 118 119 120 121 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0808 := GEO: C0201 + MIX 122 123 124 125 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0901 := GEO: C0201 + MIX 126 127 128 129 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0902 := GEO: C0201 + MIX 130 131 132 133 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0903 := GEO: C0201 + MIX 134 135 136 137 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0904 := GEO: C0201 + MIX 138 139 140 141 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0905 := GEO: C0201 + MIX 142 143 144 145 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0906 := GEO: C0201 + MIX 146 147 148 149 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0907 := GEO: C0201 + MIX 150 151 152 153 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0908 := GEO: C0201 + MIX 154 155 156 157 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: C0909 := GEO: C0201 + MIX 158 159 160 161 7 8 1 1 1 1 1 1 1 1 1 1 1 1 ; + + ::: TG := GEO: CARCEL 4 + MESHX 0.0 <> + MESHY 0.0 <> + SECT 3 1 + RADIUS 0.0 <> <> <> <> + MIX 1 + 1 1 1 1 1 1 1 1 + 1 1 1 1 1 1 1 1 + 25 25 25 25 25 25 25 25 + 1 1 1 1 1 1 1 1 ; + + ::: TI := GEO: CARCEL 4 + MESHX 0.0 <> + MESHY 0.0 <> + SECT 3 1 + RADIUS 0.0 <> <> <> <> + MIX 1 + 1 1 1 1 1 1 1 1 + 1 1 1 1 1 1 1 1 + 2 2 2 2 2 2 2 2 + 1 1 1 1 1 1 1 1 ; +; diff --git a/Dragon/data/ASSBLY_CASEA_1level_multicompo_proc/Geo_SS.c2m b/Dragon/data/ASSBLY_CASEA_1level_multicompo_proc/Geo_SS.c2m new file mode 100644 index 0000000..3bb7fe5 --- /dev/null +++ b/Dragon/data/ASSBLY_CASEA_1level_multicompo_proc/Geo_SS.c2m @@ -0,0 +1,213 @@ +*DECK Geo_SS +*---- +* Name : Geo_SS.c2m +* Type : DRAGON procedure +* Use : Geometry generation for Self-Shielding Calculation +* of the CASEA assembly +* Author : A. Canbakan +* +* Procedure called as: +* +*GEOSS := Geo_SS :: <> <> <> <> +* <> <> <> +* <> <> <> <> +* <> ; +* +* Input data : +* Rcomb1 : 50/100 of outer radius of fuel (cm) +* Rcomb2 : 80/100 of outer radius of fuel (cm) +* Rcomb3 : 95/100 of outer radius of fuel (cm) +* Rcomb4 : 100/100 of outer radius of fuel (cm) +* R_int_TG : Inner radius of cladding of guide tube (cm) +* R_ext_TG : Outer radius of cladding of guide tube (cm) +* R_int_TI : Inner radius of cladding of guide tube (cm) +* R_ext_TI : Outer radius of cladding of guide tube (cm) +* R_int_G : Inner radius of cladding of fuel tube (cm) +* R_ext_G : Outer radius of cladding of fuel tube (cm) +* Cote : Lattice pitch (cm) +* CoteL : Lattice pitch + Water space (cm) +* +* Output data : +* GEOSS : Geometry for Self-Shielding Calculation + +PARAMETER GEOSS :: + EDIT 0 + ::: LINKED_LIST GEOSS ; + ; +*---- +* Modules used in this procedure +*---- +MODULE GEO: END: ; + +*---- +* Input data recovery +*---- +* ; +REAL Rcomb1 Rcomb2 Rcomb3 Rcomb4 ; +:: >>Rcomb1<< >>Rcomb2<< >>Rcomb3<< >>Rcomb4<< ; +REAL R_int_TG R_ext_TG R_int_TI R_ext_TI ; +:: >>R_int_TG<< >>R_ext_TG<< >>R_int_TI<< >>R_ext_TI<< ; +REAL R_int_G R_ext_G Cote CoteL ; +:: >>R_int_G<< >>R_ext_G<< >>Cote<< >>CoteL<< ; + + + +GEOSS := GEO: :: CAR2D 9 9 + EDIT 0 + X- DIAG X+ REFL + Y- SYME Y+ DIAG + CELL + TI C0201 C0301 TG C0501 C0601 TG C0801 C0901 + C0202 C0302 C0402 C0502 C0602 C0702 C0802 C0902 + C0303 C0403 C0503 C0603 C0703 C0803 C0903 + TG C0504 C0604 TG C0804 C0904 + C0505 C0605 C0705 C0805 C0905 + TG C0706 C0806 C0906 + C0707 C0807 C0907 + C0808 C0908 + C0909 + ::: C0201 := GEO: CARCEL 6 + MESHX 0.0 <> + MESHY 0.0 <> + RADIUS 0.0 <> <> <> <> + <> <> + MIX 3 4 5 6 7 8 1 + ; + ::: C0202 := GEO: C0201 + MIX 9 10 11 12 7 8 1 + ; + ::: C0301 := GEO: C0201 + MIX 13 14 15 16 7 8 1 + ; + ::: C0302 := GEO: C0201 + MIX 17 18 19 20 7 8 1 + ; + ::: C0303 := GEO: C0201 + MIX 21 22 23 24 7 8 1 + ; + ::: C0402 := GEO: C0201 + MIX 26 27 28 29 7 8 1 + ; + ::: C0403 := GEO: C0201 + MIX 30 31 32 33 7 8 1 + ; + ::: C0501 := GEO: C0201 + MIX 34 35 36 37 7 8 1 + ; + ::: C0502 := GEO: C0201 + MIX 38 39 40 41 7 8 1 + ; + ::: C0503 := GEO: C0201 + MIX 42 43 44 45 7 8 1 + ; + ::: C0504 := GEO: C0201 + MIX 46 47 48 49 7 8 1 + ; + ::: C0505 := GEO: C0201 + MIX 50 51 52 53 7 8 1 + ; + ::: C0601 := GEO: C0201 + MIX 54 55 56 57 7 8 1 + ; + ::: C0602 := GEO: C0201 + MIX 58 59 60 61 7 8 1 + ; + ::: C0603 := GEO: C0201 + MIX 62 63 64 65 7 8 1 + ; + ::: C0604 := GEO: C0201 + MIX 66 67 68 69 7 8 1 + ; + ::: C0605 := GEO: C0201 + MIX 70 71 72 73 7 8 1 + ; + ::: C0702 := GEO: C0201 + MIX 74 75 76 77 7 8 1 + ; + ::: C0703 := GEO: C0201 + MIX 78 79 80 81 7 8 1 + ; + ::: C0705 := GEO: C0201 + MIX 82 83 84 85 7 8 1 + ; + ::: C0706 := GEO: C0201 + MIX 86 87 88 89 7 8 1 + ; + ::: C0707 := GEO: C0201 + MIX 90 91 92 93 7 8 1 + ; + ::: C0801 := GEO: C0201 + MIX 94 95 96 97 7 8 1 + ; + ::: C0802 := GEO: C0201 + MIX 98 99 100 101 7 8 1 + ; + ::: C0803 := GEO: C0201 + MIX 102 103 104 105 7 8 1 + ; + ::: C0804 := GEO: C0201 + MIX 106 107 108 109 7 8 1 + ; + ::: C0805 := GEO: C0201 + MIX 110 111 112 113 7 8 1 + ; + ::: C0806 := GEO: C0201 + MIX 114 115 116 117 7 8 1 + ; + ::: C0807 := GEO: C0201 + MIX 118 119 120 121 7 8 1 + ; + ::: C0808 := GEO: C0201 + MIX 122 123 124 125 7 8 1 + ; + ::: C0901 := GEO: CARCEL 6 + MESHX 0.0 <> + MESHY 0.0 <> + RADIUS 0.0 <> <> <> <> + <> <> + MIX 126 127 128 129 7 8 1 + ; + ::: C0902 := GEO: C0901 + MIX 130 131 132 133 7 8 1 + ; + ::: C0903 := GEO: C0901 + MIX 134 135 136 137 7 8 1 + ; + ::: C0904 := GEO: C0901 + MIX 138 139 140 141 7 8 1 + ; + ::: C0905 := GEO: C0901 + MIX 142 143 144 145 7 8 1 + ; + ::: C0906 := GEO: C0901 + MIX 146 147 148 149 7 8 1 + ; + ::: C0907 := GEO: C0901 + MIX 150 151 152 153 7 8 1 + ; + ::: C0908 := GEO: C0901 + MIX 154 155 156 157 7 8 1 + ; + ::: C0909 := GEO: CARCEL 6 + MESHX 0.0 <> + MESHY 0.0 <> + RADIUS 0.0 <> <> <> <> + <> <> + MIX 158 159 160 161 7 8 1 + ; + ::: TG := GEO: CARCEL 2 + MESHX 0.0 <> + MESHY 0.0 <> + RADIUS 0.0 <> <> + MIX 1 25 1 + ; + ::: TI := GEO: CARCEL 2 + MESHX 0.0 <> + MESHY 0.0 <> + RADIUS 0.0 <> <> + MIX 1 2 1 + ; +; + +END: ; +QUIT . diff --git a/Dragon/data/ASSBLY_CASEA_1level_multicompo_proc/Mix_UOX.c2m b/Dragon/data/ASSBLY_CASEA_1level_multicompo_proc/Mix_UOX.c2m new file mode 100644 index 0000000..9f54994 --- /dev/null +++ b/Dragon/data/ASSBLY_CASEA_1level_multicompo_proc/Mix_UOX.c2m @@ -0,0 +1,519 @@ +*DECK Mix_UOX +*---- +* Name : Mix_UOX.c2m +* Type : DRAGON procedure +* Use : Microlib generation with Draglibs for +* UOX calculation with 37 fuel regions +* Author : A. Canbakan +* +* Procedure called as: +* +* LIBRARY := Mix_UOX :: <> ; +* +* Output data : +* LIBRARY : Microlib with table of probabilities + + +PARAMETER LIBRARY :: + EDIT 0 + ::: LINKED_LIST LIBRARY ; +; + +*---- +* Input data recovery +*---- +STRING Library ; +:: >>Library<< ; + +*---- +* Modules used in this procedure +*---- +MODULE LIB: UTL: DELETE: END: ABORT: ; + +LIBRARY := LIB: :: + EDIT 1 + DEPL LIB: DRAGON FIL: <> + NMIX 162 CTRA APOL ANIS 2 + PT + MIXS LIB: DRAGON FIL: <> + +*---- +* Moderator +*---- + MIX 1 600.0 NOEV + H1 = H1_H2O 4.69585E-2 + O16 = O16 2.34793E-2 + B10 = B10 5.53089E-6 + B11 = B11 2.18498E-5 + +*---- +* Cladding TI +*---- + MIX 2 600.0 NOEV + Zr90 = Zr90 2.16576E-2 2 IRSET PT 1 + Zr91 = Zr91 4.72300E-3 2 IRSET PT 1 + Zr92 = Zr92 7.21921E-3 2 IRSET PT 1 + Zr94 = Zr94 7.31603E-3 + Zr96 = Zr96 1.17864E-3 + +*---- +* Fuel -> 8 * 4 evolving mixes +*---- +* C1 Cell + MIX 3 900.0 + U235 = U235 4.08785E-4 1 IRSET PT 1 + U238 = U238 2.20157E-2 1 IRSET PT 1 + O16 = O16 4.48565E-2 + MIX 4 + COMB 3 1.0 + MIX 5 + COMB 3 1.0 + MIX 6 + COMB 3 1.0 + +*---- +* Gap +*---- + MIX 7 600.0 NOEV + O16 = O16 3.76439E-6 + +*---- +* Cladding fuel +*---- + MIX 8 600.0 NOEV + Zr90 = Zr90 2.16576E-2 2 IRSET PT 1 + Zr91 = Zr91 4.72300E-3 2 IRSET PT 1 + Zr92 = Zr92 7.21921E-3 2 IRSET PT 1 + Zr94 = Zr94 7.31603E-3 + Zr96 = Zr96 1.17864E-3 + +* C2 Cell + MIX 9 + COMB 3 1.0 + MIX 10 + COMB 3 1.0 + MIX 11 + COMB 3 1.0 + MIX 12 + COMB 3 1.0 + +*---- +* Cladding TG +*---- + MIX 25 + COMB 2 1.0 + +* C4 Cell + MIX 94 + COMB 3 1.0 + MIX 95 + COMB 3 1.0 + MIX 96 + COMB 3 1.0 + MIX 97 + COMB 3 1.0 + +* C3 Cell + MIX 114 + COMB 3 1.0 + MIX 115 + COMB 3 1.0 + MIX 116 + COMB 3 1.0 + MIX 117 + COMB 3 1.0 + +* C5 Cell + MIX 122 + COMB 3 1.0 + MIX 123 + COMB 3 1.0 + MIX 124 + COMB 3 1.0 + MIX 125 + COMB 3 1.0 + +* C6 Cell + MIX 126 + COMB 3 1.0 + MIX 127 + COMB 3 1.0 + MIX 128 + COMB 3 1.0 + MIX 129 + COMB 3 1.0 + +* C7 Cell + MIX 154 + COMB 3 1.0 + MIX 155 + COMB 3 1.0 + MIX 156 + COMB 3 1.0 + MIX 157 + COMB 3 1.0 + +* C8 Cell + MIX 158 + COMB 3 1.0 + MIX 159 + COMB 3 1.0 + MIX 160 + COMB 3 1.0 + MIX 161 + COMB 3 1.0 + +******* +*C0301* *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 +******* +*C0302* *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 +******* +*C0303* *C2 +******* +MIX 21 + COMB 9 1.0 +MIX 22 + COMB 10 1.0 +MIX 23 + COMB 11 1.0 +MIX 24 + COMB 12 1.0 +******* +*C0402* *C1 +******* +MIX 26 + COMB 3 1.0 +MIX 27 + COMB 4 1.0 +MIX 28 + COMB 5 1.0 +MIX 29 + COMB 6 1.0 +******* +*C0403* *C1 +******* +MIX 30 + COMB 3 1.0 +MIX 31 + COMB 4 1.0 +MIX 32 + COMB 5 1.0 +MIX 33 + COMB 6 1.0 +******* +*C0501* *C1 +******* +MIX 34 + COMB 3 1.0 +MIX 35 + COMB 4 1.0 +MIX 36 + COMB 5 1.0 +MIX 37 + COMB 6 1.0 +******* +*C0502* *C2 +******* +MIX 38 + COMB 9 1.0 +MIX 39 + COMB 10 1.0 +MIX 40 + COMB 11 1.0 +MIX 41 + COMB 12 1.0 +******* +*C0503* *C2 +******* +MIX 42 + COMB 9 1.0 +MIX 43 + COMB 10 1.0 +MIX 44 + COMB 11 1.0 +MIX 45 + COMB 12 1.0 +******* +*C0504* *C1 +******* +MIX 46 + COMB 3 1.0 +MIX 47 + COMB 4 1.0 +MIX 48 + COMB 5 1.0 +MIX 49 + COMB 6 1.0 +******* +*C0505* *C2 +******* +MIX 50 + COMB 9 1.0 +MIX 51 + COMB 10 1.0 +MIX 52 + COMB 11 1.0 +MIX 53 + COMB 12 1.0 +******* +*C0601* *C1 +******* +MIX 54 + COMB 3 1.0 +MIX 55 + COMB 4 1.0 +MIX 56 + COMB 5 1.0 +MIX 57 + COMB 6 1.0 +******* +*C0602* *C2 +******* +MIX 58 + COMB 9 1.0 +MIX 59 + COMB 10 1.0 +MIX 60 + COMB 11 1.0 +MIX 61 + COMB 12 1.0 +******* +*C0603* *C2 +******* +MIX 62 + COMB 9 1.0 +MIX 63 + COMB 10 1.0 +MIX 64 + COMB 11 1.0 +MIX 65 + COMB 12 1.0 +******* +*C0604* *C1 +******* +MIX 66 + COMB 3 1.0 +MIX 67 + COMB 4 1.0 +MIX 68 + COMB 5 1.0 +MIX 69 + COMB 6 1.0 +******* +*C0605* *C1 +******* +MIX 70 + COMB 3 1.0 +MIX 71 + COMB 4 1.0 +MIX 72 + COMB 5 1.0 +MIX 73 + COMB 6 1.0 +******* +*C0702* *C1 +******* +MIX 74 + COMB 3 1.0 +MIX 75 + COMB 4 1.0 +MIX 76 + COMB 5 1.0 +MIX 77 + COMB 6 1.0 +******* +*C0703* *C1 +******* +MIX 78 + COMB 3 1.0 +MIX 79 + COMB 4 1.0 +MIX 80 + COMB 5 1.0 +MIX 81 + COMB 6 1.0 +******* +*C0705* *C1 +******* +MIX 82 + COMB 3 1.0 +MIX 83 + COMB 4 1.0 +MIX 84 + COMB 5 1.0 +MIX 85 + COMB 6 1.0 +******* +*C0706* *C1 +******* +MIX 86 + COMB 3 1.0 +MIX 87 + COMB 4 1.0 +MIX 88 + COMB 5 1.0 +MIX 89 + COMB 6 1.0 +******* +*C0707* *C2 +******* +MIX 90 + COMB 9 1.0 +MIX 91 + COMB 10 1.0 +MIX 92 + COMB 11 1.0 +MIX 93 + COMB 12 1.0 +******* +*C0801* *C4 +******* +******* +*C0802* *C2 +******* +MIX 98 + COMB 9 1.0 +MIX 99 + COMB 10 1.0 +MIX 100 + COMB 11 1.0 +MIX 101 + COMB 12 1.0 +******* +*C0803* *C2 +******* +MIX 102 + COMB 9 1.0 +MIX 103 + COMB 10 1.0 +MIX 104 + COMB 11 1.0 +MIX 105 + COMB 12 1.0 +******* +*C0804* *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 +******* +*C0805* *C2 +******* +MIX 110 + COMB 9 1.0 +MIX 111 + COMB 10 1.0 +MIX 112 + COMB 11 1.0 +MIX 113 + COMB 12 1.0 +******* +*C0807* *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 +******* +*C0902* *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 +******* +*C0903* *C6 +******* +MIX 134 + COMB 126 1.0 +MIX 135 + COMB 127 1.0 +MIX 136 + COMB 128 1.0 +MIX 137 + COMB 129 1.0 +******* +*C0904* *C6 +******* +MIX 138 + COMB 126 1.0 +MIX 139 + COMB 127 1.0 +MIX 140 + COMB 128 1.0 +MIX 141 + COMB 129 1.0 +******* +*C0905* *C6 +******* +MIX 142 + COMB 126 1.0 +MIX 143 + COMB 127 1.0 +MIX 144 + COMB 128 1.0 +MIX 145 + COMB 129 1.0 +******* +*C0906* *C6 +******* +MIX 146 + COMB 126 1.0 +MIX 147 + COMB 127 1.0 +MIX 148 + COMB 128 1.0 +MIX 149 + COMB 129 1.0 +******* +*C0907* *C6 +******* +MIX 150 + COMB 126 1.0 +MIX 151 + COMB 127 1.0 +MIX 152 + COMB 128 1.0 +MIX 153 + COMB 129 1.0 + +******************** +*WATER SPACE (LAME)* +******************** +MIX 162 + COMB 1 1.0 +; + +END: ; +QUIT . diff --git a/Dragon/data/ASSBLY_VVER_1level_mpo.access b/Dragon/data/ASSBLY_VVER_1level_mpo.access new file mode 100755 index 0000000..9640ed2 --- /dev/null +++ b/Dragon/data/ASSBLY_VVER_1level_mpo.access @@ -0,0 +1,50 @@ +#!/bin/sh +if [ $# = 0 ] + then + echo "usage: ASSBLY_VVER_1level_mpo.access directory" 1>&2 + exit 1 +fi +MACH=`uname -s` +Sysx="`echo $MACH | cut -b -6`" +if [ $Sysx = "CYGWIN" ]; then + MACH=`uname -o` +elif [ $Sysx = "Darwin" ]; then + MACH=`uname -sm` +elif [ $Sysx = "SunOS" ]; then + MACH=`uname -sm` +fi +pos=$1/../../libraries/hdf5 +if [ -f "$pos"/ap3lib-xsect-CEA93_CLA99_GV0LUX_N.h5.gz ] + then + echo 'gunzipping CLA99CEA93' + chmod 755 "$pos" + gunzip "$pos"/ap3lib-xsect-CEA93_CLA99_GV0LUX_N.h5.gz +fi +if [ -f "$pos"/ap3lib-xsect-CEA93_CLA99_GV0LUX_N.h5 ] + then + ln -s "$pos"/ap3lib-xsect-CEA93_CLA99_GV0LUX_N.h5 CLA99CEA93 +fi +if [ -f "$pos"/ap3lib-autop-1-CEA93_CLA99_GV0LUX_N.h5.gz ] + then + echo 'gunzipping CLA99CEA93_SS' + chmod 755 "$pos" + gunzip "$pos"/ap3lib-autop-1-CEA93_CLA99_GV0LUX_N.h5.gz +fi +if [ -f "$pos"/ap3lib-autop-1-CEA93_CLA99_GV0LUX_N.h5 ] + then + ln -s "$pos"/ap3lib-autop-1-CEA93_CLA99_GV0LUX_N.h5 CLA99CEA93_SS +fi +if [ -f "$pos"/Depletion_Data_CH_STD_CEA93_V10_withYields.h5.gz ] + then + echo 'gunzipping CLA99CEA93_EVO' + chmod 755 "$pos" + gunzip "$pos"/Depletion_Data_CH_STD_CEA93_V10_withYields.h5.gz +fi +if [ -f "$pos"/Depletion_Data_CH_STD_CEA93_V10_withYields.h5 ] + then + ln -s "$pos"/Depletion_Data_CH_STD_CEA93_V10_withYields.h5 CLA99CEA93_EVO +fi +ln -s $1/data/ASSBLY_VVER_1level_mpo_proc/13UAX_ARO_MOC.ap3 . +ln -s $1/data/ASSBLY_VVER_1level_mpo_proc/13UAX_ARO_MOC.za . +ls -l +echo "ASSBLY_VVER_1level_mpo access script terminated" diff --git a/Dragon/data/ASSBLY_VVER_1level_mpo.save b/Dragon/data/ASSBLY_VVER_1level_mpo.save new file mode 100755 index 0000000..c76a425 --- /dev/null +++ b/Dragon/data/ASSBLY_VVER_1level_mpo.save @@ -0,0 +1,21 @@ +#!/bin/sh +# +if [ $# = 0 ] + then + echo "usage: ASSBLY_VVER_1level_mpo.save directory" 1>&2 + exit 1 +fi +echo access ASSBLY_VVER_1level_mpo.save +MACH=`uname -s` +Sysx="`echo $MACH | cut -b -6`" +if [ $Sysx = "CYGWIN" ]; then + MACH=`uname -o` +elif [ $Sysx = "AIX" ]; then + MACH=`uname -s` +else + MACH=`uname -sm | sed 's/[ ]/_/'` +fi +ls -l +mv MyMpoVVER.hdf $1/"$MACH"/assbly_VVER_mpo.hdf +mv *.ps $1/"$MACH" +echo "ASSBLY_VVER_1level_mpo.save completed" diff --git a/Dragon/data/ASSBLY_VVER_1level_mpo.x2m b/Dragon/data/ASSBLY_VVER_1level_mpo.x2m new file mode 100644 index 0000000..c9b54c3 --- /dev/null +++ b/Dragon/data/ASSBLY_VVER_1level_mpo.x2m @@ -0,0 +1,125 @@ +*---- +* case ASSBLY_VVER_1level_mpo +* 99-group RA60 simple VVER assembly in DRAGON -- 1-level scheme +* use ALAMOS surfacic geometry file +* production of an MPO file for reflector feeding +* Author: A. Hebert +*---- +HDF5_FILE MyMpo :: FILE './MyMpoVVER.hdf' ; +LINKED_LIST GEOSS GEON2 TRACKSS TRACKN2 LIBRARY LIBRARY2 SYS FLUX2 EDIOBJ ; +MODULE SYBILT: G2S: SALT: MCCGT: USS: ASM: FLU: EDI: UTL: DELETE: LIB: MPO: END: ; +SEQ_ASCII GT_ALA :: FILE './13UAX_ARO_MOC.ap3' ; +SEQ_ASCII GT_ALA_ZA :: FILE './13UAX_ARO_MOC.za' ; +SEQ_ASCII alamos.ps :: FILE './13UAX_ARO_MOC.ps' ; +SEQ_ASCII GT_SAL ; +SEQ_BINARY TF_EXC_SS TF_EXC_MOC ; +INTEGER an2d := 8 ; +REAL densur := 20.0 ; +PROCEDURE Mix_UOX assertS ; + +************************************************************************ +* BEGIN GEOMETRY * +************************************************************************ +GT_SAL alamos.ps := G2S: GT_ALA GT_ALA_ZA :: EDIT 0 ALAMOS 10 ; + +************************************************************************ +* BEGIN TRACKING * +************************************************************************ +! Level One +! PIJ tracking for self-shielding calculation +TRACKSS TF_EXC_SS := SALT: GT_SAL :: + EDIT 3 + ALLG + TSPC EQW2 <> <> REND + MERGMIX +; +TRACKN2 TF_EXC_MOC := SALT: GT_SAL :: + EDIT 3 + ALLG + TSPC EQW2 <> <> REND +; +TRACKN2 := MCCGT: TRACKN2 TF_EXC_MOC :: + CACB 4 AAC 80 TMT EPSI 1E-5 MCU 10000 ; + +************************************************************************ +* END TRACKING * +************************************************************************ +************************************************************************ +* BEGIN LIBRARY READING * +************************************************************************ +STRING Library := 'CLA99CEA93:CLA99CEA93_SS' ; +REAL dens_mod := 0.85 ; +REAL pbore := 375.0 ; +LIBRARY := Mix_UOX :: <> <> <> ; + +************************************************************************ +* END LIBRARY READING * +************************************************************************ + +************************************************************************ +* BEGIN MyMpo INITIALIZATION * +************************************************************************ + MyMpo := MPO: LIBRARY :: + EDIT 10 + COMM '99-group feeding assembly' + REAC Total Absorption Fission FissionSpectrum NuFission CaptureEnergyCapture + FissionEnergyFission Diffusion Scattering + ; +************************************************************************ +* END MyMpo INITIALIZATION * +************************************************************************ + +************************************************************************ +* RESONANCE SELF-SHIELDING * +************************************************************************ +LIBRARY2 := USS: LIBRARY TRACKSS TF_EXC_SS :: EDIT 1 PASS 2 GRMIN 18 + + CALC REGI W1 U235 ALL + + REGI W1 U238 6 + REGI W2 U238 5 + REGI W3 U238 4 + REGI W4 U238 3 + + REGI W1 U238 10 + REGI W2 U238 9 + REGI W3 U238 8 + REGI W4 U238 7 + + REGI W1 U238 14 + REGI W2 U238 13 + REGI W3 U238 12 + REGI W4 U238 11 + + REGI W1 U238 18 + REGI W2 U238 17 + REGI W3 U238 16 + REGI W4 U238 15 + + REGI W1 U238 22 + REGI W2 U238 21 + REGI W3 U238 20 + REGI W4 U238 19 + ENDC ; + +************************************************************************ +* BEGIN MOC FLUX CALCULATION * +************************************************************************ +SYS := ASM: LIBRARY2 TRACKN2 TF_EXC_MOC :: ARM EDIT 1 ; + +FLUX2 := FLU: LIBRARY2 SYS TRACKN2 TF_EXC_MOC :: EDIT 1 TYPE B B1 SIGS ; + +EDIOBJ := EDI: FLUX2 LIBRARY2 TRACKN2 :: EDIT 5 + MERG COMP + MICR RES + SAVE ON COND2 + ; + +************************************************************************ +* MyMpo FEEDING * +************************************************************************ +MyMpo := MPO: MyMpo EDIOBJ :: EDIT 2 ; + +assertS FLUX2 :: K-INFINITY 1 1.115246 ; +ECHO "test ASSBLY_VVER_1level_mpo completed" ; +END: ; diff --git a/Dragon/data/ASSBLY_VVER_1level_mpo_proc/13UAX_ARO_MOC.ap3 b/Dragon/data/ASSBLY_VVER_1level_mpo_proc/13UAX_ARO_MOC.ap3 new file mode 100644 index 0000000..c1a2b4e --- /dev/null +++ b/Dragon/data/ASSBLY_VVER_1level_mpo_proc/13UAX_ARO_MOC.ap3 @@ -0,0 +1,1306 @@ + + + Geometrie: 13UAX_ARO + Milieux: + 5 E110 E635 U1.3 void water + Noeuds: + 444 + 0.73612159321677 -0.00000000000000 + 1.84030398304193 0.63750000000000 + 1.47224318643355 0.00000000000000 + 1.84030398304193 -0.63750000000000 + 2.57642557625871 0.63750000000000 + 2.57642557625871 -0.63750000000000 + 0.78244880438528 0.31576641456012 + 1.42591597526504 0.31576641456012 + 0.55209119491258 0.31875000000000 + 1.65627358473774 0.95625000000000 + 0.83654247314605 0.36986008332089 + 1.37182230650427 0.36986008332089 + 0.84992446898001 0.38324207915485 + 1.35844031067031 0.38324207915485 + 0.89007045648187 0.42338806665671 + 1.31829432316845 0.42338806665671 + 0.97036243148561 0.50368004166045 + 1.23800234816471 0.50368004166045 + 1.05114938123617 0.58446699141101 + 1.15721539841415 0.58446699141101 + 0.93336477965032 -0.00000000000000 + 0.98641972430351 0.19800374903847 + 1.00621938125385 0.27189707474959 + 1.01111753168242 0.29017722101211 + 1.02581198296812 0.34501765979967 + 1.05520088553951 0.45469853737479 + 1.08477096144247 0.56505556302832 + 1.12359381820785 0.56505556302832 + 1.10418238982515 0.63750000000000 + 1.15316389411081 0.45469853737479 + 1.18255279668220 0.34501765979967 + 1.19724724796790 0.29017722101211 + 1.20214539839646 0.27189707474959 + 1.22194505534681 0.19800374903847 + 1.57086477965032 0.17081761017484 + 1.54367864078669 0.75526266552165 + 1.46978531507557 0.73546300857130 + 1.45150516881305 0.73056485814274 + 1.39666473002549 0.71587040685704 + 1.28698385245037 0.68648150428565 + 1.17662682679684 0.65691142838269 + 1.74168238982516 0.80831761017484 + 0.71014083110324 0.41000000000000 + 0.77639177449275 0.44825000000000 + 0.79278130525937 0.45771250000000 + 0.84194989755923 0.48610000000000 + 0.94028708215896 0.54287500000000 + 1.03923048454133 0.60000000000000 + 1.16913429510899 0.67500000000000 + 1.17662682679684 0.61808857161731 + 1.26807769749136 0.73212500000000 + 1.28698385245037 0.58851849571435 + 1.36641488209109 0.78890000000000 + 1.39666473002549 0.55912959314296 + 1.41558347439095 0.81728750000000 + 1.45150516881305 0.54443514185726 + 1.43197300515757 0.82675000000000 + 1.46978531507557 0.53953699142870 + 1.49822394854708 0.86500000000000 + 1.54367864078668 0.51973733447835 + 1.27500000000000 -0.00000000000000 + 1.74168238982516 0.46668238982516 + 0.63750000000000 0.17081761017484 + 0.71792531060201 0.25124292077685 + 1.49043946904831 0.25124292077685 + 1.44172410445895 0.20801815709848 + 1.24556229321241 0.10986301738960 + 0.96280248643791 0.10986301738960 + 1.63181937243556 0.77887990338725 + 1.63181937243556 0.49612009661275 + 0.63111601300791 0.36437500000000 + 1.57724876664241 0.91062500000000 + 1.42591597526504 -0.31576641456012 + 0.78244880438528 -0.31576641456012 + 1.65627358473774 -0.95625000000000 + 0.55209119491258 -0.31875000000000 + 1.37182230650427 -0.36986008332089 + 0.83654247314605 -0.36986008332089 + 1.35844031067031 -0.38324207915485 + 0.84992446898001 -0.38324207915485 + 1.31829432316845 -0.42338806665671 + 0.89007045648187 -0.42338806665671 + 1.23800234816471 -0.50368004166045 + 0.97036243148560 -0.50368004166045 + 1.15721539841415 -0.58446699141101 + 1.05114938123617 -0.58446699141101 + 1.22194505534681 -0.19800374903847 + 1.20214539839646 -0.27189707474959 + 1.19724724796790 -0.29017722101211 + 1.18255279668220 -0.34501765979967 + 1.15316389411081 -0.45469853737479 + 1.12359381820785 -0.56505556302832 + 0.98641972430351 -0.19800374903847 + 1.00621938125385 -0.27189707474959 + 1.01111753168242 -0.29017722101211 + 1.02581198296812 -0.34501765979967 + 1.05520088553951 -0.45469853737479 + 1.08477096144247 -0.56505556302832 + 1.10418238982516 -0.63749999999999 + 0.63750000000000 -0.17081761017484 + 1.54367864078668 -0.51973733447835 + 1.46978531507557 -0.53953699142870 + 1.45150516881305 -0.54443514185726 + 1.39666473002549 -0.55912959314296 + 1.28698385245037 -0.58851849571435 + 1.17662682679684 -0.61808857161731 + 1.74168238982516 -0.46668238982516 + 1.17662682679684 -0.65691142838269 + 1.28698385245036 -0.68648150428565 + 1.39666473002549 -0.71587040685704 + 1.45150516881305 -0.73056485814274 + 1.46978531507557 -0.73546300857130 + 1.54367864078668 -0.75526266552165 + 1.74168238982516 -0.80831761017484 + 0.71014083110324 -0.41000000000000 + 0.77639177449275 -0.44825000000000 + 0.79278130525937 -0.45771250000000 + 0.84194989755923 -0.48610000000000 + 0.94028708215895 -0.54287500000000 + 1.03923048454133 -0.60000000000000 + 1.16913429510899 -0.67500000000000 + 1.26807769749136 -0.73212500000000 + 1.36641488209109 -0.78890000000000 + 1.41558347439095 -0.81728750000000 + 1.43197300515757 -0.82675000000000 + 1.49822394854708 -0.86500000000000 + 1.57086477965032 -0.17081761017484 + 1.49043946904831 -0.25124292077685 + 0.71792531060201 -0.25124292077685 + 0.76664067519137 -0.20801815709848 + 1.24556229321241 -0.10986301738960 + 0.96280248643791 -0.10986301738960 + 1.63181937243556 -0.49612009661275 + 1.63181937243556 -0.77887990338725 + 0.63111601300791 -0.36437500000000 + 1.57724876664241 -0.91062500000000 + 1.88663119421044 0.95326641456012 + 2.53009836509020 0.95326641456012 + 1.94072486297121 1.00736008332089 + 2.47600469632943 1.00736008332089 + 1.95410685880517 1.02074207915485 + 2.46262270049547 1.02074207915485 + 1.99425284630703 1.06088806665671 + 2.42247671299361 1.06088806665671 + 2.07454482131076 1.14118004166045 + 2.34218473798987 1.14118004166045 + 2.15533177106133 1.22196699141101 + 2.26139778823931 1.22196699141101 + 2.03754716947548 0.63750000000000 + 2.09060211412867 0.83550374903847 + 2.11040177107901 0.90939707474959 + 2.11529992150758 0.92767722101211 + 2.12999437279327 0.98251765979967 + 2.15938327536467 1.09219853737479 + 2.18895335126763 1.20255556302832 + 2.22777620803301 1.20255556302832 + 2.20836477965044 1.27500000000005 + 2.25734628393597 1.09219853737479 + 2.28673518650736 0.98251765979967 + 2.30142963779306 0.92767722101211 + 2.30632778822162 0.90939707474959 + 2.32612744517197 0.83550374903847 + 2.67504716947548 0.80831761017484 + 2.64786103061184 1.39276266552165 + 2.57396770490073 1.37296300857130 + 2.55568755863821 1.36806485814274 + 2.50084711985065 1.35337040685704 + 2.39116624227552 1.32398150428565 + 2.28080921662200 1.29441142838269 + 1.81432322092840 1.04750000000000 + 1.88057416431791 1.08575000000000 + 1.89696369508453 1.09521250000000 + 1.94613228738439 1.12360000000000 + 2.04446947198411 1.18037500000000 + 2.14341287436649 1.23750000000000 + 2.27331668493415 1.31250000000000 + 2.28080921662200 1.25558857161731 + 2.37226008731652 1.36962500000000 + 2.39116624227552 1.22601849571435 + 2.47059727191625 1.42640000000000 + 2.50084711985065 1.19662959314296 + 2.51976586421611 1.45478750000000 + 2.55568755863821 1.18193514185726 + 2.53615539498273 1.46425000000000 + 2.57396770490073 1.17703699142870 + 2.60240633837224 1.50250000000000 + 2.64786103061184 1.15723733447835 + 2.37918238982516 0.63750000000000 + 1.82210770042717 0.88874292077685 + 2.59462185887347 0.88874292077685 + 2.54590649428411 0.84551815709848 + 2.34974468303757 0.74736301738960 + 2.06698487626307 0.74736301738960 + 1.73529840283307 1.00187500000000 + 2.68143115646757 1.54812500000000 + 2.53009836509020 0.32173358543988 + 1.88663119421044 0.32173358543988 + 1.88663119421044 -0.32173358543988 + 2.53009836509020 -0.32173358543988 + 2.47600469632943 0.26763991667911 + 1.94072486297121 0.26763991667911 + 1.94072486297121 -0.26763991667911 + 2.47600469632943 -0.26763991667911 + 2.46262270049547 0.25425792084515 + 1.95410685880517 0.25425792084515 + 1.95410685880517 -0.25425792084515 + 2.46262270049547 -0.25425792084515 + 2.42247671299361 0.21411193334329 + 1.99425284630703 0.21411193334329 + 1.99425284630703 -0.21411193334329 + 2.42247671299361 -0.21411193334329 + 2.34218473798987 0.13381995833955 + 2.07454482131076 0.13381995833955 + 2.07454482131076 -0.13381995833955 + 2.34218473798987 -0.13381995833955 + 2.26139778823931 0.05303300858899 + 2.15533177106133 0.05303300858899 + 2.15533177106133 -0.05303300858899 + 2.26139778823931 -0.05303300858899 + 2.32612744517197 0.43949625096153 + 2.03754716947548 -0.63750000000000 + 2.09060211412867 -0.43949625096153 + 2.11040177107901 -0.36560292525041 + 2.30632778822162 0.36560292525041 + 2.11529992150758 -0.34732277898789 + 2.30142963779306 0.34732277898789 + 2.12999437279327 -0.29248234020033 + 2.28673518650736 0.29248234020033 + 2.15938327536467 -0.18280146262521 + 2.25734628393597 0.18280146262521 + 2.22777620803301 0.07244443697168 + 2.18895335126763 -0.07244443697168 + 2.09060211412867 0.43949625096153 + 2.11040177107901 0.36560292525041 + 2.11529992150758 0.34732277898789 + 2.12999437279327 0.29248234020033 + 2.15938327536467 0.18280146262521 + 2.18895335126763 0.07244443697168 + 2.22777620803301 -0.07244443697168 + 2.20836477965032 0.00000000000000 + 2.25734628393597 -0.18280146262521 + 2.28673518650736 -0.29248234020033 + 2.30142963779306 -0.34732277898789 + 2.30632778822162 -0.36560292525041 + 2.32612744517197 -0.43949625096153 + 2.67504716947548 -0.46668238982516 + 2.64786103061184 0.11776266552165 + 2.57396770490073 0.09796300857130 + 2.55568755863821 0.09306485814274 + 2.50084711985065 0.07837040685704 + 2.39116624227552 0.04898150428565 + 2.28080921662200 0.01941142838269 + 2.02556331702511 -0.04898150428565 + 2.13592034267864 -0.01941142838269 + 1.91588243944999 -0.07837040685704 + 1.76886852868879 -0.11776266552165 + 1.84276185439991 -0.09796300857130 + 1.86104200066243 -0.09306485814274 + 1.76886852868879 0.11776266552165 + 1.84276185439991 0.09796300857130 + 1.86104200066243 0.09306485814274 + 1.91588243944999 0.07837040685704 + 2.02556331702511 0.04898150428565 + 2.13592034267864 0.01941142838269 + 2.28080921662200 -0.01941142838269 + 2.39116624227552 -0.04898150428565 + 2.50084711985065 -0.07837040685704 + 2.55568755863821 -0.09306485814274 + 2.57396770490073 -0.09796300857130 + 2.64786103061184 -0.11776266552165 + 2.37918238982516 -0.63750000000000 + 2.67504716947548 0.46668238982516 + 2.59462185887347 0.38625707922315 + 1.82210770042717 0.38625707922315 + 1.82210770042717 -0.38625707922315 + 2.59462185887347 -0.38625707922315 + 1.87082306501653 0.42948184290152 + 2.54590649428411 -0.42948184290152 + 2.34974468303757 0.52763698261040 + 2.06698487626307 0.52763698261040 + 2.34974468303757 -0.52763698261040 + 2.06698487626307 -0.52763698261040 + 1.68072779703992 0.14137990338725 + 1.68072779703992 -0.14137990338725 + 2.53009836509020 -0.95326641456012 + 1.88663119421044 -0.95326641456012 + 2.47600469632943 -1.00736008332089 + 1.94072486297121 -1.00736008332089 + 2.46262270049547 -1.02074207915485 + 1.95410685880517 -1.02074207915485 + 2.42247671299361 -1.06088806665671 + 1.99425284630703 -1.06088806665671 + 2.34218473798987 -1.14118004166045 + 2.07454482131076 -1.14118004166045 + 2.26139778823931 -1.22196699141101 + 2.15533177106133 -1.22196699141101 + 2.32612744517197 -0.83550374903847 + 2.30632778822162 -0.90939707474959 + 2.30142963779306 -0.92767722101211 + 2.28673518650736 -0.98251765979967 + 2.25734628393597 -1.09219853737479 + 2.22777620803301 -1.20255556302832 + 2.09060211412867 -0.83550374903847 + 2.11040177107901 -0.90939707474959 + 2.11529992150758 -0.92767722101211 + 2.12999437279328 -0.98251765979967 + 2.15938327536467 -1.09219853737479 + 2.18895335126763 -1.20255556302832 + 2.20836477965030 -1.27500000000001 + 2.64786103061184 -1.15723733447835 + 2.57396770490073 -1.17703699142870 + 2.55568755863821 -1.18193514185726 + 2.50084711985065 -1.19662959314296 + 2.39116624227553 -1.22601849571435 + 2.28080921662200 -1.25558857161731 + 2.28080921662200 -1.29441142838269 + 2.39116624227552 -1.32398150428565 + 2.50084711985065 -1.35337040685704 + 2.55568755863821 -1.36806485814274 + 2.57396770490073 -1.37296300857130 + 2.64786103061184 -1.39276266552165 + 1.81432322092840 -1.04750000000000 + 1.88057416431791 -1.08575000000000 + 1.89696369508453 -1.09521250000000 + 1.94613228738439 -1.12360000000000 + 2.04446947198411 -1.18037500000000 + 2.14341287436648 -1.23750000000000 + 2.27331668493415 -1.31250000000000 + 2.37226008731652 -1.36962500000000 + 2.47059727191625 -1.42640000000000 + 2.51976586421611 -1.45478750000000 + 2.53615539498273 -1.46425000000000 + 2.60240633837224 -1.50250000000000 + 2.67504716947548 -0.80831761017484 + 2.59462185887347 -0.88874292077685 + 1.82210770042717 -0.88874292077685 + 1.87082306501653 -0.84551815709848 + 2.34974468303757 -0.74736301738960 + 2.06698487626307 -0.74736301738960 + 1.73529840283307 -1.00187500000000 + 2.68143115646757 -1.54812500000000 + 0.65000000000000 -0.00000000000000 + 0.61552176719441 -0.20888502605471 + 0.61552176719441 0.20888502605471 + 0.56291651245989 0.32500000000000 + 0.56291651245989 -0.32500000000000 + 0.55000000000000 -0.00000000000000 + 0.13750000000000 -0.00000000000000 + 0.27500000000000 -0.00000000000000 + 0.41250000000000 -0.00000000000000 + 0.00000000000000 0.00000000000000 + 0.11907849302036 -0.06875000000000 + 0.23815698604072 -0.13750000000000 + 0.35723547906108 -0.20625000000000 + 0.47631397208144 -0.27500000000000 + 0.11907849302036 0.06875000000000 + 0.23815698604072 0.13750000000000 + 0.35723547906108 0.20625000000000 + 0.47631397208144 0.27500000000000 + 2.73023809523810 1.57630369923749 + 2.73023809523810 -1.57630369923749 + 2.73023809523810 1.13516446653690 + 2.73023809523810 1.11363920867379 + 2.73023809523810 0.90391109771246 + 2.73023809523810 1.41483553346310 + 2.73023809523810 1.43636079132621 + 2.73023809523810 -0.16136079132621 + 2.73023809523810 -0.37108890228754 + 2.73023809523810 0.13983553346310 + 2.73023809523810 -0.13983553346310 + 2.73023809523810 0.16136079132621 + 2.73023809523810 0.37108890228754 + 2.73023809523810 -1.41483553346310 + 2.73023809523810 -1.43636079132621 + 2.73023809523810 -1.13516446653690 + 2.73023809523810 -1.11363920867379 + 2.73023809523810 -0.90391109771246 + 2.73023809523810 0.63750000000000 + 2.73023809523810 -0.63750000000000 + 2.73023809523810 -0.00000000000000 + 2.80952380952381 -1.62207932772324 + 2.80952380952381 1.62207932772324 + 2.79523809523810 -1.61383146673481 + 2.79523809523810 1.61383146673481 + 2.73023809523810 -0.98106560399939 + 2.73023809523810 0.98106560399939 + 2.79523809523810 0.98106560399939 + 2.79523809523810 -0.98106560399939 + 2.79523809523810 -1.42424494692014 + 2.80952380952381 -1.43152388191292 + 2.73023809523810 -1.39112579270300 + 2.79523809523810 -1.24452018226719 + 2.80952380952381 -1.25088059205732 + 2.73023809523810 -1.21558031772214 + 2.79523809523810 -1.07299137412280 + 2.80952380952381 -1.07847514605188 + 2.73023809523810 -1.04804021184550 + 2.79523809523810 -0.90822791280341 + 2.80952380952381 -0.91286962274959 + 2.73023809523810 -0.88710813254827 + 2.79523809523810 -0.74898179027176 + 2.80952380952381 -0.75280963587792 + 2.73023809523810 -0.73156509276373 + 2.79523809523810 -0.59414619857287 + 2.80952380952381 -0.59718272088244 + 2.73023809523810 -0.58033002206432 + 2.79523809523810 -0.44272222128811 + 2.80952380952381 -0.44498485614989 + 2.73023809523810 -0.43242723266701 + 2.79523809523810 -0.29379136238549 + 2.80952380952381 -0.29529285146071 + 2.73023809523810 -0.28695958709322 + 2.79523809523810 -0.14649222113879 + 2.80952380952381 -0.14724090369997 + 2.73023809523810 -0.14308571548539 + 2.79523809523810 0.00000000000000 + 2.80952380952381 0.00000000000000 + 2.79523809523810 0.14649222113879 + 2.80952380952381 0.14724090369997 + 2.73023809523810 0.14308571548539 + 2.79523809523810 0.29379136238549 + 2.80952380952381 0.29529285146071 + 2.73023809523810 0.28695958709322 + 2.79523809523810 0.44272222128811 + 2.80952380952381 0.44498485614989 + 2.73023809523810 0.43242723266701 + 2.79523809523810 0.59414619857287 + 2.80952380952381 0.59718272088244 + 2.73023809523810 0.58033002206432 + 2.79523809523810 0.74898179027176 + 2.80952380952381 0.75280963587792 + 2.73023809523810 0.73156509276373 + 2.79523809523810 0.90822791280341 + 2.80952380952381 0.91286962274959 + 2.73023809523810 0.88710813254827 + 2.79523809523810 1.07299137412280 + 2.80952380952381 1.07847514605188 + 2.73023809523810 1.04804021184550 + 2.79523809523810 1.24452018226719 + 2.80952380952381 1.25088059205732 + 2.73023809523810 1.21558031772214 + 2.79523809523810 1.42424494692014 + 2.80952380952381 1.43152388191292 + 2.73023809523810 1.39112579270300 + Aretes: + 812 + 0 43 44 0 4 + 0 345 71 0 5 + 0 71 43 0 6 + 2 43 7 29 4 6 + 2 71 64 29 6 5 + 0 64 63 7 5 + 0 7 64 8 6 + 2 64 68 29 8 7 + 0 11 7 9 4 + 2 7 22 29 9 8 + 0 44 45 0 10 + 2 44 11 29 10 4 + 0 11 13 10 11 + 2 11 23 29 11 9 + 0 45 46 0 12 + 2 45 13 29 12 10 + 0 13 15 12 13 + 2 13 24 29 13 11 + 0 46 47 0 14 + 2 46 15 29 14 12 + 0 15 17 14 15 + 2 15 25 29 15 13 + 0 47 48 0 16 + 2 47 17 29 16 14 + 0 19 17 17 16 + 2 17 26 29 17 15 + 0 48 29 0 18 + 2 48 19 29 18 16 + 0 29 19 19 18 + 2 19 27 29 19 17 + 0 28 29 21 20 + 0 27 29 19 21 + 2 28 20 29 20 22 + 0 27 26 23 17 + 0 30 28 23 22 + 2 27 28 29 21 23 + 2 30 18 29 22 24 + 0 26 25 25 15 + 0 31 30 25 24 + 2 26 30 29 23 25 + 2 31 16 29 24 26 + 0 25 24 27 13 + 0 31 32 26 27 + 2 25 31 29 25 27 + 2 32 14 29 26 28 + 0 24 23 29 11 + 0 32 33 28 29 + 2 24 32 29 27 29 + 2 33 12 29 28 30 + 0 22 23 9 31 + 0 33 34 30 31 + 2 23 33 29 29 31 + 2 67 65 29 33 32 + 2 34 8 29 30 33 + 0 68 21 34 7 + 0 67 61 32 34 + 0 22 68 35 8 + 0 34 67 33 35 + 2 22 34 29 31 35 + 2 68 67 29 35 34 + 0 29 20 37 20 + 0 50 29 37 36 + 2 50 41 29 36 38 + 0 20 18 39 22 + 0 50 52 38 39 + 2 20 50 29 37 39 + 2 52 40 29 38 40 + 0 18 16 41 24 + 0 52 54 40 41 + 2 18 52 29 39 41 + 2 54 39 29 40 42 + 0 16 14 43 26 + 0 54 56 42 43 + 2 16 54 29 41 43 + 2 56 38 29 42 44 + 0 14 12 45 28 + 0 56 58 44 45 + 2 14 56 29 43 45 + 2 58 37 29 44 46 + 0 12 8 47 30 + 0 58 60 46 47 + 2 12 58 29 45 47 + 2 70 69 29 49 48 + 2 60 36 29 46 49 + 0 65 35 50 32 + 0 70 62 48 50 + 0 8 65 51 33 + 0 60 70 49 51 + 2 65 70 29 51 50 + 2 8 60 29 47 51 + 0 29 41 52 36 + 0 29 49 0 52 + 0 40 41 38 53 + 0 49 51 0 53 + 2 41 49 29 52 53 + 0 40 39 54 40 + 0 51 53 0 54 + 2 40 51 29 53 54 + 0 39 38 55 42 + 0 53 55 0 55 + 2 39 53 29 54 55 + 0 38 37 56 44 + 0 55 57 0 56 + 2 38 55 29 55 56 + 0 37 36 57 46 + 0 57 59 0 57 + 2 37 57 29 56 57 + 0 69 42 58 48 + 0 72 10 0 58 + 0 69 36 49 59 + 0 59 72 0 59 + 2 36 59 29 57 59 + 2 69 72 29 59 58 + 0 61 21 60 34 + 2 131 132 99 61 60 + 0 135 346 0 63 + 0 115 135 0 64 + 2 129 135 99 64 63 + 0 21 1 65 7 + 0 100 129 65 63 + 0 21 132 60 65 + 0 74 129 64 66 + 0 93 132 66 61 + 2 132 129 99 66 65 + 0 116 115 0 68 + 2 74 115 99 68 64 + 2 87 93 99 69 61 + 0 95 94 67 70 + 2 88 94 99 70 69 + 2 89 95 99 62 70 + 0 74 78 71 68 + 0 94 93 71 69 + 2 93 74 99 71 66 + 2 94 78 99 67 71 + 0 95 96 62 72 + 2 95 80 99 72 67 + 0 78 80 67 73 + 0 117 116 0 73 + 2 78 116 99 73 68 + 2 90 96 99 74 62 + 0 96 97 74 75 + 2 96 82 99 75 72 + 2 91 97 99 76 74 + 0 97 98 76 77 + 2 97 84 99 77 75 + 0 82 80 78 72 + 0 118 117 0 78 + 2 80 117 99 78 73 + 2 92 98 99 79 76 + 0 99 98 80 79 + 2 98 86 99 80 77 + 0 84 82 81 75 + 0 119 118 0 81 + 2 82 118 99 81 78 + 0 86 84 82 77 + 0 120 119 0 82 + 2 84 119 99 82 81 + 0 99 86 83 80 + 0 99 120 0 83 + 2 86 120 99 83 82 + 0 121 99 0 85 + 0 99 108 84 85 + 2 108 106 99 84 86 + 0 108 109 86 87 + 0 122 121 0 87 + 2 121 108 99 85 87 + 2 109 105 99 86 88 + 0 110 109 89 88 + 0 123 122 0 89 + 2 122 109 99 87 89 + 2 110 104 99 88 90 + 0 111 110 91 90 + 0 124 123 0 91 + 2 123 110 99 89 91 + 2 111 103 99 90 92 + 0 111 112 92 93 + 0 125 124 0 93 + 2 124 111 99 91 93 + 2 112 102 99 92 94 + 0 112 113 94 95 + 0 126 125 0 95 + 2 125 112 99 93 95 + 2 113 101 99 94 97 + 2 134 133 99 97 96 + 0 114 134 98 96 + 0 75 136 0 98 + 0 113 134 97 99 + 0 136 126 0 99 + 2 126 113 99 95 99 + 2 136 134 99 99 98 + 0 92 99 100 79 + 0 99 106 101 84 + 0 85 99 101 100 + 0 91 92 102 76 + 2 85 92 99 100 102 + 0 83 85 103 102 + 0 106 105 103 86 + 2 106 85 99 101 103 + 0 90 91 104 74 + 2 83 91 99 102 104 + 0 81 83 105 104 + 0 105 104 105 88 + 2 105 83 99 103 105 + 0 89 90 106 62 + 2 81 90 99 104 106 + 0 104 103 107 90 + 0 81 79 106 107 + 2 104 81 99 105 107 + 0 88 89 108 70 + 2 79 89 99 106 108 + 0 103 102 109 92 + 0 79 77 108 109 + 2 103 79 99 107 109 + 0 87 88 110 69 + 2 77 88 99 108 110 + 0 102 101 111 94 + 0 77 73 110 111 + 2 102 77 99 109 111 + 0 3 61 112 32 + 0 61 131 112 60 + 0 131 87 113 61 + 2 73 87 99 110 113 + 2 128 131 99 113 112 + 0 133 107 114 96 + 0 128 127 112 114 + 0 101 133 115 97 + 0 73 128 113 115 + 2 101 73 99 111 115 + 2 133 128 99 115 114 + 0 170 171 0 116 + 0 10 42 117 58 + 0 10 194 0 117 + 0 194 170 0 118 + 2 170 137 157 116 118 + 2 194 189 157 118 117 + 0 42 2 119 48 + 0 189 42 119 117 + 0 137 189 120 118 + 2 189 193 157 120 119 + 0 137 139 116 121 + 2 137 150 157 121 120 + 0 171 172 0 122 + 2 171 139 157 122 116 + 0 139 141 122 123 + 2 139 151 157 123 121 + 0 172 173 0 124 + 2 172 141 157 124 122 + 0 141 143 124 125 + 2 141 152 157 125 123 + 0 173 174 0 126 + 2 173 143 157 126 124 + 0 143 145 126 127 + 2 143 153 157 127 125 + 0 174 175 0 128 + 2 174 145 157 128 126 + 0 147 145 129 128 + 2 145 154 157 129 127 + 0 175 157 0 130 + 2 175 147 157 130 128 + 0 157 147 131 130 + 2 147 155 157 131 129 + 0 156 157 133 132 + 0 155 157 131 133 + 2 156 148 157 132 134 + 0 154 155 129 135 + 0 156 158 134 135 + 2 155 156 157 133 135 + 2 158 146 157 134 136 + 0 154 153 137 127 + 0 159 158 137 136 + 2 154 158 157 135 137 + 2 159 144 157 136 138 + 0 153 152 139 125 + 0 160 159 139 138 + 2 153 159 157 137 139 + 2 160 142 157 138 140 + 0 152 151 141 123 + 0 161 160 141 140 + 2 152 160 157 139 141 + 2 161 140 157 140 142 + 0 151 150 143 121 + 0 162 161 143 142 + 2 151 161 157 141 143 + 0 163 5 2 144 + 2 162 138 157 142 145 + 2 192 190 157 145 144 + 0 192 188 144 146 + 0 149 193 119 146 + 0 150 193 147 120 + 0 162 192 145 147 + 2 193 192 157 147 146 + 2 150 162 157 143 147 + 0 157 148 149 132 + 0 177 157 149 148 + 2 177 169 157 148 150 + 0 148 146 151 134 + 0 179 177 151 150 + 2 148 177 157 149 151 + 2 179 168 157 150 152 + 0 146 144 153 136 + 0 181 179 153 152 + 2 146 179 157 151 153 + 2 181 167 157 152 154 + 0 144 142 155 138 + 0 183 181 155 154 + 2 144 181 157 153 155 + 2 183 166 157 154 156 + 0 142 140 157 140 + 0 183 185 156 157 + 2 142 183 157 155 157 + 2 185 165 157 156 158 + 0 140 138 159 142 + 0 185 187 158 159 + 2 140 185 157 157 159 + 2 187 164 157 158 160 + 0 190 163 161 144 + 0 364 163 2 161 + 0 138 190 162 145 + 0 187 362 160 162 + 2 138 187 157 159 162 + 2 190 363 157 162 161 + 0 157 169 163 148 + 0 157 176 0 163 + 0 169 168 164 150 + 0 176 178 0 164 + 2 169 176 157 163 164 + 0 168 167 165 152 + 0 178 180 0 165 + 2 168 178 157 164 165 + 0 167 166 166 154 + 0 180 182 0 166 + 2 167 180 157 165 166 + 0 166 165 167 156 + 0 182 184 0 167 + 2 166 182 157 166 167 + 0 165 164 168 158 + 0 184 186 0 168 + 2 165 184 157 167 168 + 0 195 360 0 169 + 0 164 365 170 160 + 0 186 195 0 170 + 2 164 186 157 168 170 + 2 366 195 157 170 169 + 0 188 149 171 146 + 2 279 280 240 172 171 + 0 62 35 174 50 + 2 274 283 240 175 174 + 0 257 256 176 1 + 0 2 62 177 48 + 0 149 2 177 119 + 0 62 274 177 174 + 0 149 280 171 177 + 0 274 197 178 175 + 0 280 233 172 178 + 2 280 274 240 178 177 + 0 127 107 180 114 + 2 284 275 240 181 180 + 2 256 198 240 176 181 + 0 259 260 182 1 + 2 197 259 240 182 175 + 2 220 233 240 183 172 + 0 234 235 184 179 + 2 224 234 240 184 183 + 2 226 235 240 173 184 + 0 35 3 185 32 + 0 3 127 185 112 + 0 127 284 185 180 + 0 35 283 174 185 + 0 256 284 181 186 + 0 283 259 175 186 + 2 283 284 240 186 185 + 2 259 256 240 1 186 + 0 107 4 187 96 + 0 275 107 187 180 + 0 198 275 188 181 + 2 275 282 240 188 187 + 0 201 197 182 189 + 0 233 234 183 189 + 2 233 197 240 189 178 + 2 234 201 240 179 189 + 0 198 202 176 190 + 2 198 222 240 190 188 + 0 235 236 173 191 + 2 235 205 240 191 179 + 0 205 201 192 179 + 2 201 260 240 192 182 + 2 228 236 240 193 173 + 2 257 202 240 194 176 + 0 236 237 193 195 + 2 236 209 240 195 191 + 0 258 257 194 196 + 0 260 261 192 196 + 2 260 257 240 196 1 + 2 230 237 240 197 193 + 0 202 206 194 198 + 2 202 223 240 198 190 + 0 238 237 199 197 + 2 237 213 240 199 195 + 0 209 205 200 191 + 2 205 261 240 200 192 + 2 231 238 240 201 197 + 2 258 206 240 202 194 + 0 240 238 203 201 + 2 238 217 240 203 199 + 0 210 206 204 202 + 2 206 225 240 204 198 + 0 255 258 202 205 + 0 261 262 200 205 + 2 261 258 240 205 196 + 2 255 210 240 206 202 + 0 213 209 207 195 + 2 209 262 240 207 200 + 0 214 210 208 206 + 2 210 227 240 208 204 + 0 253 255 206 209 + 0 262 263 207 209 + 2 262 255 240 209 205 + 2 253 214 240 210 206 + 0 213 217 199 211 + 2 213 263 240 211 207 + 0 218 214 212 210 + 2 214 229 240 212 208 + 0 253 254 213 210 + 0 264 263 213 211 + 2 263 253 240 213 209 + 2 254 218 240 214 210 + 0 240 217 215 203 + 2 217 264 240 215 211 + 0 240 218 216 214 + 2 218 232 240 216 212 + 0 240 264 217 215 + 0 240 254 214 217 + 2 264 254 240 217 213 + 0 232 240 216 219 + 0 240 239 218 219 + 2 239 219 240 218 220 + 0 241 239 221 220 + 0 229 232 212 221 + 2 232 239 240 219 221 + 2 241 215 240 220 222 + 0 242 241 223 222 + 0 227 229 208 223 + 2 229 241 240 221 223 + 2 242 211 240 222 224 + 0 243 242 225 224 + 0 225 227 204 225 + 2 227 242 240 223 225 + 2 243 207 240 224 226 + 0 225 223 227 198 + 0 244 243 227 226 + 2 225 243 240 225 227 + 2 244 203 240 226 228 + 0 223 222 229 190 + 0 244 245 228 229 + 2 223 244 240 227 229 + 0 246 6 3 230 + 2 281 276 240 231 230 + 2 245 199 240 228 231 + 0 282 221 232 187 + 0 281 271 230 232 + 0 222 282 233 188 + 0 245 281 231 233 + 2 222 245 240 229 233 + 2 282 281 240 233 232 + 0 240 219 235 218 + 0 265 240 235 234 + 2 265 252 240 234 236 + 0 219 215 237 220 + 0 265 266 236 237 + 2 219 265 240 235 237 + 2 266 251 240 236 238 + 0 215 211 239 222 + 0 267 266 239 238 + 2 215 266 240 237 239 + 2 267 250 240 238 240 + 0 211 207 241 224 + 0 268 267 241 240 + 2 211 267 240 239 241 + 2 268 249 240 240 242 + 0 207 203 243 226 + 0 269 268 243 242 + 2 207 268 240 241 243 + 2 269 248 240 242 244 + 0 203 199 245 228 + 0 270 269 245 244 + 2 203 269 240 243 245 + 2 270 247 240 244 246 + 0 276 246 247 230 + 0 368 246 3 247 + 0 199 276 248 231 + 0 370 270 248 246 + 2 276 367 240 248 247 + 2 199 270 240 245 248 + 0 231 240 249 201 + 0 240 252 250 234 + 0 216 240 250 249 + 0 230 231 251 197 + 2 216 231 240 249 251 + 0 212 216 252 251 + 0 252 251 252 236 + 2 252 216 240 250 252 + 0 228 230 253 193 + 2 212 230 240 251 253 + 0 251 250 254 238 + 0 208 212 254 253 + 2 251 212 240 252 254 + 0 228 226 173 255 + 2 208 228 240 253 255 + 0 250 249 256 240 + 0 204 208 256 255 + 2 250 208 240 254 256 + 0 226 224 184 257 + 2 204 226 240 255 257 + 0 249 248 258 242 + 0 200 204 258 257 + 2 249 204 240 256 258 + 0 220 224 259 183 + 2 200 224 240 257 259 + 0 248 247 260 244 + 0 200 196 259 260 + 2 248 200 240 258 260 + 0 5 188 261 144 + 0 188 279 261 171 + 0 279 220 262 172 + 2 196 220 240 259 262 + 2 273 279 240 262 261 + 0 273 272 261 263 + 0 247 369 264 246 + 0 196 273 262 264 + 2 247 196 240 260 264 + 2 371 273 240 264 263 + 0 271 221 265 232 + 2 338 339 309 266 265 + 0 114 75 268 98 + 0 340 75 0 268 + 0 322 340 0 269 + 2 336 340 309 269 268 + 0 4 114 270 96 + 0 221 4 270 187 + 0 336 114 268 270 + 0 221 339 265 270 + 0 286 336 269 271 + 0 339 303 266 271 + 2 339 336 309 271 270 + 0 323 322 0 273 + 2 286 322 309 273 269 + 2 297 303 309 274 266 + 0 304 305 275 272 + 2 299 305 309 267 275 + 2 298 304 309 275 274 + 0 288 286 273 276 + 0 303 304 274 276 + 2 303 286 309 276 271 + 2 304 288 309 272 276 + 0 306 305 277 267 + 2 305 290 309 277 272 + 0 290 288 278 272 + 0 324 323 0 278 + 2 288 323 309 278 273 + 2 300 306 309 279 267 + 0 307 306 280 279 + 2 306 292 309 280 277 + 2 301 307 309 281 279 + 0 308 307 282 281 + 2 307 294 309 282 280 + 0 290 292 277 283 + 0 325 324 0 283 + 2 290 324 309 283 278 + 2 302 308 309 284 281 + 0 309 308 285 284 + 2 308 296 309 285 282 + 0 292 294 280 286 + 0 326 325 0 286 + 2 292 325 309 286 283 + 0 294 296 282 287 + 0 327 326 0 287 + 2 294 326 309 287 286 + 0 309 296 288 285 + 0 309 327 0 288 + 2 296 327 309 288 287 + 0 316 309 290 289 + 0 328 309 0 290 + 2 316 315 309 289 291 + 0 317 316 292 291 + 0 329 328 0 292 + 2 328 316 309 290 292 + 2 317 314 309 291 293 + 0 317 318 293 294 + 0 330 329 0 294 + 2 329 317 309 292 294 + 2 318 313 309 293 295 + 0 318 319 295 296 + 0 331 330 0 296 + 2 330 318 309 294 296 + 2 319 312 309 295 297 + 0 319 320 297 298 + 0 332 331 0 298 + 2 331 319 309 296 298 + 2 320 311 309 297 299 + 0 320 321 299 300 + 0 333 332 0 300 + 2 332 320 309 298 300 + 2 321 310 309 299 301 + 0 361 341 0 302 + 0 341 333 0 303 + 0 321 373 301 303 + 2 333 321 309 300 303 + 2 341 374 309 303 302 + 0 302 309 304 284 + 0 309 315 305 289 + 0 295 309 305 304 + 0 301 302 306 281 + 2 295 302 309 304 306 + 0 315 314 307 291 + 0 293 295 307 306 + 2 315 295 309 305 307 + 0 300 301 308 279 + 2 293 301 309 306 308 + 0 314 313 309 293 + 0 293 291 308 309 + 2 314 293 309 307 309 + 0 299 300 310 267 + 2 291 300 309 308 310 + 0 313 312 311 295 + 0 289 291 311 310 + 2 313 291 309 309 311 + 0 299 298 275 312 + 2 289 299 309 310 312 + 0 312 311 313 297 + 0 287 289 313 312 + 2 312 289 309 311 313 + 0 298 297 274 314 + 2 287 298 309 312 314 + 0 311 310 315 299 + 0 285 287 315 314 + 2 311 287 309 313 315 + 0 6 271 316 230 + 0 271 338 316 265 + 0 338 297 317 266 + 2 285 297 309 314 317 + 2 335 338 309 317 316 + 0 334 335 318 316 + 0 310 375 319 301 + 0 335 285 319 317 + 2 310 285 309 315 319 + 2 376 335 309 319 318 + 0 272 372 320 263 + 0 5 272 320 261 + 0 5 378 2 320 + 0 6 334 321 316 + 0 334 377 321 318 + 0 6 379 3 321 + 0 63 344 322 5 + 0 1 63 322 7 + 0 343 100 323 63 + 0 100 1 323 65 + 0 1 342 323 322 + 0 352 351 0 324 + 0 353 352 0 325 + 2 352 348 351 324 325 + 0 354 353 0 326 + 2 353 349 351 325 326 + 0 355 354 0 327 + 2 354 350 351 326 327 + 0 76 355 0 328 + 0 346 76 0 328 + 2 346 343 351 328 63 + 2 343 342 351 328 323 + 2 355 347 351 327 328 + 0 351 348 329 324 + 0 351 356 0 329 + 0 348 349 330 325 + 0 356 357 0 330 + 2 348 356 351 329 330 + 0 349 350 331 326 + 0 357 358 0 331 + 2 349 357 351 330 331 + 0 350 347 332 327 + 0 358 359 0 332 + 2 350 358 351 331 332 + 0 347 342 333 328 + 0 359 9 0 333 + 0 9 345 0 333 + 2 344 345 351 333 5 + 2 342 344 351 333 322 + 2 347 359 351 332 333 + 0 390 381 0 334 + 0 381 383 0 334 + 0 389 390 335 334 + 0 393 390 0 335 + 0 392 393 336 335 + 0 396 393 0 336 + 0 395 396 337 336 + 0 399 396 0 337 + 0 398 399 338 337 + 0 402 399 0 338 + 0 401 402 339 338 + 0 405 402 0 339 + 0 404 405 340 339 + 0 408 405 0 340 + 0 407 408 341 340 + 0 411 408 0 341 + 0 410 411 342 341 + 0 414 411 0 342 + 0 413 414 343 342 + 0 417 414 0 343 + 0 416 417 344 343 + 0 419 417 0 344 + 0 418 419 345 344 + 0 422 419 0 345 + 0 421 422 346 345 + 0 425 422 0 346 + 0 424 425 347 346 + 0 428 425 0 347 + 0 427 428 348 347 + 0 431 428 0 348 + 0 430 431 349 348 + 0 434 431 0 349 + 0 433 434 350 349 + 0 437 434 0 350 + 0 436 437 351 350 + 0 440 437 0 351 + 0 439 440 352 351 + 0 443 440 0 352 + 0 442 443 353 352 + 0 384 382 0 353 + 0 382 443 0 353 + 0 373 374 354 303 + 0 374 361 354 302 + 0 391 373 354 301 + 0 383 389 354 334 + 0 383 361 0 354 + 0 394 391 355 301 + 0 389 392 355 335 + 0 391 389 355 354 + 0 375 394 356 301 + 0 376 375 356 319 + 0 397 376 356 318 + 0 392 395 356 336 + 0 394 392 356 355 + 0 385 397 357 318 + 0 395 388 357 337 + 0 397 395 357 356 + 0 377 385 358 318 + 0 400 377 358 321 + 0 388 398 358 337 + 0 388 385 357 358 + 0 403 400 359 321 + 0 398 401 359 338 + 0 400 398 359 358 + 0 379 403 360 321 + 0 406 379 360 3 + 0 401 404 360 339 + 0 403 401 360 359 + 0 409 406 361 3 + 0 404 407 361 340 + 0 406 404 361 360 + 0 412 368 362 247 + 0 368 409 362 3 + 0 407 410 362 341 + 0 409 407 362 361 + 0 367 412 363 247 + 0 415 367 363 248 + 0 410 413 363 342 + 0 412 410 363 362 + 0 380 370 364 246 + 0 370 415 364 248 + 0 413 416 364 343 + 0 415 413 364 363 + 0 369 380 365 246 + 0 420 369 365 264 + 0 416 418 365 344 + 0 380 416 365 364 + 0 371 420 366 264 + 0 423 371 366 263 + 0 418 421 366 345 + 0 420 418 366 365 + 0 372 423 367 263 + 0 426 372 367 320 + 0 421 424 367 346 + 0 423 421 367 366 + 0 429 426 368 320 + 0 424 427 368 347 + 0 426 424 368 367 + 0 378 429 369 320 + 0 432 378 369 2 + 0 427 430 369 348 + 0 429 427 369 368 + 0 435 432 370 2 + 0 430 433 370 349 + 0 432 430 370 369 + 0 386 364 371 161 + 0 364 435 371 2 + 0 433 387 371 350 + 0 435 433 371 370 + 0 438 386 372 161 + 0 387 436 372 350 + 0 386 387 372 371 + 0 362 363 373 162 + 0 363 438 373 161 + 0 441 362 373 160 + 0 436 439 373 351 + 0 438 436 373 372 + 0 444 441 374 160 + 0 439 442 374 352 + 0 441 439 374 373 + 0 365 444 375 160 + 0 366 365 375 170 + 0 360 366 375 169 + 0 442 384 375 353 + 0 444 442 375 374 + 0 360 384 0 375 + Mailles: + 375 + 1 5 5 1 5 5 5 5 1 3 + 3 3 3 3 3 3 3 4 4 4 + 4 3 3 3 3 3 3 3 3 1 + 1 5 5 5 5 4 4 3 3 3 + 3 3 3 3 3 1 1 5 5 5 + 5 4 3 3 3 3 1 5 5 5 + 5 3 5 5 5 5 3 1 1 3 + 1 3 3 3 3 3 3 3 4 4 + 3 3 4 4 4 3 3 3 3 3 + 3 3 3 1 1 5 5 5 5 4 + 4 3 3 3 3 3 3 3 3 1 + 1 5 5 5 5 1 5 5 5 5 + 1 3 3 3 3 3 3 3 3 4 + 4 4 4 3 3 3 3 3 3 3 + 3 1 1 5 5 5 5 4 4 3 + 3 3 3 3 3 3 3 1 1 5 + 5 5 4 3 3 3 3 1 5 5 + 5 5 3 5 5 1 5 5 3 5 + 5 1 1 3 5 5 5 5 1 1 + 3 3 3 3 3 3 3 3 3 3 + 4 3 4 3 3 3 3 3 3 3 + 3 3 3 4 4 4 4 4 4 3 + 3 3 3 3 3 3 3 1 1 5 + 5 5 5 4 4 3 3 3 3 3 + 3 3 3 1 1 5 5 5 4 4 + 3 3 3 3 3 3 3 3 1 1 + 5 5 5 5 5 5 3 5 5 5 + 5 3 1 1 3 1 3 3 3 3 + 3 3 3 4 4 3 3 4 4 4 + 3 3 3 3 3 3 3 3 1 1 + 5 5 5 4 4 3 3 3 3 3 + 3 3 3 1 1 5 5 5 5 5 + 5 5 5 5 5 5 5 2 5 5 + 5 5 2 5 5 5 5 5 5 5 + 5 5 5 5 5 5 5 5 5 5 + 5 5 5 2 2 2 2 5 5 5 + 5 5 5 5 5 5 5 5 5 5 + 5 2 2 2 2 + Fin: diff --git a/Dragon/data/ASSBLY_VVER_1level_mpo_proc/13UAX_ARO_MOC.za b/Dragon/data/ASSBLY_VVER_1level_mpo_proc/13UAX_ARO_MOC.za new file mode 100644 index 0000000..71f6c75 --- /dev/null +++ b/Dragon/data/ASSBLY_VVER_1level_mpo_proc/13UAX_ARO_MOC.za @@ -0,0 +1,118 @@ +MaterialMap: + E110 water water E110 water water water water E110 U1.3 + U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 void void void + void U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 E110 + E110 water water water water void void U1.3 U1.3 U1.3 + U1.3 U1.3 U1.3 U1.3 U1.3 E110 E110 water water water + water void U1.3 U1.3 U1.3 U1.3 E110 water water water + water U1.3 water water water water U1.3 E110 E110 U1.3 + E110 U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 void void + U1.3 U1.3 void void void U1.3 U1.3 U1.3 U1.3 U1.3 + U1.3 U1.3 U1.3 E110 E110 water water water water void + void U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 E110 + E110 water water water water E110 water water water water + E110 U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 void + void void void U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 + U1.3 E110 E110 water water water water void void U1.3 + U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 E110 E110 water + water water void U1.3 U1.3 U1.3 U1.3 E110 water water + water water U1.3 water water E110 water water U1.3 water + water E110 E110 U1.3 water water water water E110 E110 + U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 + void U1.3 void U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 + U1.3 U1.3 U1.3 void void void void void void U1.3 + U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 E110 E110 water + water water water void void U1.3 U1.3 U1.3 U1.3 U1.3 + U1.3 U1.3 U1.3 E110 E110 water water water void void + U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 E110 E110 + water water water water water water U1.3 water water water + water U1.3 E110 E110 U1.3 E110 U1.3 U1.3 U1.3 U1.3 + U1.3 U1.3 U1.3 void void U1.3 U1.3 void void void + U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 U1.3 E110 E110 + water water water void void U1.3 U1.3 U1.3 U1.3 U1.3 + U1.3 U1.3 U1.3 E110 E110 water water water water water + water water water water water water water E635 water water + water water E635 water water water water water water water + water water water water water water water water water water + water water water E635 E635 E635 E635 water water water + water water water water water water water water water water + water E635 E635 E635 E635 +TemperatureMap: + TE110 Twater Twater TE110 Twater Twater Twater Twater TE110 Tfuel + Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel + Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel TE110 + TE110 Twater Twater Twater Twater Tfuel Tfuel Tfuel Tfuel Tfuel + Tfuel Tfuel Tfuel Tfuel Tfuel TE110 TE110 Twater Twater Twater + Twater Tfuel Tfuel Tfuel Tfuel Tfuel TE110 Twater Twater Twater + Twater Tfuel Twater Twater Twater Twater Tfuel TE110 TE110 Tfuel + TE110 Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel + Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel + Tfuel Tfuel Tfuel TE110 TE110 Twater Twater Twater Twater Tfuel + Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel TE110 + TE110 Twater Twater Twater Twater TE110 Twater Twater Twater Twater + TE110 Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel + Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel + Tfuel TE110 TE110 Twater Twater Twater Twater Tfuel Tfuel Tfuel + Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel TE110 TE110 Twater + Twater Twater Tfuel Tfuel Tfuel Tfuel Tfuel TE110 Twater Twater + Twater Twater Tfuel Twater Twater TE110 Twater Twater Tfuel Twater + Twater TE110 TE110 Tfuel Twater Twater Twater Twater TE110 TE110 + Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel + Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel + Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel + Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel TE110 TE110 Twater + Twater Twater Twater Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel + Tfuel Tfuel Tfuel TE110 TE110 Twater Twater Twater Tfuel Tfuel + Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel TE110 TE110 + Twater Twater Twater Twater Twater Twater Tfuel Twater Twater Twater + Twater Tfuel TE110 TE110 Tfuel TE110 Tfuel Tfuel Tfuel Tfuel + Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel + Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel TE110 TE110 + Twater Twater Twater Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel Tfuel + Tfuel Tfuel Tfuel TE110 TE110 Twater Twater Twater Twater Twater + Twater Twater Twater Twater Twater Twater Twater TE635 Twater Twater + Twater Twater TE635 Twater Twater Twater Twater Twater Twater Twater + Twater Twater Twater Twater Twater Twater Twater Twater Twater Twater + Twater Twater Twater TE635 TE635 TE635 TE635 Twater Twater Twater + Twater Twater Twater Twater Twater Twater Twater Twater Twater Twater + Twater TE635 TE635 TE635 TE635 +PropertyMap: + clad ? ? clad ? ? ? ? clad B2_4 + B2_4 B2_3 B2_3 B2_2 B2_2 B2_1 B2_1 ? ? ? + ? B2_1 B2_1 B2_2 B2_2 B2_3 B2_3 B2_4 B2_4 clad + clad ? ? ? ? ? ? B2_1 B2_1 B2_2 + B2_2 B2_3 B2_3 B2_4 B2_4 clad clad ? ? ? + ? ? B2_1 B2_2 B2_3 B2_4 clad ? ? ? + ? B1_3 ? ? ? ? B1_4 clad clad B1_4 + clad B1_3 B1_4 B1_2 B1_2 B1_1 B1_1 B1_3 ? ? + B1_2 B1_1 ? ? ? B1_1 B1_1 B1_2 B1_2 B1_3 + B1_3 B1_4 B1_4 clad clad ? ? ? ? ? + ? B1_1 B1_1 B1_2 B1_2 B1_3 B1_3 B1_4 B1_4 clad + clad ? ? ? ? clad ? ? ? ? + clad C4_4 C4_4 C4_3 C4_3 C4_2 C4_2 C4_1 C4_1 ? + ? ? ? C4_1 C4_1 C4_2 C4_2 C4_3 C4_3 C4_4 + C4_4 clad clad ? ? ? ? ? ? C4_1 + C4_1 C4_2 C4_2 C4_3 C4_3 C4_4 C4_4 clad clad ? + ? ? ? C4_1 C4_2 C4_3 C4_4 clad ? ? + ? ? C3_3 ? ? clad ? ? C3_4 ? + ? clad clad C3_4 ? ? ? ? clad clad + C3_3 C3_4 C3_2 C3_4 C3_2 C3_4 C3_1 C3_4 C3_1 C3_3 + ? C3_3 ? C3_3 C3_3 C3_2 C3_2 C3_2 C3_2 C3_1 + C3_1 C3_1 C3_1 ? ? ? ? ? ? C3_1 + C3_1 C3_2 C3_2 C3_3 C3_3 C3_4 C3_4 clad clad ? + ? ? ? ? ? C3_1 C3_1 C3_2 C3_2 C3_3 + C3_3 C3_4 C3_4 clad clad ? ? ? ? ? + C3_1 C3_1 C3_2 C3_2 C3_3 C3_3 C3_4 C3_4 clad clad + ? ? ? ? ? ? C2_3 ? ? ? + ? C2_4 clad clad C2_4 clad C2_3 C2_4 C2_2 C2_2 + C2_1 C2_1 C2_3 ? ? C2_2 C2_1 ? ? ? + C2_1 C2_1 C2_2 C2_2 C2_3 C2_3 C2_4 C2_4 clad clad + ? ? ? ? ? C2_1 C2_1 C2_2 C2_2 C2_3 + C2_3 C2_4 C2_4 clad clad ? ? ? ? ? + ? ? ? ? ? ? ? tube ? ? + ? ? tube ? ? ? ? ? ? ? + ? ? ? ? ? ? ? ? ? ? + ? ? ? stif stif stif stif ? ? ? + ? ? ? ? ? ? ? ? ? ? + ? stif stif stif stif +) diff --git a/Dragon/data/ASSBLY_VVER_1level_mpo_proc/Mix_UOX.c2m b/Dragon/data/ASSBLY_VVER_1level_mpo_proc/Mix_UOX.c2m new file mode 100644 index 0000000..e616b3f --- /dev/null +++ b/Dragon/data/ASSBLY_VVER_1level_mpo_proc/Mix_UOX.c2m @@ -0,0 +1,144 @@ +*DECK Mix_UOX +*---- +* Name : Mix_UOX.c2m +* Type : DRAGON procedure +* Use : Microlib generation with Apolib3 for +* UOX calculation with 20 fuel regions +* Author : A. Hebert +* +* Procedure called as: +* +* LIBRARY := Mix_UOX :: +* <> <> <> ; +* +* Input data : +* Library : Cross-section library name +* dens_mod : Coolant density +* pbore : Natural boron concentration (ppm) +* +* Output data : +* LIBRARY : Microlib with table of probabilities + + +PARAMETER LIBRARY :: + EDIT 0 + ::: LINKED_LIST LIBRARY ; + ; + +*---- +* Input data recovery +*---- +STRING Library ; +:: >>Library<< ; + +REAL dens_mod pbore ; +:: >>dens_mod<< >>pbore<< ; + +*---- +* Modules used in this procedure +*---- +MODULE LIB: UTL: DELETE: END: ABORT: ; + +* Calculation of moderator data +REAL A := 6.022094E-1 ; ! Avogadro number + +REAL P_B10 P_B11 := 0.202 0.798 ; +REAL M_H2O := 15.9994 2.0 1.00794 * + ; +REAL M_B := P_B10 10.012938 * P_B11 11.009276 * + ; +REAL f1 := 1.0 1.0E-06 pbore * - ; +REAL f2 := 1.0E-06 pbore * ; +REAL N_H2O := dens_mod f1 A * * M_H2O / ; +REAL N_B10 := P_B10 dens_mod f2 A * * * M_B / ; +REAL N_B11 := P_B11 dens_mod f2 A * * * M_B / ; +ECHO "Mix_UOX H2O=" N_H2O ; +ECHO "Mix_UOX B10=" N_B10 ; +ECHO "Mix_UOX B11=" N_B11 ; + +LIBRARY := LIB: :: + EDIT 2 + NMIX 24 (*MAXIMUM OF MATERIAL MIXTURES*) + CTRA APOL (*APOLLO TYPE TRANSPORT CORRECTION*) + ANIS 2 + ADED 4 NELAS N4N N2N N3N + SUBG (*HELIOS TYPE PROBABILITY TABLES*) + +*---- +* Depletion Chain +*---- + MIXS LIB: APLIB3 FIL: <> +*---- +* Cladding +*---- + MIX 1 600.0 NOEV + Zr90 = Zr90 2.16576E-2 2 + Zr91 = Zr91 4.72300E-3 2 + Zr92 = Zr92 7.21921E-3 2 + Zr94 = Zr94 7.31603E-3 2 + Zr96 = Zr96 1.17864E-3 2 +*---- +* Moderator +*---- + MIX 2 600.0 NOEV + H2O = H2O <> + B10 = B10 <> + B11 = B11 <> +*---- +* Fuel -> 5 * 4 evolving mixes +*---- +* C1 Cell + MIX 3 900.0 + U235 = U235 4.08785E-4 1 + U238 = U238 2.20157E-2 1 + O16 = O16 4.48565E-2 + MIX 4 + COMB 3 1.0 + MIX 5 + COMB 3 1.0 + MIX 6 + COMB 3 1.0 + MIX 7 + COMB 3 1.0 + MIX 8 + COMB 3 1.0 + MIX 9 + COMB 3 1.0 + MIX 10 + COMB 3 1.0 + MIX 11 + COMB 3 1.0 + MIX 12 + COMB 3 1.0 + MIX 13 + COMB 3 1.0 + MIX 14 + COMB 3 1.0 + MIX 15 + COMB 3 1.0 + MIX 16 + COMB 3 1.0 + MIX 17 + COMB 3 1.0 + MIX 18 + COMB 3 1.0 + MIX 19 + COMB 3 1.0 + MIX 20 + COMB 3 1.0 + MIX 21 + COMB 3 1.0 + MIX 22 + COMB 3 1.0 +*---- +* Tube +*---- + MIX 23 + COMB 1 1.0 +*---- +* Stiffner +*---- + MIX 24 + COMB 1 1.0 +; + +END: ; +QUIT . diff --git a/Dragon/data/C2D20.access b/Dragon/data/C2D20.access new file mode 100755 index 0000000..9fc0f19 --- /dev/null +++ b/Dragon/data/C2D20.access @@ -0,0 +1,37 @@ +#!/bin/sh +if [ $# = 0 ] + then + echo "usage: C2D20.access directory" 1>&2 + exit 1 +fi +MACH=`uname -s` +Sysx="`echo $MACH | cut -b -6`" +if [ $Sysx = "CYGWIN" ]; then + MACH=`uname -o` +elif [ $Sysx = "Darwin" ]; then + MACH=`uname -sm | sed 's/[ ]/_/'` +elif [ $Sysx = "SunOS" ]; then + MACH=`uname -sm | sed 's/[ ]/_/'` +fi +if [ "$MACH" = "Linux" -o "$MACH" = "OSF1" -o "$MACH" = "Cygwin" -o "$MACH" = "SunOS_i86pc" \ +-o "$MACH" = "Darwin_i386" -o "$MACH" = "Darwin_x86_64" -o "$MACH" = "Darwin_arm64" \ +-o "$MACH" = "Linux_aarch64" ] +then + echo 'use little endian libraries' + pos=$1/../../libraries/l_endian +else + echo 'use big endian libraries' + pos=$1/../../libraries/b_endian +fi +if [ -f "$pos"/E6MLIB.gz ] + then + echo 'gunzipping E6MLIB' + chmod 755 "$pos" + gunzip "$pos"/E6MLIB.gz +fi +if [ -f "$pos"/E6MLIB ] + then + ln -s "$pos"/E6MLIB . +fi +ls +echo "C2D20 access script terminated" diff --git a/Dragon/data/C2D20.x2m b/Dragon/data/C2D20.x2m new file mode 100644 index 0000000..134cc20 --- /dev/null +++ b/Dragon/data/C2D20.x2m @@ -0,0 +1,117 @@ +*---- +* TEST CASE C2D20 +* ACR ANNULAR CELL WITH NXT +*---- +MODULE SHI: ASM: FLU: DELETE: END: ; +PROCEDURE GeoACRC2DN ; +PROCEDURE MicACRE620 MicACRE6UH MicACRE6UW ; +LINKED_LIST CFLXS.tds CFLXF.tds Flux Compo1 ; +SEQ_BINARY CFLXS.trk CFLXF.trk ; +XSM_FILE MicLib ConcIso EditDS Pij ; +STRING Modele Option Etat BCtrk DiscrOpt TypeMRG ; +REAL FuelSplit CoolSplit PTSplit CTSplit ModeSplit ; +PROCEDURE assertS ; +*---- +* Get cross sections +*---- +MicLib := MicACRE620 ; +MicLib := MicACRE6UH MicLib ; +MicLib := MicACRE6UW MicLib ; +*---- +* Initialyze geometry options +*---- +INTEGER NbAngles := 10 ; +REAL TrkDens := 20.0 ; +EVALUATE Etat BCtrk DiscrOpt := "Present" "TISO" "Thickness" ; +*---------- +* Get geometry for resonance self shielding +*---------- +EVALUATE Modele := "C2D6" ; +EVALUATE TypeMRG := "Supercell" ; ! "Supercell" OR "Reactor" +EVALUATE FuelSplit CoolSplit PTSplit CTSplit ModeSplit := + 0.0 0.0 0.0 0.0 0.0 ; +EVALUATE Option := "Shield" ; +CFLXS.tds CFLXS.trk := GeoACRC2DN :: + <> <