Subroutine PHOTO
subroutine PHOTO
! Uses
use namelist_mod
use unpmc_mod
use magnet_mod
use pattern_mod
use skim_mod, only: fillskim
use unpderiv_mod
! Calls
call FILLSKIM
call NEW_event
call PlotClusters
call PlotDCHitPos
call PlotFgResults
call PlotHeTracks
call PlotKalmanStraightTracks
call PlotMcHitPos
call PlotMcTracks
call PlotRawHits
call PlotTrackMCSP
call PlotWinHits
call PrintClusters
call PrintMCSP
call PrintMcTracks
call PrintWindows
call RITE
call displayevent
call getexitstatus
call getfailcode
call initdisplay
call kparse
call phinterpret
call user_photo
! Variables
character (len=132) :: GUI_COMMAND
logical, SAVE :: FIRST = .TRUE.
integer :: GUI_FAIL_RETURN
integer :: GUI_EXIT_STATUS
integer :: narg
integer :: nqual
integer :: clen
character (len=20) :: Argument
character (len=20) :: command
logical :: last_command
integer :: i
end subroutine PHOTO
Description of Variables
GUI_COMMAND
character (len=132) :: GUI_COMMAND
FIRST
logical, SAVE :: FIRST = .TRUE.
GUI_FAIL_RETURN
integer :: GUI_FAIL_RETURN
GUI_EXIT_STATUS
integer :: GUI_EXIT_STATUS
narg
integer :: narg
nqual
integer :: nqual
clen
integer :: clen
Argument
character (len=20) :: Argument
command
character (len=20) :: command
last_command
logical :: last_command
i
integer :: i