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