GRIB conversion

Daniel Fritz prodicalboxer at YAHOO.COM
Tue Oct 16 12:53:41 EDT 2007


Hello All,
      I have coverted my grib file to ctl file, however there is one problem,  the index file is not generating......here is what I type and what was responded:

             grib2ctl.pl Y48659* > Y48659*.ctl      : (everything was fine until I type the next line)
             gribmap -i Y48659*.ctl -0
              Error in the grid specification for GRIB grid type 29/30
              Grid scaling must indicate 2 2.5 x 2.5 grid
              Grid size must be 144 x 73
              Grid must go from 0 to 357.5 and -90 to 90

  could someone help me with this if I can get the index file to generate Grads will do the rest......
                                              thanks
                                                 DANNY

Jennifer Adams <jma at COLA.IGES.ORG> wrote:
  I use this script instead of 'draw title'.


* title.gs
*
* This is an alternative to the 'draw title' command in GrADS.
* Font characteristics are controlled by five script variables:
* height, width, color, thickness, and font number.
* The sole argument is a string of any length which may
* contain backslashes ("\") to indicate carriage returns.
* Written by Jennifer M. Adams, January 2007
*
function title (arg)
* Set the text characteristics
height=0.20
width=0.18
color=1
thickness=1
fnum=0

* Check for backslashes
nbreaks=0
len=math_strlen(arg)
i=1
while (i<=len)
char=substr(arg,i,1)
if (char = '\')
nbreaks=nbreaks+1
break.nbreaks = i
endif
i=i+1
endwhile

* Figure out where the title will go
'q gxinfo'
xlims=sublin(result,3)
ylims=sublin(result,4)
ytop=subwrd(ylims,6)
xleft=subwrd(xlims,4)
xright=subwrd(xlims,6)
xmid=xleft+(xright-xleft)/2

* Set up the string characteristics
'set string 'color' bc 'thickness
'set strsiz 'width' 'height

* Draw the title
if (nbreaks)
arg.1 = substr(arg,1,break.1-1)
if (nbreaks=1)
arg.2 = substr(arg,break.1+1,len-break.1);* two lines
nargs=2
else
i=2
while (i<=nbreaks)
s=i-1
start = break.s
start = start+1
e=i
end = break.e
length = end-start
arg.i = substr(arg,start,length)
i=i+1
endwhile
start = break.nbreaks
start = start+1
length = len-start+1
nargs=nbreaks+1
arg.nargs = substr(arg,start,length)
endif

i=1
while (i<=nargs)
'draw string 'xmid' 'ytop+(height)+((nargs-i)*(1.5*height))'
`'fnum''arg.i
i=i+1
endwhile

else
'draw string 'xmid' 'ytop+height' `'fnum''arg
endif



---------------------------------
Moody friends. Drama queens. Your life? Nope! - their life, your story.
 Play Sims Stories at Yahoo! Games.
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://gradsusr.org/pipermail/gradsusr/attachments/20071016/ac695db7/attachment.html 


More information about the gradsusr mailing list