C DVVMIN SOURCE CHAT 05/01/12 22:59:41 5004 SUBROUTINE DVFLVMINV (SIGINV,XPP,XQQ,XQT,XTT) IMPLICIT INTEGER(I-N) real*8 siginv(3),xqq,xqt,xtt,xpp xpp=0.D0 xqq=-1.D0/dsqrt(8.D0*siginv(2)**3) xqt=0.D0 xtt=0.D0 return end