The TELEMAC-MASCARET system  trunk
Functions/Subroutines
gregtim.f File Reference

Go to the source code of this file.

Functions/Subroutines

subroutine gregtim (JULTIM, YEAR, MONTH, DAY, HOUR, MINU, SEC)
 

Function/Subroutine Documentation

◆ gregtim()

subroutine gregtim ( double precision, intent(in)  JULTIM,
integer, intent(inout)  YEAR,
integer, intent(inout)  MONTH,
integer, intent(inout)  DAY,
integer, intent(inout)  HOUR,
integer, intent(inout)  MINU,
integer, intent(inout)  SEC 
)
Parameters
[in,out]year[in, out] DAY Day (1-28, 29, 30 or 31)
[in,out]HOURHour (0-23) in universal time
[in]JULTIMJulian day in century
[in,out]MINMinute (0-59) in universal time
[in,out]MONTHMonth (1-12)
[in,out]SECSecond (0-59) in universal time
[in,out]YEARYear (-4713-..)
[in,out]month[in, out] DAY Day (1-28, 29, 30 or 31)
[in,out]HOURHour (0-23) in universal time
[in]JULTIMJulian day in century
[in,out]MINMinute (0-59) in universal time
[in,out]MONTHMonth (1-12)
[in,out]SECSecond (0-59) in universal time
[in,out]YEARYear (-4713-..)
[in,out]day[in, out] DAY Day (1-28, 29, 30 or 31)
[in,out]HOURHour (0-23) in universal time
[in]JULTIMJulian day in century
[in,out]MINMinute (0-59) in universal time
[in,out]MONTHMonth (1-12)
[in,out]SECSecond (0-59) in universal time
[in,out]YEARYear (-4713-..)
[in,out]hour[in, out] DAY Day (1-28, 29, 30 or 31)
[in,out]HOURHour (0-23) in universal time
[in]JULTIMJulian day in century
[in,out]MINMinute (0-59) in universal time
[in,out]MONTHMonth (1-12)
[in,out]SECSecond (0-59) in universal time
[in,out]YEARYear (-4713-..)
[in,out]minu[in, out] DAY Day (1-28, 29, 30 or 31)
[in,out]HOURHour (0-23) in universal time
[in]JULTIMJulian day in century
[in,out]MINMinute (0-59) in universal time
[in,out]MONTHMonth (1-12)
[in,out]SECSecond (0-59) in universal time
[in,out]YEARYear (-4713-..)
[in,out]sec[in, out] DAY Day (1-28, 29, 30 or 31)
[in,out]HOURHour (0-23) in universal time
[in]JULTIMJulian day in century
[in,out]MINMinute (0-59) in universal time
[in,out]MONTHMonth (1-12)
[in,out]SECSecond (0-59) in universal time
[in,out]YEARYear (-4713-..)

Definition at line 7 of file gregtim.f.

+ Here is the caller graph for this function: