| 查看: 687 | 回复: 3 | |||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | |||
[交流]
问一个关于函数调用的小问题
|
|||
|
请教个问题，看看我这个函数，fortran77写的： FUNCTION HEAVI(PRIS) REAL*8 PRIS IF(PRIS.GT.0.0) THEN HEAVI=1.0 ENDIF RETURN C IF(PRIS.LT.0.0) THEN HEAVI=0.0 ENDIF RETURN END 调用的时候出现下列情况： HEAVI(-3)=1.00000000000000， HEAVI(-3.0D0)=0.000000000000000E+000， HEAVI(-3.0)=1.00000000000000 HEAVI(3)=1.00000000000000， HEAVI(3.0D0)=1.000000000000000E+000， HEAVI(3.0)=1.00000000000000 不知道什么原因？ 改成这样怎么就好了呢？ Program ex005 real HEAVI write(*,*) HEAVI(3.0d0) end FUNCTION HEAVI(PRIS) REAL PRIS Real HEAVI IF(PRIS.GT.0.0) THEN HEAVI=1.0 else HEAVI=0.0 ENDIF RETURN END 语言Fortran77，gfortran环境。 求解释。 |
回复此楼» 猜你喜欢
拟解决的关键科学问题还要不要写
已经有8人回复
-
请教限项目规定
已经有5人回复
-
最失望的一年
已经有16人回复
-
存款400万可以在学校里躺平吗
已经有33人回复
-
求助一下有机合成大神
已经有3人回复
-
求推荐英文EI期刊
已经有5人回复
-
26申博
已经有3人回复
-
基金委咋了？2026年的指南还没有出来？
已经有10人回复
-
基金申报
已经有6人回复
-
疑惑？
已经有5人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- 请教个问题，为啥我的插值点会出现波动，是我调用函数的问题吗？
已经有3人回复
- matlab如何改变函数变量值在调用函数重新计算
已经有12人回复
- matlab的函数调用问题
已经有3人回复
- 关于erfinv函数调用错误的问题
已经有4人回复
- 一个构造函数调用问题……
已经有4人回复
- 请教如何调用Module里面的函数，谢谢
已经有6人回复
- intel fortran 如何调用 matlab里面的函数
已经有5人回复
- 菜鸟问题：VC++调用函数关闭子窗口的问题
已经有4人回复
- 【讨论】关于一个m文件中函数调用及画图问题
已经有7人回复
- 【交流】VC++, C#, VB答疑专贴
已经有145人回复
» 抢金币啦！回帖就可以得到:
-
浙江师范大学招收大气遥感、光学或人工智能方向的2026年物理学博士生1名
+2/278
-
上海87年GG诚求女友
+1/171
-
保障电池制造超纯环境：威格科技电池生产全线解决方案
+1/87
-
深圳大学水科学中心HydroS课题组招收化学/环境相关专业博士生1名（2026年入学）
+1/81
-
深圳大学张雷教授课题组诚聘博士后
+1/81
-
几个高校工作如何选择?
+1/79
-
大连理工大学智能系统实验室优秀硕博研究生招生
+1/77
-
坐标广州，诚征男友，大个子女生，非诚勿扰
+2/34
-
智合健物课题组2026年博士生招生(湖北工业大学)
+1/30
-
学生申博
+1/23
-
中国科学院杭州医学研究所方晓红课题组-上海交通大学肖泽宇课题组联合博士后招聘启示
+2/22
-
沈阳征女友
+1/22
-
云南大学智能光电子课题组招收申请-考核博士研究生1名（光电、光学）
+1/16
-
墨子实验室理论模拟研究组诚聘海内外优秀人才
+1/10
-
中国计量大学叶德茂课题组招收博士研究生（欢迎计算机类、电子信息类等专业）
+1/5
-
换工作
+1/4
-
意大利米兰理工大学Lorenza Petrini教授招收玛丽居里MEDALLOY博士
+1/3
-
生殖医学与子代健康全国重点实验室华鹏课题组招收博士后及研究生(长期有效)
+1/2
-
重庆大学诚招2026年生物材料方向博士生
+1/1
-
【博士后/科研助理招聘-北京理工大学-集成电路与电子学院-国家杰青团队】
+1/1
4楼2011-12-12 14:57:58
2楼2011-11-11 22:53:36
3楼2011-11-11 22:55:13