Oracle Solaris Studio 12.4 Man Pages

Exit Print View

Updated: January 2015
 
 

secnds(3F)

Name

secnds - 返回自午夜开始的系统时间(以秒计)

Synopsis

real function secnds (t0)
real t0

Description

函数 secnds( t0 ) 返回以自午夜以来的秒数表示的系统时间,在 VMS 中要减去 t0

Notes

用法:

 
real  t, t0, secnds
     ...
t = secnds(t0)

示例:

 
demo% cat sec1.f
     real elapsed, t0, t1, x, y
     t0 = 0.0
     t1 = secnds( t0 )
     y = 0.1
     do i = 1, 1000
          x = asin( y )
     end do
     elapsed = secnds( t1 )
     write ( *, 1 ) elapsed
1    format ( ' 1000 arcsines: ', f12.6, ' sec' )
     end
demo% f77 -silent sec1.f
demo% a.out
 1000 arcsines: 6.699141 sec
demo%        

Files

libfui.a

See also

ctime(3C) itime(3F)、idate(3F)、fdate(3F)

《FORTRAN 77 Reference Manual》