Subroutine initdisplay

subroutine initdisplay

        ! Uses
    use chambers_mod
    use det_geom_mod
    use precision_mod

        ! Calls
    call add_driftcham
    call add_driftcham_wire
    call add_propcham
    call add_propcham_wire
    call add_scintdisk
    call initroot
    call set_x_axis
    call set_y_axis
    call xyz2uvz3

        ! Variables
    integer :: plane
    integer :: wire
    integer :: i
    real (kind=R8), dimension (3) :: xyzx
    real (kind=R8), dimension (3) :: xyzy
    real (kind=R8), dimension (3) :: uvzx
    real (kind=R8), dimension (3) :: uvzy

end subroutine initdisplay

Description of Variables

plane

integer :: plane

wire

integer :: wire

i

integer :: i

xyzx

real (kind=R8), dimension (3) :: xyzx

xyzy

real (kind=R8), dimension (3) :: xyzy

uvzx

real (kind=R8), dimension (3) :: uvzx

uvzy

real (kind=R8), dimension (3) :: uvzy