FORTRAN “Symbol has no implicit type"错误

最新推荐文章于 2023-02-23 17:36:47 发布
原创 最新推荐文章于 2023-02-23 17:36:47 发布 · 1.1w 阅读 · 3 ·
CC 4.0 BY-SA版权
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。

本文探讨了在使用gfortran编译时遇到的一个常见问题——命令过长导致的错误。通过将命令拆分为多个句子并使用续行符(&)，成功解决了该问题。此外，对比了gfortran与IntelFortran在这方面的差异，揭示了gfortran在处理长命令时的限制。

摘要生成于 C知道 ，由 DeepSeek-R1 满血版支持， 前往体验 >

用gfortran编译的时候出现这个问题，查程序并无错误。


最后发现是命令太长，用续行符&拆成两个句子就可以编译通过了。在使用Intel Fortran编译并无此问题，可能是gfortran支持的单句长度比较短。

mikaeniks
关注
常见Fortran编程错误解释
zql1009的博客
12-08 2405
做了个试验，把数组设小了点，改成二维，时间和高度都在外面循环，不用一次读入，这样build的时候也不报错，警告也没了，但算的时候自动就停了，显示超出范围，我把in和jn改小，改为71*21，并改为默认的单精度，还是显示超出范围，再改为71*2，就可以算出来了。NextPlot 属性: 表示坐标轴图形的更新方式，'replace' 是默认的选项，表示重新绘制，而 'add' 选项表示在原来的图形上叠印，它相当于直接使用 hold on 命令的效果。本书中在后面介绍属性值时，将把默认的属性值列在前面。
CESM1_2_2移植笔记
zhaohaibo的博客
02-20 2685
把cesm移植到了自己的centos虚拟机里，比赛结束会抽空写一个尽可能详细的cesm1_2_2的移植攻略。 源码安装 curl(7.64) m4(1.4.18) zlib(1.2.8) hdf5(1.8.13) 一. 安装netcdf-c(4.6.2)过程中的问题 1. FAIL: test_filter.sh 解决： configure时添加： --disable-filter-testing...
Fortran 的 implicit 命令
cong_jiang_的博客
06-29 1万+
关于implicit命令，摘取自《Fortran95程序设计》（彭国伦）一书由于Fortran的变量不需要声明就可以直接使用，编译器则根据变量名称的第一个字母来决定变量的类型。在实际使用中，却容易造成”人为错误“，且不明确程序执行的内存使用情况。Implicit命令：用来设置”默认类型“，默认类型即指Fortran编译器则根据变量名称的第一个字母来决定变量的类型；                 ...
gamit 编译 setup.f 错误
技术、思维
09-29 3468
Running unimake to create Makefile for model System name:  Linux linux-cvw0 2.6.37.1-1.2-default #1 SMP 2011-02-21 10:34:10 +0100 i686 i686 i386 GNU/Linux System release number translated to  2637
Fortran入门教程（十一）—— 模块
Sumbrella_的博客
07-17 6772
Fortran 模块
Fortran入门教程(八)——子例程及函数
Sumbrella_的博客
12-10 1万+
过程 在写程序时常常会有一些代码块需要经常使用, 我们可以将其封装起来，封装好后的代码块可以统一调用，减少代码的书写量，提高程序的可读性、拓展性等。 1. 子例程 (subroutine) 1.1 语法 封装一个子例程按如下语法封装 subroutine subroutine_name([argument1[, argument2, ..., argumentn]]) argument_type1 :: argument1 argument_type2 :: argument2 ..
176 | do i = 1, size(graph, 1) | 1 Error: Symbol ‘i’ at (1) has no IMPLICIT type
06-03
这个错误是因为 Fortran90 中默认不支持隐式类型声明，需要使用 `IMPLICIT NONE` 声明变量的类型，或者显式地声明每个变量的类型。 在这个例子中，你可以在子程序的开头添加 `IMPLICIT NONE`，并显式地声明 `i` 的...
304 | function gauss_jordan(A, n) result(x) | 1 Error: Symbol ‘n’ at (1) has no IMPLICIT type
06-03
这个错误的原因是Fortran90中`n`变量没有声明类型，可以通过在函数声明中添加`integer, intent(in) :: n`语句来解决。修改后的代码如下： ``` function gauss_jordan(A, n) result(x) implicit none real, ...
||=== Build: Debug in 2 (compiler: GNU Fortran Compiler) ===| D:\HuaweiMoveData\Users\29067\Desktop\2\main.f90|16|Error: Symbol 'e' already has basic type of REAL| D:\HuaweiMoveData\Users\29067\Desktop\2\main.f90|19|Error: Symbol 'i' has no IMPLICIT type| D:\HuaweiMoveData\Users\29067\Desktop\2\main.f90|35|Error: Symbol 'j' has no IMPLICIT type| D:\HuaweiMoveData\Users\29067\Desktop\2\main.f90|33|Warning: Legacy Extension: REAL array index | D:\HuaweiMoveData\Users\29067\Desktop\2\main.f90|33|Warning: Legacy Extension: REAL array index | D:\HuaweiMoveData\Users\29067\Desktop\2\main.f90|33|Warning: Legacy Extension: REAL array index | D:\HuaweiMoveData\Users\29067\Desktop\2\main.f90|36|Warning: Legacy Extension: REAL array index | D:\HuaweiMoveData\Users\29067\Desktop\2\main.f90|32|Warning: Deleted feature: Loop variable must be integer| ||=== Build failed: 3 error(s), 5 warning(s) (0 minute(s), 0 second(s)) ===|
06-17
感谢您提供的详细错误信息。这些错误和警告表明代码中存在一些隐式类型声明和数组索引问题。让我们逐一解决这些问题。 ### 主要问题总结 1. **符号类型冲突**：`e` 已经被定义为 `REAL` 类型，但又被用作整数循环...
program hydrogen_atom implicit none integer, parameter :: dp = kind(0.d0) ! 双精度浮点 real(dp), parameter :: L = 100.0_dp ! 坐标范围 real(dp), parameter :: d = 0.5_dp ! 步长 integer, parameter :: N = int(L/d - 1) ! 节点数 real(dp) :: dt1, dt2, x0 real(dp) :: xs(N) ! 节点位置 real(dp) :: H(N, N) ! 哈密顿矩阵 real(dp) :: Y(N, N) ! 本征向量 real(dp) :: E(N) ! 本征值 integer :: i, j, k, iter real(dp) :: Epai(N), temp logical :: sorted ! 初始化节点 x0 = 0.0_dp do i = 1, N x0 = x0 + d xs(i) = x0 end do ! 设置动能矩阵参数 dt1 = 1.0_dp / (d*d) dt2 = -0.5_dp / (d*d) ! 初始化哈密顿矩阵 H = 0.0_dp do i = 1, N ! 对角元素 (动能 + 势能) H(i, i) = dt1 - 1.0_dp / xs(i) ! 次对角元素 (仅动能) if (i < N) then H(i, i+1) = dt2 H(i+1, i) = dt2 end if end do ! 假设 H 是 n×n 的哈密顿矩阵 integer :: k1, j1, n1 n1 = size(H, 1) ! 获取矩阵维度 print *, "哈密顿矩阵 H:" do k1 = 1, n1 do j1 = 1, n1 write(*, '(F12.6, 2X)', advance='no') H(k1, j1) ! 每元素占12字符宽，保留6位小数 end do print * ! 换行 end do更改后报错PROGRAMadd_numbers.f90:41:25: 41 | integer :: k1, j1, n1 | 1 Error: Unexpected data declaration statement at (1) PROGRAMadd_numbers.f90:46:12: 46 | do j1 = 1, n1 | 1~ Error: Symbol 'j1' at (1) has no IMPLICIT type; did you mean 'j'? PROGRAMadd_numbers.f90:45:8: 45 | do k1 = 1, n1 | 1~ Error: Symbol 'k1' at (1) has no IMPLICIT type; did you mean 'k'? PROGRAMadd_numbers.f90:42:5: 42 | n1 = size(H, 1) ! 鑾峰彇鐭╅樀缁村害 | 1~ Error: Symbol 'n1' at (1) has no IMPLICIT type; did you mean 'n'? PS D:\win_fortran>
最新发布
06-25
`Symbol 'k' already has basic type of INTEGER` 表示变量 `k` 已在程序开头声明为整数类型，但在后续代码中又被重复声明： ```fortran integer :: i, j, k, iter ! 第一次声明 ... integer :: k, j, n ! 错误...
CTSDM踩坑记录
cc77_2019的博客
02-23 2038
ctsdm 踩坑记录
nm 提示 no symbol 的问题（strip）
热门推荐
cjsycyl的专栏
07-18 2万+
动态链接库文件(windows里的dll)在linux里以.so结尾，称为shared object library 。该文件是elf(Executable and Linkable Format)文件的一种，有两个符号表，“.symtab”和“.dynsym”。“.dynsym”只保留“.symtab”中的全局符号(global symbols )。命令strip可以去掉elf文件中“.sy
Fortran编译错误一例
WBZH的专栏
07-23 8294
Fortran编译错误一例login2.stampede(111)$ make mpif90 -g -ffree-form -DTPV26 -O0 -c -ffixed-line-length-250 -o testInterfaceF.o -I../..//seism_io_interface-v0.2/include testInterface.f ifort: command line wa
HLSL错误：x3206 implicit trucation of vector type
Gypsyy的专栏
05-21 5228
今天在两处出现了这个问题： float3 ambient = gMtrl.ambient*gSpotLight.ambient;//环境光 oPosLight = mul( oPosW, gViewToLightProj ); 检查了一下发现是维度问题..ambient是float3类型，gMtrl.ambient是float4类型；oPosLight是float4类型，oPos
Function result 'muscl_slope' at (1) has no IMPLICIT type
05-15
这个错误通常意味着您没有明确声明变量的数据类型。在Fortran中，如果您没有使用IMPLICIT NONE语句，则编译器将默认使用IMPLICIT规则来确定变量的数据类型。如果变量名称以A-H或O-Z之间的任何字母开头，则默认为实数类型。如果变量名称以I-N之间的任何字母开头，则默认为整数类型。 要解决此问题，您可以使用IMPLICIT NONE语句，在您的程序中明确声明所有变量的数据类型。例如： ``` program example implicit none real :: muscl_slope(10) ! rest of the code end program example ``` 在上面的示例中，我们使用IMPLICIT NONE语句并声明了一个实数类型的数组muscl_slope。这样，编译器将不会发出“Function result 'muscl_slope' at (1) has no IMPLICIT type”的错误消息。
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值