请问这个水汽通量散度gs有无问题，谢谢！请问这个水汽通量散度gs有无问题，谢谢！

积极歪歪

'define ea=RHprs*pow(10,(0.7859+0.03477*(TMPprs-273.15))/(1.0+0.00412*(TMPprs-273.15)+2))' 'define qa=0.662*ea/(lev-0.378*ea)*1000'
'd hdivg(100*ugrdprs*qa/980.665,100*vgrdprs*qa/980.665)*1000000'
'cbar.gs'
'define uq=ugrdprs*qa'
'define vq=vgrdprs*qa'
'define fuq=vint(pressfc,uq,300)'
'define fvq=vint(pressfc,vq,300)'
'set gxout barb'
'd skip(fuq*10,200,200);fvq*10'
'draw string 2.0 0.25 Time='tt'(min)'
'enable print d:\datafiles\sqtlsd1000.met'


请问这个水汽通量散度gs有无问题，谢谢！