用f语句把辐散的值赋为0 为什么不起作用

wujing0512

老师们好，我想用if语句把辐散的值赋为0，用了不起作用。请高手看看要怎么弄，谢谢！以下是我这部分的gs
'set lon 90 120'
'set lat 20 30'

'set gxout grid'
'set dignum 1'

'set lev 500'
'define div5=hdivg(UGRDprs.2,VGRDprs.2)*1e5'

if(div5>=0.0)
div5=0.0'
*'define div5=div5-div5'
endif


'set lev 850'
'define div8=hdivg(UGRDprs.2,VGRDprs.2)*1e5'
'define divz=div8+div5'

'd div5'

*'d div8'
*'d divz'

鳗鱼宝

我也碰到同样的问题，想着只能读出来用Fortran解决了。if在grads里好像不起作用，不方便，还是哪里没搞对