Searched refs:timeArray (Results 1 – 1 of 1) sorted by relevance
45 INTEGER timeArray(8), i local50 CALL DATE_AND_TIME (VALUES=timeArray)52 timeArray(3) = timeArray(3) + (timeArray(1) - 2010)*36553 DO i=1, timeArray(2) - 154 timeArray(3) = timeArray(3) + nD(i)56 CPUT = timeArray(3)*8.64D457 2 + timeArray(5)*3.6D3 58 3 + timeArray(6)*6D1 59 4 + timeArray(7)*1D0 60 5 + timeArray(8)*1D-3