5 lines
82 B
Fortran
5 lines
82 B
Fortran
subroutine sleep_msec(n)
|
|
call usleep(n*1000)
|
|
return
|
|
end subroutine sleep_msec
|