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.

S2<br />

S3<br />

SS1<br />

SS2<br />

SS3<br />

LEP<br />

IPORLI<br />

ISUBLI<br />

SRAGMX<br />

SRAGMN<br />

RAINT1<br />

RAINT2<br />

RMIN1<br />

RMIN2<br />

RMAX1<br />

RMAX2<br />

JPORJJ<br />

ITSTCU<br />

IOLDCU<br />

ISCOP<br />

NTIM<br />

NTFLAG<br />

LPASS<br />

JSC<br />

+SEQ /GCSTAK/<br />

Control variables for parallel tracking<br />

C<br />

PARAMETER (NWSTAK=12,NWINT=11,NWREAL=12,NWTRAC=NWINT+NWREAL+5)<br />

COMMON /GCSTAK/ NJTMAX, NJTMIN, NTSTKP, NTSTKS, NDBOOK, NDPUSH,<br />

+ NJFREE, NJGARB, NJINVO, LINSAV(15), LMXSAV(15)<br />

NWSTAK<br />

NWINT<br />

NWREAL<br />

NWTRAC<br />

NJTMAX<br />

NJTMIN<br />

NTSTKP<br />

NTSTKS<br />

NDBOOK<br />

ZZZZ010 – 22 439

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

Saved successfully!

Ooh no, something went wrong!