1 jones 1.1       real Bigcal_SHIFT(4) !  position in Z-beta detector direction
 2                 real SANE_TRANSFORM_MATRIX_THETA_40(14)
 3                 real SANE_TRANSFORM_MATRIX_PHI_40(38)
 4                 real SANE_TRANSFORM_MATRIX_THETA_140(14)
 5                 real SANE_TRANSFORM_MATRIX_PHI_140(38)
 6           
 7                 data Bigcal_SHIFT /0.0, 0.0, 335.0, 40.0/
 8           
 9           
10           C-- For theta_Bfield = -80
11           c$$$c$$$      data SANE_TRANSFORM_MATRIX_THETA / 
12           c$$$c$$$     +      8.954989885527,    -52.322022215031,     -8.125157610488,
13           c$$$c$$$     +    -15.099229313517,   -11.536627706931,
14           c$$$c$$$     +      6.980520496970,     -8.823400271073,     50.115584605204,
15           c$$$c$$$     +    -69.446127196461,   -12.820800227383,
16           c$$$c$$$     +    -25.942096395685,      8.891673492473,     30.891093004214,
17           c$$$c$$$     +    -36.605307127974
18           c$$$c$$$     +     / 
19           c$$$c$$$
20           c$$$c$$$       data SANE_TRANSFORM_MATRIX_PHI /
21           c$$$c$$$     +      7.470639002137 ,  -36.605903733126 ,   -6.998910201537,
22 jones 1.1 c$$$c$$$     +     -2.417831848314 ,  -14.500067103677,
23           c$$$c$$$     +      5.204917717101 ,   -1.330451994601 ,   56.602266441152,
24           c$$$c$$$     +    -32.282139538485 ,  -22.595216655477,
25           c$$$c$$$     +     20.196650742900 ,    5.150733310465,     6.375735420161 ,
26           c$$$c$$$     +   -51.913685856027  ,  21.392423278086,
27           c$$$c$$$     +      4.576496983325 ,    4.146671236893,    36.956201282800 ,
28           c$$$c$$$     +     9.218205540036  ,   4.837818693829,
29           c$$$c$$$     +    -23.427355916721 ,  -24.275870804138,    39.048859857479 ,
30           c$$$c$$$     +   -21.758853529098  ,  38.609159237463,
31           c$$$c$$$     +     -6.035862663970 ,   38.451728943019,   -28.688878376038 ,
32           c$$$c$$$     +   -10.399768713017  ,  -6.116900513685,
33           c$$$c$$$     +    -12.230906631612 ,    6.032171278137 ,    6.804895982291,
34           c$$$c$$$     +      9.186753379980 ,    7.304985866075,
35           c$$$c$$$     +     11.309130135485 ,    7.639564605686 ,  -12.590201796514 
36           c$$$c$$$     +     /
37           
38                 data SANE_TRANSFORM_MATRIX_PHI_40 /
39                +     -25.315551918753,     32.778750731295,     16.624524007793 ,
40                +    -0.670389414008 ,   -19.026663595265,
41                +     11.045276525901,      8.960065359453 ,     2.813369369296  ,
42                +  -17.423409894062  ,   -1.698862459009,
43 jones 1.1      +     54.898039975496,     -5.092848196382 ,   -20.317525271808 ,
44                +  -104.863396868220  ,   25.942189282192,
45                +     7.096732497355,      9.591977531685  ,  -24.335357620400  ,
46                +  -24.286717828504   ,   3.299448804815,
47                +     7.687476538479,    -25.598673449542  ,    6.908281494985  ,
48                +  -10.700541084059   ,  26.572635584553,
49                +     -0.245513893720,     22.771602204485 ,   -25.552461831642 , 
50                +   22.715588682272  ,  -11.244034554198,
51                +     26.509174948100 ,    17.105285395407 ,    17.958861709269 , 
52                +   24.067512490574  ,   25.357299920404,
53                +     15.585988858851,      1.012923165214 ,    14.364936848314
54                +     /
55                 
56                 data SANE_TRANSFORM_MATRIX_THETA_40 /
57                +     -26.564516900426,     93.294105791175,     54.976766006454, 
58                +     20.359325676638,    -16.467824581390,
59                +     -0.295104821149,      0.627203349403,      9.429932439321,  
60                +     -12.960637586562,     -2.176068088611,
61                +     -3.503374855479,      2.639421683012 ,    -4.983504804089,  
62                +    6.806035647037 
63                +     /
64 jones 1.1      
65           
66           C-- For theta_Bfield = -180
67                 data SANE_TRANSFORM_MATRIX_theta_140 /
68                +  10.7392872718,       -6.1359502126,       -4.3075502798,
69                +       -6.8808181534 ,     -21.2267687274,
70                +   5.1325138396,        5.7232164866,        6.9239012259,
71                +        8.0756892057 ,      -4.8508720099,
72                +  -4.1552474314,      -18.7959066428 ,       5.5897014730 ,
73                +       6.8449595688 
74                +     /
75                 
76                 data SANE_TRANSFORM_MATRIX_PHI_140 /
77                +      7.986912574064,      4.104982783091 ,    -3.262226563609 ,
78                +   -17.147839538624  ,  -15.319506186561,
79                +     11.272182672669,     -0.646873768493 ,    -5.750142950719 ,
80                +     2.871376357839   ,  17.361434480531,
81                +     33.024915763619 ,   -12.479875786884 ,    -0.127905553459 ,
82                +   -65.343247530658    , 31.498150126556,
83                +     12.033851436771 ,     4.425607861777 ,    10.052134589550 , 
84                +   -1.189934474996   , -21.193473842613,
85 jones 1.1      +      3.253026188492 ,   -25.881627264056 ,    21.122621675686 , 
86                +   -0.933171628391   ,   3.690940149805,
87                +     11.205983465725 ,    49.478904093054 ,   -15.082646748645 ,
88                +    -0.003801146519   , -48.691429500647,
89                +     20.371729358653 ,    14.919543191671 ,     9.937056886933 ,
90                +    11.556356682271   ,   5.740510488024,
91                +    -16.267700921167 ,   -18.984957498626 ,   -76.567802672808
92                +     /