Re: WRAPIT

Mingxuan,

I am unable to duplicate this on my MacOSX 10.8.2 system -- it runs to completion and the results are as expected. I'm showing the same version for WRAPIT, and while I have a development branch of ncl, it should be essentially 6.1.2. The underlying fortran compiler is gfortran 4.7.2 (??)

Rick

On Mar 12, 2013, at 3:11 PM, Mingxuan Chen <chen@atmos.colostate.edu> wrote:

> Hello,
> when I use ex.f and ex.ncl in my Mac (OS X version 10.8.2) and ncl 6.1.0 0r ncl 6.1.2
> the results show a strange error .
> However I run the same code in another machine carver(IBM iDataPlex system), no problem at tall.
> What is wrong?
> Thanks for your help.
> Mingxuan
>
> ----------------------------------------------
> fjord 11:14 /Users/chen/CMIP5> WRAPIT -m64 ex.f
>
> WRAPIT Version: 120209
> COMPILING ex.f
> LINKING
> END WRAPIT
> fjord 11:18 /Users/chen/CMIP5> ncl ex.ncl
> Copyright (C) 1995-2013 - All Rights Reserved
> University Corporation for Atmospheric Research
> NCAR Command Language Version 6.1.2
> The use of this software is governed by a License Agreement.
> See http://www.ncl.ucar.edu/ for more details.
> (0) before i = 5
> (0) before x = 1.3
> 10
> ???
> At line 10 of file ex.f (unit = 6, file = 'stdout')
> Fortran runtime error: Expected REAL for item 2 in formatted transfer, got CHARACTER
> (F10.2)
> ^
> --------------------------------
> ---------------ex.f---------------
> C NCLFORTSTART
> SUBROUTINE EX (II,XX)
> INTEGER II
> REAL XX
> C NCLEND
> II = II + 5
> XX = XX - 12.345
> print *,II
> print *,XX
> write(6,20)XX
> 20 Format(F10.2)
> RETURN
> END
> -----------------------
>
>
> ---------ex.ncl--------
> external EX "./ex.so"
>
> begin
> i = 5
> x = 1.3
> print("before i = " + i)
> print("before x = " + x)
> EX:: ex(i,x)
> print("after i = " + i)
> print("after x = " + x)
> end
> --------------------------------
>
>
> _______________________________________________
> 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 Tue Mar 12 14:48:40 2013