1 -- 2 -- Patricia Fasel 3 -- Los Alamos National Laboratory 4 -- GAMTEB: Monte Carlo 5 -- 1990 August 6 -- 7 module GamtebType (Angle, Coord, Energy, Indx, PartType, Prob, 8 Random, StatType, Weight, Value, Result, Stat, 9 Point, Particle(..), Probability) where 10 11 type Angle = Double 12 type Coord = Double 13 type Energy = Double 14 type Indx = Int -- index into energy and xsect tables 15 type PartType = Int -- particle scatter, escape, transmit 16 type Prob = Double 17 type Random = Double 18 type StatType = Int -- which statistic is incremented 19 type Weight = Double -- final weight of the particle 20 type Value = Double 21 type Result = ((PartType, Indx), Weight) 22 type Stat = (StatType, Value) 23 type Point = (Coord, Coord, Coord) 24 type Probability = (Prob, Prob, Prob, Prob) 25 26 data Particle = 27 Part 28 Point -- position of particle 29 Point -- direction particle is moving in 30 Weight -- weight of particle 31 Energy -- energy of particle 32 Indx -- energy index of particle in table 33 Int -- cell indicating split or roulette 34 Random -- seed of random number generator