subroutine PlotMcTracks
        ! Uses
    use precision_mod
    use unpmc_mod
        ! Calls
    call PlotTrackVPQTEZ
    call set_track_color
    call set_track_flags
        ! Variables
    integer :: i
    integer :: j
    integer :: itrk
    integer :: iwindow
    integer :: icolor
    real (kind=R8) :: zstop
end subroutine PlotMcTracks
integer :: i
integer :: j
integer :: itrk
integer :: iwindow
integer :: icolor
real (kind=R8) :: zstop