Revision: | 1.1 |
Committed: | Wed Sep 17 04:01:48 2008 UTC (16 years, 7 months ago) by loizides |
Content type: | text/plain |
Branch: | MAIN |
CVS Tags: | Mit_032, Mit_031, Mit_025c_branch2, Mit_025c_branch1, Mit_030, Mit_029c, Mit_030_pre1, Mit_029a, Mit_029, Mit_029_pre1, Mit_028a, Mit_025c_branch0, Mit_028, Mit_027a, Mit_027, Mit_026, Mit_025e, Mit_025d, Mit_025c, Mit_025b, Mit_025a, Mit_025, Mit_025pre2, Mit_024b, Mit_025pre1, Mit_024a, Mit_024, Mit_023, Mit_022a, Mit_022, Mit_020d, TMit_020d, Mit_020c, Mit_021, Mit_021pre2, Mit_021pre1, Mit_020b, Mit_020a, Mit_020, Mit_020pre1, Mit_018, Mit_017, Mit_017pre3, Mit_017pre2, Mit_017pre1, V07-05-00, Mit_016, Mit_015b, Mit_015a, Mit_015, Mit_014e, Mit_014d, Mit_014c, Mit_014b, ConvRejection-10-06-09, Mit_014a, Mit_014, Mit_014pre3, Mit_014pre2, Mit_014pre1, Mit_013d, Mit_013c, Mit_013b, Mit_013a, Mit_013, Mit_013pre1, Mit_012i, Mit_012g, Mit_012f, Mit_012e, Mit_012d, Mit_012c, Mit_012b, Mit_012a, Mit_012, Mit_011a, Mit_011, Mit_010a, Mit_010, Mit_009c, Mit_009b, Mit_009a, Mit_009, Mit_008, Mit_008pre2, Mit_008pre1, Mit_006b, Mit_006a, Mit_006, Mit_005, Mit_004, HEAD |
Branch point for: | Mit_025c_branch |
Log Message: | Moved MitVertex contents to MitCommon. MitVertex therefore is obsolute and should not be touched anymore. |
# | User | Rev | Content |
---|---|---|---|
1 | loizides | 1.1 | C --------- Include file to define dimensions -------------------------- |
2 | C | ||
3 | C The CTVMFT_ variables are picked up by defines in the preprocessing | ||
4 | C | ||
5 | C Maximum matrix dimension (MAXDIM); | ||
6 | C = 5 parameters per (vtx + primary) (x,y,z + Phi,Ctg) | ||
7 | C (3 positions + 2 pointing variables) | ||
8 | C + 3 parameters per track (Crv, Phi, Ctg) | ||
9 | C + number of mass constraints | ||
10 | |||
11 | INTEGER MAXVTX,MAXTRK,MAXMCN,MAXDIM | ||
12 | PARAMETER (MAXVTX = DCTVMFT_MAXVTX) ! Maximum number of vertices | ||
13 | PARAMETER (MAXTRK = DCTVMFT_MAXTRK) ! Maximum number of tracks | ||
14 | PARAMETER (MAXMCN = DCTVMFT_MAXMCN) ! Maximum number of mass constraints | ||
15 | PARAMETER (MAXDIM = 5*(MAXVTX+1) + 3*MAXTRK + MAXMCN) | ||
16 | |||
17 | C Parameters important to the procedure | ||
18 | INTEGER MAXITR | ||
19 | PARAMETER (MAXITR = DCTVMFT_MAXITR) ! Maximum number of iterations | ||
20 | C | ||
21 | INTEGER UDIM | ||
22 | Parameter (UDIM = MAXTRK*(MAXVTX+MAXMCN+60) | ||
23 | & + MAXVTX*(MAXVTX+18) | ||
24 | & + MAXMCN*7 | ||
25 | & + MAXITR | ||
26 | & + 31) |