GEMINI GEMINI GEMINI GEMINI GEMINI GEMINI GEMINI September 1999 Computer code GEMINI by R.J. Charity Language: Fortran95 GGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGG The program is written in standard Fortran95 except that for a number of OPEN statements where I use the DEC/Compaq option "shared". This can be removed and will not effect the program, it does however allow you to sort the data while they are being generated, without it you risk killing GEMINI if you sort a event file which is being written to. If you only have a Fortran90 compiler - you can remove all the PURE statements and turn the FORALL statements into DO loops without any effect. Also you will have to remove the label from the END INTERFACE statements in trig.f90 The Fortran I have used is close to Essentially Lahey Fortram or F(tm) which are subsets of FORTRAN95 with a lot of the confusing stuff from FORTRAN77 removed. This program has been compiled and run on Compaq (VMS and UNIX) machines and SGI (unix) machiles. Also I have compiled, but not run, the code with Lahey Fortran90/95. Let me know if you have trouble running this on other machines. GGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGG main program files: gem_kind.f90 gemini.f90 gemsub.f90 functs.f90 angle.f90 tl.f90 light_particle.f90 light.f90 sierk.f90 mass.f90 evap.f90 trig.f90 stat_mod.f90 yrast.f90 tl.f90 nonstatistical.f90 statistical.f90 data files needed mass.tbl mass_tf.tbl sad.tbl tl.tbl tl_def.tbl tl_pol.tbl to compile gemini on linux 1) go to Makefile and modify line COMPILER = yourF95compiler so it specifies your F95 compiler 2) type compile (bash) test run gemini >test >NEW