22.05.2014 Views

CERN Program Library Long Writeup W5013 - CERNLIB ...

CERN Program Library Long Writeup W5013 - CERNLIB ...

CERN Program Library Long Writeup W5013 - CERNLIB ...

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

ITR3D track being scanned (used together with THRZ option);<br />

IPKHIT flag for GPHITS,if> 0 then print only hit number, (0);<br />

IOBJ type of the object being drawn (detector, track, hit, etc.) (0);<br />

LINBUF flag informing GDRAWV if line buffering is wanted or not (0);<br />

MAXGU current number of words of graphic unit banks;<br />

MORGU number of words to extend graphic unit banks;<br />

MAXGS current number of words of graphic segment banks;<br />

MORGS number of words to extend graphic segment banks;<br />

MAXTU current number of words of text unit banks;<br />

MORTU number of words to extend text unit banks;<br />

MAXTS current number of words of text segment banks;<br />

MORTS number of words to extend text segment banks;<br />

IGU pointer to current graphic unit bank;<br />

IGS pointer to current graphic segment bank;<br />

ITU pointer to current text unit bank;<br />

ITS pointer to current text segment bank;<br />

NKVIEW number of view data banks (0);<br />

IGVIEW current view bank number or 0 if none active (0);<br />

NOPEN unused (0);<br />

IGMR flag informing if APOLLO-GMR is being used (0);<br />

IPIONS unused (0);<br />

ITRKOP string containing the status of TRAK option of GDOPT (’LINE’);<br />

ZZFU<br />

ZZFV<br />

MYISEL<br />

DDUMMY array of dummy words;<br />

+SEQ /GCFLAG/<br />

Flags and variables to control the run<br />

C<br />

COMMON/GCFLAG/IDEBUG,IDEMIN,IDEMAX,ITEST,IDRUN,IDEVT,IEORUN<br />

+ ,IEOTRI,IEVENT,ISWIT(10),IFINIT(20),NEVENT,NRNDM(2)<br />

COMMON/GCFLAX/BATCH, NOLOG<br />

LOGICAL BATCH, NOLOG<br />

IDEBUG<br />

IDEMIN<br />

IDEMAX<br />

ITEST<br />

IDRUN<br />

flag set internally to 1 to activate debug output if IDEMIN ≤ IEVENT ≤ IDEMAX and IEVENT is<br />

a multiple of ITEST;<br />

first event to debug (DEBU);<br />

last event to debug (DEBU);<br />

number of events between two activations of the debug printing;<br />

current user run number (1, RUNG);<br />

ZZZZ010 – 4 421

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!