Fortran能否方便地将“时间间隔+参考日期”转换为“日期”？

Question

在其他语言中，通常会出现一个函数来使用引用日期和时间间隔计算日期。例如，在R中，如果引用日期为2019/09/01，而时间间隔为2 days，则计算日期为2019/09/03。我们可以使用以下日期转换函数：

as.Date(2, origin = "2019-09-01")
# [1] "2019-09-03"

我想知道Fortran是否有类似的功能或包？

Answer 1

Fortran标准只提供最多毫秒的当前日期和时间。

call date_and_time ( [ date ] [ , time ] [ , zone ] [ , values ] )

返回以下内容(在没有时钟时，默认值为空或-huge(0) )。

• date是长度为8或更长的标量字符变量。它的前8个字符以ccyymmddE 213的形式设置为、、month和day。
• time是长度为10或更长的标量字符变量。它的前10个字符设置为hours、minutes、秒和hhmmss.sss窗体中的时间。
• zone是长度为5或更长的标量字符变量。它的前5个字符设置为与UTC (也称为格林尼治标准时间)之间的差异，形式为Shhmm，对应于符号、小时和分钟。例如，冬天在纽约的处理器将返回值-0500。
• values是一个大小至少为8的默认整数数组，该数组包含值的顺序：年、年度月、月中的日、与UTC有关的**分钟差值(以分钟为单位)、E 145一天中的E 246、<>E 147小时的分钟<代码>E 248、分钟<代码>E 149秒>E 250和E 151第二E 252/code>的E 151毫秒。

如果您需要更多的东西，那么您现在必须编写自己的函数，或者如注释中提到的那样，使用现有的函数之一。据我所知，其中最突出的是开放的图书馆datetime-fortran 这里。