real Bigcal_SHIFT(4) !  position in Z-beta detector direction
      real SANE_TRANSFORM_MATRIX_THETA_40(15)
      real SANE_TRANSFORM_MATRIX_PHI_40(15)
      real SANE_TRANSFORM_MATRIX_THETA_140(15)
      real SANE_TRANSFORM_MATRIX_PHI_140(15)

      data Bigcal_SHIFT /0.0, 0.0, 335.0, 40.0/


C-- For theta_Bfield = -80
c$$$c$$$      data SANE_TRANSFORM_MATRIX_THETA / 
c$$$c$$$     +      8.954989885527,    -52.322022215031,     -8.125157610488,
c$$$c$$$     +    -15.099229313517,   -11.536627706931,
c$$$c$$$     +      6.980520496970,     -8.823400271073,     50.115584605204,
c$$$c$$$     +    -69.446127196461,   -12.820800227383,
c$$$c$$$     +    -25.942096395685,      8.891673492473,     30.891093004214,
c$$$c$$$     +    -36.605307127974
c$$$c$$$     +     / 
c$$$c$$$
c$$$c$$$       data SANE_TRANSFORM_MATRIX_PHI /
c$$$c$$$     +      7.470639002137 ,  -36.605903733126 ,   -6.998910201537,
c$$$c$$$     +     -2.417831848314 ,  -14.500067103677,
c$$$c$$$     +      5.204917717101 ,   -1.330451994601 ,   56.602266441152,
c$$$c$$$     +    -32.282139538485 ,  -22.595216655477,
c$$$c$$$     +     20.196650742900 ,    5.150733310465,     6.375735420161 ,
c$$$c$$$     +   -51.913685856027  ,  21.392423278086,
c$$$c$$$     +      4.576496983325 ,    4.146671236893,    36.956201282800 ,
c$$$c$$$     +     9.218205540036  ,   4.837818693829,
c$$$c$$$     +    -23.427355916721 ,  -24.275870804138,    39.048859857479 ,
c$$$c$$$     +   -21.758853529098  ,  38.609159237463,
c$$$c$$$     +     -6.035862663970 ,   38.451728943019,   -28.688878376038 ,
c$$$c$$$     +   -10.399768713017  ,  -6.116900513685,
c$$$c$$$     +    -12.230906631612 ,    6.032171278137 ,    6.804895982291,
c$$$c$$$     +      9.186753379980 ,    7.304985866075,
c$$$c$$$     +     11.309130135485 ,    7.639564605686 ,  -12.590201796514 
c$$$c$$$     +     /

      data SANE_TRANSFORM_MATRIX_THETA_140 /
     ,     1.0659998, 1.2594810,13.4608440,-2.0737366,-1.5995358,
     ,    -3.0459841, 0.0106608, 1.9749896,-0.2795187, 0.8093362,
     ,     0.0163580, 0.0029573, 0.8094666, 0.0663429, 0.0077256
     +     /
      data SANE_TRANSFORM_MATRIX_PHI_140 /
     ,    13.4705602,   -25.9574016,-2.3108358,13.9760817,-0.3204864,
     ,     2.5436169,-0.0262742,-0.6293572,-0.0542073, 0.8855643,
     ,     0.0415900, 0.0098995,-9.5759979, 0.0167839,-0.0353615
     +     /
      
     
C-- For theta_Bfield = -180
      data SANE_TRANSFORM_MATRIX_theta_40 /
     ,    -0.4841490, 1.8775212, 0.2537894, 2.0129772, 0.0443939,
     ,    -0.2295817,-0.0107071,-0.0364476,-0.4238956, 1.1067667,
     ,     0.2192444,-0.0154923,-0.7104168,-0.5059687, 0.0031482
     +     /
      
      data SANE_TRANSFORM_MATRIX_phi_40 /
     ,     3.1607421, 2.6085103, 0.3788125,-1.0172611,-0.0455022,
     ,    -0.2585215,-0.0150466,-0.4271194,-0.0079773, 0.7857194,
     , 0.0448928,-0.0008373,-8.4684820, 0.1932547, 0.0000673 
     +     /