24小时热门版块排行榜    

Znn3bq.jpeg
查看: 409  |  回复: 0

zya570419

新虫 (初入文坛)

[交流] 【求助】多时次 多层次的 站点映射 格点 fortran如何写?

多时次 多层次的 站点映射 格点   fortran程序 应该如何写
看了手册写成这样,stnmap不通过

do year=1,nyr
do mon=1,12
   
    tim_grd=0.0
    nlev=17   
    nflag=0   
        
    do i=1,160
     write(2)  xstn(i),lat(i),lon(i),tim_grd,nlev,nflag
     do k=1,17
     write(2)  tem(i,year,mon,k),dewpoint(i,year,mon,k)
     enddo
   enddo

   nlev=0
   write(2) stn(i-1),lat(i-1),lon(i-1),tim_grd,nlev,nflag

enddo
enddo
回复此楼

» 猜你喜欢

Remember what should be remembered, and forget what should be forgotten. Alter what is changeable, and accept what is mutable.
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

智能机器人

Robot (super robot)

我们都爱小木虫

相关版块跳转 我要订阅楼主 zya570419 的主题更新
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 一志愿211 0703化学 346分求调剂 +11 土豆er? 2026-04-09 11/550 2026-04-09 11:37 by yongzhesheng
[考研] 一志愿985初试354分生物调剂 +3 031001 2026-04-06 3/150 2026-04-09 00:30 by Evan_Liu
[考研] 308求调剂 +16 倘若起风了呢 2026-04-05 16/800 2026-04-08 23:03 by 猪会飞
[考研] 296求调剂 +3 汪!?! 2026-04-08 3/150 2026-04-08 22:00 by zhouyuwinner
[考研] 土木水利专硕276分求调剂 +6 我想上学!!6 2026-04-05 9/450 2026-04-08 17:45 by 宋小宝HQ
[考研] 274求调剂 +4 山阿蔓 2026-04-07 4/200 2026-04-08 09:49 by eyeliyang
[考研] 调剂求助(生物与医药) +6 @6952 2026-04-06 6/300 2026-04-07 23:52 by lys0704
[考研] 301求调剂 +18 121. 2026-04-04 18/900 2026-04-07 17:49 by 蓝云思雨
[考研] 085405软件工程301分求调剂,专硕可跨专业,四六级已过 +3 静静想想 2026-04-05 3/150 2026-04-06 15:23 by nepu_uu
[考研] 085600,320分求调剂 +16 大馋小子 2026-04-04 17/850 2026-04-06 07:58 by MOF_Catal
[考研] 323求调剂 +8 李佳乐1 2026-04-04 8/400 2026-04-04 22:26 by hemengdong
[考研] 可跨专业调剂 +3 周的得地 2026-04-04 6/300 2026-04-04 22:21 by barlinike
[考研] 277求调剂 +4 12A3 2026-04-02 5/250 2026-04-04 20:28 by 蓝云思雨
[考研] 11408 一志愿西电,277分求调剂 +4 zhouzhen654 2026-04-03 4/200 2026-04-04 18:10 by 猪会飞
[考研] 334求调剂 +8 曾仰之 2026-04-03 8/400 2026-04-04 11:16 by w_xuqing
[考研] 求生物学专业调剂-332分 +5 云朵遛弯指南 2026-04-04 5/250 2026-04-04 10:05 by rzh123456
[考研] 085501一志愿天工大,机械专硕求调剂,跨材料 +3 33上 2026-04-03 3/150 2026-04-03 14:08 by 1753564080
[考研] 283求调剂 +3 jiouuu 2026-04-03 4/200 2026-04-03 13:28 by jiouuu
[考研] 081200-11408-276学硕求调剂 +6 崔wj 2026-04-02 6/300 2026-04-03 10:19 by 蓝云思雨
[考研] 一志愿武汉理工0856,初试334 +3 26考研材料 2026-04-02 3/150 2026-04-02 21:22 by dongzh2009
信息提示
请填处理意见