Esope source files

   1 : C CINVPQ    SOURCE    CHAT      05/01/12    22:03:07     5004           
   2 : 
   3 :       SUBROUTINE C_INVARIANTESPQT (SIG,NDIMS,SIGINV)
   4 :       IMPLICIT INTEGER(I-N)
   5 :       integer  ndims
   6 :       complex*16 sig(ndims),siginv(3)
   6 :       call C_Invari_p(sig,ndims,siginv(1))
   6 :       call C_Invari_q(sig,ndims,siginv(2))
   6 :       call C_Invari_t(sig,ndims,siginv(3))
   7 :       return
   8 :       end
   9 :  
  10 :  
  11 :