新手诚恳求教：关于测试The NetCDF Tutorial 第14页中simple_xy_wr.f这个程序报错问题

singapple

因为我是新手，对fortran和linux都不是特别熟练，但是很想把这两样都学好，因为这段时间要处理nc格式的数据，想着如果自己学着用程序写一下的话，也算是能多学点。但是刚开始测试就遇到问题了，我这个遇到的问题可能熟悉的人一眼就看到问题在哪儿了，可是确实困扰我几天了，诚恳求教论坛里的高手们，能对我指点一二，非常感谢！！！
问题说明：
首先[…]$f77 -c -I/.../netcdf_fix_4.1.2/include simple_xy_wr.f
生成simple_xy_wr.o
然后[…]$f77 -o simple_xy_wr simple_xy_wr.o  -L/.../netcdf_fix_4.1.2/lib  -lnetcdf
报错：
simple_xy_wr.o: In function `MAIN__':
simple_xy_wr.f:(.text+0xbf): undefined reference to `nf_create__'
simple_xy_wr.f:(.text+0x101): undefined reference to `nf_def_dim__'
simple_xy_wr.f:(.text+0x143): undefined reference to `nf_def_dim__'
simple_xy_wr.f:(.text+0x1a1): undefined reference to `nf_def_var__'
simple_xy_wr.f:(.text+0x1cf): undefined reference to `nf_enddef__'
simple_xy_wr.f:(.text+0x208): undefined reference to `nf_put_var_int__'
simple_xy_wr.f:(.text+0x236): undefined reference to `nf_close__'
simple_xy_wr.o: In function `handle_err__':
simple_xy_wr.f:(.text+0x2f1): undefined reference to `nf_strerror__'
collect2: ld 返回 1
这个是哪方面的问题呢？
说一下楼主在问问题之前做过哪些：
1、我到.../netcdf_fix_4.1.2/include 这个目录下看了确实有netcdf.inc这个文件，并且打开看了该文件，上面的几个函数在netcdf.inc中都有定义的啊，不知道为什么显示未定义；
2、而且楼主也查了服务器上装f77了，在/usr/bin/f77这个路径下；
3、楼主也尝试测试了在The NetCDF Tutorial 当中给的simple_xy_wr.f90这个源码，依然会报错，我就不提了，只要能把这个fortran77的解决掉也非常好了。
楼主使用的代码：
        program simple_xy_wr
        implicit none
        include 'netcdf.inc'

        character*(*) FILE_NAME
        parameter (FILE_NAME='simple_xy.nc')

        integer NDIMS
        parameter (NDIMS=2)
        integer NX, NY
        parameter (NX = 6, NY = 12)

        integer ncid, varid, dimids(NDIMS)
        integer x_dimid, y_dimid

        integer data_out(NY, NX)
        integer x, y, retval

        do x = 1, NX
          do y = 1, NY
            data_out(y,x) = (x-1)*NY+(y-1)
          end do
        end do

        retval = nf_create(FILE_NAME,nf_clobber,ncid)

        if (retval .ne. nf_noerr) call handle_err(retval)
        retval = nf_def_dim(ncid,"x",NX,x_dimid)
        if (retval .ne. nf_noerr) call handle_err(retval)
        retval = nf_def_dim(ncid,"y",NY,y_dimid)
        if (retval .ne. nf_noerr) call handle_err(retval)

        dimids(2) = x_dimid
        dimids(1) = y_dimid

        retval = nf_def_var(ncid,"data",NF_INT,NDIMS,dimids,varid)

        if (retval .ne. nf_noerr) call handle_err(retval)

        retval = nf_enddef(ncid)
        if (retval .ne. nf_noerr) call handle_err(retval)

        retval = nf_put_var_int(ncid,varid,data_out)
        retval = nf_put_var_int(ncid,varid,data_out)
        if (retval .ne. nf_noerr) call handle_err(retval)

        retval = nf_close(ncid)
        if (retval .ne. nf_noerr) call handle_err(retval)

        print *,'*** SUCCESS writing example file simple_xy.nc!'
        end

        subroutine handle_err(errcode)
        implicit none
        include 'netcdf.inc'
        integer errcode

        print *,'Error:',nf_strerror(errcode)
        stop 'STOPPED'
        end

再一次，诚恳求教，可能真的是个简单的问题，但是楼主确实不太会，还请大家能帮忙看一下！这是我第一次发帖，有格式不对的地方请大家见谅，我会赶紧修改的！

singapple

自己顶一下

singapple

在线等待高人指点~~

leavesxxm

我也遇到类似的问题，程序编译成功，但是运行时出现undefined reference to ’XXX‘的报错，如果知道如何解决，楼主可否指点一二