Re: problem of WRAPIT

Hi,

The root of this error is that you declare the types of your two
embedded functions as:

        FUNCTION TONPSADIABAT(THTE,PRS,...
         DOUBLE PRECISION TONPSADIABAT
...

        FUNCTION VIRTUAL(TEMP,RATMIX)
        DOUBLE PRECISION VIRTUAL
...

While this is legitimate fortran code, its causing an error in the
WRAPIT parsing code. Try declaring the types of the functions with one
statement, as:

        DOUBLE PRECISION FUNCTION TONPSADIABAT(THTE,PRS,...
...
        DOUBLE PRECISION FUNCTION VIRTUAL(TEMP,RATMIX)

Rick

On Jan 25, 2010, at 3:12 AM, Yuhua Yang wrote:

> Hi,
>
> When I WRAPIT the attachment file(rip_cape.f) which coming from
> Mary, I got the following problem:
> ______________________________________________________
> WRAPIT rip_cape.f
>
> WRAPIT Version: 090115
> A syntax error occurred while parsing: TONPSADIABAT
> COMPILING rip_cape.f
> LINKING
> END WRAPIT
> ________________________________________________________
>
> The rip_cape.so file is created, but when I try to call the
> routine by my NCL script , I get the warning:
> Could not find Init() in external file ./rip_cape.so, file not
> loaded .
>
> the enviroment of my machine is linux,64-bit.
>
> Could you give me some hint to solve this problem? Thanks very much!
>
> Yuhua
>
>
> <rip_cape.f>
> _______________________________________________
> ncl-talk mailing list
> List instructions, subscriber options, unsubscribe:
> http://mailman.ucar.edu/mailman/listinfo/ncl-talk

_______________________________________________
ncl-talk mailing list
List instructions, subscriber options, unsubscribe:
http://mailman.ucar.edu/mailman/listinfo/ncl-talk
Received on Mon Jan 25 09:44:04 2010