module ecloud_mod

use bmad
INTEGER, PARAMETER :: bunch$  = custom_attribute1$
INTEGER, PARAMETER :: length_eff$  = custom_attribute2$

LOGICAL test

type timeslice_struct
  integer bunch, time_slice
  real(rp) time, charge_weight(2)
  real(rp) x(-9:17),y(-9:17),Ex(-9:17,-9:17), Ey(-9:17,-9:17)
end type

type ecloud_bunch_struct
  integer number_bunches
  real(rp) x_offset,y_offset, xhalf, yhalf, xstep, ystep
  type(timeslice_struct) slice(11)
  integer spacing, nbins, nsteps_x, nsteps_y
end type
end module