Updated buspatch and DDL numbers for station 345 and started buspatch at 1
[u/mrichter/AliRoot.git] / TFluka / Fopphst.h
CommitLineData
3a625972 1#ifndef OPPHST
2#define OPPHST_H 1
3
4#include "Rtypes.h"
5#include "cfortran.h"
6#include "Fdimpar.h"
7
8extern "C" {
9
10//*$ CREATE OPPHST.ADD
11//*COPY OPPHST
12//*
13//*=== Opphst ===========================================================//*
14//*
15//*----------------------------------------------------------------------//*
16//* //*
17//* OPtical PHoton STack: //*
18//* //*
19//* Created on 19 september 1997 by Alfredo Ferrari & Paola Sala //*
20//* Infn - Milan //*
21//* //*
22//* Last change on 13-oct-98 by Alfredo Ferrari //*
23//* //*
24//* wtopph = weight of the photon //*
25//* poptph = laboratory momentum of the photon in GeV/c //*
26//* xoptph = x-coordinate of the photon //*
27//* yoptph = y-coordinate of the photon //*
28//* zoptph = z-coordinate of the photon //*
29//* txopph = direction cosine of the photon //*
30//* with respect to x-axis //*
31//* tyopph = direction cosine of the photon //*
32//* with respect to y-axis //*
33//* tzopph = direction cosine of the photon //*
34//* with respect to z-axis //*
35//* txpopp = direction cosine of the photon polarization //*
36//* typopp = direction cosine of the photon polarization //*
37//* tzpopp = direction cosine of the photon polarization //*
38//* donear = distance to the nearest boundary //*
39//* agopph = age of the photon (seconds) //*
40//* cmpopp = total path length of the photon (cm) //*
41//* loopph = generation of the photon //*
42//* louopp = user flag //*
43//* nregop = number of the region of the photon //*
44//* nlatop = number of the lattice cell of the photon //*
45//* tpropp = kinetic energy of parent particle of the photon //*
46//* apropp = age of the parent particle of the photon (seconds) //*
47//* ipropp = id (paprop) of the parent particle of the photon //*
48//* lpropp = generation of the parent particle of the photon //*
49//* npropp = # of the primary track which generated the photon //*
50//* (not used for the moment) //*
51//* lstopp = stack pointer //*
52//* lmxopp = highest value of the stack pointer encountered //*
53//* in the run //*
54//* //*
55//*----------------------------------------------------------------------//*
56//*
57typedef struct {
d4396856 58 Double_t wtopph [mostck];
59 Double_t poptph [mostck];
60 Double_t xoptph [mostck];
61 Double_t yoptph [mostck];
62 Double_t zoptph [mostck];
63 Double_t txopph [mostck];
64 Double_t tyopph [mostck];
65 Double_t tzopph [mostck];
66 Double_t txpopp [mostck];
67 Double_t typopp [mostck];
68 Double_t tzpopp [mostck];
69 Double_t donear [mostck];
70 Double_t agopph [mostck];
71 Double_t tpropp [mostck];
72 Double_t apropp [mostck];
73 Double_t cmpopp [mostck];
91f9cd5a 74 Double_t sparok [mostck][mkbmx1];
75 Int_t ispork [mostck][mkbmx2];
d4396856 76 Int_t loopph [mostck];
77 Int_t louopp [mostck];
78 Int_t nregop [mostck];
79 Int_t nlatop [mostck];
80 Int_t ipropp [mostck];
81 Int_t lpropp [mostck];
82 Int_t npropp [mostck];
83 Int_t lstopp;
84 Int_t lmxopp;
3a625972 85} opphstCommon;
86
87#define OPPHST COMMON_BLOCK(OPPHST,opphst)
88COMMON_BLOCK_DEF(opphstCommon, OPPHST);
89
90}
91#endif
92