DATA      RALPHA,   RBETA     /  -100.,   +100.       /
          DATA      DALPHA,   DBETA     /  -100.D0, +100.D0     /
          DATA      CALPHA,   CBETA     / (-100.,-100.),(+100.,+100.)/