爱气象,爱气象家园! 

气象家园

 找回密码
 立即注册

QQ登录

只需一步,快速开始

新浪微博登陆

只需一步, 快速开始

搜索
查看: 26808|回复: 62

[源代码] 用于时间日期计算的Fortran程序模块

  [复制链接]

新浪微博达人勋

发表于 2014-3-20 23:32:35 | 显示全部楼层 |阅读模式

登录后查看更多精彩内容~

您需要 登录 才可以下载或查看,没有帐号?立即注册 新浪微博登陆

x
本帖最后由 香酥扇贝 于 2017-1-16 08:33 编辑

分享一下我之前写的一个时间日期计算程序模块,希望有用。

写这个程序是因为给国家气象中心做业务实时运行的软件时经常涉及到时间日期的计算。而之前在网上搜到的一个别人的程序在运行时出错了,所以我决定自己重新写一个,花了大半天时间。目前软件运行了半年多一切正常,申请了软件著作权。如果有疑问和建议欢迎批评指正。
最近在使用过程中发现程序存在问题,经过各种测试,程序的bug已修复,现为最终修订版,亲们可放心使用,如仍发现问题欢迎反馈!(2017.1.16)
使用范例:

include 'modDateTime.f90'
Program main
use modDateTime
implicit none
integer::Year=2014,Mn=3,Dy=20,Hr=23,Ayear,Amn,Ady,Ahr
call subAddTime(Year,Mn,Dy,Hr,-1,'dy',Ayear,Amn,Ady,Ahr) ! 退后一天
print *,Ayear,Amn,Ady,Ahr
End program

具体的使用方法见程序内部说明~

modDateTime.f90 (8.73 KB, 下载次数: 258)

本帖被以下淘专辑推荐:

密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2014-3-21 07:28:26 | 显示全部楼层
感谢分享
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2014-3-21 08:41:21 | 显示全部楼层
申请了什么软件著作权?
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2014-3-21 09:52:23 | 显示全部楼层
谢谢分享
密码修改失败请联系微信:mofangbao

新浪微博达人勋

 楼主| 发表于 2014-3-21 10:04:23 | 显示全部楼层
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2014-4-3 01:35:29 | 显示全部楼层
这个有用,谢谢分享!
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2014-4-8 07:21:48 | 显示全部楼层
这个有用,谢谢分享!
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2014-4-8 08:29:13 | 显示全部楼层
好,收了。
密码修改失败请联系微信:mofangbao
回复

使用道具 举报

新浪微博达人勋

发表于 2015-1-16 10:30:58 | 显示全部楼层
感谢分享~
密码修改失败请联系微信:mofangbao
回复

使用道具 举报

新浪微博达人勋

发表于 2015-4-15 11:51:30 | 显示全部楼层
感谢分享!!!!
密码修改失败请联系微信:mofangbao
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册 新浪微博登陆

本版积分规则

Copyright ©2011-2014 bbs.06climate.com All Rights Reserved.  Powered by Discuz! (京ICP-10201084)

本站信息均由会员发表,不代表气象家园立场,禁止在本站发表与国家法律相抵触言论

快速回复 返回顶部 返回列表