UCMARS : A User Code with a Multiple-Array System using Combinatorial Geometry Linux (g77) version Apr./2001 O.Sato (sato@mri.co.jp) tested with ... OS : LASER5 Linux 6.2J (based on Redhat Linux 6.0) Compiler : g77 version 2.95.2 (release) (FSF-g77 version 0.5.25 19991024) =============== Modification from Sun (Sun OS 4.1.X) version ===== 1. MARS subroutine libraries and a user code were modified for g77. 2. No. of Histories can be specified in input data. (Caution: Input data were changed from previous version.) 3. RANMAR random number routine was used instead of RAN6(integer overflow). 4. Fractional standard deviationis of energy depositions are printed. =================================================================== 1) ABSTRACT UCMARS is a user code foe EGS4 which allows the users to model many rectangular arrays containing a geometry modeled by a combinbatorial geometry with unlimited array nesting. This user code was tested on Sun sparc 20 with Sun OS 4.1.3. 2) INSTALLATION The procedure to install this use code is as follows. (1) Expanding source programs to hard disk from floppy disk tar xvfz ucmars.tar.gz (2) "Make" executable program of EGS4 with user code make The fortran source and object of EGS4(egs4.f,egs4.o), user code (ucmars.f) and executable program(ucmars) will be created. (3) Executing sample problem sample or ln -s pbody.dat fort.12 ucmars human.out rm fort.* Please compare the output file (human.out) to sample output (humanf.out). 3) Contents of this floppy Following files are written by "bar -cvfZ". home directory: Makefile makefile of UCMARS README This information file human.inp Sample input data humanf.out Sample output listings pbody.dat Cross section for sample problem ucmars.mor UCMARS MORTRAN source user.macro Macro for UCMARS KEK-93: original EGS4 code at KEK dummy.mor Dummy MORTRAN SOURCE egs4.mortran EGS4 MORTRAN SOURCE egs4blok.mortran EGS4 BLOCK DATA egs4mac.mortran EGS4 MACRO fixtmx.mor FIXTMX MORTRAN source from NRCC kek4mac.mortran KEK MACRO nrc4macp.mortran NRCC Macro with PRESTA nrcc4mac.mortran NRCC Macro without PRESTA nrccaux.mor NRCC auxialy routines pairmac.mortran Macro for collection of pair creation presta.mortran PRESTA mortran source sunmacs.mortran Macro for Sun sparc mortran3: Directory containig source of MORTRAN system mornew77.raw mornew77.for MARS: MARS fortran sources (from SCALE-4 system) Makefile makefile to create MARS archive abend.f abox.f albert.f aread.f argen.f azip.f bod.f cali.f cell.f clear.f clev.f corner.f cread.f ctran.f cubic.f cwidth.f delta.f dipr.f dread.f dset.f dupr.f dxpr.f enfile.f errtra.f ffpack.f ffread.f fidas.f fidcom.f finefi.f ftread.f g1.f geni.f gg.f gtvlin.f iread.f jomin.f jomin1.f jomin2.f level.f lookz.f lread.f medno.f nbdno.f norml.f nregno.f orthom.f pilot.f pr.f qrdbfr.f qrtic.f reset.f resetz.f restor.f risk.f rota.f rtexit.f sazar.f scanof.f scanon.f sorcer.f sort.f stora.f trente.f unis.f y0read.f y0trns.f yread.f zexits.f