// File: istellartech[P]OpenTsiolkovsky/src/air.cpp
// Function: Air::altitude(double)
Air Air::altitude(double altitude){
    Air air;
    if ( altitude > HAL[0] && altitude < HAL[1] ){
        k = 0;
    } else if ( altitude >= HAL[1] && altitude < HAL[2] ){
        k = 1;
    } else if ( altitude >= HAL[2] && altitude < HAL[3] ){
        k = 2;
    } else if ( altitude >= HAL[3] && altitude < HAL[4] ){
        k = 3;
    } else if ( altitude >= HAL[4] && altitude < HAL[5] ){
        k = 4;
    } else if ( altitude >= HAL[5] && altitude < HAL[6] ){
        k = 5;
    } else if ( altitude >= HAL[6] && altitude < HAL[7] ){
        k = 6;
    } else if ( altitude >= HAL[7]){
        k = 7;
    } else {
        k = 0;
    }

    air.temperature = air.T0[k] + air.LR[k] * (altitude - air.HAL[k]);
    air.airspeed = sqrt(air.temperature * air.gamma * air.R);
    if (air.LR[k] != 0){
        air.pressure = air.P0[k] * pow(((T0[k] + LR[k] *(altitude - air.HAL[k])) / air.T0[k]) ,
                                       (air.g / -air.LR[k] / air.R));
    } else {
        air.pressure = air.P0[k] * exp(air.g / air.R * (air.HAL[k] - altitude) / air.T0[k]);
    }
    air.density = air.pressure / R / air.temperature;
    return air;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
subq $0x40, %rsp
movq %rdi, -0x28(%rbp)
movq %rdi, %rax
movq %rax, -0x20(%rbp)
movq %rsi, -0x8(%rbp)
movsd %xmm0, -0x10(%rbp)
movq -0x8(%rbp), %rax
movq %rax, -0x18(%rbp)
callq 0x8060
movq -0x18(%rbp), %rax
movsd -0x10(%rbp), %xmm0
cvtsi2sdl 0x18(%rax), %xmm1
ucomisd %xmm1, %xmm0
jbe 0x6e14
movq -0x18(%rbp), %rax
movsd -0x10(%rbp), %xmm1
cvtsi2sdl 0x1c(%rax), %xmm0
ucomisd %xmm1, %xmm0
jbe 0x6e14
movq -0x18(%rbp), %rax
movl $0x0, 0xf8(%rax)
jmp 0x6fb0
movq -0x18(%rbp), %rax
movsd -0x10(%rbp), %xmm0
cvtsi2sdl 0x1c(%rax), %xmm1
ucomisd %xmm1, %xmm0
jb 0x6e4f
movq -0x18(%rbp), %rax
movsd -0x10(%rbp), %xmm1
cvtsi2sdl 0x20(%rax), %xmm0
ucomisd %xmm1, %xmm0
jbe 0x6e4f
movq -0x18(%rbp), %rax
movl $0x1, 0xf8(%rax)
jmp 0x6fae
movq -0x18(%rbp), %rax
movsd -0x10(%rbp), %xmm0
cvtsi2sdl 0x20(%rax), %xmm1
ucomisd %xmm1, %xmm0
jb 0x6e8a
movq -0x18(%rbp), %rax
movsd -0x10(%rbp), %xmm1
cvtsi2sdl 0x24(%rax), %xmm0
ucomisd %xmm1, %xmm0
jbe 0x6e8a
movq -0x18(%rbp), %rax
movl $0x2, 0xf8(%rax)
jmp 0x6fac
movq -0x18(%rbp), %rax
movsd -0x10(%rbp), %xmm0
cvtsi2sdl 0x24(%rax), %xmm1
ucomisd %xmm1, %xmm0
jb 0x6ec5
movq -0x18(%rbp), %rax
movsd -0x10(%rbp), %xmm1
cvtsi2sdl 0x28(%rax), %xmm0
ucomisd %xmm1, %xmm0
jbe 0x6ec5
movq -0x18(%rbp), %rax
movl $0x3, 0xf8(%rax)
jmp 0x6faa
movq -0x18(%rbp), %rax
movsd -0x10(%rbp), %xmm0
cvtsi2sdl 0x28(%rax), %xmm1
ucomisd %xmm1, %xmm0
jb 0x6f00
movq -0x18(%rbp), %rax
movsd -0x10(%rbp), %xmm1
cvtsi2sdl 0x2c(%rax), %xmm0
ucomisd %xmm1, %xmm0
jbe 0x6f00
movq -0x18(%rbp), %rax
movl $0x4, 0xf8(%rax)
jmp 0x6fa8
movq -0x18(%rbp), %rax
movsd -0x10(%rbp), %xmm0
cvtsi2sdl 0x2c(%rax), %xmm1
ucomisd %xmm1, %xmm0
jb 0x6f38
movq -0x18(%rbp), %rax
movsd -0x10(%rbp), %xmm1
cvtsi2sdl 0x30(%rax), %xmm0
ucomisd %xmm1, %xmm0
jbe 0x6f38
movq -0x18(%rbp), %rax
movl $0x5, 0xf8(%rax)
jmp 0x6fa6
movq -0x18(%rbp), %rax
movsd -0x10(%rbp), %xmm0
cvtsi2sdl 0x30(%rax), %xmm1
ucomisd %xmm1, %xmm0
jb 0x6f70
movq -0x18(%rbp), %rax
movsd -0x10(%rbp), %xmm1
cvtsi2sdl 0x34(%rax), %xmm0
ucomisd %xmm1, %xmm0
jbe 0x6f70
movq -0x18(%rbp), %rax
movl $0x6, 0xf8(%rax)
jmp 0x6fa4
movq -0x18(%rbp), %rax
movsd -0x10(%rbp), %xmm0
cvtsi2sdl 0x34(%rax), %xmm1
ucomisd %xmm1, %xmm0
jb 0x6f94
movq -0x18(%rbp), %rax
movl $0x7, 0xf8(%rax)
jmp 0x6fa2
movq -0x18(%rbp), %rax
movl $0x0, 0xf8(%rax)
jmp 0x6fa4
jmp 0x6fa6
jmp 0x6fa8
jmp 0x6faa
jmp 0x6fac
jmp 0x6fae
jmp 0x6fb0
movq -0x28(%rbp), %rax
movq -0x18(%rbp), %rcx
movslq 0xf8(%rcx), %rdx
movsd 0x78(%rax,%rdx,8), %xmm1
movslq 0xf8(%rcx), %rdx
movsd 0x38(%rax,%rdx,8), %xmm0
movsd -0x10(%rbp), %xmm2
movslq 0xf8(%rcx), %rcx
cvtsi2sdl 0x18(%rax,%rcx,4), %xmm3
subsd %xmm3, %xmm2
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movsd %xmm0, 0x100(%rax)
movsd 0x100(%rax), %xmm0
mulsd 0x8(%rax), %xmm0
mulsd 0x10(%rax), %xmm0
callq 0x6390
movq -0x18(%rbp), %rcx
movq -0x28(%rbp), %rax
movsd %xmm0, 0x108(%rax)
movslq 0xf8(%rcx), %rcx
movsd 0x38(%rax,%rcx,8), %xmm0
xorps %xmm1, %xmm1
ucomisd %xmm1, %xmm0
jne 0x703c
jp 0x703c
jmp 0x70ee
movq -0x28(%rbp), %rax
movq -0x18(%rbp), %rcx
movslq 0xf8(%rcx), %rdx
movsd 0xb8(%rax,%rdx,8), %xmm0
movsd %xmm0, -0x30(%rbp)
movslq 0xf8(%rcx), %rdx
movsd 0x78(%rcx,%rdx,8), %xmm1
movslq 0xf8(%rcx), %rdx
movsd 0x38(%rcx,%rdx,8), %xmm0
movsd -0x10(%rbp), %xmm2
movslq 0xf8(%rcx), %rdx
cvtsi2sdl 0x18(%rax,%rdx,4), %xmm3
subsd %xmm3, %xmm2
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movslq 0xf8(%rcx), %rdx
divsd 0x78(%rax,%rdx,8), %xmm0
movsd (%rax), %xmm1
movslq 0xf8(%rcx), %rcx
movsd 0x38(%rax,%rcx,8), %xmm2
movq %xmm2, %rcx
movabsq $-0x8000000000000000, %rdx # imm = 0x8000000000000000
xorq %rdx, %rcx
movq %rcx, %xmm2
divsd %xmm2, %xmm1
divsd 0x10(%rax), %xmm1
callq 0x6790
movq -0x28(%rbp), %rax
movaps %xmm0, %xmm1
movsd -0x30(%rbp), %xmm0
mulsd %xmm1, %xmm0
movsd %xmm0, 0x110(%rax)
jmp 0x7154
movq -0x28(%rbp), %rax
movq -0x18(%rbp), %rcx
movslq 0xf8(%rcx), %rdx
movsd 0xb8(%rax,%rdx,8), %xmm0
movsd %xmm0, -0x38(%rbp)
movsd (%rax), %xmm0
divsd 0x10(%rax), %xmm0
movslq 0xf8(%rcx), %rdx
cvtsi2sdl 0x18(%rax,%rdx,4), %xmm1
subsd -0x10(%rbp), %xmm1
mulsd %xmm1, %xmm0
movslq 0xf8(%rcx), %rcx
divsd 0x78(%rax,%rcx,8), %xmm0
callq 0x67d0
movq -0x28(%rbp), %rax
movaps %xmm0, %xmm1
movsd -0x38(%rbp), %xmm0
mulsd %xmm1, %xmm0
movsd %xmm0, 0x110(%rax)
movq -0x20(%rbp), %rax
movq -0x28(%rbp), %rcx
movq -0x18(%rbp), %rdx
movsd 0x110(%rcx), %xmm0
divsd 0x10(%rdx), %xmm0
divsd 0x100(%rcx), %xmm0
movsd %xmm0, 0x118(%rcx)
addq $0x40, %rsp
popq %rbp
retq
nopw %cs:(%rax,%rax)