我是 Fortran 初学者,正在运行 Fortran 编写的模型。当我尝试编译它时,我收到一条错误消息,如下所示:
\nlibtool: link: (cd ".libs" && rm -f "libgrib_api_f77.so" && ln -s "libgrib_api_f77.so.1.0.0" "libgrib_api_f77.so")\nlibtool: link: ar cru .libs/libgrib_api_f77.a grib_fortran.o grib_f77.o\nlibtool: link: ranlib .libs/libgrib_api_f77.a\nlibtool: link: ( cd ".libs" && rm -f "libgrib_api_f77.la" && ln -s "../libgrib_api_f77.la" "libgrib_api_f77.la" )\ngfortran -c -o same_int_long.o same_int_long.f90\nsame_int_long.f90:23:18:\n \n 17 | call check_long(x2(1),x2(2),ret)\n | 2\n......\n 23 | call check_long(x4(1),x4(2),ret)\n | 1\nError: Type mismatch between actual argument at (1) and actual argument at (2) (INTEGER(4)/INTEGER(2)).\nsame_int_long.f90:29:18:\n \n 17 | call check_long(x2(1),x2(2),ret)\n | 2\n......\n 29 …
Run Code Online (Sandbox Code Playgroud)