03c916bd-4e46-4761-90df-26ba47e6210b 2 6 9 decimal

&[DATE] &[TIME] - &[FILENAME]

// NASA atmosphere model //pressure in kPa, h in m //temp in Celsius //End of NASA atmosphere

h nasaT h 25000 > 131.21 - .00299 h * + h 11000 > 56.46 - 15.04 .00649 h * - if if :

h nasaP h 25000 > 2.488 h nasaT 273.1 + 216.6 / (11.388 -^(* h 11000 > 22.65 1.73 .000157 h * - exp * 101.29 h nasaT 273.1 + 288.08 / (5.256^(* if if :

h nasaρ h nasaP .2869 h nasaT 273.1 + (* / :

h nasaM1 330 273.1 h nasaT + 273.1 / sqrt * :

//speed of sound at altitude h in m/s

i 1 : i 201 < i i 1 + : M i 1 el i 1 - : M i 2 el i 1 - (1000 * nasaM1 : 21 line for

i 1 : i 201 < i i 1 + : rho i 1 el i 1 - : rho i 2 el 1 i 1 - (1000 * nasaρ * : 21 line for

M rho

i 1 : i 201 < i i 1 + : P i 1 el i 1 - : P i 2 el i 1 - (1000 * nasaP 101.325 / : 21 line for

i 1 : i 201 < i i 1 + : T i 1 el i 1 - : T i 2 el i 1 - (1000 * nasaT : 21 line for

P T