Clicky
Showing changes from revision #1 to #2:
(追記) Added (追記ここまで) | (削除) Removed (削除ここまで) | (削除) Chan (削除ここまで)(追記) ged (追記ここまで)
Determines the count
of milliseconds of wall clock time since the Epoch (00:00:00 UTC, January 1, 1970) modulo count_max
, count_rate
determines the number of clock ticks per second. count_rate
and count_max
are constant and specific to gfortran
.
If there is no clock, count
is set to -huge(count)
, and count_rate
and count_max
are set to zero
(削除) Fortran 95 and later (削除ここまで)(追記) Fortran 95 (追記ここまで)(追記) and later (追記ここまで)
Subroutine
call system_clock([count, count_rate, count_max])
count
- (Optional) shall be a scalar of type default integer
with intent(out)
.count_rate
- (Optional) shall be a scalar of type default integer
with intent(out)
.count_max
- (Optional) shall be a scalar of type default integer
with intent(out)
.program test_system_clock
integer :: count, count_rate, count_max
call system_clock(count, count_rate, count_max)
write(*,*) count, count_rate, count_max
end program