1 |
pam-ba |
3.1 |
* |
2 |
|
|
* gptav.inc |
3 |
|
|
* |
4 |
|
|
*-- Author : Marialuigia Ambriola 12/04/2006 |
5 |
|
|
C |
6 |
|
|
C Common storing the Special tracking parameter for tracking media Titanium |
7 |
|
|
C (0.9), Aluminium (0.06), Vanadium (0.04) mixture |
8 |
|
|
C |
9 |
|
|
REAL CUTGAMTAV,CUTELETAV,CUTNEUTAV,CUTHADTAV,CUTMUOTAV, |
10 |
|
|
+ BCUTETAV,BCUTMTAV,DCUTMTAV,DCUTETAV,PPCUTMTAV,PAIRTAV, |
11 |
|
|
+ COMPTAV,PHOTTAV,PFISTAV,DRAYTAV,ANNITAV,BREMTAV, |
12 |
|
|
+ HADRTAV,MUNUTAV,DCAYTAV,LOSSTAV,MULSTAV,BIRK1TAV, |
13 |
|
|
+ BIRK2TAV,BIRK3TAV,LABSTAV,SYNCTAV,STRATAV |
14 |
|
|
* |
15 |
|
|
COMMON /GPCTAV/ CUTGAMTAV,CUTELETAV,CUTNEUTAV,CUTHADTAV, |
16 |
|
|
+ CUTMUOTAV,BCUTETAV,BCUTMTAV,DCUTMTAV,DCUTETAV, |
17 |
|
|
+ PPCUTMTAV,PAIRTAV,COMPTAV,PHOTTAV,PFISTAV, |
18 |
|
|
+ DRAYTAV,ANNITAV,BREMTAV,HADRTAV,MUNUTAV, |
19 |
|
|
+ DCAYTAV,LOSSTAV,MULSTAV,BIRK1TAV,BIRK2TAV, |
20 |
|
|
+ BIRK3TAV,LABSTAV,SYNCTAV,STRATAV |