[ncl-talk] Convective Temp Calculation

[Dennis Shea]

 but  betHello,

At:   https://www.ncl.ucar.edu/Document/Manuals/

Please read section 7 of the Mini-Language manual
===
A more detailed description s at:
  https://www.ncl.ucar.edu/Document/Manuals/Ref_Manual/NclExtend.shtml
===
Also of interest: The DKRZ has created two NCL tutorials that may be of
interest.
These are much broader.
===

That said .....
[1]
You have a f77 subroutine [ test.f ].  I do not see the required delimeters

C NCLFORTSTART
...
C NCLEND

These indicate to NCL's f77 parser what information is being passed
back-and-forth between two separate languages.
That is why your code gets the 'A syntax error occurred while parsing:"
message,

[2]
To use 'external' code (f77, f90, C, C++) you must indicate that via

  external TEST "./,,,so"   ; the shared object

You did not do this.

[3]
Included in your argument passing, you have
   flminsou,frmaxsou,fbminsou,ftmaxsou
Are these used? NCL does not care but if they are not used, but why are you
passing them?

[4]
You want 'conv_temp' but you are not passing it back to NCL for plotting.
In your NCL script ....


external CONV  "./test.so"

ctemp = 0.0        ; create a 'space' for the returned temperature
CONV:: sndganalncl(nlevs,t,p,r,u,v,ctemp)

[5]
I have done some mods for your f77 code. That should get you started.

   WRAPIT test.f





On Sun, Mar 22, 2015 at 8:43 PM, Brandon Sullivan <btsullivan91 at gmail.com>
wrote:

> Hello all,
>
>
>
> I am trying to use “sstats.f” that I found here -
> http://www.ncl.ucar.edu/Support/talk_archives/2010/att-2526/sstats.f
>
>
> I pulled out the code I want and made test.f (attached)
>
>
>
> I am trying to use the convective temperature function from there and plot
> it on my soundings (testsounding.ncl)
>
>
>
> I try to run WRAPIT and it says this
>
>
>
> “root at ubuntu:/home/Soundings/Extra# WRAPIT test.f
>
>
>
> WRAPIT Version: 120209
>
> A syntax error occurred while parsing:
>
> COMPILING test.f
>
> LINKING
>
> END WRAPIT”
>
>
>
> Then, when running my sounding script it says
>
>
>
> Copyright (C) 1995-2015 - All Rights Reserved
>
> University Corporation for Atmospheric Research
>
> NCAR Command Language Version 6.3.0
>
> The use of this software is governed by a License Agreement.
>
> See http://www.ncl.ucar.edu/ for more details.
>
> warning:An error occurred loading the external file
> /home/Soundings/Extra/test.so, file not loaded
>
> /home/Soundings/Extra/test.so: undefined symbol: theta_wetb_
>
> warning:error at line 50 in file testsounding.ncl
>
>
>
> Am I going about this wrong? Is there something in the code I am missing?
> I have also tried –m64 when running WRAPIT.. Thanks so much in advance!
>
>
>
> Brandon
>
>
>
> _______________________________________________
> ncl-talk mailing list
> List instructions, subscriber options, unsubscribe:
> http://mailman.ucar.edu/mailman/listinfo/ncl-talk
>
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://mailman.ucar.edu/pipermail/ncl-talk/attachments/20150323/9f9067d7/attachment.html 
-------------- next part --------------
A non-text attachment was scrubbed...
Name: test.f
Type: application/octet-stream
Size: 7223 bytes
Desc: not available
Url : http://mailman.ucar.edu/pipermail/ncl-talk/attachments/20150323/9f9067d7/attachment.obj