ncl 如何计算任意两个时刻的时间长度？

8-gods

各位大神：
小虾想用ncl计算任意两个时刻之间的时间长度？具体用哪个函数啊？
！！！！！！！！！！！！！！！！！11
undef("newJulian")
function newJulian (eyear,emonth,edate,ehour,byear,bmonth,bdate,bhour)
begin
return(greg2jul(eyear,emonth,edate,ehour) - greg2jul(byear,bmonth,bdate,bhour))
end
begin
byear=2013
bmonth=1
bdate=1
bhour=1
eyear=2014
emonth=1
edate=13
ehour=12
period=newJulian(eyear,emonth,edate,ehour,byear,bmonth,bdate,bhour)
print(period)

end
！！！！！！！！！！！！！！！！
运行之后显示的是一个数字，应该是多少天吧》Variable: period
Type: double
Total Size: 8 bytes
            1 values
Number of Dimensions: 1
Dimensions and sizes:   [1]
Coordinates:
(0)     377.4583333334886



请问各位大神，这个数应该怎么转化一下格式？
比如上面的例子是2013年1月1日1点至2014年1月13日12点一共有 377.4583333334886天
如何变成2013年1月1日1点至2014年1月13日12点一共有**年**月**天**小时？
小学数学没学好。

穿越的小瓶子

请问楼主解决了吗