fortran计时函数 1
需积分: 0 155 浏览量
2022-08-08
23:19:04
上传
评论
收藏 12KB DOCX 举报
program main
REAL(Kind = 8):: START1,FINISH1
INTEGER(Kind = 8):: START2, FINISH2
INTEGER(Kind = 8):: i, j
print*, "========= test time start =========="
CALL CPU_TIME(START1)
do i = 1,100000
do j = 1,100000
end do
end do
CALL CPU_TIME(FINISH1)
WRITE(* , *) "CPU_TIME 运算时间为(s):", FINISH1-START1
! CPU_TIME cannot get the time of sleep()
CALL SYSTEM_CLOCK(START2)
do i = 1,100000
do j = 1,100000
end do
end do
CALL SYSTEM_CLOCK(FINISH2)
WRITE(* , *) "SYSTEM_CLOCK 运算时间为(ms)",(FINISH2-START2)
print*, "========= test time end =========="
end
鲸阮
- 粉丝: 18
- 资源: 303
最新资源
- Screenshot_20240427_031602.jpg
- 网页PDF_2024年04月26日 23-46-14_QQ浏览器网页保存_QQ浏览器转格式(6).docx
- 直接插入排序，冒泡排序，直接选择排序.zip
- 在排序2的基础上，再次对快排进行优化，其次增加快排非递归，归并排序，归并排序非递归版.zip
- 实现了7种排序算法.三种复杂度排序.三种nlogn复杂度排序（堆排序，归并排序，快速排序）一种线性复杂度的排序.zip
- 冒泡排序 直接选择排序 直接插入排序 随机快速排序 归并排序 堆排序.zip
- 课设-内部排序算法比较 包括冒泡排序、直接插入排序、简单选择排序、快速排序、希尔排序、归并排序和堆排序.zip
- Python排序算法.zip
- C语言实现直接插入排序、希尔排序、选择排序、冒泡排序、堆排序、快速排序、归并排序、计数排序，并带图详解.zip
- 常用工具集参考用于图像等数据处理
资源上传下载、课程学习等过程中有任何疑问或建议，欢迎提出宝贵意见哦~我们会及时处理！
点击此处反馈
评论0