]>
Commit | Line | Data |
---|---|---|
c63539ff ML |
1 | .. |
2 | Copyright 1988-2022 Free Software Foundation, Inc. | |
3 | This is part of the GCC manual. | |
4 | For copying conditions, see the copyright.rst file. | |
5 | ||
6 | .. index:: ITIME, time, current, current time | |
7 | ||
8 | .. _itime: | |
9 | ||
10 | ITIME --- Get current local time subroutine (hour/minutes/seconds) | |
11 | ******************************************************************* | |
12 | ||
13 | .. function:: ITIME(VALUES) | |
14 | ||
15 | ``ITIME(VALUES)`` Fills :samp:`{VALUES}` with the numerical values at the | |
16 | current local time. The hour (in the range 1-24), minute (in the range 1-60), | |
17 | and seconds (in the range 1-60) appear in elements 1, 2, and 3 of :samp:`{VALUES}`, | |
18 | respectively. | |
19 | ||
20 | :param VALUES: | |
21 | The type shall be ``INTEGER, DIMENSION(3)`` | |
22 | and the kind shall be the default integer kind. | |
23 | ||
24 | :return: | |
25 | Does not return anything. | |
26 | ||
27 | Standard: | |
28 | GNU extension | |
29 | ||
30 | Class: | |
31 | Subroutine | |
32 | ||
33 | Syntax: | |
34 | .. code-block:: fortran | |
35 | ||
36 | CALL ITIME(VALUES) | |
37 | ||
38 | Example: | |
39 | .. code-block:: fortran | |
40 | ||
41 | program test_itime | |
42 | integer, dimension(3) :: tarray | |
43 | call itime(tarray) | |
44 | print *, tarray(1) | |
45 | print *, tarray(2) | |
46 | print *, tarray(3) | |
47 | end program test_itime | |
48 | ||
49 | See also: | |
3ed1b4ce | 50 | :ref:`DATE_AND_TIME` |