C CINVPQ    SOURCE    CHAT      05/01/12    22:03:07     5004           

      SUBROUTINE C_INVARIANTESPQT (SIG,NDIMS,SIGINV)
      IMPLICIT INTEGER(I-N)
      integer  ndims
      complex*16 sig(ndims),siginv(3)
      call C_Invari_p(sig,ndims,siginv(1))
      call C_Invari_q(sig,ndims,siginv(2))
      call C_Invari_t(sig,ndims,siginv(3))
      return
      end