LLM4Binary/decompile-bench-makefile huggingface dataset:
// File: /workspace/github_c_makefile_star2_O2/stetre[P]moonglmath/src/vec.c
// Function: moonglmath_vec_cross
void vec_cross(vec_t dst, vec_t v1, vec_t v2)
/* dst is always to be regarded as a size=3 vector */
    {
    dst[0] = v1[1]*v2[2] - v1[2]*v2[1];
    dst[1] = v1[2]*v2[0] - v1[0]*v2[2];
    dst[2] = v1[0]*v2[1] - v1[1]*v2[0];
    dst[3] = 0;
    }

// Assembly:
movsd 0x8(%rdx), %xmm0
mulsd 0x10(%rsi), %xmm0
movsd 0x8(%rsi), %xmm1
mulsd 0x10(%rdx), %xmm1
subsd %xmm0, %xmm1
movsd %xmm1, (%rdi)
movsd 0x10(%rdx), %xmm0
mulsd (%rsi), %xmm0
movsd 0x10(%rsi), %xmm1
mulsd (%rdx), %xmm1
subsd %xmm0, %xmm1
movsd %xmm1, 0x8(%rdi)
movsd (%rdx), %xmm0
mulsd 0x8(%rsi), %xmm0
movsd (%rsi), %xmm1
mulsd 0x8(%rdx), %xmm1
subsd %xmm0, %xmm1
movsd %xmm1, 0x10(%rdi)
andq $0x0, 0x18(%rdi)
retq
// File: /workspace/github_c_makefile_star2_O2/stetre[P]moonglmath/src/vec.c
// Function: moonglmath_vec_Norm
int vec_Norm(lua_State *L)
    {
    vec_t v;
    size_t size, i;
    double r = 0;
    checkvec(L, 1, v, &size, NULL);
    for(i=0; i < size; i++) 
        r += v[i]*v[i];
    lua_pushnumber(L, sqrt(r));
    return 1;
    }

// Assembly:
pushq %r15
pushq %r14
pushq %rbx
subq $0x30, %rsp
movq %rdi, %rbx
xorl %r15d, %r15d
pushq $0x1
popq %rsi
leaq 0x10(%rsp), %rdx
leaq 0x8(%rsp), %r14
movq %r14, %rcx
xorl %r8d, %r8d
callq 0x86d0
xorpd %xmm0, %xmm0
movq (%r14), %rax
cmpq %r15, %rax
je 0x141d6
movsd 0x10(%rsp,%r15,8), %xmm1
mulsd %xmm1, %xmm1
addsd %xmm1, %xmm0
incq %r15
jmp 0x141bd
xorpd %xmm1, %xmm1
ucomisd %xmm1, %xmm0
jb 0x141e6
sqrtsd %xmm0, %xmm0
jmp 0x141eb
callq 0x8d80
movq %rbx, %rdi
callq 0x8840
pushq $0x1
popq %rax
addq $0x30, %rsp
popq %rbx
popq %r14
popq %r15
retq
// File: /workspace/github_c_makefile_star2_O2/stetre[P]moonglmath/src/vec.c
// Function: moonglmath_vec_Norm2
int vec_Norm2(lua_State *L)
    {
    vec_t v;
    size_t size, i;
    double r = 0;
    checkvec(L, 1, v, &size, NULL);
    for(i=0; i < size; i++)
        r += v[i]*v[i];
    lua_pushnumber(L, r);
    return 1;
    }

// Assembly:
pushq %r15
pushq %r14
pushq %rbx
subq $0x30, %rsp
movq %rdi, %rbx
xorl %r15d, %r15d
pushq $0x1
popq %rsi
leaq 0x10(%rsp), %rdx
leaq 0x8(%rsp), %r14
movq %r14, %rcx
xorl %r8d, %r8d
callq 0x86d0
xorpd %xmm0, %xmm0
movq (%r14), %rax
cmpq %r15, %rax
je 0x14247
movsd 0x10(%rsp,%r15,8), %xmm1
mulsd %xmm1, %xmm1
addsd %xmm1, %xmm0
incq %r15
jmp 0x1422e
movq %rbx, %rdi
callq 0x8840
pushq $0x1
popq %rax
addq $0x30, %rsp
popq %rbx
popq %r14
popq %r15
retq
// File: /workspace/github_c_makefile_star2_O2/stetre[P]moonglmath/src/vec.c
// Function: moonglmath_vec_Clamp
int vec_Clamp(lua_State *L)
    {
    vec_t dst, v, minv, maxv;
    size_t size, size1;
    unsigned int isrow, isrow1;
    checkvec(L, 1, v, &size, &isrow);
    checkvec(L, 2, minv, &size1, &isrow1);
    if(size1 != size || isrow1 != isrow)
        return luaL_error(L, OPERANDS_ERROR);
    checkvec(L, 3, maxv, &size1, &isrow1);
    if(size1 != size || isrow1 != isrow)
        return luaL_error(L, OPERANDS_ERROR);
    vec_clamp(dst, v, minv, maxv, size);
    return pushvec(L, dst, size, size, isrow);
    }

// Assembly:
pushq %r15
pushq %r14
pushq %rbx
subq $0xa0, %rsp
movq %rdi, %rbx
pushq $0x1
popq %rsi
leaq 0x60(%rsp), %rdx
leaq 0x10(%rsp), %r14
leaq 0xc(%rsp), %r8
movq %r14, %rcx
callq 0x86d0
pushq $0x2
popq %rsi
leaq 0x40(%rsp), %rdx
leaq 0x18(%rsp), %r15
leaq 0x8(%rsp), %r8
movq %rbx, %rdi
movq %r15, %rcx
callq 0x86d0
movq (%r15), %rax
cmpq (%r14), %rax
jne 0x143cf
movl 0x8(%rsp), %eax
cmpl 0xc(%rsp), %eax
jne 0x143cf
pushq $0x3
popq %rsi
leaq 0x20(%rsp), %rdx
leaq 0x18(%rsp), %r14
leaq 0x8(%rsp), %r8
movq %rbx, %rdi
movq %r14, %rcx
callq 0x86d0
movq (%r14), %r8
cmpq 0x10(%rsp), %r8
jne 0x143f9
movl 0x8(%rsp), %eax
cmpl 0xc(%rsp), %eax
jne 0x143f9
leaq 0x80(%rsp), %r14
leaq 0x60(%rsp), %rsi
leaq 0x40(%rsp), %rdx
leaq 0x20(%rsp), %rcx
movq %r14, %rdi
callq 0x8510
movq 0x10(%rsp), %rcx
movl 0xc(%rsp), %r8d
movq %rbx, %rdi
movq %r14, %rsi
movq %rcx, %rdx
callq 0x8310
jmp 0x143ec
leaq 0x222a(%rip), %rsi      # 0x16600
leaq 0x26e3(%rip), %rdx      # 0x16ac0
movq %rbx, %rdi
movl $0x234, %ecx            # imm = 0x234
xorl %eax, %eax
callq 0x8b00
addq $0xa0, %rsp
popq %rbx
popq %r14
popq %r15
retq
leaq 0x2200(%rip), %rsi      # 0x16600
leaq 0x26b9(%rip), %rdx      # 0x16ac0
movq %rbx, %rdi
movl $0x237, %ecx            # imm = 0x237
jmp 0x143e5
// File: /workspace/github_c_makefile_star2_O2/stetre[P]moonglmath/src/vec.c
// Function: moonglmath_vec_Mix
int vec_Mix(lua_State *L)
    {
    vec_t dst, v1, v2;
    double k;
    size_t size, size1;
    unsigned int isrow, isrow1;
    checkvec(L, 1, v1, &size, &isrow);
    checkvec(L, 2, v2, &size1, &isrow1);
    if(size1 != size || isrow1 != isrow)
        return luaL_error(L, OPERANDS_ERROR);
    k = luaL_checknumber(L, 3);
    vec_mix(dst, v1, v2, size, k);
    return pushvec(L, dst, size, size, isrow);
    }

// Assembly:
pushq %r15
pushq %r14
pushq %rbx
subq $0x80, %rsp
movq %rdi, %rbx
pushq $0x1
popq %rsi
leaq 0x40(%rsp), %rdx
leaq 0x10(%rsp), %r14
leaq 0x8(%rsp), %r8
movq %r14, %rcx
callq 0x86d0
pushq $0x2
popq %rsi
leaq 0x20(%rsp), %rdx
leaq 0x18(%rsp), %r15
leaq 0xc(%rsp), %r8
movq %rbx, %rdi
movq %r15, %rcx
callq 0x86d0
movq (%r15), %rax
cmpq (%r14), %rax
jne 0x144aa
movl 0xc(%rsp), %eax
cmpl 0x8(%rsp), %eax
jne 0x144aa
pushq $0x3
popq %rsi
movq %rbx, %rdi
callq 0x8350
movq 0x10(%rsp), %rcx
leaq 0x60(%rsp), %r14
leaq 0x40(%rsp), %rsi
leaq 0x20(%rsp), %rdx
movq %r14, %rdi
callq 0x8230
movq 0x10(%rsp), %rcx
movl 0x8(%rsp), %r8d
movq %rbx, %rdi
movq %r14, %rsi
movq %rcx, %rdx
callq 0x8310
jmp 0x144c7
leaq 0x214f(%rip), %rsi      # 0x16600
leaq 0x2608(%rip), %rdx      # 0x16ac0
movq %rbx, %rdi
movl $0x245, %ecx            # imm = 0x245
xorl %eax, %eax
callq 0x8b00
addq $0x80, %rsp
popq %rbx
popq %r14
popq %r15
retq
// File: /workspace/github_c_makefile_star2_O2/stetre[P]moonglmath/src/vec.c
// Function: moonglmath_vec_Step
int vec_Step(lua_State *L)
    {
    vec_t dst, v1, edge;
    double k;
    size_t size, size1;
    unsigned int isrow, isrow1;
    checkvec(L, 1, v1, &size, &isrow);
    if(lua_isnumber(L, 2))
        {
        k = lua_tonumber(L, 2);
        edge[0]=edge[1]=edge[2]=edge[3]=k;
        }
    else
        {
        checkvec(L, 2, edge, &size1, &isrow1);
        if(size1 != size || isrow1 != isrow)
            return luaL_error(L, OPERANDS_ERROR);
        }
    vec_step(dst, v1, edge, size);
    return pushvec(L, dst, size, size, isrow);
    }

// Assembly:
pushq %r14
pushq %rbx
subq $0x98, %rsp
movq %rdi, %rbx
pushq $0x1
popq %rsi
leaq 0x50(%rsp), %rdx
leaq 0x10(%rsp), %rcx
leaq 0xc(%rsp), %r8
callq 0x86d0
pushq $0x2
popq %rsi
movq %rbx, %rdi
callq 0x85a0
pushq $0x2
popq %rsi
testl %eax, %eax
je 0x14557
movq %rbx, %rdi
xorl %edx, %edx
callq 0x8680
movlhps %xmm0, %xmm0            # xmm0 = xmm0[0,0]
movaps %xmm0, 0x30(%rsp)
movaps %xmm0, 0x20(%rsp)
movq 0x10(%rsp), %rcx
leaq 0x70(%rsp), %r14
leaq 0x50(%rsp), %rsi
leaq 0x20(%rsp), %rdx
movq %r14, %rdi
callq 0x8b60
movq 0x10(%rsp), %rcx
movl 0xc(%rsp), %r8d
movq %rbx, %rdi
movq %r14, %rsi
movq %rcx, %rdx
callq 0x8310
jmp 0x145a2
leaq 0x20(%rsp), %rdx
leaq 0x48(%rsp), %r14
leaq 0x1c(%rsp), %r8
movq %rbx, %rdi
movq %r14, %rcx
callq 0x86d0
movq (%r14), %rcx
cmpq 0x10(%rsp), %rcx
jne 0x14585
movl 0x1c(%rsp), %eax
cmpl 0xc(%rsp), %eax
je 0x14526
leaq 0x2074(%rip), %rsi      # 0x16600
leaq 0x252d(%rip), %rdx      # 0x16ac0
movq %rbx, %rdi
movl $0x25b, %ecx            # imm = 0x25B
xorl %eax, %eax
callq 0x8b00
addq $0x98, %rsp
popq %rbx
popq %r14
retq
// File: /workspace/github_c_makefile_star2_O2/stetre[P]moonglmath/src/vec.c
// Function: moonglmath_vec_Smoothstep
int vec_Smoothstep(lua_State *L)
    {
    vec_t dst, v, edge0, edge1;
    double k;
    size_t size, size1;
    unsigned int isrow, isrow1;
    checkvec(L, 1, v, &size, &isrow);
    if(lua_isnumber(L, 2))
        {
        k = lua_tonumber(L, 2);
        edge0[0]=edge0[1]=edge0[2]=edge0[3]=k;
        }
    else
        {
        checkvec(L, 2, edge0, &size1, &isrow1);
        if(size1 != size || isrow1 != isrow)
            return luaL_error(L, OPERANDS_ERROR);
        }
    if(lua_isnumber(L, 3))
        {
        k = lua_tonumber(L, 3);
        edge1[0]=edge1[1]=edge1[2]=edge1[3]=k;
        }
    else
        {
        checkvec(L, 3, edge1, &size1, &isrow1);
        if(size1 != size || isrow1 != isrow)
            return luaL_error(L, OPERANDS_ERROR);
        }
    vec_smoothstep(dst, v, edge0, edge1, size);
    return pushvec(L, dst, size, size, isrow);
    }

// Assembly:
pushq %r14
pushq %rbx
subq $0xa8, %rsp
movq %rdi, %rbx
pushq $0x1
popq %rsi
leaq 0x60(%rsp), %rdx
leaq 0x10(%rsp), %rcx
leaq 0xc(%rsp), %r8
callq 0x86d0
pushq $0x2
popq %rsi
movq %rbx, %rdi
callq 0x85a0
pushq $0x2
popq %rsi
testl %eax, %eax
je 0x1466c
movq %rbx, %rdi
xorl %edx, %edx
callq 0x8680
movlhps %xmm0, %xmm0            # xmm0 = xmm0[0,0]
movaps %xmm0, 0x50(%rsp)
movaps %xmm0, 0x40(%rsp)
pushq $0x3
popq %rsi
movq %rbx, %rdi
callq 0x85a0
pushq $0x3
popq %rsi
testl %eax, %eax
je 0x146b6
movq %rbx, %rdi
xorl %edx, %edx
callq 0x8680
movlhps %xmm0, %xmm0            # xmm0 = xmm0[0,0]
movaps %xmm0, 0x30(%rsp)
movaps %xmm0, 0x20(%rsp)
movq 0x10(%rsp), %r8
leaq 0x80(%rsp), %r14
leaq 0x60(%rsp), %rsi
leaq 0x40(%rsp), %rdx
leaq 0x20(%rsp), %rcx
movq %r14, %rdi
callq 0x8690
movq 0x10(%rsp), %rcx
movl 0xc(%rsp), %r8d
movq %rbx, %rdi
movq %r14, %rsi
movq %rcx, %rdx
callq 0x8310
jmp 0x14705
leaq 0x40(%rsp), %rdx
leaq 0x18(%rsp), %r14
leaq 0x8(%rsp), %r8
movq %rbx, %rdi
movq %r14, %rcx
callq 0x86d0
movq (%r14), %rax
cmpq 0x10(%rsp), %rax
jne 0x1469e
movl 0x8(%rsp), %eax
cmpl 0xc(%rsp), %eax
je 0x145fe
leaq 0x1f5b(%rip), %rsi      # 0x16600
leaq 0x2414(%rip), %rdx      # 0x16ac0
movq %rbx, %rdi
movl $0x272, %ecx            # imm = 0x272
jmp 0x146fe
leaq 0x20(%rsp), %rdx
leaq 0x18(%rsp), %r14
leaq 0x8(%rsp), %r8
movq %rbx, %rdi
movq %r14, %rcx
callq 0x86d0
movq (%r14), %r8
cmpq 0x10(%rsp), %r8
jne 0x146e8
movl 0x8(%rsp), %eax
cmpl 0xc(%rsp), %eax
je 0x14630
leaq 0x1f11(%rip), %rsi      # 0x16600
leaq 0x23ca(%rip), %rdx      # 0x16ac0
movq %rbx, %rdi
movl $0x27d, %ecx            # imm = 0x27D
xorl %eax, %eax
callq 0x8b00
addq $0xa8, %rsp
popq %rbx
popq %r14
retq
// File: /workspace/github_c_makefile_star2_O2/stetre[P]moonglmath/src/vec.c
// Function: moonglmath_vec_Fade
int vec_Fade(lua_State *L)
    {
    vec_t dst, v, edge0, edge1;
    double k;
    size_t size, size1;
    unsigned int isrow, isrow1;
    checkvec(L, 1, v, &size, &isrow);
    if(lua_isnumber(L, 2))
        {
        k = lua_tonumber(L, 2);
        edge0[0]=edge0[1]=edge0[2]=edge0[3]=k;
        }
    else
        {
        checkvec(L, 2, edge0, &size1, &isrow1);
        if(size1 != size || isrow1 != isrow)
            return luaL_error(L, OPERANDS_ERROR);
        }
    if(lua_isnumber(L, 3))
        {
        k = lua_tonumber(L, 3);
        edge1[0]=edge1[1]=edge1[2]=edge1[3]=k;
        }
    else
        {
        checkvec(L, 3, edge1, &size1, &isrow1);
        if(size1 != size || isrow1 != isrow)
            return luaL_error(L, OPERANDS_ERROR);
        }
    vec_fade(dst, v, edge0, edge1, size);
    return pushvec(L, dst, size, size, isrow);
    }

// Assembly:
pushq %r14
pushq %rbx
subq $0xa8, %rsp
movq %rdi, %rbx
pushq $0x1
popq %rsi
leaq 0x60(%rsp), %rdx
leaq 0x10(%rsp), %rcx
leaq 0xc(%rsp), %r8
callq 0x86d0
pushq $0x2
popq %rsi
movq %rbx, %rdi
callq 0x85a0
pushq $0x2
popq %rsi
testl %eax, %eax
je 0x147cf
movq %rbx, %rdi
xorl %edx, %edx
callq 0x8680
movlhps %xmm0, %xmm0            # xmm0 = xmm0[0,0]
movaps %xmm0, 0x50(%rsp)
movaps %xmm0, 0x40(%rsp)
pushq $0x3
popq %rsi
movq %rbx, %rdi
callq 0x85a0
pushq $0x3
popq %rsi
testl %eax, %eax
je 0x14819
movq %rbx, %rdi
xorl %edx, %edx
callq 0x8680
movlhps %xmm0, %xmm0            # xmm0 = xmm0[0,0]
movaps %xmm0, 0x30(%rsp)
movaps %xmm0, 0x20(%rsp)
movq 0x10(%rsp), %r8
leaq 0x80(%rsp), %r14
leaq 0x60(%rsp), %rsi
leaq 0x40(%rsp), %rdx
leaq 0x20(%rsp), %rcx
movq %r14, %rdi
callq 0x8130
movq 0x10(%rsp), %rcx
movl 0xc(%rsp), %r8d
movq %rbx, %rdi
movq %r14, %rsi
movq %rcx, %rdx
callq 0x8310
jmp 0x14868
leaq 0x40(%rsp), %rdx
leaq 0x18(%rsp), %r14
leaq 0x8(%rsp), %r8
movq %rbx, %rdi
movq %r14, %rcx
callq 0x86d0
movq (%r14), %rax
cmpq 0x10(%rsp), %rax
jne 0x14801
movl 0x8(%rsp), %eax
cmpl 0xc(%rsp), %eax
je 0x14761
leaq 0x1df8(%rip), %rsi      # 0x16600
leaq 0x22b1(%rip), %rdx      # 0x16ac0
movq %rbx, %rdi
movl $0x293, %ecx            # imm = 0x293
jmp 0x14861
leaq 0x20(%rsp), %rdx
leaq 0x18(%rsp), %r14
leaq 0x8(%rsp), %r8
movq %rbx, %rdi
movq %r14, %rcx
callq 0x86d0
movq (%r14), %r8
cmpq 0x10(%rsp), %r8
jne 0x1484b
movl 0x8(%rsp), %eax
cmpl 0xc(%rsp), %eax
je 0x14793
leaq 0x1dae(%rip), %rsi      # 0x16600
leaq 0x2267(%rip), %rdx      # 0x16ac0
movq %rbx, %rdi
movl $0x29e, %ecx            # imm = 0x29E
xorl %eax, %eax
callq 0x8b00
addq $0xa8, %rsp
popq %rbx
popq %r14
retq
// File: /workspace/github_c_makefile_star2_O2/stetre[P]moonglmath/src/vec.c
// Function: Concat
static int Concat(lua_State *L)
    {
    vec_t v;
    size_t size;
    unsigned int isrow;
    if(testvec(L, 1, v, &size, &isrow))
        {
        ToString_(L, v, size, isrow);
        lua_pushvalue(L, 2);
        }
    else if(testvec(L, 2, v, &size, &isrow))
        {
        lua_pushvalue(L, 1);
        ToString_(L, v, size, isrow);
        }
    else 
        return unexpected(L);
    lua_concat(L, 2);
    return 1;
    }

// Assembly:
pushq %r14
pushq %rbx
subq $0x38, %rsp
movq %rdi, %r14
pushq $0x1
popq %rbx
leaq 0x10(%rsp), %rdx
leaq 0x8(%rsp), %rcx
leaq 0x4(%rsp), %r8
movl %ebx, %esi
callq 0x8ad0
testl %eax, %eax
je 0x14950
movq 0x8(%rsp), %rdx
movl 0x4(%rsp), %ecx
leaq 0x10(%rsp), %rsi
movq %r14, %rdi
callq 0x14f23
pushq $0x2
popq %rsi
movq %r14, %rdi
callq 0x8650
jmp 0x1498f
pushq $0x2
popq %rsi
leaq 0x10(%rsp), %rdx
leaq 0x8(%rsp), %rcx
leaq 0x4(%rsp), %r8
movq %r14, %rdi
callq 0x8ad0
testl %eax, %eax
je 0x149a4
pushq $0x1
popq %rsi
movq %r14, %rdi
callq 0x8650
movq 0x8(%rsp), %rdx
movl 0x4(%rsp), %ecx
leaq 0x10(%rsp), %rsi
movq %r14, %rdi
callq 0x14f23
pushq $0x2
popq %rsi
movq %r14, %rdi
callq 0x8c70
movl %ebx, %eax
addq $0x38, %rsp
popq %rbx
popq %r14
retq
leaq 0x16c9(%rip), %rsi      # 0x16074
leaq 0x210e(%rip), %rdx      # 0x16ac0
movq %r14, %rdi
movl $0xe4, %ecx
xorl %eax, %eax
callq 0x8b00
movl %eax, %ebx
jmp 0x1499a
// File: /workspace/github_c_makefile_star2_O2/stetre[P]moonglmath/src/vec.c
// Function: Unm
static int Unm(lua_State *L)
    {
    vec_t v; 
    size_t size, i; 
    unsigned int isrow;
    checkvec(L, 1, v, &size, &isrow);
    for(i=0; i < 4; i++)    
        v[i] = -v[i];
    return pushvec(L, v, size, size, isrow);
    }

// Assembly:
pushq %rbx
subq $0x30, %rsp
movq %rdi, %rbx
pushq $0x1
popq %rsi
leaq 0x10(%rsp), %rdx
leaq 0x8(%rsp), %rcx
leaq 0x4(%rsp), %r8
callq 0x86d0
xorl %eax, %eax
movaps 0x16e3(%rip), %xmm0     # 0x160d0
cmpq $0x4, %rax
je 0x14a06
movsd 0x10(%rsp,%rax,8), %xmm1
xorps %xmm0, %xmm1
movlps %xmm1, 0x10(%rsp,%rax,8)
incq %rax
jmp 0x149ed
movq 0x8(%rsp), %rcx
movl 0x4(%rsp), %r8d
leaq 0x10(%rsp), %rsi
movq %rbx, %rdi
movq %rcx, %rdx
callq 0x8310
addq $0x30, %rsp
popq %rbx
retq
// File: /workspace/github_c_makefile_star2_O2/stetre[P]moonglmath/src/vec.c
// Function: Add
static int Add(lua_State *L)
    {
    vec_t v, v1; 
    size_t size, size1, i; 
    unsigned int isrow, isrow1;
    checkvec(L, 1, v, &size, &isrow);
    checkvec(L, 2, v1, &size1, &isrow1);
    if((isrow != isrow1) || (size != size1))
        return luaL_error(L, OPERANDS_ERROR);
    for(i=0; i < size; i++) 
        v[i] += v1[i];
    return pushvec(L, v, size, size, isrow);
    }

// Assembly:
pushq %r15
pushq %r14
pushq %rbx
subq $0x60, %rsp
movq %rdi, %rbx
pushq $0x1
popq %rsi
leaq 0x20(%rsp), %rdx
leaq 0x10(%rsp), %rcx
leaq 0x1c(%rsp), %r14
movq %r14, %r8
callq 0x86d0
pushq $0x2
popq %rsi
leaq 0x40(%rsp), %rdx
leaq 0x8(%rsp), %rcx
leaq 0x18(%rsp), %r15
movq %rbx, %rdi
movq %r15, %r8
callq 0x86d0
movl (%r14), %r8d
cmpl (%r15), %r8d
jne 0x14a9b
movq 0x10(%rsp), %rcx
cmpq 0x8(%rsp), %rcx
jne 0x14a9b
xorl %eax, %eax
cmpq %rax, %rcx
je 0x14aba
movsd 0x40(%rsp,%rax,8), %xmm0
addsd 0x20(%rsp,%rax,8), %xmm0
movsd %xmm0, 0x20(%rsp,%rax,8)
incq %rax
jmp 0x14a7f
leaq 0x1b5e(%rip), %rsi      # 0x16600
leaq 0x2017(%rip), %rdx      # 0x16ac0
movq %rbx, %rdi
movl $0x18b, %ecx            # imm = 0x18B
xorl %eax, %eax
callq 0x8b00
jmp 0x14aca
leaq 0x20(%rsp), %rsi
movq %rbx, %rdi
movq %rcx, %rdx
callq 0x8310
addq $0x60, %rsp
popq %rbx
popq %r14
popq %r15
retq
// File: /workspace/github_c_makefile_star2_O2/stetre[P]moonglmath/src/vec.c
// Function: Div
static int Div(lua_State *L)
    {
    vec_t v; 
    size_t size, i; 
    unsigned int isrow;
    double s;
    checkvec(L, 1, v, &size, &isrow);
    s = luaL_checknumber(L, 2);
    for(i=0; i < size; i++) 
        v[i] /= s;
    return pushvec(L, v, size, size, isrow);
    }

// Assembly:
pushq %r14
pushq %rbx
subq $0x38, %rsp
movq %rdi, %rbx
pushq $0x1
popq %rsi
leaq 0x10(%rsp), %rdx
leaq 0x30(%rsp), %r14
leaq 0xc(%rsp), %r8
movq %r14, %rcx
callq 0x86d0
pushq $0x2
popq %rsi
movq %rbx, %rdi
callq 0x8350
xorl %eax, %eax
movq (%r14), %rcx
cmpq %rax, %rcx
je 0x14df6
movsd 0x10(%rsp,%rax,8), %xmm1
divsd %xmm0, %xmm1
movsd %xmm1, 0x10(%rsp,%rax,8)
incq %rax
jmp 0x14ddc
movl 0xc(%rsp), %r8d
leaq 0x10(%rsp), %rsi
movq %rbx, %rdi
movq %rcx, %rdx
callq 0x8310
addq $0x38, %rsp
popq %rbx
popq %r14
retq
// File: /workspace/github_c_makefile_star2_O2/stetre[P]moonglmath/src/vec.c
// Function: Cross
static int Cross(lua_State *L)
/* always return a size=3 vector */
//@@ TODO?: v % scalar = component-wise mod
    {
    vec_t v1, v2, v;
    size_t size1, size2; 
    unsigned int isrow1, isrow2;
    checkvec(L, 1, v1, &size1, &isrow1);
    checkvec(L, 2, v2, &size2, &isrow2);
    if((isrow1 != isrow2) || (size1 != size2))
        return luaL_error(L, OPERANDS_ERROR);
    if(size1==2)
        v1[2] = v2[2] = 0;
    vec_cross(v, v1, v2);
    return pushvec(L, v, 3, 3, isrow1);
    }

// Assembly:
pushq %r15
pushq %r14
pushq %rbx
subq $0x80, %rsp
movq %rdi, %rbx
pushq $0x1
popq %rsi
leaq 0x40(%rsp), %rdx
leaq 0x10(%rsp), %rcx
leaq 0x1c(%rsp), %r14
movq %r14, %r8
callq 0x86d0
pushq $0x2
popq %rsi
leaq 0x20(%rsp), %rdx
leaq 0x8(%rsp), %rcx
leaq 0x18(%rsp), %r15
movq %rbx, %rdi
movq %r15, %r8
callq 0x86d0
movl (%r14), %r8d
cmpl (%r15), %r8d
jne 0x14e85
movq 0x10(%rsp), %rax
cmpq 0x8(%rsp), %rax
jne 0x14e85
cmpq $0x2, %rax
jne 0x14ea4
andq $0x0, 0x30(%rsp)
andq $0x0, 0x50(%rsp)
xorpd %xmm0, %xmm0
jmp 0x14eb0
leaq 0x1774(%rip), %rsi      # 0x16600
leaq 0x1c2d(%rip), %rdx      # 0x16ac0
movq %rbx, %rdi
movl $0x1fb, %ecx            # imm = 0x1FB
xorl %eax, %eax
callq 0x8b00
jmp 0x14f16
movapd 0x30(%rsp), %xmm0
movhpd 0x50(%rsp), %xmm0       # xmm0 = xmm0[0],mem[0]
movsd 0x40(%rsp), %xmm1
movsd 0x48(%rsp), %xmm2
movsd 0x20(%rsp), %xmm3
movsd 0x28(%rsp), %xmm4
movapd %xmm0, %xmm5
shufpd $0x1, %xmm1, %xmm5      # xmm5 = xmm5[1],xmm1[0]
mulsd %xmm4, %xmm1
unpcklpd %xmm0, %xmm4            # xmm4 = xmm4[0],xmm0[0]
mulpd %xmm5, %xmm4
movapd %xmm2, %xmm5
unpcklpd %xmm3, %xmm5            # xmm5 = xmm5[0],xmm3[0]
mulpd %xmm0, %xmm5
subpd %xmm4, %xmm5
leaq 0x60(%rsp), %rsi
movapd %xmm5, (%rsi)
mulsd %xmm2, %xmm3
subsd %xmm3, %xmm1
movsd %xmm1, 0x10(%rsi)
andq $0x0, 0x18(%rsi)
pushq $0x3
popq %rcx
movq %rbx, %rdi
movq %rcx, %rdx
callq 0x8310
addq $0x80, %rsp
popq %rbx
popq %r14
popq %r15
retq
// File: /workspace/github_c_makefile_star2_O2/stetre[P]moonglmath/src/vec.c
// Function: ToString_
static int ToString_(lua_State *L, vec_t v, size_t size, unsigned int isrow)
/* With snprintf because lua_pushfstring does not support the %g conversion specifier */
    {
#define SZ 512
#define space (SZ-p)
    char str[SZ];
    int p=0;
    switch(size)
        {
#define T isrow==1 ? "" : "'"
        case 2: p = snprintf(str, space, "{ "FMT", "FMT" }%s", v[0], v[1], T ); break;
        case 3: p = snprintf(str, space, "{ "FMT", "FMT", "FMT" }%s", 
                                                v[0], v[1], v[2], T); break;
        case 4: p = snprintf(str, space, "{ "FMT", "FMT", "FMT", "FMT" }%s", 
                                                v[0], v[1], v[2], v[3], T); break;
        default:
            return luaL_error(L, UNEXPECTED_ERROR);
        }
    if(space<0)
        { 
        /* truncate */
        p = SZ - 5; 
        p+=snprintf(str+p, space, " ...");
        lua_pushlstring(L, str, p);
        return 1;
        }
    lua_pushlstring(L, str, p);
    return 1;
#undef space
#undef SZ
    }

// Assembly:
pushq %rbx
subq $0x200, %rsp            # imm = 0x200
movq %rdi, %rbx
cmpq $0x4, %rdx
je 0x14fb9
cmpq $0x3, %rdx
je 0x14f7e
cmpq $0x2, %rdx
jne 0x15033
movsd (%rsi), %xmm0
movsd 0x8(%rsi), %xmm1
cmpl $0x1, %ecx
leaq 0x179f(%rip), %rax      # 0x166fa
leaq 0x195c(%rip), %rcx      # 0x168be
cmoveq %rax, %rcx
leaq 0x1b5f(%rip), %rdx      # 0x16acc
movq %rsp, %rdi
movl $0x200, %esi            # imm = 0x200
movb $0x2, %al
callq 0x8420
jmp 0x14ff7
movsd (%rsi), %xmm0
movsd 0x8(%rsi), %xmm1
movsd 0x10(%rsi), %xmm2
cmpl $0x1, %ecx
leaq 0x1764(%rip), %rax      # 0x166fa
leaq 0x1921(%rip), %rcx      # 0x168be
cmoveq %rax, %rcx
leaq 0x1b31(%rip), %rdx      # 0x16ad9
movq %rsp, %rdi
movl $0x200, %esi            # imm = 0x200
movb $0x3, %al
callq 0x8420
jmp 0x14ff7
movsd (%rsi), %xmm0
movsd 0x8(%rsi), %xmm1
movsd 0x10(%rsi), %xmm2
movsd 0x18(%rsi), %xmm3
cmpl $0x1, %ecx
leaq 0x1724(%rip), %rax      # 0x166fa
leaq 0x18e1(%rip), %rcx      # 0x168be
cmoveq %rax, %rcx
leaq 0x1b02(%rip), %rdx      # 0x16aea
movq %rsp, %rdi
movl $0x200, %esi            # imm = 0x200
movb $0x4, %al
callq 0x8420
cmpl $0x201, %eax            # imm = 0x201
jl 0x15019
movq %rsp, %rsi
movb $0x0, 0x1ff(%rsi)
movl $0x2e2e2e20, 0x1fb(%rsi) # imm = 0x2E2E2E20
movl $0x1ff, %edx            # imm = 0x1FF
jmp 0x1501f
movslq %eax, %rdx
movq %rsp, %rsi
movq %rbx, %rdi
callq 0x89d0
pushq $0x1
popq %rax
addq $0x200, %rsp            # imm = 0x200
popq %rbx
retq
leaq 0x103a(%rip), %rsi      # 0x16074
leaq 0x1a7f(%rip), %rdx      # 0x16ac0
movq %rbx, %rdi
movl $0xba, %ecx
xorl %eax, %eax
addq $0x200, %rsp            # imm = 0x200
popq %rbx
jmp 0x8b00
// File: /workspace/github_c_makefile_star2_O2/stetre[P]moonglmath/src/vec.c
// Function: Vxs
static int Vxs(lua_State *L, int sarg, int varg)
    {
    vec_t v; 
    size_t size, i; 
    unsigned int isrow;
    double s = luaL_checknumber(L, sarg);
    checkvec(L, varg, v, &size, &isrow);
    for(i=0; i < size; i++) 
        v[i] *= s;
    return pushvec(L, v, size, size, isrow);
    }

// Assembly:
pushq %rbp
pushq %r14
pushq %rbx
subq $0x40, %rsp
movl %edx, %ebp
movq %rdi, %rbx
callq 0x8350
movsd %xmm0, 0x8(%rsp)
leaq 0x10(%rsp), %rdx
leaq 0x38(%rsp), %r14
leaq 0x4(%rsp), %r8
movq %rbx, %rdi
movl %ebp, %esi
movq %r14, %rcx
callq 0x86d0
movsd 0x8(%rsp), %xmm1
xorl %eax, %eax
movq (%r14), %rcx
cmpq %rax, %rcx
je 0x150b1
movsd 0x10(%rsp,%rax,8), %xmm0
mulsd %xmm1, %xmm0
movsd %xmm0, 0x10(%rsp,%rax,8)
incq %rax
jmp 0x15097
movl 0x4(%rsp), %r8d
leaq 0x10(%rsp), %rsi
movq %rbx, %rdi
movq %rcx, %rdx
callq 0x8310
addq $0x40, %rsp
popq %rbx
popq %r14
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O2/stetre[P]moonglmath/src/vec.c
// Function: Vec
static int Vec(lua_State *L, size_t size, unsigned int isrow)
/* creates a vector of size 'size', from a vector or a list of values 
 * the size is adapted by discarding exceeding values or adding zeros
 * in lieu of missing values.
 * vecN(v)
 * vecN([x1 ,[x2,...[,xN]]])
 */
    {
    vec_t v;
    size_t vsize, i, arg;
    arg = 1;
    if(testvec(L, arg, v, &vsize, NULL))
        return pushvec(L, v, vsize, size, isrow);
    checkvecsize(L, size);
    for(i = 0; i < size; i++)
        v[i] = luaL_optnumber(L, arg++, 0);
    return pushvec(L, v, size, size, isrow);
    }

// Assembly:
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x30, %rsp
movl %edx, %ebx
movq %rsi, %r14
movq %rdi, %r15
pushq $0x1
popq %rsi
leaq 0x10(%rsp), %rdx
leaq 0x8(%rsp), %rcx
xorl %r8d, %r8d
callq 0x8ad0
testl %eax, %eax
je 0x1519d
movq 0x8(%rsp), %rdx
jmp 0x151c6
xorl %r13d, %r13d
cmpq %r13, %r14
je 0x151c3
leaq 0x1(%r13), %r12
xorps %xmm0, %xmm0
movq %r15, %rdi
movl %r12d, %esi
callq 0x8370
movsd %xmm0, 0x10(%rsp,%r13,8)
movq %r12, %r13
jmp 0x151a0
movq %r14, %rdx
leaq 0x10(%rsp), %rsi
movq %r15, %rdi
movq %r14, %rcx
movl %ebx, %r8d
callq 0x8310
addq $0x30, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
retq
// File: /workspace/github_c_makefile_star2_O2/stetre[P]moonglmath/src/viewing.c
// Function: moonglmath_look_at
int look_at(mat_t dst, vec_t eye, vec_t at, vec_t up)
/* look_at(eye, at, up) 
 *
 * eye = camera position = (e1, e2, e3)
 * at  = target position
 * up  = camera 'up' direction
 *
 * NOTE: 'up' is the direction from the camera to a point above the target,
 *        on the vertical.
 *
 * d = (at - eye) : direction vector
 * n = (eye - at) = z : normal to the projection plane, oriented towards the camera
 * x = d % up = up % n : points to the right of the camera
 * y = z % x = n % x : points up fro the camera
 *  
 * M = |x1 x2 x3 0| |1 0 0 -e1|
 *     |y1 y2 y3 0|·|0 1 0 -e2|
 *     |z1 z2 z3 0| |0 0 1 -e3|
 *     |0  0  0  1| |0 0 0   1|
 *          |           |
 *       orient     translate
 */
    {

    size_t i;
    vec_t z, x, y;
    mat_t c, te;

    vec_sub(z, eye, at, 4); /* z = eye - at (normal vector = - direction vector) */
    vec_normalize(z, 4);

    vec_cross(x, up, z); /* x = up % z  (right vector) */
    vec_normalize(x, 4);

    vec_cross(y, z, x);  /* y = z % x  (up vector) */
    vec_normalize(y, 4);

    mat_clear(c);   
    /* c = x1 x2 x3  0
     *     y1 y2 y3  0
     *     z1 z2 z3  0
     *      0  0  0  1
     */
    for(i = 0; i< 4; i ++)
        {
        c[0][i] = x[i];
        c[1][i] = y[i];
        c[2][i] = z[i];
        }
    c[3][3] = 1;

    /* dst = c * translate(-eye) */
    translate(te, -eye[0], -eye[1], -eye[2]);
    mat_mul(dst, c, te, 4, 4, 4);

    return 0;
    }

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x168, %rsp            # imm = 0x168
movq %rcx, %r12
movq %rsi, %r14
movq %rdi, %rbx
leaq 0xc0(%rsp), %r13
pushq $0x4
popq %r15
movq %r13, %rdi
movq %r15, %rcx
callq 0x8830
movq %r13, %rdi
movq %r15, %rsi
callq 0x8e40
leaq 0xa0(%rsp), %rbp
movq %rbp, %rdi
movq %r12, %rsi
movq %r13, %rdx
callq 0x8ca0
movq %rbp, %rdi
movq %r15, %rsi
callq 0x8e40
leaq 0x80(%rsp), %r12
movq %r12, %rdi
movq %r13, %rsi
movq %rbp, %rdx
callq 0x8ca0
movq %r12, %rdi
movq %r15, %rsi
callq 0x8e40
xorps %xmm0, %xmm0
movaps %xmm0, 0x70(%rsp)
movaps %xmm0, 0x60(%rsp)
movaps %xmm0, 0x50(%rsp)
movaps %xmm0, 0x40(%rsp)
movaps %xmm0, 0x30(%rsp)
movaps %xmm0, 0x20(%rsp)
movaps %xmm0, 0x10(%rsp)
movaps %xmm0, (%rsp)
xorl %eax, %eax
cmpq $0x4, %rax
je 0x15321
movsd 0xa0(%rsp,%rax,8), %xmm0
movsd %xmm0, (%rsp,%rax,8)
movsd 0x80(%rsp,%rax,8), %xmm0
movsd %xmm0, 0x20(%rsp,%rax,8)
movsd 0xc0(%rsp,%rax,8), %xmm0
movsd %xmm0, 0x40(%rsp,%rax,8)
incq %rax
jmp 0x152ea
movabsq $0x3ff0000000000000, %rax # imm = 0x3FF0000000000000
movq %rsp, %r15
movq %rax, 0x78(%r15)
movaps 0xd97(%rip), %xmm3      # 0x160d0
movsd (%r14), %xmm0
movsd 0x8(%r14), %xmm1
movsd 0x10(%r14), %xmm2
xorps %xmm3, %xmm0
xorps %xmm3, %xmm1
xorps %xmm3, %xmm2
leaq 0xe0(%rsp), %r14
movq %r14, %rdi
callq 0x8570
pushq $0x4
popq %rcx
movq %rbx, %rdi
movq %r15, %rsi
movq %r14, %rdx
movq %rcx, %r8
movq %rcx, %r9
callq 0x8790
xorl %eax, %eax
addq $0x168, %rsp            # imm = 0x168
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O2/stetre[P]moonglmath/src/viewing.c
// Function: moonglmath_ortho
int ortho(mat_t dst, double l, double r, double b, double t, double near, double far)
/* ortho(left, right, bottom, top, near,  far)
 * near=-1 and far=1 give a 2D projection
 *
 * Rfr. RTR3/4.6.1
 *
 * The viewing parallelepiped is: 
 * x: left .. right
 * y: bottom .. up
 * z: -near .. -far
 *
 * The camera is positioned at the origin, pointing to the -z axis (x=right, y=up)
 * and the projection plane is the x-y plane (or, equivalently, any plane parallel
 * to x-y, since the projectors are parallel to the z axis).
 *
 * M =  |2/(r-l)  0    0     0| |1 0 0 -(l+r)/2| = |2/(r-l)  0     0    -(r+l)/(r-l)|
 *      |  0   2/(t-b) 0     0|*|0 1 0 -(t+b)/2|   |  0   2/(t-b)  0    -(t+b)/(t-b)|
 *      |  0      0  2/(f-n) 0| |0 0 1 -(f+n)/2|   |  0     0   2/(f-n) -(f+n)/(f-n)|
 *      |  0      0    0     1| |0 0 0     1   |   |  0     0      0         1      |
 *           scaling               translation
 */
    {
    double n, f;
    n = -near;
    f = -far;
    mat_clear(dst);
    dst[0][0] = 2.0/(r-l);
    dst[0][3] = -(r+l)/(r-l);
    dst[1][1] = 2.0/(t-b);
    dst[1][3] = -(t+b)/(t-b);
    dst[2][2] = 2.0/(f-n);
    dst[2][3] = -(f+n)/(f-n);
    dst[3][3] = 1.0;
    return 0;
    }

// Assembly:
movapd 0xd3a(%rip), %xmm7      # 0x160d0
movapd %xmm4, %xmm6
xorpd %xmm7, %xmm6
xorps %xmm8, %xmm8
movups %xmm8, 0x18(%rdi)
movups %xmm8, 0x28(%rdi)
movups %xmm8, 0x38(%rdi)
movups %xmm8, 0x58(%rdi)
movups %xmm8, 0x48(%rdi)
movups %xmm8, 0x68(%rdi)
movups %xmm8, 0x8(%rdi)
movapd %xmm1, %xmm8
subsd %xmm0, %xmm8
movsd 0x1388(%rip), %xmm9     # 0x16760
movapd %xmm9, %xmm10
divsd %xmm8, %xmm10
movsd %xmm10, (%rdi)
addsd %xmm1, %xmm0
xorpd %xmm7, %xmm0
divsd %xmm8, %xmm0
movsd %xmm0, 0x18(%rdi)
movapd %xmm3, %xmm0
subsd %xmm2, %xmm0
divsd %xmm0, %xmm9
movsd %xmm9, 0x28(%rdi)
addsd %xmm3, %xmm2
xorpd %xmm7, %xmm2
divsd %xmm0, %xmm2
movsd %xmm2, 0x38(%rdi)
subsd %xmm5, %xmm4
subsd %xmm5, %xmm6
xorpd %xmm7, %xmm6
movapd 0x16ff(%rip), %xmm0     # 0x16b30
unpcklpd %xmm6, %xmm0            # xmm0 = xmm0[0],xmm6[0]
unpcklpd %xmm4, %xmm4            # xmm4 = xmm4[0,0]
divpd %xmm4, %xmm0
movupd %xmm0, 0x50(%rdi)
movabsq $0x3ff0000000000000, %rax # imm = 0x3FF0000000000000
movq %rax, 0x78(%rdi)
xorl %eax, %eax
retq
// File: /workspace/github_c_makefile_star2_O2/stetre[P]moonglmath/src/viewing.c
// Function: moonglmath_frustum
int frustum(mat_t dst, double l, double r, double b, double t, double n, double f)
    {
    mat_clear(dst);
    dst[0][0] = 2.0*n/(r-l);
    dst[0][2] = (r+l)/(r-l);
    dst[1][1] = 2.0*n/(t-b);
    dst[1][2] = (t+b)/(t-b);
    dst[2][2] = -(f+n)/(f-n);
    dst[2][3] = -2.0*f*n/(f-n);
    dst[3][2] = -1.0;
    return 0;
    }

// Assembly:
xorps %xmm6, %xmm6
movups %xmm6, 0x8(%rdi)
movups %xmm6, 0x58(%rdi)
movups %xmm6, 0x48(%rdi)
movups %xmm6, 0x68(%rdi)
movups %xmm6, 0x38(%rdi)
andq $0x0, 0x78(%rdi)
movups %xmm6, 0x18(%rdi)
movapd %xmm4, %xmm6
addsd %xmm5, %xmm6
movapd %xmm5, %xmm7
subsd %xmm4, %xmm7
mulsd 0x16b5(%rip), %xmm5     # 0x16b40
mulsd %xmm4, %xmm5
unpcklpd %xmm2, %xmm4            # xmm4 = xmm4[0],xmm2[0]
movapd 0x1694(%rip), %xmm8     # 0x16b30
unpcklpd %xmm3, %xmm8            # xmm8 = xmm8[0],xmm3[0]
movapd %xmm4, %xmm9
mulpd %xmm8, %xmm9
addpd %xmm4, %xmm8
movsd %xmm9, %xmm8            # xmm8 = xmm9[0],xmm8[1]
movapd %xmm1, %xmm4
subsd %xmm0, %xmm4
divsd %xmm4, %xmm9
movsd %xmm9, (%rdi)
addsd %xmm1, %xmm0
divsd %xmm4, %xmm0
movsd %xmm0, 0x10(%rdi)
subsd %xmm2, %xmm3
unpcklpd %xmm3, %xmm3            # xmm3 = xmm3[0,0]
divpd %xmm3, %xmm8
xorpd 0xbe7(%rip), %xmm6      # 0x160d0
movupd %xmm8, 0x28(%rdi)
unpcklpd %xmm5, %xmm6            # xmm6 = xmm6[0],xmm5[0]
unpcklpd %xmm7, %xmm7            # xmm7 = xmm7[0,0]
divpd %xmm7, %xmm6
movupd %xmm6, 0x50(%rdi)
movabsq $-0x4010000000000000, %rax # imm = 0xBFF0000000000000
movq %rax, 0x70(%rdi)
xorl %eax, %eax
retq
// File: /workspace/github_c_makefile_star2_O2/stetre[P]moonglmath/src/viewing.c
// Function: moonglmath_perspective
int perspective(mat_t dst, double fovy, double aspect, double n, double f)
    {
    double t = tan(fovy/2) * n; /* top */
    double r = t * aspect; /* right */
    mat_clear(dst);
    dst[0][0] = n/r;
    dst[1][1] = n/t;
    dst[2][2] = -(f+n)/(f-n);
    dst[2][3] = -2.0*f*n/(f-n);
    dst[3][2] = -1.0;
    return 0;
    }

// Assembly:
pushq %rbx
subq $0x20, %rsp
movaps %xmm3, 0x10(%rsp)
movsd %xmm2, (%rsp)
movsd %xmm1, 0x8(%rsp)
movq %rdi, %rbx
mulsd 0x1227(%rip), %xmm0     # 0x16758
callq 0x8910
movsd (%rsp), %xmm3
mulsd %xmm3, %xmm0
movsd 0x8(%rsp), %xmm2
mulsd %xmm0, %xmm2
xorps %xmm1, %xmm1
movups %xmm1, 0x28(%rbx)
movups %xmm1, 0x48(%rbx)
movups %xmm1, 0x58(%rbx)
movups %xmm1, 0x68(%rbx)
movups %xmm1, 0x8(%rbx)
andq $0x0, 0x78(%rbx)
movups %xmm1, 0x18(%rbx)
movups %xmm1, 0x38(%rbx)
movapd %xmm3, %xmm1
divsd %xmm2, %xmm1
movsd %xmm1, (%rbx)
movapd %xmm3, %xmm1
divsd %xmm0, %xmm1
movsd %xmm1, 0x28(%rbx)
movapd %xmm3, %xmm0
movapd 0x10(%rsp), %xmm2
addsd %xmm2, %xmm0
xorpd 0xb34(%rip), %xmm0      # 0x160d0
movapd %xmm2, %xmm1
subsd %xmm3, %xmm1
mulsd 0x1594(%rip), %xmm2     # 0x16b40
mulsd %xmm3, %xmm2
unpcklpd %xmm2, %xmm0            # xmm0 = xmm0[0],xmm2[0]
unpcklpd %xmm1, %xmm1            # xmm1 = xmm1[0,0]
divpd %xmm1, %xmm0
movupd %xmm0, 0x50(%rbx)
movabsq $-0x4010000000000000, %rax # imm = 0xBFF0000000000000
movq %rax, 0x70(%rbx)
xorl %eax, %eax
addq $0x20, %rsp
popq %rbx
retq
// File: /workspace/github_c_makefile_star2_O2/stetre[P]moonglmath/src/viewing.c
// Function: LookAt
static int LookAt(lua_State *L)
    {
    mat_t m;
    vec_t eye, at, up;
    checkvec(L, 1, eye, NULL, NULL);
    checkvec(L, 2, at, NULL, NULL);
    checkvec(L, 3, up, NULL, NULL);
    look_at(m, eye, at, up);
    return pushmat(L, m, 4, 4, 4, 4);
    }

// Assembly:
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0xe0, %rsp
movq %rdi, %rbx
pushq $0x1
popq %rsi
leaq 0x40(%rsp), %r14
movq %r14, %rdx
xorl %ecx, %ecx
xorl %r8d, %r8d
callq 0x86d0
pushq $0x2
popq %rsi
leaq 0x20(%rsp), %r15
movq %rbx, %rdi
movq %r15, %rdx
xorl %ecx, %ecx
xorl %r8d, %r8d
callq 0x86d0
pushq $0x3
popq %rsi
movq %rsp, %r12
movq %rbx, %rdi
movq %r12, %rdx
xorl %ecx, %ecx
xorl %r8d, %r8d
callq 0x86d0
leaq 0x60(%rsp), %r13
movq %r13, %rdi
movq %r14, %rsi
movq %r15, %rdx
movq %r12, %rcx
callq 0x80d0
pushq $0x4
popq %rcx
movq %rbx, %rdi
movq %r13, %rsi
movq %rcx, %rdx
movq %rcx, %r8
movq %rcx, %r9
callq 0x8500
addq $0xe0, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
retq
// File: /workspace/github_c_makefile_star2_O2/stetre[P]moonglmath/src/viewing.c
// Function: Ortho
static int Ortho(lua_State *L)
    {
    mat_t m;
    double l = luaL_checknumber(L, 1); /* left */
    double r = luaL_checknumber(L, 2); /* right */
    double b = luaL_checknumber(L, 3); /* bottom */
    double t = luaL_checknumber(L, 4); /* top */
    double n = luaL_optnumber(L, 5, -1.0); /* near */
    double f = luaL_optnumber(L, 6, 1.0); /* far */
    ortho(m, l, r, b, t, n, f);
    return pushmat(L, m, 4, 4, 4, 4);
    }

// Assembly:
pushq %r14
pushq %rbx
subq $0xb8, %rsp
movq %rdi, %rbx
pushq $0x1
popq %rsi
callq 0x8350
movsd %xmm0, 0x28(%rsp)
pushq $0x2
popq %rsi
movq %rbx, %rdi
callq 0x8350
movsd %xmm0, 0x20(%rsp)
pushq $0x3
popq %rsi
movq %rbx, %rdi
callq 0x8350
movsd %xmm0, 0x18(%rsp)
pushq $0x4
popq %rsi
movq %rbx, %rdi
callq 0x8350
movsd %xmm0, 0x10(%rsp)
pushq $0x5
popq %rsi
movsd 0x1216(%rip), %xmm0     # 0x168e8
movq %rbx, %rdi
callq 0x8370
movsd %xmm0, 0x8(%rsp)
pushq $0x6
popq %rsi
movsd 0x9d5(%rip), %xmm0      # 0x160c0
movq %rbx, %rdi
callq 0x8370
movaps %xmm0, %xmm5
leaq 0x30(%rsp), %r14
movq %r14, %rdi
movsd 0x28(%rsp), %xmm0
movsd 0x20(%rsp), %xmm1
movsd 0x18(%rsp), %xmm2
movsd 0x10(%rsp), %xmm3
movsd 0x8(%rsp), %xmm4
callq 0x8b70
pushq $0x4
popq %rcx
movq %rbx, %rdi
movq %r14, %rsi
movq %rcx, %rdx
movq %rcx, %r8
movq %rcx, %r9
callq 0x8500
addq $0xb8, %rsp
popq %rbx
popq %r14
retq
// File: /workspace/github_c_makefile_star2_O2/stetre[P]moonglmath/src/viewing.c
// Function: Frustum
static int Frustum(lua_State *L)
    {
    mat_t m;
    double l = luaL_checknumber(L, 1); /* left */
    double r = luaL_checknumber(L, 2); /* right */
    double b = luaL_checknumber(L, 3); /* bottom */
    double t = luaL_checknumber(L, 4); /* top */
    double n = luaL_checknumber(L, 5); /* near */
    double f = luaL_checknumber(L, 6); /* far */
    frustum(m, l, r, b, t, n, f);
    return pushmat(L, m, 4, 4, 4, 4);
    }

// Assembly:
pushq %r14
pushq %rbx
subq $0xb8, %rsp
movq %rdi, %rbx
pushq $0x1
popq %rsi
callq 0x8350
movsd %xmm0, 0x28(%rsp)
pushq $0x2
popq %rsi
movq %rbx, %rdi
callq 0x8350
movsd %xmm0, 0x20(%rsp)
pushq $0x3
popq %rsi
movq %rbx, %rdi
callq 0x8350
movsd %xmm0, 0x18(%rsp)
pushq $0x4
popq %rsi
movq %rbx, %rdi
callq 0x8350
movsd %xmm0, 0x10(%rsp)
pushq $0x5
popq %rsi
movq %rbx, %rdi
callq 0x8350
movsd %xmm0, 0x8(%rsp)
pushq $0x6
popq %rsi
movq %rbx, %rdi
callq 0x8350
movaps %xmm0, %xmm5
leaq 0x30(%rsp), %r14
movq %r14, %rdi
movsd 0x28(%rsp), %xmm0
movsd 0x20(%rsp), %xmm1
movsd 0x18(%rsp), %xmm2
movsd 0x10(%rsp), %xmm3
movsd 0x8(%rsp), %xmm4
callq 0x8bf0
pushq $0x4
popq %rcx
movq %rbx, %rdi
movq %r14, %rsi
movq %rcx, %rdx
movq %rcx, %r8
movq %rcx, %r9
callq 0x8500
addq $0xb8, %rsp
popq %rbx
popq %r14
retq
// File: /workspace/github_c_makefile_star2_O2/stetre[P]moonglmath/src/viewing.c
// Function: Perspective
static int Perspective(lua_State *L)
/* perspective(fovy, aspect, near, far)
 */
    {
    mat_t m;
    double fovy = luaL_checknumber(L, 1); /* radians */
    double aspect = luaL_checknumber(L, 2);
    double n = luaL_checknumber(L, 3); /* near */
    double f = luaL_checknumber(L, 4); /* far */
    perspective(m, fovy, aspect, n, f);
    return pushmat(L, m, 4, 4, 4, 4);
    }

// Assembly:
pushq %r14
pushq %rbx
subq $0xa8, %rsp
movq %rdi, %rbx
pushq $0x1
popq %rsi
callq 0x8350
movsd %xmm0, 0x18(%rsp)
pushq $0x2
popq %rsi
movq %rbx, %rdi
callq 0x8350
movsd %xmm0, 0x10(%rsp)
pushq $0x3
popq %rsi
movq %rbx, %rdi
callq 0x8350
movsd %xmm0, 0x8(%rsp)
pushq $0x4
popq %rsi
movq %rbx, %rdi
callq 0x8350
movaps %xmm0, %xmm3
leaq 0x20(%rsp), %r14
movq %r14, %rdi
movsd 0x18(%rsp), %xmm0
movsd 0x10(%rsp), %xmm1
movsd 0x8(%rsp), %xmm2
callq 0x8ac0
pushq $0x4
popq %rcx
movq %rbx, %rdi
movq %r14, %rsi
movq %rcx, %rdx
movq %rcx, %r8
movq %rcx, %r9
callq 0x8500
addq $0xa8, %rsp
popq %rbx
popq %r14
retq
nopl (%rax)
// File: /workspace/github_c_makefile_star2_O2/mjosaarinen[P]brutus/crypto_aead/aes128poetv1aes4/ni/encrypt.c
// Function: crypto_aead_decrypt
int crypto_aead_decrypt(unsigned char *m,unsigned long long *mlen,
			unsigned char *nsec,
			const unsigned char *c,unsigned long long clen,
			const unsigned char *ad,unsigned long long adlen,
			const unsigned char *npub,
			const unsigned char *k)
{
  struct poet_ctx ctx;
  unsigned char *header =  malloc((size_t) (adlen+CRYPTO_NPUBBYTES));
  unsigned char tag[CRYPTO_NPUBBYTES];
  int result;

  errno = 0;

  if(clen < CRYPTO_NPUBBYTES) return -1;
  *mlen = clen - CRYPTO_NPUBBYTES;

  keysetup(&ctx, k);
  memcpy(tag,c+(clen-CRYPTO_NPUBBYTES), CRYPTO_NPUBBYTES);

  memcpy(header,ad, adlen);
  memcpy(header+adlen, npub, CRYPTO_NPUBBYTES);
  process_header(&ctx, header, adlen+CRYPTO_NPUBBYTES);

  result = decrypt_final(&ctx, c, *mlen, tag,m);

  if (errno|result) return -1;
  else return 0;
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x2b8, %rsp            # imm = 0x2B8
movq %r9, (%rsp)
movq %r8, %rbp
movq %rcx, %r14
movq %rsi, %r15
movq %rdi, 0x8(%rsp)
movq 0x2f0(%rsp), %rax
leaq 0x10(%rax), %r13
movq %r13, %rdi
callq 0x1040
movq %rax, %rbx
callq 0x10f0
andl $0x0, (%rax)
cmpq $0x10, %rbp
jae 0x174d
pushq $-0x1
popq %rax
jmp 0x17d9
movq %rax, %r12
movq 0x300(%rsp), %rsi
leaq -0x10(%rbp), %rax
movq %rax, (%r15)
leaq 0x20(%rsp), %rdi
callq 0x1160
vmovups -0x10(%r14,%rbp), %xmm0
leaq 0x10(%rsp), %rax
vmovaps %xmm0, (%rax)
movq %rbx, %rdi
movq (%rsp), %rsi
movq 0x2f0(%rsp), %rbp
movq %rbp, %rdx
callq 0x1150
movq 0x2f8(%rsp), %rax
vmovups (%rax), %xmm0
vmovups %xmm0, (%rbx,%rbp)
leaq 0x20(%rsp), %rbp
movq %rbp, %rdi
movq %rbx, %rsi
movq %r13, %rdx
callq 0x1110
movq (%r15), %rdx
movq %rbp, %rdi
movq %r14, %rsi
leaq 0x10(%rsp), %rcx
movq 0x8(%rsp), %r8
callq 0x1080
movl %eax, %ecx
xorl %eax, %eax
orl (%r12), %ecx
setne %al
negl %eax
addq $0x2b8, %rsp            # imm = 0x2B8
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
nop
// File: /workspace/github_c_makefile_star2_O2/mjosaarinen[P]brutus/crypto_aead/aes128poetv1aes4/ni/poet.c
// Function: encrypt_block
void encrypt_block(struct poet_ctx *ctx, const uint8_t plaintext[16],
		   uint8_t ciphertext[16])
{
  block tmp;
  TOP_HASH;
  xor_block(ctx->x, plaintext,ctx->x);

  AESNI_encrypt(ctx->x, tmp, ctx->aes_enc);

  BOTTOM_HASH;
  xor_block(ciphertext, tmp,ctx->y);

  memcpy(ctx->y, tmp, BLOCKLEN);
  ctx->mlen+=BLOCKLEN_BITS;

}

// Assembly:
pushq %r15
pushq %r14
pushq %r12
pushq %rbx
subq $0x18, %rsp
movq %rdx, %r14
movq %rsi, %r15
movq %rdi, %rbx
leaq 0x250(%rdi), %r12
leaq 0x160(%rdi), %rdx
movq %r12, %rdi
movq %r12, %rsi
callq 0x1030
movq %r12, %rdi
movq %r15, %rsi
movq %r12, %rdx
callq 0x1140
movq %rsp, %r15
movq %r12, %rdi
movq %r15, %rsi
movq %rbx, %rdx
callq 0x1120
leaq 0x260(%rbx), %r12
leaq 0x1b0(%rbx), %rdx
movq %r12, %rdi
movq %r12, %rsi
callq 0x1030
movq %r14, %rdi
movq %r15, %rsi
movq %r12, %rdx
callq 0x1140
vmovaps (%r15), %xmm0
vmovaps %xmm0, 0x260(%rbx)
subq $-0x80, 0x280(%rbx)
addq $0x18, %rsp
popq %rbx
popq %r12
popq %r14
popq %r15
retq
// File: /workspace/github_c_makefile_star2_O2/mjosaarinen[P]brutus/crypto_aead/aes128poetv1aes4/ni/poet.c
// Function: decrypt_block
void decrypt_block(struct poet_ctx *ctx, const uint8_t ciphertext[16],
		   uint8_t plaintext[16])
{
  block tmp;
  BOTTOM_HASH;
  xor_block(ctx->y, ciphertext,ctx->y);

  AESNI_decrypt(ctx->y, tmp, ctx->aes_dec);

  TOP_HASH;
  xor_block(plaintext, tmp,ctx->x);

  memcpy(ctx->x, tmp, BLOCKLEN);
  ctx->mlen+=BLOCKLEN_BITS;
}

// Assembly:
pushq %r15
pushq %r14
pushq %r12
pushq %rbx
subq $0x18, %rsp
movq %rdx, %r14
movq %rsi, %r15
movq %rdi, %rbx
leaq 0x260(%rdi), %r12
leaq 0x1b0(%rdi), %rdx
movq %r12, %rdi
movq %r12, %rsi
callq 0x1030
movq %r12, %rdi
movq %r15, %rsi
movq %r12, %rdx
callq 0x1140
leaq 0xb0(%rbx), %rdx
movq %rsp, %r15
movq %r12, %rdi
movq %r15, %rsi
callq 0x1070
leaq 0x250(%rbx), %r12
leaq 0x160(%rbx), %rdx
movq %r12, %rdi
movq %r12, %rsi
callq 0x1030
movq %r14, %rdi
movq %r15, %rsi
movq %r12, %rdx
callq 0x1140
vmovaps (%r15), %xmm0
vmovaps %xmm0, 0x250(%rbx)
subq $-0x80, 0x280(%rbx)
addq $0x18, %rsp
popq %rbx
popq %r12
popq %r14
popq %r15
retq
// File: /workspace/github_c_makefile_star2_O2/gmcvicker[P]check_fastq/util.c
// Function: util_has_gz_ext
int util_has_gz_ext(const char *filename) {
  size_t len;

  len = strlen(filename);

  if((len > 3) && (strncmp(&filename[len-3], ".gz",3)==0)) {
    return TRUE;
  }
  return FALSE;
}

// Assembly:
pushq %rbx
movq %rdi, %rbx
callq 0x2160
cmpq $0x4, %rax
jb 0x25ad
cmpb $0x2e, -0x3(%rbx,%rax)
jne 0x25ad
cmpb $0x67, -0x2(%rbx,%rax)
jne 0x25ad
cmpb $0x7a, -0x1(%rbx,%rax)
jne 0x25ad
pushq $0x1
popq %rax
jmp 0x25af
xorl %eax, %eax
popq %rbx
retq
// File: /workspace/github_c_makefile_star2_O2/gmcvicker[P]check_fastq/util.c
// Function: util_read_entire_file
char *util_read_entire_file(char *filename) {
  FILE *fh;
  struct stat fs;
  char *buf;

  fh = fopen(filename, "r");

  if(fh == NULL) {
    my_err("%s:%d: Could not open tree file '%s'", __FILE__, 
	    __LINE__, filename);
  }

  /* determine file size */
  fstat(fileno(fh), &fs);

  /* read entire file at once */
  buf = my_new(char, fs.st_size + 1);
  if(fread(buf, fs.st_size, 1, fh) == 0) {
    my_err("%s:%d: Could not read entire file '%s'", __FILE__,
	    __LINE__, filename);
  }

  buf[fs.st_size] = '\0';

  return buf;
}

// Assembly:
pushq %r15
pushq %r14
pushq %r12
pushq %rbx
subq $0x98, %rsp
movq %rdi, %rbx
leaq 0x1a93(%rip), %rsi      # 0x405c
callq 0x2100
movq %rax, %r14
testq %rax, %rax
jne 0x25f1
leaq 0x1a81(%rip), %rdi      # 0x405e
leaq 0x1d5d(%rip), %rsi      # 0x4341
pushq $0x31
popq %rdx
movq %rbx, %rcx
xorl %eax, %eax
callq 0x3534
movq %r14, %rdi
callq 0x2030
leaq 0x8(%rsp), %r15
movl %eax, %edi
movq %r15, %rsi
callq 0x20b0
movq 0x30(%r15), %r15
leaq 0x1(%r15), %rdi
callq 0x36e0
movq %rax, %r12
pushq $0x1
popq %rdx
movq %rax, %rdi
movq %r15, %rsi
movq %r14, %rcx
callq 0x21e0
testq %rax, %rax
jne 0x2649
leaq 0x1a4e(%rip), %rdi      # 0x4083
leaq 0x1d05(%rip), %rsi      # 0x4341
pushq $0x3b
popq %rdx
movq %rbx, %rcx
xorl %eax, %eax
callq 0x3534
movb $0x0, (%r12,%r15)
movq %r12, %rax
addq $0x98, %rsp
popq %rbx
popq %r12
popq %r14
popq %r15
retq
// File: /workspace/github_c_makefile_star2_O2/gmcvicker[P]check_fastq/util.c
// Function: util_fcount_lines
long util_fcount_lines(FILE *fh) {
  char buf[UTIL_FGETS_BUF_SZ];
  long line_count;
  int len;

  if(fseek(fh, 0L, SEEK_SET) != 0) {
    my_err("%s:%d: could not rewind filehandle", __FILE__, __LINE__);
  }

  line_count = 0;
  while(fgets(buf, UTIL_FGETS_BUF_SZ, fh) != NULL) {
    len = strlen(buf);
    if(buf[len-1] == '\n') {
      line_count++;
    }
  }

  if(fseek(fh, 0L, SEEK_SET) != 0) {
    my_err("%s:%d: could not rewind filehandle", __FILE__, __LINE__);
  }

  return line_count;
}

// Assembly:
pushq %r15
pushq %r14
pushq %rbx
subq $0x3fe0, %rsp           # imm = 0x3FE0
movq %rdi, %rbx
xorl %esi, %esi
xorl %edx, %edx
callq 0x2080
testl %eax, %eax
je 0x2694
leaq 0x1a27(%rip), %rdi      # 0x40aa
leaq 0x1cb7(%rip), %rsi      # 0x4341
pushq $0x50
popq %rdx
xorl %eax, %eax
callq 0x3534
xorl %r14d, %r14d
movq %rsp, %r15
movq %r15, %rdi
movl $0x3fdc, %esi           # imm = 0x3FDC
movq %rbx, %rdx
callq 0x2120
testq %rax, %rax
je 0x26c9
movq %r15, %rdi
callq 0x2160
decl %eax
cltq
xorl %ecx, %ecx
cmpb $0xa, (%rsp,%rax)
sete %cl
addq %rcx, %r14
jmp 0x269a
movq %rbx, %rdi
xorl %esi, %esi
xorl %edx, %edx
callq 0x2080
testl %eax, %eax
je 0x26f1
leaq 0x19ca(%rip), %rdi      # 0x40aa
leaq 0x1c5a(%rip), %rsi      # 0x4341
pushq $0x5c
popq %rdx
xorl %eax, %eax
callq 0x3534
movq %r14, %rax
addq $0x3fe0, %rsp           # imm = 0x3FE0
popq %rbx
popq %r14
popq %r15
retq
// File: /workspace/github_c_makefile_star2_O2/gmcvicker[P]check_fastq/util.c
// Function: util_gzcount_lines
long util_gzcount_lines(gzFile gzf) {
  char buf[UTIL_FGETS_BUF_SZ];
  long line_count;
  size_t len;

  if(gzseek(gzf, 0L, SEEK_SET) != 0) {
    my_err("%s:%d: could not rewind filehandle", __FILE__, __LINE__);
  }

  line_count = 0;

  while(gzgets(gzf, buf, UTIL_FGETS_BUF_SZ) != NULL) {
    len = strlen(buf);
    if(buf[len-1] == '\n') {
      line_count++;
    }
  }

  if(gzseek(gzf, 0L, SEEK_SET) != 0) {
    my_err("%s:%d: could not rewind filehandle", __FILE__, __LINE__);
  }

  return line_count;
}

// Assembly:
pushq %r15
pushq %r14
pushq %rbx
subq $0x3fe0, %rsp           # imm = 0x3FE0
movq %rdi, %rbx
xorl %esi, %esi
xorl %edx, %edx
callq 0x2110
testq %rax, %rax
je 0x2736
leaq 0x1985(%rip), %rdi      # 0x40aa
leaq 0x1c15(%rip), %rsi      # 0x4341
pushq $0x6f
popq %rdx
xorl %eax, %eax
callq 0x3534
xorl %r14d, %r14d
movq %rsp, %r15
movq %rbx, %rdi
movq %r15, %rsi
movl $0x3fdc, %edx           # imm = 0x3FDC
callq 0x2240
testq %rax, %rax
je 0x2769
movq %r15, %rdi
callq 0x2160
xorl %ecx, %ecx
cmpb $0xa, -0x1(%rax,%r15)
sete %cl
addq %rcx, %r14
jmp 0x273c
movq %rbx, %rdi
xorl %esi, %esi
xorl %edx, %edx
callq 0x2110
testq %rax, %rax
je 0x2792
leaq 0x1929(%rip), %rdi      # 0x40aa
leaq 0x1bb9(%rip), %rsi      # 0x4341
pushq $0x7c
popq %rdx
xorl %eax, %eax
callq 0x3534
movq %r14, %rax
addq $0x3fe0, %rsp           # imm = 0x3FE0
popq %rbx
popq %r14
popq %r15
retq