R CMD SHLIB Fortran 90 文件,使用 NetCDF

Ser*_*gio 7 fortran r netcdf

我想编译一个使用 NetCDF 的 fortran 90 文件。我已经安装的NetCDF,Fortran语言,如图所示这里,对文件进行编译test_nc.f90:

program test_nc
    use netcdf
    implicit none
    integer :: ncid, nc_err

    nc_err = nf90_open('test.nc', nf90_nowrite, ncid)
    nc_err = nf90_close(ncid)
end program test_nc
Run Code Online (Sandbox Code Playgroud)

用 gfortran 编译是

gfortran test_nc.f90 -o test_nc `nf-config --fflags --flibs`
Run Code Online (Sandbox Code Playgroud)

在哪里nf-config --fflags --flibs

-I/usr/include
-L/usr/lib -lnetcdff -Wl,-Bsymbolic-functions -Wl,-z,relro -Wl,-z,now -lnetcdf -lnetcdf -ldl -lz -lcurl -lm
Run Code Online (Sandbox Code Playgroud)

用子程序替换程序是

subroutine test_nc
    use netcdf
    implicit none
    integer :: ncid, nc_err

    nc_err = nf90_open('test.nc', nf90_nowrite, ncid)
    nc_err = nf90_close(ncid)
end subroutine test_nc
Run Code Online (Sandbox Code Playgroud)

但是,当我跑步时

R CMD SHLIB test_nc.f90  `nf-config --fflags --flibs`
Run Code Online (Sandbox Code Playgroud)

结果是:

gfortran -fno-optimize-sibling-calls  -fpic  -g -O2 -fdebug-prefix-map=/build/r-base-k1TtL4/r-base-3.6.1=. -fstack-protector-strong  -c  test_nc.f90 -o test_nc.o
test_nc.f90:2:8:

    2 |     use netcdf
      |        1
Fatal Error: Cannot open module file ‘netcdf.mod’ for reading at (1): No such file or directory
compilation terminated.
Run Code Online (Sandbox Code Playgroud)

另外,当我尝试:

R CMD SHLIB test_nc.f90 -I/usr/include -L/usr/lib -lnetcdff -Wl,-Bsymbolic-functions -Wl,-z,relro -Wl,-z,now -lnetcdf -lnetcdf -ldl -lz -lcurl -lm
gfortran -fno-optimize-sibling-calls  -fpic  -g -O2 -fdebug-prefix-map=/build/r-base-k1TtL4/r-base-3.6.1=. -fstack-protector-strong  -c  test_nc.f90 -o test_nc.o
Run Code Online (Sandbox Code Playgroud)

结果是:

test_nc.f90:2:8:

    2 |     use netcdf
      |        1
Fatal Error: Cannot open module file ‘netcdf.mod’ for reading at (1): No such file or directory
compilation terminated.
make: *** [/usr/lib/R/etc/Makeconf:195: test_nc.o] Error 1
Run Code Online (Sandbox Code Playgroud)

如何告诉 R CMD SHLIB 使用 Netcdf-fortran 库?

?SHLIB 显示

R CMD SHLIB -o mylib.so a.f b.f -L/opt/acml3.5.0/gnu64/lib -lacml
Run Code Online (Sandbox Code Playgroud)

所以我想有可能做到这一点

fra*_*lus 5

在对R CMD SHLIB您提供的选项的调用nf-config中,仅作为链接器选项。编译步骤失败,因为在链接过程之前需要设置 NetCDF Fortran 模块的搜索路径。

要添加-I...选项,nf-config您可以使用环境变量PKG_FCFLAGS

env PKG_FCFLAGS="`nf-config --fflags`" R CMD SHLIB test_nc.f90 `nf-config --flibs`
Run Code Online (Sandbox Code Playgroud)

或者,您可以放入PKG_FCFLAGSMakevars 文件。

(请注意,与 C 和 C++ 不同,模块文件的包含路径选项不适用于预处理阶段。)