[gradsusr] Coding Error

[JP Kalb]

Hi there,I am still having trouble with my code."open NAM12Ztest.ctl""set display color white""clear""set mpdset hires""set grads off""set lev 925"* t=1*while (t <= 2)'set t 1''query dim'diminfo=result'run rgbset.gs' 'set lat 36 39' 'set lon -125 -120''set clevs 0 0.125 0.25 0.375 0.5 0.625 0.75 0.875 1.0''set ccols 0 4 13 3 10 7 12 8 2''set gxout shaded''define lcl=((TMP2m-DPT2m)*400)''d lcl''define tc=(TMPprs-273.15)''define es=(6.11*exp((17.625*tc)/(tc+243.05)))''define e=(es*RHprs/100)''define wr=(622*e/(925-e))''define ht=(HGTprs*3.28)''define expo=(exp((2257*wr)/(1004*TMPprs)))''define numer=(-2.06327*TMPprs/(6516.77)))''define denom=(pow((RHprs/100),0.46))''define dthetae=(expo*numer/denom)''define b=((-6.67*dthetae-0.667)*(-0.1*VVELprs))''define c=(0*b)''d b'say ' here'While (ht <= lcl)        b=0Endwhilesay ' here'*       if (VVELprs >= 0)*       return (c)*       endif'set grads off'
"printim testing12Zcloud2.png png"* "printim testing12Zcloud.png png"
* t=t+1*endwhile*'clear''quit'
~~Any suggestions for my if loop. JP Kalb
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://gradsusr.org/pipermail/gradsusr/attachments/20160302/b9eb485e/attachment.html