*********************************************************** * * * Procedure : SetFuelMap.c2m * * Purpose : Fuel-map specifications * * Author(s) : M. Guyot (2010) * * * * CALL : FMAP MATEX := SetFuelMap MATEX ; * * * *********************************************************** PARAMETER FMAP MATEX :: ::: LINKED_LIST FMAP MATEX ; ; MODULE RESINI: END: ; FMAP MATEX := RESINI: MATEX :: ::: GEO: CAR3D 28 28 12 EDIT 0 X- VOID X+ VOID Y- VOID Y+ VOID Z- VOID Z+ VOID MIX PLANE 1 ! 2 3 4 5 6 7 8 9 1011121314 1516171819202122232425262728 *) ! ! 1 2 3 4 5 6 7 8 9 1011 1213141516171819202122 *) 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 !- 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 !- 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 !_ 0 0 0 0 0 0 0 0 0 0 0 1 1 1 1 1 1 0 0 0 0 0 0 0 0 0 0 0 !A 6 0 0 0 0 0 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 0 0 0 0 0 !B 18 0 0 0 0 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 0 0 0 0 !C 32 0 0 0 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 0 0 0 !D 48 0 0 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 0 0 !E 66 0 0 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 0 0 !F 84 0 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 0 !G 104 0 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 0 !H 124 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 !J 146 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 !K 168 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 !L 190 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 !M 212 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 !N 234 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 !O 256 0 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 0 !P 276 0 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 0 !Q 296 0 0 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 0 0 !R 314 0 0 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 0 0 !S 332 0 0 0 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 0 0 0 !T 348 0 0 0 0 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 0 0 0 0 !U 362 0 0 0 0 0 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 0 0 0 0 0 !V 374 0 0 0 0 0 0 0 0 0 0 0 1 1 1 1 1 1 0 0 0 0 0 0 0 0 0 0 0 !W 380 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 !- 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 !- 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ! ! PLANE 2 SAME 1 PLANE 3 SAME 1 PLANE 4 SAME 1 PLANE 5 SAME 1 PLANE 6 SAME 1 PLANE 7 SAME 1 PLANE 8 SAME 1 PLANE 9 SAME 1 PLANE 10 SAME 1 PLANE 11 SAME 1 PLANE 12 SAME 1 ! MESHX 0.00 11.375 39.95 68.525 97.10 125.675 154.25 182.825 211.4 239.975 268.55 297.125 325.7 354.275 382.85 411.425 440.0 468.575 497.15 525.725 554.3 582.875 611.45 640.025 668.6 697.175 725.75 754.325 765.7 MESHY 0.00 11.375 39.95 68.525 97.10 125.675 154.25 182.825 211.4 239.975 268.55 297.125 325.7 354.275 382.85 411.425 440.0 468.575 497.15 525.725 554.3 582.875 611.45 640.025 668.6 697.175 725.75 754.325 765.7 MESHZ 3.945 53.475 103.005 152.535 202.065 251.595 301.125 350.655 400.185 449.715 499.245 548.775 598.305 ; ! NXNAME '-' '-' '-' '01' '02' '03' '04' '05' '06' '07' '08' '09' '10' '11' '12' '13' '14' '15' '16' '17' '18' '19' '20' '21' '22' '-' '-' '-' ! NYNAME '-' '-' '-' 'A' 'B' 'C' 'D' 'E' 'F' 'G' 'H' 'J' 'K' 'L' 'M' 'N' 'O' 'P' 'Q' 'R' 'S' 'T' 'U' 'V' 'W' '-' '-' '-' ! NCOMB 3 B-ZONE 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 2 2 2 2 2 2 2 2 3 3 3 3 3 3 3 3 2 2 2 1 1 1 1 1 1 2 2 2 3 3 3 3 3 3 3 2 1 1 1 1 1 1 1 1 1 1 2 3 3 3 3 3 3 3 2 2 1 1 1 1 1 1 1 1 1 1 2 2 3 3 3 3 3 3 3 2 1 1 1 1 1 1 1 1 1 1 1 1 2 3 3 3 3 3 3 3 3 2 1 1 1 1 1 1 1 1 1 1 1 1 2 3 3 3 3 3 3 3 3 2 1 1 1 1 1 1 1 1 1 1 1 1 2 3 3 3 3 3 3 3 3 2 1 1 1 1 1 1 1 1 1 1 1 1 2 3 3 3 3 3 3 3 3 2 1 1 1 1 1 1 1 1 1 1 1 1 2 3 3 3 3 3 3 3 3 2 1 1 1 1 1 1 1 1 1 1 1 1 2 3 3 3 3 3 3 3 2 2 1 1 1 1 1 1 1 1 1 1 2 2 3 3 3 3 3 3 3 2 1 1 1 1 1 1 1 1 1 1 2 3 3 3 3 3 3 3 2 2 2 1 1 1 1 1 1 2 2 2 3 3 3 3 3 3 3 3 2 2 2 2 2 2 2 2 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 FUEL WEIGHT 19.236 ; END: ; QUIT .