!copyright (C) 2001  MSC-RPN COMM  %%%RPNPHY%%%
      integer nsplit,nspliti,nsplitg
      real cr6,ci6,cg6
*
      common /sedipara/ nsplit,nspliti,nsplitg,cr6,ci6,cg6
*