找回密码
 注册
Simdroid-非首页
查看: 171|回复: 1

[3. Fortran] FORTRAN里如何实现计时器功能??

[复制链接]
nikankan_2004 该用户已被删除
发表于 2005-3-27 22:09:20 | 显示全部楼层 |阅读模式 来自 浙江杭州
提示: 作者被禁止或删除 内容自动屏蔽
发表于 2005-3-29 18:08:07 | 显示全部楼层 来自 湖南湘潭

Re:FORTRAN里如何实现计时器功能??

Simdroid开发平台
DO I=1,N         !N为读入数据的次数
call gettim(ih0,im0,is0,iss0)
DO WHILE(ITIME<=10.0)
  call gettim(ih1,im1,is1,iss1)
  itime=iss1-iss0+100*(is1-is0+60*(im1-im0+60*(ih1-ih0)))
ENDDO
READ(*,*)
ENDDO

上面这种格式可以实现,看你自己具体需要怎么做改动就行
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Simapps系列直播

Archiver|小黑屋|联系我们|仿真互动网 ( 京ICP备15048925号-7 )

GMT+8, 2024-11-1 23:38 , Processed in 0.028923 second(s), 12 queries , Gzip On, MemCache On.

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表