Re: WRAPIT with LAPACK

> I am trying to wrap a f90 subroutine that calls lapack library.
> The WRAPIT part compiles very well, but when I run the ncl script, I got the
> error:
>
>> ncl
> Copyright (C) 1995-2004 - All Rights Reserved
> University Corporation for Atmospheric Research
> NCAR Command Language Version 4.2.0.a032
> The use of this software is governed by a License Agreement.
> See http://ngwww.ucar.edu/ncl/ for more details.
> ncl 0> external eof "./eof_scalar.so"
> warning:An error occurred loading the external file ./eof_scalar.so, file
> not loaded
> rtld: 0712-001 Symbol @sgemv was referenced
> from module ./eof_scalar.so(), but a runtime definition
> of the symbol was not found.
> rtld: 0712-002 fatal error: exiting.
> ncl 1>
>
>
> Here is
> 1) the link for the f90 subroutine:
> http://www.cgd.ucar.edu/cas/software/eof_scalar.html
>
> 2) the WRAPPER:
> C NCLFORTSTART
> SUBROUTINE eof_scalar( ucM, ucN, ucFd, ucE, ucL_N1, ucC )
> INTEGER ucM,ucN
> REAL ucFd(ucM,ucN),ucE(ucM,ucN),ucL_N1(ucN),ucC(ucN,ucN)
> C NCLEND
>
> 3) the compile process
>> WRAPIT -L /usr/common/usg/LAPACK/3.0 -l lapack -l essl eof_scalar.stub
> eof_scalar.f90
>
> WRAPIT Version: 041106
> COMPILING eof_scalar.f90
> ** eof_scalar === End of Compilation 1 ===
> 1501-510 Compilation successful for file eof_scalar.f90.
> LINKING
> END WRAPIT
>
>
> I am running AIX with the compile xlf90
> When I try to locate @sgemv, here is what I get:
>
>> grep @sgemv *
> eof_scalar.so:NhlPError
> eof_scalar.so:?
>
=============================================================

[1] I can not get to an AIX compiler right now.
     However, the message

      rtld: 0712-001 Symbol @sgemv was referenced
            from module ./eof_scalar.so(), but a runtime definition
            of the symbol was not found.

     indicates that you have not loaded all the required libraries.

[2] Is there a reason you are not using NCL's EOF routines?

     http://www.ncl.ucar.edu/Document/Functions/Built-in/eofunc.shtml
     http://www.ncl.ucar.edu/Document/Functions/Built-in/eofunc_ts.shtml

good luck
_______________________________________________
ncl-talk mailing list
ncl-talk_at_ucar.edu
http://mailman.ucar.edu/mailman/listinfo/ncl-talk
Received on Sat Oct 07 2006 - 12:35:44 MDT