1 |
* |
* |
2 |
* $Id$ |
* $Id: gputrd.F,v 3.1.1.1 2002/07/11 16:02:01 cafagna Exp $ |
3 |
|
* |
4 |
|
* $Log: gputrd.F,v $ |
5 |
|
* Revision 3.1.1.1 2002/07/11 16:02:01 cafagna |
6 |
|
* First GPAMELA release on CVS |
7 |
* |
* |
|
* $Log$ |
|
8 |
* |
* |
9 |
*CMZ : 3.00/00 07/02/2002 12.41.53 by Unknown |
*CMZ : 3.00/00 07/02/2002 12.41.53 by Unknown |
10 |
*CMZ : 2.01/00 05/04/2000 14.35.18 by Marialuigia Ambriola |
*CMZ : 2.01/00 05/04/2000 14.35.18 by Marialuigia Ambriola |
58 |
INTEGER IFAIL,NCLUS,IJUNK,IWBUFF |
INTEGER IFAIL,NCLUS,IJUNK,IWBUFF |
59 |
#endif |
#endif |
60 |
* |
* |
|
* if the detector is IDTRSO the hit is not stored |
|
|
* |
|
61 |
* Track is inside a volume |
* Track is inside a volume |
62 |
* |
* |
63 |
IF(IACT.EQ.0) THEN |
IF(IACT.EQ.0) THEN |