24小时热门版块排行榜    

查看: 576  |  回复: 2

leonaiverson

新虫 (初入文坛)

[交流] 这段代码求解释。这是fortran的什么特性,类似于宏吗,非常不能理解。 已有2人参与

program main
    implicit real*8(a-h,o-z)     
      NXs(nxx)=nxx*NPicX
      NYs(nyy)=nyy*NPicY
      NRs(nxx)=nxx*Nrow
      NCs(nyy)=nyy*Ncol

      NPicX=10
      NPicY=20
      Nrow=30
      Ncol=40
     a= NXs(2)
     b= NYs(5)
     c= NRs(10)
     d= NCs(20)
    end
    代码运行正常。
回复此楼

» 猜你喜欢

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

浔荆

木虫 (正式写手)


小木虫: 金币+0.5, 给个红包,谢谢回帖
头四句等式定义了四个语句函数
中间四句给函数中用到的四个变量赋值
下面四句将调用语句函数,得到的返回值赋值给a,b,c,d

注:implicit real是fortran77的风格,强烈建议抛弃该写法,改用implicit none并明确定义每个变量和函数的类型。
2楼2015-11-26 09:52:48
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

duotojh

金虫 (小有名气)


小木虫: 金币+0.5, 给个红包,谢谢回帖
实际就是相当于C++的内联函数,C语言的预处理宏
3楼2015-11-27 07:39:04
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 leonaiverson 的主题更新
普通表情 高级回复 (可上传附件)
信息提示
请填处理意见