Files
arpack-ng/UTIL/second.t3d
T
2011-10-23 22:13:59 +02:00

6 lines
88 B
Plaintext

subroutine second(t)
real t
t = rtc()*6.67E-09
return
end