【NCL调用Fortran子程序】生成.so文件出错·已解决

立方光年的团子

【NCL调用Fortran子程序】目的：结合fortran计算快、ncl写入nc文件方便的特点
问题：在生成.so文件时出现错误

-------------------------------------------------------------------------------------------------------------------------------

-------------------------------------------------------------------------------------------------------------------------------

-------------------------------------------------------------------------------------------------------------------------------

思考过程：
根据官网试过，对stub和f90都做过dos2unix 处理，试过减少传递参数的个数，如subroutine AMSRE_todaily_to0_5grid(newtba_day)，均无效，求大神指点

立方光年的团子

补充说明：
1.stub和f90的参数名不一样应该是不影响的
2.stub中的real换成dimension也不行

第一次用ncl调用比较大的fortran程序，经验不足，如果大神们有相关的学习资料，希望可以分享一下啊

立方光年的团子

先谢谢各位啦！

立方光年的团子

不知道为什么又可以了。但是生成了.so文件后，使用时一直报错
---------- 正确生成so时显示 -----------------
WRAPIT Version: 120209
COMPILING f4-1_todaily.f90
LINKING
END WRAPIT


------------------- ncl 报错 --------------------
fatal:syntax error: procedure AMSRE_todaily_to0_5grid is not defined in package FUNC

fatal:error at line 35 in file n4_write_daily.ncl

fatal:Syntax Error in block, block not executed
fatal:error at line 37 in file n4_write_daily.ncl
---------------------
用 nm -D f4-1_todaily.so 看了一下里面的函数变量名
0000000000001451 T AMSRE_todaily_to0_5grid_W
0000000000000f7c T Init
                 U NclGetArgValue
                 U NclRegisterProc
                 U NewArgs
                 U NrmQuarkToString
                 U NrmStringToQuark
                 U SetArgTemplate
                 w _Jv_RegisterClasses
0000000002430fc0 B __BLNK__
0000000000203e60 A __bss_start
                 w __cxa_finalize
                 w __gmon_start__
0000000000203e60 A _edata
0000000002430fc8 A _end
0000000000003928 T _fini
                 U _gfortran_compare_string
                 U _gfortran_concat_string
                 U _gfortran_internal_pack
                 U _gfortran_internal_unpack
                 U _gfortran_st_close
                 U _gfortran_st_open
                 U _gfortran_st_read
                 U _gfortran_st_read_done
                 U _gfortran_st_write
                 U _gfortran_st_write_done
                 U _gfortran_string_trim
                 U _gfortran_transfer_character
                 U _gfortran_transfer_integer
                 U _gfortran_transfer_real
0000000000000ca8 T _init
0000000000001c50 T amsre_todaily_to0_5grid_
0000000000001bdf T askave_
0000000000001c05 T askpercent_
                 U free
0000000000001bb0 T ifandsum_
                 U malloc
                 U memmove
                 U memset
                 U strcpy


实在很奇怪啊

立方光年的团子

好了，解决了，修改了一下函数名
函数名的设置有几个要点：（可能不全，但以下皆为本人实验后的经验总结）
1.不能出现“_”,"-"等字符
2.不能出现大小写混写
3.数字可出现在除开头外的任何位置（该点同fortran变量命名一致）

立方光年的团子

想删帖咋整。。。

95niande77

别删贴呀，我最近也在尝试ncl调用Fortran子程序，用官网上例子试运行，结果生成不了so文件

周紫薇

我最近生成.so文件的时候遇到了这个问题Could not find Init() in external file .so， file not loaded, 用过dos2unix也不可以，自己的.f90文件是可以编译的，但是外接在ncl里就有这个问题

cmh201128

周紫薇 发表于 2019-9-14 20:00
我最近生成.so文件的时候遇到了这个问题Could not find Init() in external file .so， file not loaded,  ...

请问你解决了吗？我也遇到这个问题了，想取取经