HP Fortran Programmer's Reference (September 2007)

Intrinsic procedures
Intrinsic procedure specifications
Chapter 11 541
VALUES (optional) must be of type default integer and of rank one. It is an INTENT(OUT)
argument. Its size must be at least 8. The values returned in VALUES are as
follows:
VALUES(1) the year (for example, 1990), or –HUGE(0) if there is no
date available;
VALUES(2) the month of the year, or –HUGE(0) if there is no date
available;
VALUES(3) the day of the month, or –HUGE(0) if there is no date
available;
VALUES(4) the time difference with respect to Coordinated Universal
Time (UTC) in minutes, or –HUGE(0) if this information is
not available;
VALUES(5) the hour of the day, in the range of 0 to 23, or –HUGE(0) if
there is no clock;
VALUES(6) the minutes of the hour, in the range 0 to 59, or –HUGE(0)
if there is no clock;
VALUES(7) the seconds of the minute, in the range 0 to 60, or
–HUGE(0) if there is no clock;
VALUES(8) the milliseconds of the second, in the range 0 to 999, or
–HUGE(0) if there is no clock.
The HUGE intrinsic function is described in “HUGE(X)” on page 555.
DBLE(A)
Description
Convert to double precision real type.
Class
Elemental function.
Argument
A must be of type integer, real, or complex.