etime.f
REAL FUNCTION EXTETIME ( TARRAY )
REAL TARRAY(2)
REAL ETIME
EXTETIME = ETIME(TARRAY)
RETURN
END
REAL FUNCTION EXTETIME ( TARRAY )
REAL TARRAY(2)
REAL ETIME
EXTETIME = ETIME(TARRAY)
RETURN
END