*********************************************************************** * * * Purpose : Kalinin VVER-1000 reactor, cycle: 1 * * Author(s) : Willem F.G. Van Rooijen (2016) * * * *********************************************************************** * *------------------------------------------------------------------------------- PROCEDURE cgeom cfmap ; *------------------------------------------------------------------------------- * *------------------------------------------------------------------------------- LINKED_LIST GEOM MATEX FLMAP MACRO1 MACRO2 MACFL TRACK SYSTEM FLUX NONFUELDB FUELDB POWER DBRHS CORETH ; *------------------------------------------------------------------------------- * *------------------------------------------------------------------------------- MODULE COMPO: USPLIT: NCR: MACINI: DELETE: TRIVAT: TRIVAA: FLUD: FLPOW: GREP: TINST: THM: END: ; PROCEDURE assertS ; *------------------------------------------------------------------------------- * *------------------------------------------------------------------------------- SEQ_ASCII dbase_file1 :: FILE 'FUEL20.COMPO' ; SEQ_ASCII dbase_file2 :: FILE 'FUEL30.COMPO' ; SEQ_ASCII dbase_file3 :: FILE 'FUEL33.COMPO' ; SEQ_ASCII dbase_file4 :: FILE 'FUELPR.COMPO' ; SEQ_ASCII dbase_file5 :: FILE 'FUEL30CR.COMPO' ; SEQ_ASCII dbase_nfuel :: FILE 'NONFUEL.COMPO' ; *------------------------------------------------------------------------------- * Set up the COMPO structures *------------------------------------------------------------------------------- FUELDB := COMPO: :: EDIT 0 STEP UP 'FUEL20' COMM '2.0%' ENDC PARA 'BURN' IRRA PARA 'FLUB' FLUB PARA 'TFUEL' TEMP LIBRARY 1 PARA 'CBORE' CONC B_10 LIBRARY 3 INIT STEP UP 'FUEL30' COMM '3.0%' ENDC PARA 'BURN' IRRA PARA 'FLUB' FLUB PARA 'TFUEL' TEMP LIBRARY 1 PARA 'CBORE' CONC B_10 LIBRARY 3 INIT STEP UP 'FUEL33' COMM '3.3%' ENDC PARA 'BURN' IRRA PARA 'FLUB' FLUB PARA 'TFUEL' TEMP LIBRARY 1 PARA 'CBORE' CONC B_10 LIBRARY 3 INIT STEP UP 'FUELPR' COMM 'profile' ENDC PARA 'BURN' IRRA PARA 'FLUB' FLUB PARA 'TFUEL' TEMP LIBRARY 1 PARA 'CBORE' CONC B_10 LIBRARY 3 INIT STEP UP 'FUEL30CR' COMM '3.0% + CR' ENDC PARA 'BURN' IRRA PARA 'FLUB' FLUB PARA 'TFUEL' TEMP LIBRARY 1 PARA 'CBORE' CONC B_10 LIBRARY 3 INIT ; *------------------------------------------------------------------------------- * Read COMPO data from files *------------------------------------------------------------------------------- DBRHS := dbase_file1 ; FUELDB := COMPO: FUELDB DBRHS :: EDIT 0 STEP UP 'FUEL20' ; DBRHS := DELETE: DBRHS ; *------------------------------------------------------------------------------- * *------------------------------------------------------------------------------- DBRHS := dbase_file2 ; FUELDB := COMPO: FUELDB DBRHS :: EDIT 0 STEP UP 'FUEL30' ; DBRHS := DELETE: DBRHS ; *------------------------------------------------------------------------------- * *------------------------------------------------------------------------------- DBRHS := dbase_file3 ; FUELDB := COMPO: FUELDB DBRHS :: EDIT 0 STEP UP 'FUEL33' ; DBRHS := DELETE: DBRHS ; *------------------------------------------------------------------------------- * *------------------------------------------------------------------------------- DBRHS := dbase_file4 ; FUELDB := COMPO: FUELDB DBRHS :: EDIT 0 STEP UP 'FUELPR' ; DBRHS := DELETE: DBRHS ; *------------------------------------------------------------------------------- * *------------------------------------------------------------------------------- DBRHS := dbase_file5 ; FUELDB := COMPO: FUELDB DBRHS :: EDIT 0 STEP UP 'FUEL30CR' ; DBRHS := DELETE: DBRHS ; *------------------------------------------------------------------------------- * *------------------------------------------------------------------------------- NONFUELDB := dbase_nfuel ; *------------------------------------------------------------------------------- * *------------------------------------------------------------------------------- GEOM := cgeom ; *------------------------------------------------------------------------------- * *------------------------------------------------------------------------------- GEOM MATEX := USPLIT: GEOM :: EDIT 0 NGRP 2 MAXR 60000 NREFL 5 RMIX 51 52 53 54 55 NFUEL 50 FMIX 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 ; *------------------------------------------------------------------------------- * *------------------------------------------------------------------------------- FLMAP MATEX := cfmap MATEX ; *------------------------------------------------------------------------------- * *------------------------------------------------------------------------------- TRACK := TRIVAT: GEOM :: EDIT 0 MAXR 60000 DUAL 2 3 SPN 0 ; MACRO1 := NCR: NONFUELDB :: EDIT 0 MACRO NMIX 55 COMPO NONFUELDB 'REFL' MIX 52 SET 'CBORE' 0.0 SET 'TFUEL' 573.15 ENDMIX COMPO NONFUELDB 'HEAD' MIX 55 SET 'CBORE' 0.0 SET 'TFUEL' 573.15 ENDMIX COMPO NONFUELDB 'TERM' MIX 51 SET 'CBORE' 0.0 SET 'TFUEL' 573.15 ENDMIX COMPO NONFUELDB 'QLEN' MIX 54 SET 'CBORE' 0.0 SET 'TFUEL' 573.15 ENDMIX COMPO NONFUELDB 'PLEN' MIX 53 SET 'CBORE' 0.0 SET 'TFUEL' 573.15 ENDMIX ; *------------------------------------------------------------------------------- * *------------------------------------------------------------------------------- MACFL := NCR: FUELDB FLMAP :: EDIT 0 MACRO TABLE FUELDB FUEL20 'BURN' MIX 1 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL20 'BURN' MIX 6 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL20 'BURN' MIX 11 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL20 'BURN' MIX 16 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL20 'BURN' MIX 21 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL20 'BURN' MIX 26 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL20 'BURN' MIX 31 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL20 'BURN' MIX 36 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL20 'BURN' MIX 41 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL20 'BURN' MIX 46 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 2 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 7 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 12 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 17 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 22 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 27 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 32 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 37 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 42 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 47 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL33 'BURN' MIX 5 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL33 'BURN' MIX 10 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL33 'BURN' MIX 15 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL33 'BURN' MIX 20 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL33 'BURN' MIX 25 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL33 'BURN' MIX 30 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL33 'BURN' MIX 35 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL33 'BURN' MIX 40 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL33 'BURN' MIX 45 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL33 'BURN' MIX 50 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUELPR 'BURN' MIX 4 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUELPR 'BURN' MIX 9 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUELPR 'BURN' MIX 14 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUELPR 'BURN' MIX 19 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUELPR 'BURN' MIX 24 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUELPR 'BURN' MIX 29 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUELPR 'BURN' MIX 34 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUELPR 'BURN' MIX 39 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUELPR 'BURN' MIX 44 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUELPR 'BURN' MIX 49 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 3 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 8 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 13 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 18 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 23 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 28 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30CR 'BURN' MIX 33 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30CR 'BURN' MIX 38 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30CR 'BURN' MIX 43 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30CR 'BURN' MIX 48 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX ; *------------------------------------------------------------------------------- * *------------------------------------------------------------------------------- MACRO2 MATEX := MACINI: MATEX MACRO1 MACFL :: EDIT 0 ; *------------------------------------------------------------------------------- * *------------------------------------------------------------------------------- SYSTEM := TRIVAA: MACRO2 TRACK :: EDIT 0 ; *------------------------------------------------------------------------------- * First core calculation and power map *------------------------------------------------------------------------------- FLUX := FLUD: SYSTEM TRACK :: EDIT 5 ACCE 5 3 ADI 8 ; *------------------------------------------------------------------------------- * *------------------------------------------------------------------------------- POWER FLMAP := FLPOW: FLMAP FLUX TRACK MATEX :: EDIT 10 PTOT 1450.0 ; *------------------------------------------------------------------------------- * *------------------------------------------------------------------------------- CORETH FLMAP := THM: FLMAP :: EDIT 0 CWSECT 4.37 80000.0 ASSMB 312 19 INLET 15.0E+06 561.0 RADIUS 3.8E-03 3.86E-03 4.55E-03 4.1E-03 POROS 0.05 ; *------------------------------------------------------------------------------- * Two options for shuffling. Option 1: central SA to pool, then put 3.3% fuel * in the central position. Recalculate k-effective and power map. * Option 1 gives the expected result. *------------------------------------------------------------------------------- *FLMAP := TINST: FLMAP :: EDIT 100 * SHUFF CHAN C00A01 TO POOL * NEWFUEL CHAN C00A01 10 SOME 5 10 15 20 25 30 35 40 45 50 * ; *------------------------------------------------------------------------------- * Option 2: central SA to pool, then shuffle a 3.3% SA to the central position, * then put 3.3 fuel in the outer position. Recalculate k-eff and power map. *------------------------------------------------------------------------------- FLMAP := TINST: FLMAP :: EDIT 100 SHUFF CHAN C00A01 TO POOL SHUFF CHAN C07A02 TO C00A01 NEWFUEL CHAN C07A02 10 SOME 5 10 15 20 25 30 35 40 45 50 ; MACFL MACRO2 SYSTEM FLUX POWER := DELETE: MACFL MACRO2 SYSTEM FLUX POWER ; *------------------------------------------------------------------------------- * *------------------------------------------------------------------------------- MACFL := NCR: FUELDB FLMAP :: EDIT 0 MACRO TABLE FUELDB FUEL20 'BURN' MIX 1 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL20 'BURN' MIX 6 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL20 'BURN' MIX 11 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL20 'BURN' MIX 16 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL20 'BURN' MIX 21 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL20 'BURN' MIX 26 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL20 'BURN' MIX 31 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL20 'BURN' MIX 36 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL20 'BURN' MIX 41 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL20 'BURN' MIX 46 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 2 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 7 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 12 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 17 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 22 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 27 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 32 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 37 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 42 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 47 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL33 'BURN' MIX 5 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL33 'BURN' MIX 10 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL33 'BURN' MIX 15 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL33 'BURN' MIX 20 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL33 'BURN' MIX 25 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL33 'BURN' MIX 30 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL33 'BURN' MIX 35 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL33 'BURN' MIX 40 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL33 'BURN' MIX 45 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL33 'BURN' MIX 50 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUELPR 'BURN' MIX 4 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUELPR 'BURN' MIX 9 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUELPR 'BURN' MIX 14 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUELPR 'BURN' MIX 19 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUELPR 'BURN' MIX 24 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUELPR 'BURN' MIX 29 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUELPR 'BURN' MIX 34 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUELPR 'BURN' MIX 39 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUELPR 'BURN' MIX 44 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUELPR 'BURN' MIX 49 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 3 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 8 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 13 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 18 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 23 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30 'BURN' MIX 28 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30CR 'BURN' MIX 33 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30CR 'BURN' MIX 38 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30CR 'BURN' MIX 43 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX TABLE FUELDB FUEL30CR 'BURN' MIX 48 INST-BURN SET 'CBORE' 0.0 SET 'TFUEL' 870.00 ENDMIX ; *------------------------------------------------------------------------------- * *------------------------------------------------------------------------------- MACRO2 MATEX := MACINI: MATEX MACRO1 MACFL :: EDIT 0 ; *------------------------------------------------------------------------------- * *------------------------------------------------------------------------------- SYSTEM := TRIVAA: MACRO2 TRACK :: EDIT 0 ; *------------------------------------------------------------------------------- * Second core calculation, k-effective and power of central SA should be * higher *------------------------------------------------------------------------------- FLUX := FLUD: SYSTEM TRACK :: EDIT 5 ACCE 5 3 ADI 8 ; assertS FLUX :: 'K-EFFECTIVE' 1 1.196859 ; *------------------------------------------------------------------------------- * *------------------------------------------------------------------------------- POWER FLMAP := FLPOW: FLMAP FLUX TRACK MATEX :: EDIT 10 PTOT 1450.0 ; ECHO "test vver_test.x2m completed" ; END: ; QUIT "LIST" .