1 |
* |
* |
2 |
* $Id$ |
* $Id: gpkine.inc,v 3.1.1.1 2002/07/11 16:01:59 cafagna Exp $ |
3 |
|
* |
4 |
|
* $Log: gpkine.inc,v $ |
5 |
|
* Revision 3.1.1.1 2002/07/11 16:01:59 cafagna |
6 |
|
* First GPAMELA release on CVS |
7 |
* |
* |
|
* $Log$ |
|
8 |
* |
* |
9 |
* |
* |
10 |
* gpkine.inc |
* gpkine.inc |
15 |
*CMZ : 1.00/02 30/11/95 18.28.38 by Francesco Cafagna |
*CMZ : 1.00/02 30/11/95 18.28.38 by Francesco Cafagna |
16 |
*-- Author : Francesco Cafagna 30/11/95 |
*-- Author : Francesco Cafagna 30/11/95 |
17 |
REAL POS,PXYZ,VERTEX |
REAL POS,PXYZ,VERTEX |
18 |
COMMON /GPCKINE/ POS(5),PXYZ(3),VERTEX(3) |
COMMON /GPCKINE/ POS(6),PXYZ(3),VERTEX(3) |
19 |
* |
* |