1 |
**************************************************************************** |
2 |
* |
3 |
* Common common_align.f |
4 |
* |
5 |
* to be included in: |
6 |
* - ../align/align.f subroutine fcnalign |
7 |
* - ../momentum/moment.f |
8 |
* |
9 |
**************************************************************************** |
10 |
|
11 |
c silicon sensors alignment parameters: |
12 |
double precision omega(6,3,2) !Z axis rotation angle (plane, ladder, sensor) |
13 |
double precision beta(6,3,2) !X axis rotation angle |
14 |
double precision gamma(6,3,2) !Y axis rotation angle |
15 |
double precision dx(6,3,2) !X translations |
16 |
double precision dy(6,3,2) !Y translations |
17 |
double precision dz(6,3,2) !Z translations |
18 |
|
19 |
common/alignparameters/omega,beta,gamma,dx,dy,dz |
20 |
|
21 |
save/alignparameters/ |