TENDER becomes Tender, removing .so
[u/mrichter/AliRoot.git] / THbtp / common_sec_track.inc
1 CCC   common/sec_trk_map/
2 C
3 CCC   Track-to-Sector Mapping data structure:
4 CCC   (Converted to common block for ALICE application, 12/1/2000)
5
6       Integer*4 max_trk_sec
7       Integer*4 sec_maxlen
8       Parameter (max_trk_sec = 150)
9       Parameter (sec_maxlen  = 28000)
10
11       common/sec_trk_map/
12      1  stm_sec_id(sec_maxlen),
13      2  stm_n_trk_sec(sec_maxlen),
14      3  stm_flag(sec_maxlen),
15      4  stm_track_id(max_trk_sec,sec_maxlen)
16
17 CCC   Variable Type Declarations:
18
19       Integer*4 stm_sec_id        !  unique sector ID number
20       Integer*4 stm_n_trk_sec     !  Number of tracks assigned to sector
21       Integer*4 stm_flag          !  normally=0, if = 1 then more than
22 CCC                               !  max_trk_sec tracks could have been 
23 CCC                               !  assigned to this sector, however the
24 CCC                               !  maximum number that can be assigned is
25 CCC                               !  max_trk_sec.
26       Integer*4 stm_track_id      !  Foreign keys to tracks in /track/ that
27 CCC                               !  are assigned to this sector.
28
29 CCC   END common/sec_trk_map/