1 |
mocchiut |
1.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 |
bongi |
1.2 |
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 |
mocchiut |
1.1 |
|
19 |
pam-fi |
1.3 |
common/alignparameters/omega,beta,gamma,dx,dy,dz |
20 |
mocchiut |
1.1 |
|
21 |
pam-fi |
1.3 |
save/alignparameters/ |