c
c
      integer*4		idp(3), nxdim
      common /CONBLK3/	idp, nxdim
c
c