1 -- 2 -- Patricia Fasel 3 -- Los Alamos National Laboratory 4 -- PIC: Particle in Cell 5 -- 1990 August 6 -- 7 module Consts (charge, mass, nCell, nStep, maxDepth) where 8 9 import PicType 10 import Utils 11 12 nCell, nStep, maxDepth :: Indx 13 charge, mass :: Value 14 nCell = 16 -- number of Cells 15 nStep = 10 -- number of time steps 16 maxDepth = (log2 nCell) - 1 -- 17 charge = 1.0 18 mass = 1.0