ik bereken het alzo zonder noemenswaardige afwijkingen:
'set lev 850'
'define dewp850=(tmpprs-273.15)-((14.55+0.114*(tmpprs-273.15))*(1-0.01*rhprs)+pow((2.5+0.007*(tmpprs-273.15))*(1-0.01*rhprs),3)+(15.9+0.117*(tmpprs-273.15))*pow((1-0.01*rhprs),14))'
'define es850 = 0.6112*exp((17.67*(tmpprs-273.15))/((tmpprs-273.15)+243.5))'
'define e850=((es850*rhprs)/100)*10'
'define w850 = (0.622*e850)/(850-e850))'
'define te850 = (tmpprs)+((2800000*w850)/1004)'
'define ept850 = (te850*(pow((1000/850),(287/1004))))-273.16'
Quote selectie