C
C**********************************************************************C
C**********************************************************************C
C**********************************************************************C
C
C      REAL FUNCTION SECNDS(X)
C      REAL TARRAY(2)
C      CALL ETIME (TARRAY)
C      SECNDS=TARRAY(1)+TARRAY(2)
C      SECNDS=0.
C      RETURN
C      END
C
C**********************************************************************C
C**********************************************************************C
C**********************************************************************C
C
       REAL FUNCTION SECNDS(X)
       SECNDS=0.
       RETURN
       END