Subroutine PlotMcHitPos 
subroutine PlotMcHitPos
        ! Uses
    use Precision_mod
    use unpmc_mod
        ! Calls
    call add_dchita
    call add_hitmc
    call hit_dcwire
        ! Variables
    integer (kind=I4) :: i
    integer (kind=I4) :: iPlane
    integer (kind=I4) :: iWire
    real (kind=R4) :: radius
    real (kind=R4) :: u
    real (kind=R4) :: v
    real (kind=R4) :: z
    integer :: iwindow
    integer :: icolor
    integer :: iambig
end subroutine PlotMcHitPos
 Description of Variables 
i
integer (kind=I4) :: i
iPlane
integer (kind=I4) :: iPlane
iWire
integer (kind=I4) :: iWire
radius
real (kind=R4) :: radius
u
real (kind=R4) :: u
v
real (kind=R4) :: v
z
real (kind=R4) :: z
iwindow
integer :: iwindow
icolor
integer :: icolor
iambig
integer :: iambig