怎么用Fortran lian编写找出符合持续低温事件的站点

学习就学习

持续低温事件的定义
目前持续低温事件并没有一个通用的定义，按照IPCC评估报告的建议，用每日温度序列的10%分位值作为阈值，当某日平均温度低于当日的阈值时则定
义该日为低温日，某个站点持续三天及以上为低温日则定义为单站的持续低温。当某个时段，某区域内有成片的单站出现持续低温，并且前后持续时间大于等于6天，出现持续低温的站点总数大于等于50个时，我们就定义为区域内的持续低温事件。当某- -集中区域内有大于等于5个站点出现低温日，而前一天出现低温日的站点小于5，且出现低温日的站点有增加的趋势，即视为持续低温事件的开始时间，当持续低温事件发生的区域内前一-天有大于等于5个站点出现低温日，而后- -天有小于5个站点出现低温日，并且在3天内没有再增加的趋势，将这一天定为持续低温事件的结束时间。如果两次低温事件间隔小于1天，就视为- 次。

给了两个数据 一个是每个站点的 经纬度  是 2479sta 另一个 是 1951-2013年的气温数据是。txt格式  根据持续低温事件的定义用fortran 编程找出北方地区: 33°N~53°N， 103°E~135°E  符合持续低温的站点