Fortran Coder

查看: 2261|回复: 2
打印 上一主题 下一主题

[数值问题] Fortran新手,代码求助!!!

[复制链接]

4

帖子

2

主题

0

精华

新人

F 币
31 元
贡献
10 点
跳转到指定楼层
楼主
发表于 2023-1-31 17:02:03 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
本帖最后由 114514 于 2023-1-31 17:33 编辑

if ( My_Table%Now_Table_Number(1:1:1) == 0 ) then
         (1)
不知道这段代码哪里有问题,错误提示是这样的
IF clause at (1) requires a scalar LOGICAL expression
我用的是Gfortran编译器



分享到:  微信微信
收藏收藏 点赞点赞 点踩点踩

2022

帖子

12

主题

5

精华

论坛跑堂

臭石头雪球

F 币
1598 元
贡献
689 点

美女勋章热心勋章星光勋章新人勋章贡献勋章管理勋章帅哥勋章爱心勋章规矩勋章元老勋章水王勋章

沙发
发表于 2023-1-31 21:13:27 | 只看该作者
if ( My_Table%Now_Table_Number(1) == 0 ) then
注意 My_Table%Now_Table_Number(1) 是一个标量。

My_Table%Now_Table_Number(1:1:1) 是一个数组(虽然它只有一个元素)

他俩的区别,恰似一个文件,和一个只包含一个文件的文件夹一样。

4

帖子

2

主题

0

精华

新人

F 币
31 元
贡献
10 点
板凳
 楼主| 发表于 2023-2-1 14:16:24 | 只看该作者
fcode 发表于 2023-1-31 21:13
if ( My_Table%Now_Table_Number(1) == 0 ) then
注意 My_Table%Now_Table_Number(1) 是一个标量。

这么说就明白了,谢谢
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-11-23 00:41

Powered by Tencent X3.4

© 2013-2024 Tencent

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