Code: Alles auswählen
g = 9.80665;
R = 287.05;
// Function provided by SFDRS Meteo Rechner
sp1 := fDruck / Exp( (-g * fHoehe) / ((fTemp + 0.003 * fHoehe + 273.15) * R) );
// Quelle: http://keisan.casio.com/exec/system/1224575267
sp2 := fDruck * Power(1.0 - ((0.0065 * fHoehe) / (fTemp + (0.0065 * fHoehe) + 273.15)), -5.257);
// Quelle: https://de.wikipedia.org/wiki/Barometrische_H%C3%B6henformel#Reduktion_auf_Meeresh.C3.B6he
sp3 := fDruck * Exp((g / (R * ((fTemp + 273.15) + (0.12 * fMixingRatio) + (0.0065 * (fHoehe / 2.0))))) * fHoehe);
06610 LSMP Payerne Observations at 12Z 02 Jun 1999
-----------------------------------------------------------------------------
PRES HGHT TEMP DWPT RELH MIXR DRCT SKNT THTA THTE THTV
hPa m C C % g/kg deg knot K K K
-----------------------------------------------------------------------------
1000.0 100
957.0 491 25.0 19.0 69 14.67 45 2 301.9 345.4 304.6
2m Temperatur = 25.0 °C (= fTemp)
Luftdruck = 957 hPa (= fDruck)
Stationshöhe = 491 m (= fHoehe)
Mixing Ratio = 14.601 g/kg (= fMixingRatio) (berechnet)
Gibt die Ergebnisse:
sp1 = 1012.1055
sp2 = 1012.094
sp3 = 1011.753
Gruss
Bernhard