File lapack_564f5cd6dd718723530ccdd421a63387e76d5fcdb30f49d1f0425db7bc512296.dll
Function:
Loading..
37b6b50a0
37b6b50a0sormhr_:
37b6b50a0push r15
37b6b50a2push r14
37b6b50a4push r13
37b6b50a6push r12
37b6b50a8push rbp
37b6b50a9push rdi
37b6b50aapush rsi
37b6b50abpush rbx
37b6b50acsub rsp, 184
37b6b50b3mov rax, [rsp+312]
37b6b50bbmov r14, [rsp+296]
37b6b50c3mov eax, [rax]
37b6b50c5mov [rsp+136], eax
37b6b50ccmov rsi, rcx
37b6b50cfmov rbx, r8
37b6b50d2mov rdi, r9
37b6b50d5mov rbp, rdx
37b6b50d8mov rax, [rsp+336]
37b6b50e0mov rcx, [rsp+288]
37b6b50e8mov r9l, 1
37b6b50eemov r8l, 1
37b6b50f4lea rdx, [rip+0xd7f8b5]
37b6b50fbmov eax, [rax]
37b6b50fdmov [rsp+140], eax
37b6b5104mov rax, [rsp+360]
37b6b510cmov [rax], 0
37b6b5112mov eax, [r14]
37b6b5115sub eax, [rcx]
37b6b5117mov rcx, rsi
37b6b511amov [rsp+168], eax
37b6b5121call lsame_
37b6b5126mov r10l, [rdi]
37b6b5129mov r13l, [rbx]
37b6b512cmov r12l, eax
37b6b512fmov rax, [rsp+352]
37b6b5137mov r15l, [rax]
37b6b513atest r12l, r12l
37b6b513dje 0x37b6b51c0
37b6b5143test r10l, r10l
37b6b5146mov eax, 1
37b6b514bcmovg eax, r10l
37b6b514fmov [rsp+128], eax
37b6b5156
37b6b5156loc_37b6b5156:
37b6b5156mov r9l, 1
37b6b515cmov r8l, 1
37b6b5162lea rdx, [rip+0xd7f849]
37b6b5169mov rcx, rbp
37b6b516ccall lsame_
37b6b5171test eax, eax
37b6b5173je 0x37b6b5280
37b6b5179
37b6b5179loc_37b6b5179:
37b6b5179mov eax, [rbx]
37b6b517btest eax, eax
37b6b517djs 0x37b6b5210
37b6b5183mov edx, [rdi]
37b6b5185test edx, edx
37b6b5187js 0x37b6b52b8
37b6b518dmov rcx, [rsp+288]
37b6b5195test r13l, r13l
37b6b5198mov edx, 1
37b6b519dcmovg edx, r13l
37b6b51a1mov ecx, [rcx]
37b6b51a3cmp ecx, edx
37b6b51a5jg 0x37b6b51af
37b6b51a7test ecx, ecx
37b6b51a9jg 0x37b6b52d0
37b6b51af
37b6b51afloc_37b6b51af:
37b6b51afmov edx, -5
37b6b51b4mov eax, 5
37b6b51b9jmp 0x37b6b521a
37b6b51bb
37b6b51bb 0f 1f 44 00 00 ..D..
37b6b51c0
37b6b51c0loc_37b6b51c0:
37b6b51c0mov r9l, 1
37b6b51c6mov r8l, 1
37b6b51ccmov rcx, rsi
37b6b51cfmov [rsp+128], r10l
37b6b51d7lea rdx, [rip+0xd7f7d3]
37b6b51decall lsame_
37b6b51e3test eax, eax
37b6b51e5jne 0x37b6b5260
37b6b51e7mov rax, [rsp+360]
37b6b51eflea r13, [rsp+172]
37b6b51f7mov [rax], -1
37b6b51fdmov eax, -1
37b6b5202
37b6b5202loc_37b6b5202:
37b6b5202neg eax
37b6b5204jmp 0x37b6b522c
37b6b5206
37b6b5206 66 2e 0f 1f 84 00 00 00 00 00 f.........
37b6b5210
37b6b5210loc_37b6b5210:
37b6b5210mov edx, -3
37b6b5215mov eax, 3
37b6b521a
37b6b521aloc_37b6b521a:
37b6b521amov rdi, [rsp+360]
37b6b5222lea r13, [rsp+172]
37b6b522amov [rdi], edx
37b6b522c
37b6b522cloc_37b6b522c:
37b6b522cmov r8l, 6
37b6b5232mov rdx, r13
37b6b5235lea rcx, [rip+0xd7f788]
37b6b523cmov [rsp+172], eax
37b6b5243call xerbla_
37b6b5248nop
37b6b5249
37b6b5249loc_37b6b5249:
37b6b5249add rsp, 184
37b6b5250pop rbx
37b6b5251pop rsi
37b6b5252pop rdi
37b6b5253pop rbp
37b6b5254pop r12
37b6b5256pop r13
37b6b5258pop r14
37b6b525apop r15
37b6b525cret
37b6b525d
37b6b525d 0f 1f 00 ...
37b6b5260
37b6b5260loc_37b6b5260:
37b6b5260test r13l, r13l
37b6b5263mov eax, 1
37b6b5268cmovg eax, r13l
37b6b526cmov r13l, [rsp+128]
37b6b5274mov [rsp+128], eax
37b6b527bjmp 0x37b6b5156
37b6b5280
37b6b5280loc_37b6b5280:
37b6b5280mov r9l, 1
37b6b5286mov r8l, 1
37b6b528clea rdx, [rip+0xd7f720]
37b6b5293mov rcx, rbp
37b6b5296call lsame_
37b6b529btest eax, eax
37b6b529djne 0x37b6b5179
37b6b52a3mov edx, -2
37b6b52a8mov eax, 2
37b6b52adjmp 0x37b6b521a
37b6b52b2
37b6b52b2 66 0f 1f 44 00 00 f..D..
37b6b52b8
37b6b52b8loc_37b6b52b8:
37b6b52b8mov edx, -4
37b6b52bdmov eax, 4
37b6b52c2jmp 0x37b6b521a
37b6b52c7
37b6b52c7 66 0f 1f 84 00 00 00 00 00 f........
37b6b52d0
37b6b52d0loc_37b6b52d0:
37b6b52d0cmp ecx, r13l
37b6b52d3mov r8l, [r14]
37b6b52d6cmovg ecx, r13l
37b6b52dacmp r8l, ecx
37b6b52ddjl 0x37b6b52e4
37b6b52dfcmp r8l, r13l
37b6b52e2jle 0x37b6b52f8
37b6b52e4
37b6b52e4loc_37b6b52e4:
37b6b52e4mov edx, -6
37b6b52e9mov eax, 6
37b6b52eejmp 0x37b6b521a
37b6b52f3
37b6b52f3 0f 1f 44 00 00 ..D..
37b6b52f8
37b6b52f8loc_37b6b52f8:
37b6b52f8mov rcx, [rsp+312]
37b6b5300cmp [rcx], edx
37b6b5302jl 0x37b6b5617
37b6b5308mov edx, 1
37b6b530dtest eax, eax
37b6b530fcmovle eax, edx
37b6b5312mov rdx, [rsp+336]
37b6b531acmp [rdx], eax
37b6b531cjl 0x37b6b5626
37b6b5322mov rax, [rsp+352]
37b6b532amov edx, [rsp+128]
37b6b5331cmp [rax], edx
37b6b5333mov rax, [rsp+360]
37b6b533bjge 0x37b6b5360
37b6b533dcmp r15l, -1
37b6b5341je 0x37b6b5360
37b6b5343mov [rax], -13
37b6b5349lea r13, [rsp+172]
37b6b5351mov eax, 13
37b6b5356jmp 0x37b6b522c
37b6b535b
37b6b535b 0f 1f 44 00 00 ..D..
37b6b5360
37b6b5360loc_37b6b5360:
37b6b5360mov eax, [rax]
37b6b5362test eax, eax
37b6b5364jne 0x37b6b5635
37b6b536alea r13, [rsp+172]
37b6b5372mov [rsp+40], rbp
37b6b5377mov r9, rsi
37b6b537amov ecx, 2
37b6b537fmov [rsp+32], 1
37b6b5388mov r8l, 1
37b6b538emov rdx, r13
37b6b5391test r12l, r12l
37b6b5394je 0x37b6b55b0
37b6b539acall _gfortran_concat_string
37b6b539flea r14, [rsp+168]
37b6b53a7mov [rsp+32], rdi
37b6b53acmov r8, r13
37b6b53aflea rax, [rip+0xd7f60a]
37b6b53b6mov [rsp+40], r14
37b6b53bbmov r9, r14
37b6b53belea rdx, [rip+0xd7f5ef]
37b6b53c5mov [rsp+64], 2
37b6b53celea rcx, [rip+0xd7f5e7]
37b6b53d5mov [rsp+56], 6
37b6b53demov [rsp+48], rax
37b6b53e3call ilaenv_
37b6b53e8
37b6b53e8loc_37b6b53e8:
37b6b53e8imul eax, [rsp+128]
37b6b53f0mov [rsp+160], eax
37b6b53f7lea rax, [rsp+160]
37b6b53ffmov rcx, rax
37b6b5402mov [rsp+128], rax
37b6b540acall sroundup_lwork_
37b6b540fmov rax, [rsp+344]
37b6b5417movss [rax], x0
37b6b541bmov rax, [rsp+360]
37b6b5423mov eax, [rax]
37b6b5425test eax, eax
37b6b5427jne 0x37b6b5202
37b6b542dcmp r15l, -1
37b6b5431je 0x37b6b5249
37b6b5437mov ecx, [rbx]
37b6b5439test ecx, ecx
37b6b543bje 0x37b6b5598
37b6b5441mov ebx, [rdi]
37b6b5443test ebx, ebx
37b6b5445je 0x37b6b5598
37b6b544bmov r9l, [rsp+168]
37b6b5453test r9l, r9l
37b6b5456je 0x37b6b5598
37b6b545cmovsxd r8, [rsp+136]
37b6b5464xor eax, eax
37b6b5466test r8, r8
37b6b5469cmovs r8, rax
37b6b546dmov rax, [rsp+288]
37b6b5475movsxd rax, [rax]
37b6b5478mov r11, r8
37b6b547bnot r11
37b6b547elea r10l, [rax+1]
37b6b5482movsxd r10, r10l
37b6b5485test r12l, r12l
37b6b5488jne 0x37b6b5608
37b6b548emovsxd rdx, [rsp+140]
37b6b5496xor ebx, ebx
37b6b5498test rdx, rdx
37b6b549bcmovs rdx, rbx
37b6b549fmov rbx, rdx
37b6b54a2imul rdx, r10
37b6b54a6not rbx
37b6b54a9add rdx, rbx
37b6b54acmov ebx, r9l
37b6b54afmov r9l, ecx
37b6b54b2mov ecx, 1
37b6b54b7
37b6b54b7loc_37b6b54b7:
37b6b54b7add rdx, rcx
37b6b54bamov [rsp+32], r14
37b6b54bfmov rcx, [rsp+328]
37b6b54c7mov rdi, [rsp+352]
37b6b54cfmov [rsp+172], ebx
37b6b54d6lea rdx, [rcx+4*rdx]
37b6b54damov rcx, rsi
37b6b54ddmov [rsp+164], r9l
37b6b54e5lea r9, [rsp+156]
37b6b54edmov [rsp+64], rdx
37b6b54f2mov rdx, [rsp+320]
37b6b54famov [rsp+88], rdi
37b6b54ffmov rdi, [rsp+344]
37b6b5507lea rdx, [rdx+4*rax-4]
37b6b550cmov [rsp+96], r9
37b6b5511mov r9, r13
37b6b5514imul rax, r8
37b6b5518mov [rsp+80], rdi
37b6b551dmov rdi, [rsp+336]
37b6b5525lea r8, [rsp+164]
37b6b552dmov [rsp+56], rdx
37b6b5532mov rdx, [rsp+304]
37b6b553amov [rsp+72], rdi
37b6b553fmov rdi, [rsp+312]
37b6b5547mov [rsp+112], 1
37b6b5550add rax, r11
37b6b5553add rax, r10
37b6b5556mov [rsp+48], rdi
37b6b555bmov [rsp+104], 1
37b6b5564lea rax, [rdx+4*rax]
37b6b5568mov rdx, rbp
37b6b556bmov [rsp+40], rax
37b6b5570call sormqr_
37b6b5575mov rcx, [rsp+128]
37b6b557dcall sroundup_lwork_
37b6b5582mov rax, [rsp+344]
37b6b558amovss [rax], x0
37b6b558ejmp 0x37b6b5249
37b6b5593
37b6b5593 0f 1f 44 00 00 ..D..
37b6b5598
37b6b5598loc_37b6b5598:
37b6b5598mov rax, [rsp+344]
37b6b55a0mov [rax], 0x3f800000
37b6b55a6jmp 0x37b6b5249
37b6b55ab
37b6b55ab 0f 1f 44 00 00 ..D..
37b6b55b0
37b6b55b0loc_37b6b55b0:
37b6b55b0call _gfortran_concat_string
37b6b55b5lea r14, [rsp+168]
37b6b55bdmov r9, rbx
37b6b55c0mov r8, r13
37b6b55c3lea rax, [rip+0xd7f3f6]
37b6b55camov [rsp+40], r14
37b6b55cflea rdx, [rip+0xd7f3de]
37b6b55d6mov [rsp+64], 2
37b6b55dflea rcx, [rip+0xd7f3d6]
37b6b55e6mov [rsp+56], 6
37b6b55efmov [rsp+48], rax
37b6b55f4mov [rsp+32], r14
37b6b55f9call ilaenv_
37b6b55fejmp 0x37b6b53e8
37b6b5603
37b6b5603 0f 1f 44 00 00 ..D..
37b6b5608
37b6b5608loc_37b6b5608:
37b6b5608mov rcx, r10
37b6b560bmov rdx, -1
37b6b5612jmp 0x37b6b54b7
37b6b5617
37b6b5617loc_37b6b5617:
37b6b5617mov edx, -8
37b6b561cmov eax, 8
37b6b5621jmp 0x37b6b521a
37b6b5626
37b6b5626loc_37b6b5626:
37b6b5626mov edx, -11
37b6b562bmov eax, 11
37b6b5630jmp 0x37b6b521a
37b6b5635
37b6b5635loc_37b6b5635:
37b6b5635neg eax
37b6b5637lea r13, [rsp+172]
37b6b563fjmp 0x37b6b522c
37b6b50a0
37b6b50a0sormhr_:
37b6b50a0push r15
37b6b50a2push r14
37b6b50a4push r13
37b6b50a6push r12
37b6b50a8push rbp
37b6b50a9push rdi
37b6b50aapush rsi
37b6b50abpush rbx
37b6b50acsub rsp, 184
37b6b50b3mov rax, [rsp+312]
37b6b50bbmov r14, [rsp+296]
37b6b50c3mov eax, [rax]
37b6b50c5mov [rsp+136], eax
37b6b50ccmov rsi, rcx
37b6b50cfmov rbx, r8
37b6b50d2mov rdi, r9
37b6b50d5mov rbp, rdx
37b6b50d8mov rax, [rsp+336]
37b6b50e0mov rcx, [rsp+288]
37b6b50e8mov r9l, 1
37b6b50eemov r8l, 1
37b6b50f4lea rdx, [rip+0xd7f8b5]
37b6b50fbmov eax, [rax]
37b6b50fdmov [rsp+140], eax
37b6b5104mov rax, [rsp+360]
37b6b510cmov [rax], 0
37b6b5112mov eax, [r14]
37b6b5115sub eax, [rcx]
37b6b5117mov rcx, rsi
37b6b511amov [rsp+168], eax
37b6b5121call lsame_
37b6b5126mov r10l, [rdi]
37b6b5129mov r13l, [rbx]
37b6b512cmov r12l, eax
37b6b512fmov rax, [rsp+352]
37b6b5137mov r15l, [rax]
37b6b513atest r12l, r12l
37b6b513dje 0x37b6b51c0
37b6b5143test r10l, r10l
37b6b5146mov eax, 1
37b6b514bcmovg eax, r10l
37b6b514fmov [rsp+128], eax
37b6b5156
37b6b5156loc_37b6b5156:
37b6b5156mov r9l, 1
37b6b515cmov r8l, 1
37b6b5162lea rdx, [rip+0xd7f849]
37b6b5169mov rcx, rbp
37b6b516ccall lsame_
37b6b5171test eax, eax
37b6b5173je 0x37b6b5280
37b6b5179
37b6b5179loc_37b6b5179:
37b6b5179mov eax, [rbx]
37b6b517btest eax, eax
37b6b517djs 0x37b6b5210
37b6b5183mov edx, [rdi]
37b6b5185test edx, edx
37b6b5187js 0x37b6b52b8
37b6b518dmov rcx, [rsp+288]
37b6b5195test r13l, r13l
37b6b5198mov edx, 1
37b6b519dcmovg edx, r13l
37b6b51a1mov ecx, [rcx]
37b6b51a3cmp ecx, edx
37b6b51a5jg 0x37b6b51af
37b6b51a7test ecx, ecx
37b6b51a9jg 0x37b6b52d0
37b6b51af
37b6b51afloc_37b6b51af:
37b6b51afmov edx, -5
37b6b51b4mov eax, 5
37b6b51b9jmp 0x37b6b521a
37b6b51bb
37b6b51bb 0f 1f 44 00 00 ..D..
37b6b51c0
37b6b51c0loc_37b6b51c0:
37b6b51c0mov r9l, 1
37b6b51c6mov r8l, 1
37b6b51ccmov rcx, rsi
37b6b51cfmov [rsp+128], r10l
37b6b51d7lea rdx, [rip+0xd7f7d3]
37b6b51decall lsame_
37b6b51e3test eax, eax
37b6b51e5jne 0x37b6b5260
37b6b51e7mov rax, [rsp+360]
37b6b51eflea r13, [rsp+172]
37b6b51f7mov [rax], -1
37b6b51fdmov eax, -1
37b6b5202
37b6b5202loc_37b6b5202:
37b6b5202neg eax
37b6b5204jmp 0x37b6b522c
37b6b5206
37b6b5206 66 2e 0f 1f 84 00 00 00 00 00 f.........
37b6b5210
37b6b5210loc_37b6b5210:
37b6b5210mov edx, -3
37b6b5215mov eax, 3
37b6b521a
37b6b521aloc_37b6b521a:
37b6b521amov rdi, [rsp+360]
37b6b5222lea r13, [rsp+172]
37b6b522amov [rdi], edx
37b6b522c
37b6b522cloc_37b6b522c:
37b6b522cmov r8l, 6
37b6b5232mov rdx, r13
37b6b5235lea rcx, [rip+0xd7f788]
37b6b523cmov [rsp+172], eax
37b6b5243call xerbla_
37b6b5248nop
37b6b5249
37b6b5249loc_37b6b5249:
37b6b5249add rsp, 184
37b6b5250pop rbx
37b6b5251pop rsi
37b6b5252pop rdi
37b6b5253pop rbp
37b6b5254pop r12
37b6b5256pop r13
37b6b5258pop r14
37b6b525apop r15
37b6b525cret
37b6b525d
37b6b525d 0f 1f 00 ...
37b6b5260
37b6b5260loc_37b6b5260:
37b6b5260test r13l, r13l
37b6b5263mov eax, 1
37b6b5268cmovg eax, r13l
37b6b526cmov r13l, [rsp+128]
37b6b5274mov [rsp+128], eax
37b6b527bjmp 0x37b6b5156
37b6b5280
37b6b5280loc_37b6b5280:
37b6b5280mov r9l, 1
37b6b5286mov r8l, 1
37b6b528clea rdx, [rip+0xd7f720]
37b6b5293mov rcx, rbp
37b6b5296call lsame_
37b6b529btest eax, eax
37b6b529djne 0x37b6b5179
37b6b52a3mov edx, -2
37b6b52a8mov eax, 2
37b6b52adjmp 0x37b6b521a
37b6b52b2
37b6b52b2 66 0f 1f 44 00 00 f..D..
37b6b52b8
37b6b52b8loc_37b6b52b8:
37b6b52b8mov edx, -4
37b6b52bdmov eax, 4
37b6b52c2jmp 0x37b6b521a
37b6b52c7
37b6b52c7 66 0f 1f 84 00 00 00 00 00 f........
37b6b52d0
37b6b52d0loc_37b6b52d0:
37b6b52d0cmp ecx, r13l
37b6b52d3mov r8l, [r14]
37b6b52d6cmovg ecx, r13l
37b6b52dacmp r8l, ecx
37b6b52ddjl 0x37b6b52e4
37b6b52dfcmp r8l, r13l
37b6b52e2jle 0x37b6b52f8
37b6b52e4
37b6b52e4loc_37b6b52e4:
37b6b52e4mov edx, -6
37b6b52e9mov eax, 6
37b6b52eejmp 0x37b6b521a
37b6b52f3
37b6b52f3 0f 1f 44 00 00 ..D..
37b6b52f8
37b6b52f8loc_37b6b52f8:
37b6b52f8mov rcx, [rsp+312]
37b6b5300cmp [rcx], edx
37b6b5302jl 0x37b6b5617
37b6b5308mov edx, 1
37b6b530dtest eax, eax
37b6b530fcmovle eax, edx
37b6b5312mov rdx, [rsp+336]
37b6b531acmp [rdx], eax
37b6b531cjl 0x37b6b5626
37b6b5322mov rax, [rsp+352]
37b6b532amov edx, [rsp+128]
37b6b5331cmp [rax], edx
37b6b5333mov rax, [rsp+360]
37b6b533bjge 0x37b6b5360
37b6b533dcmp r15l, -1
37b6b5341je 0x37b6b5360
37b6b5343mov [rax], -13
37b6b5349lea r13, [rsp+172]
37b6b5351mov eax, 13
37b6b5356jmp 0x37b6b522c
37b6b535b
37b6b535b 0f 1f 44 00 00 ..D..
37b6b5360
37b6b5360loc_37b6b5360:
37b6b5360mov eax, [rax]
37b6b5362test eax, eax
37b6b5364jne 0x37b6b5635
37b6b536alea r13, [rsp+172]
37b6b5372mov [rsp+40], rbp
37b6b5377mov r9, rsi
37b6b537amov ecx, 2
37b6b537fmov [rsp+32], 1
37b6b5388mov r8l, 1
37b6b538emov rdx, r13
37b6b5391test r12l, r12l
37b6b5394je 0x37b6b55b0
37b6b539acall _gfortran_concat_string
37b6b539flea r14, [rsp+168]
37b6b53a7mov [rsp+32], rdi
37b6b53acmov r8, r13
37b6b53aflea rax, [rip+0xd7f60a]
37b6b53b6mov [rsp+40], r14
37b6b53bbmov r9, r14
37b6b53belea rdx, [rip+0xd7f5ef]
37b6b53c5mov [rsp+64], 2
37b6b53celea rcx, [rip+0xd7f5e7]
37b6b53d5mov [rsp+56], 6
37b6b53demov [rsp+48], rax
37b6b53e3call ilaenv_
37b6b53e8
37b6b53e8loc_37b6b53e8:
37b6b53e8imul eax, [rsp+128]
37b6b53f0mov [rsp+160], eax
37b6b53f7lea rax, [rsp+160]
37b6b53ffmov rcx, rax
37b6b5402mov [rsp+128], rax
37b6b540acall sroundup_lwork_
37b6b540fmov rax, [rsp+344]
37b6b5417movss [rax], x0
37b6b541bmov rax, [rsp+360]
37b6b5423mov eax, [rax]
37b6b5425test eax, eax
37b6b5427jne 0x37b6b5202
37b6b542dcmp r15l, -1
37b6b5431je 0x37b6b5249
37b6b5437mov ecx, [rbx]
37b6b5439test ecx, ecx
37b6b543bje 0x37b6b5598
37b6b5441mov ebx, [rdi]
37b6b5443test ebx, ebx
37b6b5445je 0x37b6b5598
37b6b544bmov r9l, [rsp+168]
37b6b5453test r9l, r9l
37b6b5456je 0x37b6b5598
37b6b545cmovsxd r8, [rsp+136]
37b6b5464xor eax, eax
37b6b5466test r8, r8
37b6b5469cmovs r8, rax
37b6b546dmov rax, [rsp+288]
37b6b5475movsxd rax, [rax]
37b6b5478mov r11, r8
37b6b547bnot r11
37b6b547elea r10l, [rax+1]
37b6b5482movsxd r10, r10l
37b6b5485test r12l, r12l
37b6b5488jne 0x37b6b5608
37b6b548emovsxd rdx, [rsp+140]
37b6b5496xor ebx, ebx
37b6b5498test rdx, rdx
37b6b549bcmovs rdx, rbx
37b6b549fmov rbx, rdx
37b6b54a2imul rdx, r10
37b6b54a6not rbx
37b6b54a9add rdx, rbx
37b6b54acmov ebx, r9l
37b6b54afmov r9l, ecx
37b6b54b2mov ecx, 1
37b6b54b7
37b6b54b7loc_37b6b54b7:
37b6b54b7add rdx, rcx
37b6b54bamov [rsp+32], r14
37b6b54bfmov rcx, [rsp+328]
37b6b54c7mov rdi, [rsp+352]
37b6b54cfmov [rsp+172], ebx
37b6b54d6lea rdx, [rcx+4*rdx]
37b6b54damov rcx, rsi
37b6b54ddmov [rsp+164], r9l
37b6b54e5lea r9, [rsp+156]
37b6b54edmov [rsp+64], rdx
37b6b54f2mov rdx, [rsp+320]
37b6b54famov [rsp+88], rdi
37b6b54ffmov rdi, [rsp+344]
37b6b5507lea rdx, [rdx+4*rax-4]
37b6b550cmov [rsp+96], r9
37b6b5511mov r9, r13
37b6b5514imul rax, r8
37b6b5518mov [rsp+80], rdi
37b6b551dmov rdi, [rsp+336]
37b6b5525lea r8, [rsp+164]
37b6b552dmov [rsp+56], rdx
37b6b5532mov rdx, [rsp+304]
37b6b553amov [rsp+72], rdi
37b6b553fmov rdi, [rsp+312]
37b6b5547mov [rsp+112], 1
37b6b5550add rax, r11
37b6b5553add rax, r10
37b6b5556mov [rsp+48], rdi
37b6b555bmov [rsp+104], 1
37b6b5564lea rax, [rdx+4*rax]
37b6b5568mov rdx, rbp
37b6b556bmov [rsp+40], rax
37b6b5570call sormqr_
37b6b5575mov rcx, [rsp+128]
37b6b557dcall sroundup_lwork_
37b6b5582mov rax, [rsp+344]
37b6b558amovss [rax], x0
37b6b558ejmp 0x37b6b5249
37b6b5593
37b6b5593 0f 1f 44 00 00 ..D..
37b6b5598
37b6b5598loc_37b6b5598:
37b6b5598mov rax, [rsp+344]
37b6b55a0mov [rax], 0x3f800000
37b6b55a6jmp 0x37b6b5249
37b6b55ab
37b6b55ab 0f 1f 44 00 00 ..D..
37b6b55b0
37b6b55b0loc_37b6b55b0:
37b6b55b0call _gfortran_concat_string
37b6b55b5lea r14, [rsp+168]
37b6b55bdmov r9, rbx
37b6b55c0mov r8, r13
37b6b55c3lea rax, [rip+0xd7f3f6]
37b6b55camov [rsp+40], r14
37b6b55cflea rdx, [rip+0xd7f3de]
37b6b55d6mov [rsp+64], 2
37b6b55dflea rcx, [rip+0xd7f3d6]
37b6b55e6mov [rsp+56], 6
37b6b55efmov [rsp+48], rax
37b6b55f4mov [rsp+32], r14
37b6b55f9call ilaenv_
37b6b55fejmp 0x37b6b53e8
37b6b5603
37b6b5603 0f 1f 44 00 00 ..D..
37b6b5608
37b6b5608loc_37b6b5608:
37b6b5608mov rcx, r10
37b6b560bmov rdx, -1
37b6b5612jmp 0x37b6b54b7
37b6b5617
37b6b5617loc_37b6b5617:
37b6b5617mov edx, -8
37b6b561cmov eax, 8
37b6b5621jmp 0x37b6b521a
37b6b5626
37b6b5626loc_37b6b5626:
37b6b5626mov edx, -11
37b6b562bmov eax, 11
37b6b5630jmp 0x37b6b521a
37b6b5635
37b6b5635loc_37b6b5635:
37b6b5635neg eax
37b6b5637lea r13, [rsp+172]
37b6b563fjmp 0x37b6b522c
37b6b50a0
37b6b5644
37b6b5644 // align 0x10
37b6b5644 // align 0x10
37b6b5650
37b6b5650sorml2_:
37b6b5650push r15
37b6b5652push r14
37b6b5654push r13
37b6b5656push r12
37b6b5658push rbp
37b6b5659push rdi
37b6b565apush rsi
37b6b565bpush rbx
37b6b565csub rsp, 168
37b6b5663mov rax, [rsp+288]
37b6b566bmovsxd r13, [rax]
37b6b566emov rax, [rsp+312]
37b6b5676mov ebp, [rax]
37b6b5678mov rax, [rsp+328]
37b6b5680mov r12, rdx
37b6b5683mov rsi, r8
37b6b5686lea rdx, [rip+0xd7f343]
37b6b568dmov r8l, 1
37b6b5693mov r14, r9
37b6b5696mov rbx, rcx
37b6b5699mov [rax], 0
37b6b569fmov r9l, 1
37b6b56a5call lsame_
37b6b56aamov r9l, 1
37b6b56b0mov r8l, 1
37b6b56b6mov rcx, r12
37b6b56b9lea rdx, [rip+0xd7f311]
37b6b56c0mov edi, eax
37b6b56c2call lsame_
37b6b56c7mov r15l, eax
37b6b56catest edi, edi
37b6b56ccje 0x37b6b5770
37b6b56d2mov eax, [rsi]
37b6b56d4mov [rsp+88], eax
37b6b56d8
37b6b56d8loc_37b6b56d8:
37b6b56d8test r15l, r15l
37b6b56dbje 0x37b6b57b0
37b6b56e1
37b6b56e1loc_37b6b56e1:
37b6b56e1mov ecx, [rsi]
37b6b56e3test ecx, ecx
37b6b56e5js 0x37b6b5720
37b6b56e7mov r8l, [r14]
37b6b56eatest r8l, r8l
37b6b56edjs 0x37b6b57e8
37b6b56f3mov rax, [rsp+272]
37b6b56fbmov r12l, [rax]
37b6b56fetest r12l, r12l
37b6b5701js 0x37b6b570e
37b6b5703cmp r12l, [rsp+88]
37b6b5708jle 0x37b6b5800
37b6b570e
37b6b570eloc_37b6b570e:
37b6b570emov eax, -5
37b6b5713mov edx, 5
37b6b5718jmp 0x37b6b572a
37b6b571a
37b6b571a 66 0f 1f 44 00 00 f..D..
37b6b5720
37b6b5720loc_37b6b5720:
37b6b5720mov eax, -3
37b6b5725mov edx, 3
37b6b572a
37b6b572aloc_37b6b572a:
37b6b572amov rbx, [rsp+328]
37b6b5732mov [rbx], eax
37b6b5734
37b6b5734loc_37b6b5734:
37b6b5734mov [rsp+156], edx
37b6b573bmov r8l, 6
37b6b5741lea rdx, [rsp+156]
37b6b5749lea rcx, [rip+0xd7f284]
37b6b5750call xerbla_
37b6b5755nop
37b6b5756
37b6b5756loc_37b6b5756:
37b6b5756add rsp, 168
37b6b575dpop rbx
37b6b575epop rsi
37b6b575fpop rdi
37b6b5760pop rbp
37b6b5761pop r12
37b6b5763pop r13
37b6b5765pop r14
37b6b5767pop r15
37b6b5769ret
37b6b576a
37b6b576a 66 0f 1f 44 00 00 f..D..
37b6b5770
37b6b5770loc_37b6b5770:
37b6b5770mov eax, [r14]
37b6b5773mov r9l, 1
37b6b5779mov r8l, 1
37b6b577fmov rcx, rbx
37b6b5782lea rdx, [rip+0xd7f249]
37b6b5789mov [rsp+88], eax
37b6b578dcall lsame_
37b6b5792test eax, eax
37b6b5794jne 0x37b6b56d8
37b6b579amov eax, -1
37b6b579fmov edx, 1
37b6b57a4jmp 0x37b6b572a
37b6b57a6
37b6b57a6 66 2e 0f 1f 84 00 00 00 00 00 f.........
37b6b57b0
37b6b57b0loc_37b6b57b0:
37b6b57b0mov r9l, 1
37b6b57b6mov r8l, 1
37b6b57bclea rdx, [rip+0xd7f210]
37b6b57c3mov rcx, r12
37b6b57c6call lsame_
37b6b57cbtest eax, eax
37b6b57cdjne 0x37b6b56e1
37b6b57d3mov eax, -2
37b6b57d8mov edx, 2
37b6b57ddjmp 0x37b6b572a
37b6b57e2
37b6b57e2 66 0f 1f 44 00 00 f..D..
37b6b57e8
37b6b57e8loc_37b6b57e8:
37b6b57e8mov eax, -4
37b6b57edmov edx, 4
37b6b57f2jmp 0x37b6b572a
37b6b57f7
37b6b57f7 66 0f 1f 84 00 00 00 00 00 f........
37b6b5800
37b6b5800loc_37b6b5800:
37b6b5800mov rax, [rsp+288]
37b6b5808test r12l, r12l
37b6b580bmov edx, 1
37b6b5810cmovg edx, r12l
37b6b5814cmp [rax], edx
37b6b5816jl 0x37b6b5840
37b6b5818mov rax, [rsp+312]
37b6b5820test ecx, ecx
37b6b5822mov edx, 1
37b6b5827cmovg edx, ecx
37b6b582acmp [rax], edx
37b6b582cjge 0x37b6b5850
37b6b582emov eax, -10
37b6b5833mov edx, 10
37b6b5838jmp 0x37b6b572a
37b6b583d
37b6b583d 0f 1f 00 ...
37b6b5840
37b6b5840loc_37b6b5840:
37b6b5840mov eax, -7
37b6b5845mov edx, 7
37b6b584ajmp 0x37b6b572a
37b6b584f
37b6b584f 90 .
37b6b5850
37b6b5850loc_37b6b5850:
37b6b5850mov rax, [rsp+328]
37b6b5858mov edx, [rax]
37b6b585atest edx, edx
37b6b585cjne 0x37b6b5a71
37b6b5862test ecx, ecx
37b6b5864je 0x37b6b5756
37b6b586atest r8l, r8l
37b6b586dje 0x37b6b5756
37b6b5873test r12l, r12l
37b6b5876je 0x37b6b5756
37b6b587ccmp edi, r15l
37b6b587fje 0x37b6b5a30
37b6b5885test edi, edi
37b6b5887je 0x37b6b5a58
37b6b588dmov [rsp+156], r8l
37b6b5895
37b6b5895loc_37b6b5895:
37b6b5895lea r15l, [r12-1]
37b6b589amov eax, -1
37b6b589f
37b6b589floc_37b6b589f:
37b6b589fxor edx, edx
37b6b58a1movsxd r8, ebp
37b6b58a4test r13, r13
37b6b58a7mov [rsp+240], rbx
37b6b58afcmovs r13, rdx
37b6b58b3test r8, r8
37b6b58b6mov ebx, 1
37b6b58bbmov [rsp+140], edi
37b6b58c2cmovs r8, rdx
37b6b58c6mov edi, r12l
37b6b58c9mov [rsp+136], eax
37b6b58d0lea rdx, [r13+1]
37b6b58d4mov r9, r13
37b6b58d7mov rcx, r8
37b6b58danot r9
37b6b58ddmov [rsp+128], r8
37b6b58e5not rcx
37b6b58e8mov [rsp+88], rcx
37b6b58edmovsxd rcx, eax
37b6b58f0imul rdx, rcx
37b6b58f4shl rcx, 2
37b6b58f8mov [rsp+96], rcx
37b6b58fdmov rcx, [rsp+296]
37b6b5905shl rdx, 2
37b6b5909mov [rsp+104], rdx
37b6b590emovsxd rdx, r12l
37b6b5911imul r13, rdx
37b6b5915add r9, rdx
37b6b5918lea rbp, [rcx+4*rdx-4]
37b6b591dlea rcx, [rsp+156]
37b6b5925mov r12, rbp
37b6b5928mov ebp, r15l
37b6b592bmov r15, r14
37b6b592emov [rsp+120], rcx
37b6b5933lea rcx, [rsp+152]
37b6b593bmov r14, rsi
37b6b593emov esi, 1
37b6b5943add r13, r9
37b6b5946mov r9, [rsp+280]
37b6b594emov [rsp+112], rcx
37b6b5953lea r13, [r9+4*r13]
37b6b5957jmp 0x37b6b5a05
37b6b595c
37b6b595c 0f 1f 40 00 ..@.
37b6b5960
37b6b5960loc_37b6b5960:
37b6b5960mov edx, [r14]
37b6b5963mov ebx, edi
37b6b5965sub edx, edi
37b6b5967add edx, 1
37b6b596amov [rsp+152], edx
37b6b5971
37b6b5971loc_37b6b5971:
37b6b5971movsxd rcx, ebx
37b6b5974movsxd rdx, esi
37b6b5977mov [rsp+40], r12
37b6b597cmov r8, [rsp+120]
37b6b5981mov rax, [rsp+320]
37b6b5989mov r9, r13
37b6b598csub ebp, 1
37b6b598fmov [rsp+72], 1
37b6b5998imul rdx, [rsp+128]
37b6b59a1add rdx, [rsp+88]
37b6b59a6mov [rsp+64], rax
37b6b59abmov rax, [rsp+312]
37b6b59b3add rdx, rcx
37b6b59b6mov rcx, [rsp+240]
37b6b59bemov [rsp+56], rax
37b6b59c3mov rax, [rsp+304]
37b6b59cblea rdx, [rax+4*rdx]
37b6b59cfmov rax, [rsp+288]
37b6b59d7mov [rsp+48], rdx
37b6b59dcmov rdx, [rsp+112]
37b6b59e1mov [rsp+32], rax
37b6b59e6call slarf1f_
37b6b59ebadd r13, [rsp+104]
37b6b59f0add r12, [rsp+96]
37b6b59f5add edi, [rsp+136]
37b6b59fccmp ebp, -1
37b6b59ffje 0x37b6b5756
37b6b5a05
37b6b5a05loc_37b6b5a05:
37b6b5a05mov eax, [rsp+140]
37b6b5a0ctest eax, eax
37b6b5a0ejne 0x37b6b5960
37b6b5a14mov edx, [r15]
37b6b5a17mov esi, edi
37b6b5a19sub edx, edi
37b6b5a1badd edx, 1
37b6b5a1emov [rsp+156], edx
37b6b5a25jmp 0x37b6b5971
37b6b5a2a
37b6b5a2a 66 0f 1f 44 00 00 f..D..
37b6b5a30
37b6b5a30loc_37b6b5a30:
37b6b5a30test edi, edi
37b6b5a32je 0x37b6b5a68
37b6b5a34mov [rsp+156], r8l
37b6b5a3c
37b6b5a3cloc_37b6b5a3c:
37b6b5a3clea r15l, [r12-1]
37b6b5a41mov eax, 1
37b6b5a46mov r12l, 1
37b6b5a4cjmp 0x37b6b589f
37b6b5a51
37b6b5a51 0f 1f 80 00 00 00 00 .......
37b6b5a58
37b6b5a58loc_37b6b5a58:
37b6b5a58mov [rsp+152], ecx
37b6b5a5fjmp 0x37b6b5895
37b6b5a64
37b6b5a64 0f 1f 40 00 ..@.
37b6b5a68
37b6b5a68loc_37b6b5a68:
37b6b5a68mov [rsp+152], ecx
37b6b5a6fjmp 0x37b6b5a3c
37b6b5a71
37b6b5a71loc_37b6b5a71:
37b6b5a71neg edx
37b6b5a73jmp 0x37b6b5734
37b6b5650
37b6b5650sorml2_:
37b6b5650push r15
37b6b5652push r14
37b6b5654push r13
37b6b5656push r12
37b6b5658push rbp
37b6b5659push rdi
37b6b565apush rsi
37b6b565bpush rbx
37b6b565csub rsp, 168
37b6b5663mov rax, [rsp+288]
37b6b566bmovsxd r13, [rax]
37b6b566emov rax, [rsp+312]
37b6b5676mov ebp, [rax]
37b6b5678mov rax, [rsp+328]
37b6b5680mov r12, rdx
37b6b5683mov rsi, r8
37b6b5686lea rdx, [rip+0xd7f343]
37b6b568dmov r8l, 1
37b6b5693mov r14, r9
37b6b5696mov rbx, rcx
37b6b5699mov [rax], 0
37b6b569fmov r9l, 1
37b6b56a5call lsame_
37b6b56aamov r9l, 1
37b6b56b0mov r8l, 1
37b6b56b6mov rcx, r12
37b6b56b9lea rdx, [rip+0xd7f311]
37b6b56c0mov edi, eax
37b6b56c2call lsame_
37b6b56c7mov r15l, eax
37b6b56catest edi, edi
37b6b56ccje 0x37b6b5770
37b6b56d2mov eax, [rsi]
37b6b56d4mov [rsp+88], eax
37b6b56d8
37b6b56d8loc_37b6b56d8:
37b6b56d8test r15l, r15l
37b6b56dbje 0x37b6b57b0
37b6b56e1
37b6b56e1loc_37b6b56e1:
37b6b56e1mov ecx, [rsi]
37b6b56e3test ecx, ecx
37b6b56e5js 0x37b6b5720
37b6b56e7mov r8l, [r14]
37b6b56eatest r8l, r8l
37b6b56edjs 0x37b6b57e8
37b6b56f3mov rax, [rsp+272]
37b6b56fbmov r12l, [rax]
37b6b56fetest r12l, r12l
37b6b5701js 0x37b6b570e
37b6b5703cmp r12l, [rsp+88]
37b6b5708jle 0x37b6b5800
37b6b570e
37b6b570eloc_37b6b570e:
37b6b570emov eax, -5
37b6b5713mov edx, 5
37b6b5718jmp 0x37b6b572a
37b6b571a
37b6b571a 66 0f 1f 44 00 00 f..D..
37b6b5720
37b6b5720loc_37b6b5720:
37b6b5720mov eax, -3
37b6b5725mov edx, 3
37b6b572a
37b6b572aloc_37b6b572a:
37b6b572amov rbx, [rsp+328]
37b6b5732mov [rbx], eax
37b6b5734
37b6b5734loc_37b6b5734:
37b6b5734mov [rsp+156], edx
37b6b573bmov r8l, 6
37b6b5741lea rdx, [rsp+156]
37b6b5749lea rcx, [rip+0xd7f284]
37b6b5750call xerbla_
37b6b5755nop
37b6b5756
37b6b5756loc_37b6b5756:
37b6b5756add rsp, 168
37b6b575dpop rbx
37b6b575epop rsi
37b6b575fpop rdi
37b6b5760pop rbp
37b6b5761pop r12
37b6b5763pop r13
37b6b5765pop r14
37b6b5767pop r15
37b6b5769ret
37b6b576a
37b6b576a 66 0f 1f 44 00 00 f..D..
37b6b5770
37b6b5770loc_37b6b5770:
37b6b5770mov eax, [r14]
37b6b5773mov r9l, 1
37b6b5779mov r8l, 1
37b6b577fmov rcx, rbx
37b6b5782lea rdx, [rip+0xd7f249]
37b6b5789mov [rsp+88], eax
37b6b578dcall lsame_
37b6b5792test eax, eax
37b6b5794jne 0x37b6b56d8
37b6b579amov eax, -1
37b6b579fmov edx, 1
37b6b57a4jmp 0x37b6b572a
37b6b57a6
37b6b57a6 66 2e 0f 1f 84 00 00 00 00 00 f.........
37b6b57b0
37b6b57b0loc_37b6b57b0:
37b6b57b0mov r9l, 1
37b6b57b6mov r8l, 1
37b6b57bclea rdx, [rip+0xd7f210]
37b6b57c3mov rcx, r12
37b6b57c6call lsame_
37b6b57cbtest eax, eax
37b6b57cdjne 0x37b6b56e1
37b6b57d3mov eax, -2
37b6b57d8mov edx, 2
37b6b57ddjmp 0x37b6b572a
37b6b57e2
37b6b57e2 66 0f 1f 44 00 00 f..D..
37b6b57e8
37b6b57e8loc_37b6b57e8:
37b6b57e8mov eax, -4
37b6b57edmov edx, 4
37b6b57f2jmp 0x37b6b572a
37b6b57f7
37b6b57f7 66 0f 1f 84 00 00 00 00 00 f........
37b6b5800
37b6b5800loc_37b6b5800:
37b6b5800mov rax, [rsp+288]
37b6b5808test r12l, r12l
37b6b580bmov edx, 1
37b6b5810cmovg edx, r12l
37b6b5814cmp [rax], edx
37b6b5816jl 0x37b6b5840
37b6b5818mov rax, [rsp+312]
37b6b5820test ecx, ecx
37b6b5822mov edx, 1
37b6b5827cmovg edx, ecx
37b6b582acmp [rax], edx
37b6b582cjge 0x37b6b5850
37b6b582emov eax, -10
37b6b5833mov edx, 10
37b6b5838jmp 0x37b6b572a
37b6b583d
37b6b583d 0f 1f 00 ...
37b6b5840
37b6b5840loc_37b6b5840:
37b6b5840mov eax, -7
37b6b5845mov edx, 7
37b6b584ajmp 0x37b6b572a
37b6b584f
37b6b584f 90 .
37b6b5850
37b6b5850loc_37b6b5850:
37b6b5850mov rax, [rsp+328]
37b6b5858mov edx, [rax]
37b6b585atest edx, edx
37b6b585cjne 0x37b6b5a71
37b6b5862test ecx, ecx
37b6b5864je 0x37b6b5756
37b6b586atest r8l, r8l
37b6b586dje 0x37b6b5756
37b6b5873test r12l, r12l
37b6b5876je 0x37b6b5756
37b6b587ccmp edi, r15l
37b6b587fje 0x37b6b5a30
37b6b5885test edi, edi
37b6b5887je 0x37b6b5a58
37b6b588dmov [rsp+156], r8l
37b6b5895
37b6b5895loc_37b6b5895:
37b6b5895lea r15l, [r12-1]
37b6b589amov eax, -1
37b6b589f
37b6b589floc_37b6b589f:
37b6b589fxor edx, edx
37b6b58a1movsxd r8, ebp
37b6b58a4test r13, r13
37b6b58a7mov [rsp+240], rbx
37b6b58afcmovs r13, rdx
37b6b58b3test r8, r8
37b6b58b6mov ebx, 1
37b6b58bbmov [rsp+140], edi
37b6b58c2cmovs r8, rdx
37b6b58c6mov edi, r12l
37b6b58c9mov [rsp+136], eax
37b6b58d0lea rdx, [r13+1]
37b6b58d4mov r9, r13
37b6b58d7mov rcx, r8
37b6b58danot r9
37b6b58ddmov [rsp+128], r8
37b6b58e5not rcx
37b6b58e8mov [rsp+88], rcx
37b6b58edmovsxd rcx, eax
37b6b58f0imul rdx, rcx
37b6b58f4shl rcx, 2
37b6b58f8mov [rsp+96], rcx
37b6b58fdmov rcx, [rsp+296]
37b6b5905shl rdx, 2
37b6b5909mov [rsp+104], rdx
37b6b590emovsxd rdx, r12l
37b6b5911imul r13, rdx
37b6b5915add r9, rdx
37b6b5918lea rbp, [rcx+4*rdx-4]
37b6b591dlea rcx, [rsp+156]
37b6b5925mov r12, rbp
37b6b5928mov ebp, r15l
37b6b592bmov r15, r14
37b6b592emov [rsp+120], rcx
37b6b5933lea rcx, [rsp+152]
37b6b593bmov r14, rsi
37b6b593emov esi, 1
37b6b5943add r13, r9
37b6b5946mov r9, [rsp+280]
37b6b594emov [rsp+112], rcx
37b6b5953lea r13, [r9+4*r13]
37b6b5957jmp 0x37b6b5a05
37b6b595c
37b6b595c 0f 1f 40 00 ..@.
37b6b5960
37b6b5960loc_37b6b5960:
37b6b5960mov edx, [r14]
37b6b5963mov ebx, edi
37b6b5965sub edx, edi
37b6b5967add edx, 1
37b6b596amov [rsp+152], edx
37b6b5971
37b6b5971loc_37b6b5971:
37b6b5971movsxd rcx, ebx
37b6b5974movsxd rdx, esi
37b6b5977mov [rsp+40], r12
37b6b597cmov r8, [rsp+120]
37b6b5981mov rax, [rsp+320]
37b6b5989mov r9, r13
37b6b598csub ebp, 1
37b6b598fmov [rsp+72], 1
37b6b5998imul rdx, [rsp+128]
37b6b59a1add rdx, [rsp+88]
37b6b59a6mov [rsp+64], rax
37b6b59abmov rax, [rsp+312]
37b6b59b3add rdx, rcx
37b6b59b6mov rcx, [rsp+240]
37b6b59bemov [rsp+56], rax
37b6b59c3mov rax, [rsp+304]
37b6b59cblea rdx, [rax+4*rdx]
37b6b59cfmov rax, [rsp+288]
37b6b59d7mov [rsp+48], rdx
37b6b59dcmov rdx, [rsp+112]
37b6b59e1mov [rsp+32], rax
37b6b59e6call slarf1f_
37b6b59ebadd r13, [rsp+104]
37b6b59f0add r12, [rsp+96]
37b6b59f5add edi, [rsp+136]
37b6b59fccmp ebp, -1
37b6b59ffje 0x37b6b5756
37b6b5a05
37b6b5a05loc_37b6b5a05:
37b6b5a05mov eax, [rsp+140]
37b6b5a0ctest eax, eax
37b6b5a0ejne 0x37b6b5960
37b6b5a14mov edx, [r15]
37b6b5a17mov esi, edi
37b6b5a19sub edx, edi
37b6b5a1badd edx, 1
37b6b5a1emov [rsp+156], edx
37b6b5a25jmp 0x37b6b5971
37b6b5a2a
37b6b5a2a 66 0f 1f 44 00 00 f..D..
37b6b5a30
37b6b5a30loc_37b6b5a30:
37b6b5a30test edi, edi
37b6b5a32je 0x37b6b5a68
37b6b5a34mov [rsp+156], r8l
37b6b5a3c
37b6b5a3cloc_37b6b5a3c:
37b6b5a3clea r15l, [r12-1]
37b6b5a41mov eax, 1
37b6b5a46mov r12l, 1
37b6b5a4cjmp 0x37b6b589f
37b6b5a51
37b6b5a51 0f 1f 80 00 00 00 00 .......
37b6b5a58
37b6b5a58loc_37b6b5a58:
37b6b5a58mov [rsp+152], ecx
37b6b5a5fjmp 0x37b6b5895
37b6b5a64
37b6b5a64 0f 1f 40 00 ..@.
37b6b5a68
37b6b5a68loc_37b6b5a68:
37b6b5a68mov [rsp+152], ecx
37b6b5a6fjmp 0x37b6b5a3c
37b6b5a71
37b6b5a71loc_37b6b5a71:
37b6b5a71neg edx
37b6b5a73jmp 0x37b6b5734
37b6b5650
37b6b5a78
37b6b5a78 // align 0x10
37b6b5a78 // align 0x10
37b6b5a80
37b6b5a80sormlq_:
37b6b5a80push r15
37b6b5a82push r14
37b6b5a84push r13
37b6b5a86push r12
37b6b5a88push rbp
37b6b5a89push rdi
37b6b5a8apush rsi
37b6b5a8bpush rbx
37b6b5a8csub rsp, 312
37b6b5a93mov rax, [rsp+432]
37b6b5a9bmov r12, [rsp+480]
37b6b5aa3mov eax, [rax]
37b6b5aa5mov [r12], 0
37b6b5aadmov [rsp+208], eax
37b6b5ab4mov rbp, rdx
37b6b5ab7mov rbx, r8
37b6b5abamov rsi, r9
37b6b5abdmov r8l, 1
37b6b5ac3mov r9l, 1
37b6b5ac9lea rdx, [rip+0xd7ef10]
37b6b5ad0mov rdi, rcx
37b6b5ad3mov rax, [rsp+456]
37b6b5adbmov eax, [rax]
37b6b5addmov [rsp+216], eax
37b6b5ae4call lsame_
37b6b5ae9mov r9l, 1
37b6b5aefmov r8l, 1
37b6b5af5mov rcx, rbp
37b6b5af8lea rdx, [rip+0xd7eee2]
37b6b5affmov [rsp+256], eax
37b6b5b06mov r14l, eax
37b6b5b09call lsame_
37b6b5b0emov r13l, [rsi]
37b6b5b11mov [rsp+168], eax
37b6b5b18mov rax, [rsp+472]
37b6b5b20mov r15l, [rax]
37b6b5b23mov eax, [rbx]
37b6b5b25mov [rsp+160], eax
37b6b5b2ctest r14l, r14l
37b6b5b2fje 0x37b6b5b88
37b6b5b31mov ecx, [rsp+168]
37b6b5b38test r13l, r13l
37b6b5b3bmov r14l, 1
37b6b5b41cmovg r14l, r13l
37b6b5b45test ecx, ecx
37b6b5b47je 0x37b6b5c32
37b6b5b4d
37b6b5b4dloc_37b6b5b4d:
37b6b5b4dmov eax, [rbx]
37b6b5b4ftest eax, eax
37b6b5b51js 0x37b6b5bb8
37b6b5b53mov edx, [rsi]
37b6b5b55test edx, edx
37b6b5b57js 0x37b6b5c68
37b6b5b5dmov rcx, [rsp+416]
37b6b5b65mov edx, [rcx]
37b6b5b67test edx, edx
37b6b5b69js 0x37b6b5b78
37b6b5b6bcmp edx, [rsp+160]
37b6b5b72jle 0x37b6b5c80
37b6b5b78
37b6b5b78loc_37b6b5b78:
37b6b5b78mov edx, -5
37b6b5b7dmov eax, 5
37b6b5b82jmp 0x37b6b5bc2
37b6b5b84
37b6b5b84 0f 1f 40 00 ..@.
37b6b5b88
37b6b5b88loc_37b6b5b88:
37b6b5b88mov r9l, 1
37b6b5b8emov r8l, 1
37b6b5b94lea rdx, [rip+0xd7ee47]
37b6b5b9bmov rcx, rdi
37b6b5b9ecall lsame_
37b6b5ba3test eax, eax
37b6b5ba5jne 0x37b6b5c08
37b6b5ba7mov edx, -1
37b6b5bacmov eax, 1
37b6b5bb1jmp 0x37b6b5bc2
37b6b5bb3
37b6b5bb3 0f 1f 44 00 00 ..D..
37b6b5bb8
37b6b5bb8loc_37b6b5bb8:
37b6b5bb8mov edx, -3
37b6b5bbdmov eax, 3
37b6b5bc2
37b6b5bc2loc_37b6b5bc2:
37b6b5bc2mov [r12], edx
37b6b5bc6lea r13, [rsp+300]
37b6b5bcelea r11, [rip+0xd7ee0f]
37b6b5bd5
37b6b5bd5loc_37b6b5bd5:
37b6b5bd5mov r8l, 6
37b6b5bdbmov rdx, r13
37b6b5bdemov rcx, r11
37b6b5be1mov [rsp+300], eax
37b6b5be8call xerbla_
37b6b5bednop
37b6b5bee
37b6b5beeloc_37b6b5bee:
37b6b5beeadd rsp, 312
37b6b5bf5pop rbx
37b6b5bf6pop rsi
37b6b5bf7pop rdi
37b6b5bf8pop rbp
37b6b5bf9pop r12
37b6b5bfbpop r13
37b6b5bfdpop r14
37b6b5bffpop r15
37b6b5c01ret
37b6b5c02
37b6b5c02 66 0f 1f 44 00 00 f..D..
37b6b5c08
37b6b5c08loc_37b6b5c08:
37b6b5c08mov eax, [rsp+160]
37b6b5c0fmov ecx, [rsp+168]
37b6b5c16mov r14l, 1
37b6b5c1cmov [rsp+160], r13l
37b6b5c24test eax, eax
37b6b5c26cmovg r14l, eax
37b6b5c2atest ecx, ecx
37b6b5c2cjne 0x37b6b5b4d
37b6b5c32
37b6b5c32loc_37b6b5c32:
37b6b5c32mov r9l, 1
37b6b5c38mov r8l, 1
37b6b5c3emov rcx, rbp
37b6b5c41lea rdx, [rip+0xd7ed9b]
37b6b5c48call lsame_
37b6b5c4dtest eax, eax
37b6b5c4fjne 0x37b6b5b4d
37b6b5c55mov edx, -2
37b6b5c5amov eax, 2
37b6b5c5fjmp 0x37b6b5bc2
37b6b5c64
37b6b5c64 0f 1f 40 00 ..@.
37b6b5c68
37b6b5c68loc_37b6b5c68:
37b6b5c68mov edx, -4
37b6b5c6dmov eax, 4
37b6b5c72jmp 0x37b6b5bc2
37b6b5c77
37b6b5c77 66 0f 1f 84 00 00 00 00 00 f........
37b6b5c80
37b6b5c80loc_37b6b5c80:
37b6b5c80mov ecx, 1
37b6b5c85test edx, edx
37b6b5c87cmovle edx, ecx
37b6b5c8amov rcx, [rsp+432]
37b6b5c92cmp [rcx], edx
37b6b5c94jl 0x37b6b5cf0
37b6b5c96mov rcx, [rsp+456]
37b6b5c9etest eax, eax
37b6b5ca0mov edx, 1
37b6b5ca5cmovle eax, edx
37b6b5ca8cmp [rcx], eax
37b6b5caajl 0x37b6b6360
37b6b5cb0mov rax, [rsp+472]
37b6b5cb8cmp [rax], r14l
37b6b5cbbjge 0x37b6b5cff
37b6b5cbdcmp r15l, -1
37b6b5cc1je 0x37b6b63e6
37b6b5cc7mov [r12], -12
37b6b5ccfmov eax, 12
37b6b5cd4lea r13, [rsp+300]
37b6b5cdclea r11, [rip+0xd7ed01]
37b6b5ce3jmp 0x37b6b5bd5
37b6b5ce8
37b6b5ce8 0f 1f 84 00 00 00 00 00 ........
37b6b5cf0
37b6b5cf0loc_37b6b5cf0:
37b6b5cf0mov edx, -7
37b6b5cf5mov eax, 7
37b6b5cfajmp 0x37b6b5bc2
37b6b5cff
37b6b5cffloc_37b6b5cff:
37b6b5cffmov eax, [r12]
37b6b5d03test eax, eax
37b6b5d05jne 0x37b6b63ee
37b6b5d0bmov [rsp+40], rbp
37b6b5d10lea r13, [rsp+300]
37b6b5d18mov r9, rdi
37b6b5d1bmov ecx, 2
37b6b5d20mov [rsp+32], 1
37b6b5d29mov r8l, 1
37b6b5d2fmov rdx, r13
37b6b5d32call _gfortran_concat_string
37b6b5d37mov [rsp+32], rsi
37b6b5d3cmov r9, rbx
37b6b5d3fmov r8, r13
37b6b5d42lea rax, [rip+0xd7eca7]
37b6b5d49lea r11, [rip+0xd7ec94]
37b6b5d50mov [rsp+64], 2
37b6b5d59mov [rsp+48], rax
37b6b5d5emov rax, [rsp+416]
37b6b5d66mov rdx, r11
37b6b5d69lea rcx, [rip+0xd7ec7c]
37b6b5d70mov [rsp+56], 6
37b6b5d79mov [rsp+40], rax
37b6b5d7emov [rsp+200], r11
37b6b5d86call ilaenv_
37b6b5d8bmov r10l, 64
37b6b5d91cmp eax, r10l
37b6b5d94mov [rsp+192], eax
37b6b5d9bcmovle r10l, eax
37b6b5d9fmov r8l, r10l
37b6b5da2mov [rsp+184], r10l
37b6b5daaimul r8l, r14l
37b6b5daelea eax, [r8+4160]
37b6b5db5mov [rsp+176], r8l
37b6b5dbdmov [rsp+288], eax
37b6b5dc4lea rax, [rsp+288]
37b6b5dccmov rcx, rax
37b6b5dcfmov [rsp+224], rax
37b6b5dd7call sroundup_lwork_
37b6b5ddcmov rax, [rsp+464]
37b6b5de4movsxd r8, [rsp+176]
37b6b5decmov r10l, [rsp+184]
37b6b5df4mov r11, [rsp+200]
37b6b5dfcmovss [rax], x0
37b6b5e00mov eax, [r12]
37b6b5e04test eax, eax
37b6b5e06jne 0x37b6b64cb
37b6b5e0ccmp r15l, -1
37b6b5e10je 0x37b6b5bee
37b6b5e16mov eax, [rbx]
37b6b5e18test eax, eax
37b6b5e1aje 0x37b6b61e0
37b6b5e20mov r15l, [rsi]
37b6b5e23test r15l, r15l
37b6b5e26je 0x37b6b61e0
37b6b5e2cmov rax, [rsp+416]
37b6b5e34mov ecx, [rax]
37b6b5e36test ecx, ecx
37b6b5e38je 0x37b6b61e0
37b6b5e3ecmp [rsp+192], 1
37b6b5e46mov [rsp+284], r14l
37b6b5e4ejle 0x37b6b61f8
37b6b5e54cmp ecx, r10l
37b6b5e57jle 0x37b6b61f8
37b6b5e5dmov rax, [rsp+472]
37b6b5e65mov eax, [rax]
37b6b5e67cmp eax, [rsp+288]
37b6b5e6ejl 0x37b6b62a0
37b6b5e74
37b6b5e74loc_37b6b5e74:
37b6b5e74movsxd r11, [rsp+208]
37b6b5e7cxor eax, eax
37b6b5e7emovsxd r9, [rsp+216]
37b6b5e86mov r15l, [rsp+256]
37b6b5e8emov r12l, [rsp+168]
37b6b5e96test r11, r11
37b6b5e99cmovs r11, rax
37b6b5e9dmov rax, r11
37b6b5ea0not rax
37b6b5ea3mov [rsp+176], rax
37b6b5eabxor eax, eax
37b6b5eadtest r9, r9
37b6b5eb0cmovs r9, rax
37b6b5eb4mov rax, r9
37b6b5eb7not rax
37b6b5ebamov [rsp+184], rax
37b6b5ec2cmp r15l, r12l
37b6b5ec5je 0x37b6b6370
37b6b5ecblea ebp, [rcx-1]
37b6b5ecemov eax, ebp
37b6b5ed0cdq
37b6b5ed1idiv r10l
37b6b5ed4mov eax, r10l
37b6b5ed7neg eax
37b6b5ed9mov [rsp+268], eax
37b6b5ee0sub ebp, edx
37b6b5ee2lea r14l, [rbp+1]
37b6b5ee6test r15l, r15l
37b6b5ee9je 0x37b6b63b0
37b6b5eefmov eax, [rsi]
37b6b5ef1mov [rsp+296], eax
37b6b5ef8test r12l, r12l
37b6b5efbje 0x37b6b63ca
37b6b5f01
37b6b5f01loc_37b6b5f01:
37b6b5f01mov r12l, 84
37b6b5f07
37b6b5f07loc_37b6b5f07:
37b6b5f07mov eax, ebp
37b6b5f09xor edx, edx
37b6b5f0bdiv r10l
37b6b5f0emov ebp, eax
37b6b5f10
37b6b5f10loc_37b6b5f10:
37b6b5f10lea rdx, [rsp+280]
37b6b5f18mov rax, [rsp+464]
37b6b5f20mov [rsp+279], r12b
37b6b5f28lea r12, [rip+0xd7ead9]
37b6b5f2fmov [rsp+168], rdx
37b6b5f37lea rdx, [rsp+279]
37b6b5f3fmov [rsp+192], rdx
37b6b5f47lea rdx, [rsp+284]
37b6b5f4fmov [rsp+200], rdx
37b6b5f57lea rdx, [rsp+296]
37b6b5f5fmov [rsp+216], rdx
37b6b5f67lea rdx, [rsp+292]
37b6b5f6fmov [rsp+384], rdi
37b6b5f77lea rdi, [rax+4*r8]
37b6b5f7bmov [rsp+400], rbx
37b6b5f83mov ebx, r10l
37b6b5f86mov [rsp+248], r13
37b6b5f8emov r13, [rsp+432]
37b6b5f96mov [rsp+264], 1
37b6b5fa1mov [rsp+260], 1
37b6b5facmov [rsp+208], rdx
37b6b5fb4mov [rsp+232], r11
37b6b5fbcmov [rsp+240], r9
37b6b5fc4mov [rsp+408], rsi
37b6b5fccjmp 0x37b6b60f6
37b6b5fd1
37b6b5fd1 0f 1f 80 00 00 00 00 .......
37b6b5fd8
37b6b5fd8loc_37b6b5fd8:
37b6b5fd8mov rax, [rsp+400]
37b6b5fe0mov [rsp+260], r14l
37b6b5fe8mov rcx, r15
37b6b5febmov edx, [rax]
37b6b5fedsub edx, r14l
37b6b5ff0add edx, 1
37b6b5ff3mov [rsp+292], edx
37b6b5ffamovsxd rdx, [rsp+264]
37b6b6002
37b6b6002loc_37b6b6002:
37b6b6002mov rax, [rsp+200]
37b6b600amov [rsp+72], rdi
37b6b600flea r9, [rip+0xd7e9e2]
37b6b6016lea r8, [rip+0xd7e9e2]
37b6b601dimul rdx, [rsp+240]
37b6b6026add rdx, [rsp+184]
37b6b602emov [rsp+64], r13
37b6b6033mov [rsp+112], rax
37b6b6038add rdx, rcx
37b6b603bmov rax, [rsp+464]
37b6b6043mov [rsp+56], rsi
37b6b6048mov rcx, [rsp+384]
37b6b6050mov [rsp+104], rax
37b6b6055mov rax, [rsp+456]
37b6b605dmov [rsp+144], 7
37b6b6069mov [rsp+96], rax
37b6b606emov rax, [rsp+448]
37b6b6076mov [rsp+136], 7
37b6b6082lea rdx, [rax+4*rdx]
37b6b6086mov rax, [rsp+168]
37b6b608emov [rsp+80], r12
37b6b6093mov [rsp+88], rdx
37b6b6098mov rdx, [rsp+192]
37b6b60a0mov [rsp+48], rax
37b6b60a5mov rax, [rsp+216]
37b6b60admov [rsp+128], 1
37b6b60b9mov [rsp+40], rax
37b6b60bemov rax, [rsp+208]
37b6b60c6mov [rsp+120], 1
37b6b60cfmov [rsp+32], rax
37b6b60d4call slarfb_
37b6b60d9test ebp, ebp
37b6b60dbje 0x37b6b627b
37b6b60e1mov rax, [rsp+416]
37b6b60e9add r14l, [rsp+268]
37b6b60f1sub ebp, 1
37b6b60f4mov ecx, [rax]
37b6b60f6
37b6b60f6loc_37b6b60f6:
37b6b60f6sub ecx, r14l
37b6b60f9movsxd r15, r14l
37b6b60fcmov edx, [rsp+160]
37b6b6103mov rax, [rsp+424]
37b6b610badd ecx, 1
37b6b610emov [rsp+64], r12
37b6b6113mov r9, [rsp+168]
37b6b611bcmp ecx, ebx
37b6b611dmov [rsp+56], rdi
37b6b6122mov r8, [rsp+248]
37b6b612acmovg ecx, ebx
37b6b612dsub edx, r14l
37b6b6130mov [rsp+40], r13
37b6b6135mov [rsp+80], 7
37b6b613eadd edx, 1
37b6b6141mov [rsp+300], edx
37b6b6148mov rdx, [rsp+232]
37b6b6150mov [rsp+72], 7
37b6b6159imul rdx, r15
37b6b615dadd rdx, [rsp+176]
37b6b6165mov [rsp+280], ecx
37b6b616clea rcx, [rip+0xd7e88c]
37b6b6173add rdx, r15
37b6b6176lea rsi, [rax+4*rdx]
37b6b617amov rax, [rsp+440]
37b6b6182mov [rsp+32], rsi
37b6b6187lea rdx, [rax+4*r15-4]
37b6b618cmov [rsp+48], rdx
37b6b6191lea rdx, [rip+0xd7e860]
37b6b6198call slarft_
37b6b619dmov eax, [rsp+256]
37b6b61a4test eax, eax
37b6b61a6jne 0x37b6b5fd8
37b6b61acmov rax, [rsp+408]
37b6b61b4mov [rsp+264], r14l
37b6b61bcmovsxd rcx, [rsp+260]
37b6b61c4mov edx, [rax]
37b6b61c6sub edx, r14l
37b6b61c9add edx, 1
37b6b61ccmov [rsp+296], edx
37b6b61d3mov rdx, r15
37b6b61d6jmp 0x37b6b6002
37b6b61db
37b6b61db 0f 1f 44 00 00 ..D..
37b6b61e0
37b6b61e0loc_37b6b61e0:
37b6b61e0mov rax, [rsp+464]
37b6b61e8mov [rax], 0x3f800000
37b6b61eejmp 0x37b6b5bee
37b6b61f3
37b6b61f3 0f 1f 44 00 00 ..D..
37b6b61f8
37b6b61f8loc_37b6b61f8:
37b6b61f8mov [rsp+88], r13
37b6b61fdmov r9, rsi
37b6b6200mov r8, rbx
37b6b6203mov rdx, rbp
37b6b6206mov rax, [rsp+464]
37b6b620emov rcx, rdi
37b6b6211mov [rsp+104], 1
37b6b621amov [rsp+96], 1
37b6b6223mov [rsp+80], rax
37b6b6228mov rax, [rsp+456]
37b6b6230mov [rsp+72], rax
37b6b6235mov rax, [rsp+448]
37b6b623dmov [rsp+64], rax
37b6b6242mov rax, [rsp+440]
37b6b624amov [rsp+56], rax
37b6b624fmov rax, [rsp+432]
37b6b6257mov [rsp+48], rax
37b6b625cmov rax, [rsp+424]
37b6b6264mov [rsp+40], rax
37b6b6269mov rax, [rsp+416]
37b6b6271mov [rsp+32], rax
37b6b6276call sorml2_
37b6b627b
37b6b627bloc_37b6b627b:
37b6b627bmov rcx, [rsp+224]
37b6b6283call sroundup_lwork_
37b6b6288mov rax, [rsp+464]
37b6b6290movss [rax], x0
37b6b6294jmp 0x37b6b5bee
37b6b6299
37b6b6299 0f 1f 80 00 00 00 00 .......
37b6b62a0
37b6b62a0loc_37b6b62a0:
37b6b62a0sub eax, 4160
37b6b62a5mov [rsp+40], rbp
37b6b62aamov r9, rdi
37b6b62admov ecx, 2
37b6b62b2cdq
37b6b62b3mov r8l, 1
37b6b62b9mov [rsp+32], 1
37b6b62c2idiv r14l
37b6b62c5mov [rsp+184], r11
37b6b62cdmov rdx, r13
37b6b62d0mov [rsp+176], eax
37b6b62d7call _gfortran_concat_string
37b6b62dcmov [rsp+32], rsi
37b6b62e1mov r9, rbx
37b6b62e4mov r8, r13
37b6b62e7lea rax, [rip+0xd7e702]
37b6b62eemov rdx, [rsp+184]
37b6b62f6mov [rsp+64], 2
37b6b62fflea rcx, [rip+0xd7e6ee]
37b6b6306mov [rsp+48], rax
37b6b630bmov rax, [rsp+416]
37b6b6313mov [rsp+56], 6
37b6b631cmov [rsp+40], rax
37b6b6321call ilaenv_
37b6b6326mov edx, 2
37b6b632bmov r10l, [rsp+176]
37b6b6333cmp eax, edx
37b6b6335cmovl eax, edx
37b6b6338cmp r10l, eax
37b6b633bjl 0x37b6b61f8
37b6b6341mov rax, [rsp+416]
37b6b6349mov ecx, [rax]
37b6b634bcmp ecx, r10l
37b6b634ejle 0x37b6b61f8
37b6b6354imul r14l, r10l
37b6b6358movsxd r8, r14l
37b6b635bjmp 0x37b6b5e74
37b6b6360
37b6b6360loc_37b6b6360:
37b6b6360mov edx, -10
37b6b6365mov eax, 10
37b6b636ajmp 0x37b6b5bc2
37b6b636f
37b6b636f 90 .
37b6b6370
37b6b6370loc_37b6b6370:
37b6b6370mov edx, [rsp+256]
37b6b6377test edx, edx
37b6b6379je 0x37b6b63d5
37b6b637bmov eax, [rsi]
37b6b637dmov r12l, 84
37b6b6383mov [rsp+296], eax
37b6b638a
37b6b638aloc_37b6b638a:
37b6b638alea eax, [rcx-1]
37b6b638dxor edx, edx
37b6b638fmov [rsp+268], r10l
37b6b6397mov r14l, 1
37b6b639ddiv r10l
37b6b63a0mov ebp, eax
37b6b63a2jmp 0x37b6b5f10
37b6b63a7
37b6b63a7 66 0f 1f 84 00 00 00 00 00 f........
37b6b63b0
37b6b63b0loc_37b6b63b0:
37b6b63b0mov eax, [rbx]
37b6b63b2mov r12l, [rsp+168]
37b6b63bamov [rsp+292], eax
37b6b63c1test r12l, r12l
37b6b63c4jne 0x37b6b5f01
37b6b63ca
37b6b63caloc_37b6b63ca:
37b6b63camov r12l, 78
37b6b63d0jmp 0x37b6b5f07
37b6b63d5
37b6b63d5loc_37b6b63d5:
37b6b63d5mov eax, [rbx]
37b6b63d7mov r12l, 78
37b6b63ddmov [rsp+292], eax
37b6b63e4jmp 0x37b6b638a
37b6b63e6
37b6b63e6loc_37b6b63e6:
37b6b63e6mov eax, [r12]
37b6b63eatest eax, eax
37b6b63ecje 0x37b6b6404
37b6b63ee
37b6b63eeloc_37b6b63ee:
37b6b63eeneg eax
37b6b63f0lea r13, [rsp+300]
37b6b63f8lea r11, [rip+0xd7e5e5]
37b6b63ffjmp 0x37b6b5bd5
37b6b6404
37b6b6404loc_37b6b6404:
37b6b6404mov [rsp+40], rbp
37b6b6409lea r13, [rsp+300]
37b6b6411mov r9, rdi
37b6b6414mov ecx, 2
37b6b6419mov [rsp+32], 1
37b6b6422mov r8l, 1
37b6b6428mov rdx, r13
37b6b642bcall _gfortran_concat_string
37b6b6430mov [rsp+32], rsi
37b6b6435mov r9, rbx
37b6b6438mov r8, r13
37b6b643blea rax, [rip+0xd7e5ae]
37b6b6442lea r11, [rip+0xd7e59b]
37b6b6449mov [rsp+64], 2
37b6b6452mov [rsp+48], rax
37b6b6457mov rax, [rsp+416]
37b6b645fmov rdx, r11
37b6b6462lea rcx, [rip+0xd7e583]
37b6b6469mov [rsp+56], 6
37b6b6472mov [rsp+40], rax
37b6b6477mov [rsp+160], r11
37b6b647fcall ilaenv_
37b6b6484mov edx, 64
37b6b6489lea rcx, [rsp+288]
37b6b6491cmp eax, edx
37b6b6493cmovg eax, edx
37b6b6496imul eax, r14l
37b6b649aadd eax, 4160
37b6b649fmov [rsp+288], eax
37b6b64a6call sroundup_lwork_
37b6b64abmov rax, [rsp+464]
37b6b64b3mov r11, [rsp+160]
37b6b64bbmovss [rax], x0
37b6b64bfmov eax, [r12]
37b6b64c3test eax, eax
37b6b64c5je 0x37b6b5bee
37b6b64cb
37b6b64cbloc_37b6b64cb:
37b6b64cbneg eax
37b6b64cdjmp 0x37b6b5bd5
37b6b5a80
37b6b5a80sormlq_:
37b6b5a80push r15
37b6b5a82push r14
37b6b5a84push r13
37b6b5a86push r12
37b6b5a88push rbp
37b6b5a89push rdi
37b6b5a8apush rsi
37b6b5a8bpush rbx
37b6b5a8csub rsp, 312
37b6b5a93mov rax, [rsp+432]
37b6b5a9bmov r12, [rsp+480]
37b6b5aa3mov eax, [rax]
37b6b5aa5mov [r12], 0
37b6b5aadmov [rsp+208], eax
37b6b5ab4mov rbp, rdx
37b6b5ab7mov rbx, r8
37b6b5abamov rsi, r9
37b6b5abdmov r8l, 1
37b6b5ac3mov r9l, 1
37b6b5ac9lea rdx, [rip+0xd7ef10]
37b6b5ad0mov rdi, rcx
37b6b5ad3mov rax, [rsp+456]
37b6b5adbmov eax, [rax]
37b6b5addmov [rsp+216], eax
37b6b5ae4call lsame_
37b6b5ae9mov r9l, 1
37b6b5aefmov r8l, 1
37b6b5af5mov rcx, rbp
37b6b5af8lea rdx, [rip+0xd7eee2]
37b6b5affmov [rsp+256], eax
37b6b5b06mov r14l, eax
37b6b5b09call lsame_
37b6b5b0emov r13l, [rsi]
37b6b5b11mov [rsp+168], eax
37b6b5b18mov rax, [rsp+472]
37b6b5b20mov r15l, [rax]
37b6b5b23mov eax, [rbx]
37b6b5b25mov [rsp+160], eax
37b6b5b2ctest r14l, r14l
37b6b5b2fje 0x37b6b5b88
37b6b5b31mov ecx, [rsp+168]
37b6b5b38test r13l, r13l
37b6b5b3bmov r14l, 1
37b6b5b41cmovg r14l, r13l
37b6b5b45test ecx, ecx
37b6b5b47je 0x37b6b5c32
37b6b5b4d
37b6b5b4dloc_37b6b5b4d:
37b6b5b4dmov eax, [rbx]
37b6b5b4ftest eax, eax
37b6b5b51js 0x37b6b5bb8
37b6b5b53mov edx, [rsi]
37b6b5b55test edx, edx
37b6b5b57js 0x37b6b5c68
37b6b5b5dmov rcx, [rsp+416]
37b6b5b65mov edx, [rcx]
37b6b5b67test edx, edx
37b6b5b69js 0x37b6b5b78
37b6b5b6bcmp edx, [rsp+160]
37b6b5b72jle 0x37b6b5c80
37b6b5b78
37b6b5b78loc_37b6b5b78:
37b6b5b78mov edx, -5
37b6b5b7dmov eax, 5
37b6b5b82jmp 0x37b6b5bc2
37b6b5b84
37b6b5b84 0f 1f 40 00 ..@.
37b6b5b88
37b6b5b88loc_37b6b5b88:
37b6b5b88mov r9l, 1
37b6b5b8emov r8l, 1
37b6b5b94lea rdx, [rip+0xd7ee47]
37b6b5b9bmov rcx, rdi
37b6b5b9ecall lsame_
37b6b5ba3test eax, eax
37b6b5ba5jne 0x37b6b5c08
37b6b5ba7mov edx, -1
37b6b5bacmov eax, 1
37b6b5bb1jmp 0x37b6b5bc2
37b6b5bb3
37b6b5bb3 0f 1f 44 00 00 ..D..
37b6b5bb8
37b6b5bb8loc_37b6b5bb8:
37b6b5bb8mov edx, -3
37b6b5bbdmov eax, 3
37b6b5bc2
37b6b5bc2loc_37b6b5bc2:
37b6b5bc2mov [r12], edx
37b6b5bc6lea r13, [rsp+300]
37b6b5bcelea r11, [rip+0xd7ee0f]
37b6b5bd5
37b6b5bd5loc_37b6b5bd5:
37b6b5bd5mov r8l, 6
37b6b5bdbmov rdx, r13
37b6b5bdemov rcx, r11
37b6b5be1mov [rsp+300], eax
37b6b5be8call xerbla_
37b6b5bednop
37b6b5bee
37b6b5beeloc_37b6b5bee:
37b6b5beeadd rsp, 312
37b6b5bf5pop rbx
37b6b5bf6pop rsi
37b6b5bf7pop rdi
37b6b5bf8pop rbp
37b6b5bf9pop r12
37b6b5bfbpop r13
37b6b5bfdpop r14
37b6b5bffpop r15
37b6b5c01ret
37b6b5c02
37b6b5c02 66 0f 1f 44 00 00 f..D..
37b6b5c08
37b6b5c08loc_37b6b5c08:
37b6b5c08mov eax, [rsp+160]
37b6b5c0fmov ecx, [rsp+168]
37b6b5c16mov r14l, 1
37b6b5c1cmov [rsp+160], r13l
37b6b5c24test eax, eax
37b6b5c26cmovg r14l, eax
37b6b5c2atest ecx, ecx
37b6b5c2cjne 0x37b6b5b4d
37b6b5c32
37b6b5c32loc_37b6b5c32:
37b6b5c32mov r9l, 1
37b6b5c38mov r8l, 1
37b6b5c3emov rcx, rbp
37b6b5c41lea rdx, [rip+0xd7ed9b]
37b6b5c48call lsame_
37b6b5c4dtest eax, eax
37b6b5c4fjne 0x37b6b5b4d
37b6b5c55mov edx, -2
37b6b5c5amov eax, 2
37b6b5c5fjmp 0x37b6b5bc2
37b6b5c64
37b6b5c64 0f 1f 40 00 ..@.
37b6b5c68
37b6b5c68loc_37b6b5c68:
37b6b5c68mov edx, -4
37b6b5c6dmov eax, 4
37b6b5c72jmp 0x37b6b5bc2
37b6b5c77
37b6b5c77 66 0f 1f 84 00 00 00 00 00 f........
37b6b5c80
37b6b5c80loc_37b6b5c80:
37b6b5c80mov ecx, 1
37b6b5c85test edx, edx
37b6b5c87cmovle edx, ecx
37b6b5c8amov rcx, [rsp+432]
37b6b5c92cmp [rcx], edx
37b6b5c94jl 0x37b6b5cf0
37b6b5c96mov rcx, [rsp+456]
37b6b5c9etest eax, eax
37b6b5ca0mov edx, 1
37b6b5ca5cmovle eax, edx
37b6b5ca8cmp [rcx], eax
37b6b5caajl 0x37b6b6360
37b6b5cb0mov rax, [rsp+472]
37b6b5cb8cmp [rax], r14l
37b6b5cbbjge 0x37b6b5cff
37b6b5cbdcmp r15l, -1
37b6b5cc1je 0x37b6b63e6
37b6b5cc7mov [r12], -12
37b6b5ccfmov eax, 12
37b6b5cd4lea r13, [rsp+300]
37b6b5cdclea r11, [rip+0xd7ed01]
37b6b5ce3jmp 0x37b6b5bd5
37b6b5ce8
37b6b5ce8 0f 1f 84 00 00 00 00 00 ........
37b6b5cf0
37b6b5cf0loc_37b6b5cf0:
37b6b5cf0mov edx, -7
37b6b5cf5mov eax, 7
37b6b5cfajmp 0x37b6b5bc2
37b6b5cff
37b6b5cffloc_37b6b5cff:
37b6b5cffmov eax, [r12]
37b6b5d03test eax, eax
37b6b5d05jne 0x37b6b63ee
37b6b5d0bmov [rsp+40], rbp
37b6b5d10lea r13, [rsp+300]
37b6b5d18mov r9, rdi
37b6b5d1bmov ecx, 2
37b6b5d20mov [rsp+32], 1
37b6b5d29mov r8l, 1
37b6b5d2fmov rdx, r13
37b6b5d32call _gfortran_concat_string
37b6b5d37mov [rsp+32], rsi
37b6b5d3cmov r9, rbx
37b6b5d3fmov r8, r13
37b6b5d42lea rax, [rip+0xd7eca7]
37b6b5d49lea r11, [rip+0xd7ec94]
37b6b5d50mov [rsp+64], 2
37b6b5d59mov [rsp+48], rax
37b6b5d5emov rax, [rsp+416]
37b6b5d66mov rdx, r11
37b6b5d69lea rcx, [rip+0xd7ec7c]
37b6b5d70mov [rsp+56], 6
37b6b5d79mov [rsp+40], rax
37b6b5d7emov [rsp+200], r11
37b6b5d86call ilaenv_
37b6b5d8bmov r10l, 64
37b6b5d91cmp eax, r10l
37b6b5d94mov [rsp+192], eax
37b6b5d9bcmovle r10l, eax
37b6b5d9fmov r8l, r10l
37b6b5da2mov [rsp+184], r10l
37b6b5daaimul r8l, r14l
37b6b5daelea eax, [r8+4160]
37b6b5db5mov [rsp+176], r8l
37b6b5dbdmov [rsp+288], eax
37b6b5dc4lea rax, [rsp+288]
37b6b5dccmov rcx, rax
37b6b5dcfmov [rsp+224], rax
37b6b5dd7call sroundup_lwork_
37b6b5ddcmov rax, [rsp+464]
37b6b5de4movsxd r8, [rsp+176]
37b6b5decmov r10l, [rsp+184]
37b6b5df4mov r11, [rsp+200]
37b6b5dfcmovss [rax], x0
37b6b5e00mov eax, [r12]
37b6b5e04test eax, eax
37b6b5e06jne 0x37b6b64cb
37b6b5e0ccmp r15l, -1
37b6b5e10je 0x37b6b5bee
37b6b5e16mov eax, [rbx]
37b6b5e18test eax, eax
37b6b5e1aje 0x37b6b61e0
37b6b5e20mov r15l, [rsi]
37b6b5e23test r15l, r15l
37b6b5e26je 0x37b6b61e0
37b6b5e2cmov rax, [rsp+416]
37b6b5e34mov ecx, [rax]
37b6b5e36test ecx, ecx
37b6b5e38je 0x37b6b61e0
37b6b5e3ecmp [rsp+192], 1
37b6b5e46mov [rsp+284], r14l
37b6b5e4ejle 0x37b6b61f8
37b6b5e54cmp ecx, r10l
37b6b5e57jle 0x37b6b61f8
37b6b5e5dmov rax, [rsp+472]
37b6b5e65mov eax, [rax]
37b6b5e67cmp eax, [rsp+288]
37b6b5e6ejl 0x37b6b62a0
37b6b5e74
37b6b5e74loc_37b6b5e74:
37b6b5e74movsxd r11, [rsp+208]
37b6b5e7cxor eax, eax
37b6b5e7emovsxd r9, [rsp+216]
37b6b5e86mov r15l, [rsp+256]
37b6b5e8emov r12l, [rsp+168]
37b6b5e96test r11, r11
37b6b5e99cmovs r11, rax
37b6b5e9dmov rax, r11
37b6b5ea0not rax
37b6b5ea3mov [rsp+176], rax
37b6b5eabxor eax, eax
37b6b5eadtest r9, r9
37b6b5eb0cmovs r9, rax
37b6b5eb4mov rax, r9
37b6b5eb7not rax
37b6b5ebamov [rsp+184], rax
37b6b5ec2cmp r15l, r12l
37b6b5ec5je 0x37b6b6370
37b6b5ecblea ebp, [rcx-1]
37b6b5ecemov eax, ebp
37b6b5ed0cdq
37b6b5ed1idiv r10l
37b6b5ed4mov eax, r10l
37b6b5ed7neg eax
37b6b5ed9mov [rsp+268], eax
37b6b5ee0sub ebp, edx
37b6b5ee2lea r14l, [rbp+1]
37b6b5ee6test r15l, r15l
37b6b5ee9je 0x37b6b63b0
37b6b5eefmov eax, [rsi]
37b6b5ef1mov [rsp+296], eax
37b6b5ef8test r12l, r12l
37b6b5efbje 0x37b6b63ca
37b6b5f01
37b6b5f01loc_37b6b5f01:
37b6b5f01mov r12l, 84
37b6b5f07
37b6b5f07loc_37b6b5f07:
37b6b5f07mov eax, ebp
37b6b5f09xor edx, edx
37b6b5f0bdiv r10l
37b6b5f0emov ebp, eax
37b6b5f10
37b6b5f10loc_37b6b5f10:
37b6b5f10lea rdx, [rsp+280]
37b6b5f18mov rax, [rsp+464]
37b6b5f20mov [rsp+279], r12b
37b6b5f28lea r12, [rip+0xd7ead9]
37b6b5f2fmov [rsp+168], rdx
37b6b5f37lea rdx, [rsp+279]
37b6b5f3fmov [rsp+192], rdx
37b6b5f47lea rdx, [rsp+284]
37b6b5f4fmov [rsp+200], rdx
37b6b5f57lea rdx, [rsp+296]
37b6b5f5fmov [rsp+216], rdx
37b6b5f67lea rdx, [rsp+292]
37b6b5f6fmov [rsp+384], rdi
37b6b5f77lea rdi, [rax+4*r8]
37b6b5f7bmov [rsp+400], rbx
37b6b5f83mov ebx, r10l
37b6b5f86mov [rsp+248], r13
37b6b5f8emov r13, [rsp+432]
37b6b5f96mov [rsp+264], 1
37b6b5fa1mov [rsp+260], 1
37b6b5facmov [rsp+208], rdx
37b6b5fb4mov [rsp+232], r11
37b6b5fbcmov [rsp+240], r9
37b6b5fc4mov [rsp+408], rsi
37b6b5fccjmp 0x37b6b60f6
37b6b5fd1
37b6b5fd1 0f 1f 80 00 00 00 00 .......
37b6b5fd8
37b6b5fd8loc_37b6b5fd8:
37b6b5fd8mov rax, [rsp+400]
37b6b5fe0mov [rsp+260], r14l
37b6b5fe8mov rcx, r15
37b6b5febmov edx, [rax]
37b6b5fedsub edx, r14l
37b6b5ff0add edx, 1
37b6b5ff3mov [rsp+292], edx
37b6b5ffamovsxd rdx, [rsp+264]
37b6b6002
37b6b6002loc_37b6b6002:
37b6b6002mov rax, [rsp+200]
37b6b600amov [rsp+72], rdi
37b6b600flea r9, [rip+0xd7e9e2]
37b6b6016lea r8, [rip+0xd7e9e2]
37b6b601dimul rdx, [rsp+240]
37b6b6026add rdx, [rsp+184]
37b6b602emov [rsp+64], r13
37b6b6033mov [rsp+112], rax
37b6b6038add rdx, rcx
37b6b603bmov rax, [rsp+464]
37b6b6043mov [rsp+56], rsi
37b6b6048mov rcx, [rsp+384]
37b6b6050mov [rsp+104], rax
37b6b6055mov rax, [rsp+456]
37b6b605dmov [rsp+144], 7
37b6b6069mov [rsp+96], rax
37b6b606emov rax, [rsp+448]
37b6b6076mov [rsp+136], 7
37b6b6082lea rdx, [rax+4*rdx]
37b6b6086mov rax, [rsp+168]
37b6b608emov [rsp+80], r12
37b6b6093mov [rsp+88], rdx
37b6b6098mov rdx, [rsp+192]
37b6b60a0mov [rsp+48], rax
37b6b60a5mov rax, [rsp+216]
37b6b60admov [rsp+128], 1
37b6b60b9mov [rsp+40], rax
37b6b60bemov rax, [rsp+208]
37b6b60c6mov [rsp+120], 1
37b6b60cfmov [rsp+32], rax
37b6b60d4call slarfb_
37b6b60d9test ebp, ebp
37b6b60dbje 0x37b6b627b
37b6b60e1mov rax, [rsp+416]
37b6b60e9add r14l, [rsp+268]
37b6b60f1sub ebp, 1
37b6b60f4mov ecx, [rax]
37b6b60f6
37b6b60f6loc_37b6b60f6:
37b6b60f6sub ecx, r14l
37b6b60f9movsxd r15, r14l
37b6b60fcmov edx, [rsp+160]
37b6b6103mov rax, [rsp+424]
37b6b610badd ecx, 1
37b6b610emov [rsp+64], r12
37b6b6113mov r9, [rsp+168]
37b6b611bcmp ecx, ebx
37b6b611dmov [rsp+56], rdi
37b6b6122mov r8, [rsp+248]
37b6b612acmovg ecx, ebx
37b6b612dsub edx, r14l
37b6b6130mov [rsp+40], r13
37b6b6135mov [rsp+80], 7
37b6b613eadd edx, 1
37b6b6141mov [rsp+300], edx
37b6b6148mov rdx, [rsp+232]
37b6b6150mov [rsp+72], 7
37b6b6159imul rdx, r15
37b6b615dadd rdx, [rsp+176]
37b6b6165mov [rsp+280], ecx
37b6b616clea rcx, [rip+0xd7e88c]
37b6b6173add rdx, r15
37b6b6176lea rsi, [rax+4*rdx]
37b6b617amov rax, [rsp+440]
37b6b6182mov [rsp+32], rsi
37b6b6187lea rdx, [rax+4*r15-4]
37b6b618cmov [rsp+48], rdx
37b6b6191lea rdx, [rip+0xd7e860]
37b6b6198call slarft_
37b6b619dmov eax, [rsp+256]
37b6b61a4test eax, eax
37b6b61a6jne 0x37b6b5fd8
37b6b61acmov rax, [rsp+408]
37b6b61b4mov [rsp+264], r14l
37b6b61bcmovsxd rcx, [rsp+260]
37b6b61c4mov edx, [rax]
37b6b61c6sub edx, r14l
37b6b61c9add edx, 1
37b6b61ccmov [rsp+296], edx
37b6b61d3mov rdx, r15
37b6b61d6jmp 0x37b6b6002
37b6b61db
37b6b61db 0f 1f 44 00 00 ..D..
37b6b61e0
37b6b61e0loc_37b6b61e0:
37b6b61e0mov rax, [rsp+464]
37b6b61e8mov [rax], 0x3f800000
37b6b61eejmp 0x37b6b5bee
37b6b61f3
37b6b61f3 0f 1f 44 00 00 ..D..
37b6b61f8
37b6b61f8loc_37b6b61f8:
37b6b61f8mov [rsp+88], r13
37b6b61fdmov r9, rsi
37b6b6200mov r8, rbx
37b6b6203mov rdx, rbp
37b6b6206mov rax, [rsp+464]
37b6b620emov rcx, rdi
37b6b6211mov [rsp+104], 1
37b6b621amov [rsp+96], 1
37b6b6223mov [rsp+80], rax
37b6b6228mov rax, [rsp+456]
37b6b6230mov [rsp+72], rax
37b6b6235mov rax, [rsp+448]
37b6b623dmov [rsp+64], rax
37b6b6242mov rax, [rsp+440]
37b6b624amov [rsp+56], rax
37b6b624fmov rax, [rsp+432]
37b6b6257mov [rsp+48], rax
37b6b625cmov rax, [rsp+424]
37b6b6264mov [rsp+40], rax
37b6b6269mov rax, [rsp+416]
37b6b6271mov [rsp+32], rax
37b6b6276call sorml2_
37b6b627b
37b6b627bloc_37b6b627b:
37b6b627bmov rcx, [rsp+224]
37b6b6283call sroundup_lwork_
37b6b6288mov rax, [rsp+464]
37b6b6290movss [rax], x0
37b6b6294jmp 0x37b6b5bee
37b6b6299
37b6b6299 0f 1f 80 00 00 00 00 .......
37b6b62a0
37b6b62a0loc_37b6b62a0:
37b6b62a0sub eax, 4160
37b6b62a5mov [rsp+40], rbp
37b6b62aamov r9, rdi
37b6b62admov ecx, 2
37b6b62b2cdq
37b6b62b3mov r8l, 1
37b6b62b9mov [rsp+32], 1
37b6b62c2idiv r14l
37b6b62c5mov [rsp+184], r11
37b6b62cdmov rdx, r13
37b6b62d0mov [rsp+176], eax
37b6b62d7call _gfortran_concat_string
37b6b62dcmov [rsp+32], rsi
37b6b62e1mov r9, rbx
37b6b62e4mov r8, r13
37b6b62e7lea rax, [rip+0xd7e702]
37b6b62eemov rdx, [rsp+184]
37b6b62f6mov [rsp+64], 2
37b6b62fflea rcx, [rip+0xd7e6ee]
37b6b6306mov [rsp+48], rax
37b6b630bmov rax, [rsp+416]
37b6b6313mov [rsp+56], 6
37b6b631cmov [rsp+40], rax
37b6b6321call ilaenv_
37b6b6326mov edx, 2
37b6b632bmov r10l, [rsp+176]
37b6b6333cmp eax, edx
37b6b6335cmovl eax, edx
37b6b6338cmp r10l, eax
37b6b633bjl 0x37b6b61f8
37b6b6341mov rax, [rsp+416]
37b6b6349mov ecx, [rax]
37b6b634bcmp ecx, r10l
37b6b634ejle 0x37b6b61f8
37b6b6354imul r14l, r10l
37b6b6358movsxd r8, r14l
37b6b635bjmp 0x37b6b5e74
37b6b6360
37b6b6360loc_37b6b6360:
37b6b6360mov edx, -10
37b6b6365mov eax, 10
37b6b636ajmp 0x37b6b5bc2
37b6b636f
37b6b636f 90 .
37b6b6370
37b6b6370loc_37b6b6370:
37b6b6370mov edx, [rsp+256]
37b6b6377test edx, edx
37b6b6379je 0x37b6b63d5
37b6b637bmov eax, [rsi]
37b6b637dmov r12l, 84
37b6b6383mov [rsp+296], eax
37b6b638a
37b6b638aloc_37b6b638a:
37b6b638alea eax, [rcx-1]
37b6b638dxor edx, edx
37b6b638fmov [rsp+268], r10l
37b6b6397mov r14l, 1
37b6b639ddiv r10l
37b6b63a0mov ebp, eax
37b6b63a2jmp 0x37b6b5f10
37b6b63a7
37b6b63a7 66 0f 1f 84 00 00 00 00 00 f........
37b6b63b0
37b6b63b0loc_37b6b63b0:
37b6b63b0mov eax, [rbx]
37b6b63b2mov r12l, [rsp+168]
37b6b63bamov [rsp+292], eax
37b6b63c1test r12l, r12l
37b6b63c4jne 0x37b6b5f01
37b6b63ca
37b6b63caloc_37b6b63ca:
37b6b63camov r12l, 78
37b6b63d0jmp 0x37b6b5f07
37b6b63d5
37b6b63d5loc_37b6b63d5:
37b6b63d5mov eax, [rbx]
37b6b63d7mov r12l, 78
37b6b63ddmov [rsp+292], eax
37b6b63e4jmp 0x37b6b638a
37b6b63e6
37b6b63e6loc_37b6b63e6:
37b6b63e6mov eax, [r12]
37b6b63eatest eax, eax
37b6b63ecje 0x37b6b6404
37b6b63ee
37b6b63eeloc_37b6b63ee:
37b6b63eeneg eax
37b6b63f0lea r13, [rsp+300]
37b6b63f8lea r11, [rip+0xd7e5e5]
37b6b63ffjmp 0x37b6b5bd5
37b6b6404
37b6b6404loc_37b6b6404:
37b6b6404mov [rsp+40], rbp
37b6b6409lea r13, [rsp+300]
37b6b6411mov r9, rdi
37b6b6414mov ecx, 2
37b6b6419mov [rsp+32], 1
37b6b6422mov r8l, 1
37b6b6428mov rdx, r13
37b6b642bcall _gfortran_concat_string
37b6b6430mov [rsp+32], rsi
37b6b6435mov r9, rbx
37b6b6438mov r8, r13
37b6b643blea rax, [rip+0xd7e5ae]
37b6b6442lea r11, [rip+0xd7e59b]
37b6b6449mov [rsp+64], 2
37b6b6452mov [rsp+48], rax
37b6b6457mov rax, [rsp+416]
37b6b645fmov rdx, r11
37b6b6462lea rcx, [rip+0xd7e583]
37b6b6469mov [rsp+56], 6
37b6b6472mov [rsp+40], rax
37b6b6477mov [rsp+160], r11
37b6b647fcall ilaenv_
37b6b6484mov edx, 64
37b6b6489lea rcx, [rsp+288]
37b6b6491cmp eax, edx
37b6b6493cmovg eax, edx
37b6b6496imul eax, r14l
37b6b649aadd eax, 4160
37b6b649fmov [rsp+288], eax
37b6b64a6call sroundup_lwork_
37b6b64abmov rax, [rsp+464]
37b6b64b3mov r11, [rsp+160]
37b6b64bbmovss [rax], x0
37b6b64bfmov eax, [r12]
37b6b64c3test eax, eax
37b6b64c5je 0x37b6b5bee
37b6b64cb
37b6b64cbloc_37b6b64cb:
37b6b64cbneg eax
37b6b64cdjmp 0x37b6b5bd5
37b6b5a80
37b6b64d2
37b6b64d2 // align 0x10
37b6b64d2 // align 0x10
37b6b64e0
37b6b64e0sormql_:
37b6b64e0push r15
37b6b64e2push r14
37b6b64e4push r13
37b6b64e6push r12
37b6b64e8push rbp
37b6b64e9push rdi
37b6b64eapush rsi
37b6b64ebpush rbx
37b6b64ecsub rsp, 280
37b6b64f3mov rbp, [rsp+448]
37b6b64fbmov rax, [rsp+400]
37b6b6503mov [rbp], 0
37b6b650amov eax, [rax]
37b6b650cmov r13, rdx
37b6b650fmov rbx, r8
37b6b6512mov rsi, r9
37b6b6515mov r8l, 1
37b6b651bmov r9l, 1
37b6b6521lea rdx, [rip+0xd7e4e8]
37b6b6528mov rdi, rcx
37b6b652bmov [rsp+176], eax
37b6b6532call lsame_
37b6b6537mov r9l, 1
37b6b653dmov r8l, 1
37b6b6543mov rcx, r13
37b6b6546lea rdx, [rip+0xd7e4c4]
37b6b654dmov [rsp+164], eax
37b6b6554mov r12l, eax
37b6b6557call lsame_
37b6b655cmov r10l, [rsi]
37b6b655fmov r14l, eax
37b6b6562mov rax, [rsp+440]
37b6b656amov r15l, [rax]
37b6b656dmov eax, [rbx]
37b6b656fmov [rsp+160], eax
37b6b6576test r12l, r12l
37b6b6579je 0x37b6b65d0
37b6b657btest r10l, r10l
37b6b657emov r12l, 1
37b6b6584cmovg r12l, r10l
37b6b6588test r14l, r14l
37b6b658bje 0x37b6b667c
37b6b6591
37b6b6591loc_37b6b6591:
37b6b6591mov edx, [rbx]
37b6b6593test edx, edx
37b6b6595js 0x37b6b6608
37b6b6597mov ecx, [rsi]
37b6b6599test ecx, ecx
37b6b659bjs 0x37b6b66b0
37b6b65a1mov rax, [rsp+384]
37b6b65a9mov eax, [rax]
37b6b65abtest eax, eax
37b6b65adjs 0x37b6b65c0
37b6b65afmov r11l, [rsp+160]
37b6b65b7cmp eax, r11l
37b6b65bajle 0x37b6b66c0
37b6b65c0
37b6b65c0loc_37b6b65c0:
37b6b65c0mov edx, -5
37b6b65c5mov eax, 5
37b6b65cajmp 0x37b6b6612
37b6b65cc
37b6b65cc 0f 1f 40 00 ..@.
37b6b65d0
37b6b65d0loc_37b6b65d0:
37b6b65d0mov r9l, 1
37b6b65d6mov r8l, 1
37b6b65dcmov rcx, rdi
37b6b65dfmov [rsp+168], r10l
37b6b65e7lea rdx, [rip+0xd7e424]
37b6b65eecall lsame_
37b6b65f3test eax, eax
37b6b65f5jne 0x37b6b6650
37b6b65f7mov edx, -1
37b6b65fcmov eax, 1
37b6b6601jmp 0x37b6b6612
37b6b6603
37b6b6603 0f 1f 44 00 00 ..D..
37b6b6608
37b6b6608loc_37b6b6608:
37b6b6608mov edx, -3
37b6b660dmov eax, 3
37b6b6612
37b6b6612loc_37b6b6612:
37b6b6612mov [rbp], edx
37b6b6615
37b6b6615loc_37b6b6615:
37b6b6615lea rdx, [rsp+268]
37b6b661dmov r8l, 6
37b6b6623lea rcx, [rip+0xd7e3ea]
37b6b662amov [rsp+268], eax
37b6b6631call xerbla_
37b6b6636nop
37b6b6637
37b6b6637loc_37b6b6637:
37b6b6637add rsp, 280
37b6b663epop rbx
37b6b663fpop rsi
37b6b6640pop rdi
37b6b6641pop rbp
37b6b6642pop r12
37b6b6644pop r13
37b6b6646pop r14
37b6b6648pop r15
37b6b664aret
37b6b664b
37b6b664b 0f 1f 44 00 00 ..D..
37b6b6650
37b6b6650loc_37b6b6650:
37b6b6650mov eax, [rsp+160]
37b6b6657mov r10l, [rsp+168]
37b6b665fmov r12l, 1
37b6b6665test eax, eax
37b6b6667mov [rsp+160], r10l
37b6b666fcmovg r12l, eax
37b6b6673test r14l, r14l
37b6b6676jne 0x37b6b6591
37b6b667c
37b6b667cloc_37b6b667c:
37b6b667cmov r9l, 1
37b6b6682mov r8l, 1
37b6b6688mov rcx, r13
37b6b668blea rdx, [rip+0xd7e381]
37b6b6692call lsame_
37b6b6697test eax, eax
37b6b6699jne 0x37b6b6591
37b6b669fmov edx, -2
37b6b66a4mov eax, 2
37b6b66a9jmp 0x37b6b6612
37b6b66ae
37b6b66ae 66 90 f.
37b6b66b0
37b6b66b0loc_37b6b66b0:
37b6b66b0mov edx, -4
37b6b66b5mov eax, 4
37b6b66bajmp 0x37b6b6612
37b6b66bf
37b6b66bf 90 .
37b6b66c0
37b6b66c0loc_37b6b66c0:
37b6b66c0mov r10, [rsp+400]
37b6b66c8test r11l, r11l
37b6b66cbmov eax, 1
37b6b66d0cmovg eax, r11l
37b6b66d4cmp [r10], eax
37b6b66d7jl 0x37b6b6720
37b6b66d9mov r11, [rsp+424]
37b6b66e1test edx, edx
37b6b66e3mov eax, 1
37b6b66e8cmovg eax, edx
37b6b66ebcmp [r11], eax
37b6b66eejl 0x37b6b6d38
37b6b66f4mov rax, [rsp+440]
37b6b66fccmp [rax], r12l
37b6b66ffjge 0x37b6b6730
37b6b6701cmp r15l, -1
37b6b6705je 0x37b6b6730
37b6b6707mov [rbp], -12
37b6b670emov eax, 12
37b6b6713jmp 0x37b6b6615
37b6b6718
37b6b6718 0f 1f 84 00 00 00 00 00 ........
37b6b6720
37b6b6720loc_37b6b6720:
37b6b6720mov edx, -7
37b6b6725mov eax, 7
37b6b672ajmp 0x37b6b6612
37b6b672f
37b6b672f 90 .
37b6b6730
37b6b6730loc_37b6b6730:
37b6b6730mov eax, [rbp]
37b6b6733test eax, eax
37b6b6735jne 0x37b6b6da9
37b6b673bmov eax, 1
37b6b6740test edx, edx
37b6b6742je 0x37b6b674c
37b6b6744test ecx, ecx
37b6b6746jne 0x37b6b6bc8
37b6b674c
37b6b674cloc_37b6b674c:
37b6b674cmov [rsp+256], eax
37b6b6753lea rax, [rsp+256]
37b6b675bmov rcx, rax
37b6b675emov [rsp+168], rax
37b6b6766call sroundup_lwork_
37b6b676bmov rax, [rsp+432]
37b6b6773movss [rax], x0
37b6b6777mov eax, [rbp]
37b6b677atest eax, eax
37b6b677cjne 0x37b6b6da9
37b6b6782cmp r15l, -1
37b6b6786je 0x37b6b6637
37b6b678cmov r8l, [rbx]
37b6b678ftest r8l, r8l
37b6b6792je 0x37b6b6637
37b6b6798mov ecx, [rsi]
37b6b679atest ecx, ecx
37b6b679cje 0x37b6b6637
37b6b67a2mov [rsp+252], r12l
37b6b67aacmp [rsp+184], 1
37b6b67b2jle 0x37b6b6b18
37b6b67b8mov rax, [rsp+384]
37b6b67c0mov ecx, [rax]
37b6b67c2cmp ecx, [rsp+184]
37b6b67c9jle 0x37b6b6b18
37b6b67cfmov rax, [rsp+440]
37b6b67d7lea r11, [rsp+268]
37b6b67dfmov eax, [rax]
37b6b67e1cmp eax, [rsp+256]
37b6b67e8jl 0x37b6b6c70
37b6b67ee
37b6b67eeloc_37b6b67ee:
37b6b67eemovsxd r8, [rsp+176]
37b6b67f6mov r15l, [rsp+184]
37b6b67fexor eax, eax
37b6b6800test r8, r8
37b6b6803mov ebp, r15l
37b6b6806cmovs r8, rax
37b6b680aimul ebp, r12l
37b6b680emov r12l, [rsp+164]
37b6b6816mov r10, r8
37b6b6819not r10
37b6b681ccmp r12l, r14l
37b6b681fje 0x37b6b6d50
37b6b6825lea r9l, [rcx-1]
37b6b6829mov eax, r9l
37b6b682ccdq
37b6b682didiv r15l
37b6b6830neg r15l
37b6b6833mov [rsp+192], r15l
37b6b683bsub r9l, edx
37b6b683elea r14l, [r9+1]
37b6b6842test r12l, r12l
37b6b6845je 0x37b6b6d90
37b6b684bmov edx, [rsi]
37b6b684dmov [rsp+264], edx
37b6b6854
37b6b6854loc_37b6b6854:
37b6b6854mov eax, r9l
37b6b6857xor edx, edx
37b6b6859div [rsp+184]
37b6b6860mov r15l, eax
37b6b6863
37b6b6863loc_37b6b6863:
37b6b6863movsxd r9, [rsp+192]
37b6b686bmov rax, [rsp+432]
37b6b6873movsxd rdx, ebp
37b6b6876mov [rsp+352], rdi
37b6b687emov [rsp+360], r13
37b6b6886mov rdi, [rsp+400]
37b6b688emov r13l, r14l
37b6b6891lea rax, [rax+4*rdx]
37b6b6895mov rdx, r9
37b6b6898mov [rsp+368], rbx
37b6b68a0imul rdx, r8
37b6b68a4mov [rsp+376], rsi
37b6b68acmov rbx, rax
37b6b68afmov esi, [rsp+184]
37b6b68b6mov [rsp+184], r11
37b6b68beshl rdx, 2
37b6b68c2mov [rsp+224], rdx
37b6b68camovsxd rdx, r14l
37b6b68cdmov r14, [rsp+384]
37b6b68d5imul r8, rdx
37b6b68d9add r8, r10
37b6b68dcmov r10, [rsp+392]
37b6b68e4lea rbp, [r10+4*r8+4]
37b6b68e9lea r10, [4*r9]
37b6b68f1mov [rsp+232], r10
37b6b68f9mov r10, [rsp+408]
37b6b6901lea r12, [r10+4*rdx-4]
37b6b6906lea rdx, [rsp+248]
37b6b690emov [rsp+176], rdx
37b6b6916lea rdx, [rsp+252]
37b6b691emov [rsp+200], rdx
37b6b6926lea rdx, [rsp+264]
37b6b692emov [rsp+216], rdx
37b6b6936lea rdx, [rsp+260]
37b6b693emov [rsp+208], rdx
37b6b6946jmp 0x37b6b6a59
37b6b694b
37b6b694b 0f 1f 44 00 00 ..D..
37b6b6950
37b6b6950loc_37b6b6950:
37b6b6950mov r11, [rsp+368]
37b6b6958mov eax, [r11]
37b6b695badd eax, r13l
37b6b695esub eax, ecx
37b6b6960lea eax, [rdx+rax-1]
37b6b6964mov [rsp+260], eax
37b6b696b
37b6b696bloc_37b6b696b:
37b6b696bmov rax, [rsp+200]
37b6b6973mov [rsp+72], rbx
37b6b6978lea r9, [rip+0xd7e0a9]
37b6b697flea r8, [rip+0xd7e0ac]
37b6b6986mov [rsp+64], rdi
37b6b698bmov rdx, [rsp+360]
37b6b6993mov [rsp+112], rax
37b6b6998mov rax, [rsp+432]
37b6b69a0mov [rsp+56], rbp
37b6b69a5mov rcx, [rsp+352]
37b6b69admov [rsp+104], rax
37b6b69b2mov rax, [rsp+424]
37b6b69bamov [rsp+144], 10
37b6b69c6mov [rsp+96], rax
37b6b69cbmov rax, [rsp+416]
37b6b69d3mov [rsp+136], 8
37b6b69dfmov [rsp+88], rax
37b6b69e4lea rax, [rip+0xd7e051]
37b6b69ebmov [rsp+80], rax
37b6b69f0mov rax, [rsp+176]
37b6b69f8mov [rsp+128], 1
37b6b6a04mov [rsp+48], rax
37b6b6a09mov rax, [rsp+216]
37b6b6a11mov [rsp+120], 1
37b6b6a1amov [rsp+40], rax
37b6b6a1fmov rax, [rsp+208]
37b6b6a27mov [rsp+32], rax
37b6b6a2ccall slarfb_
37b6b6a31test r15l, r15l
37b6b6a34je 0x37b6b6ba3
37b6b6a3amov ecx, [r14]
37b6b6a3dadd rbp, [rsp+224]
37b6b6a45sub r15l, 1
37b6b6a49add r12, [rsp+232]
37b6b6a51add r13l, [rsp+192]
37b6b6a59
37b6b6a59loc_37b6b6a59:
37b6b6a59mov eax, ecx
37b6b6a5bmov edx, [rsp+160]
37b6b6a62mov [rsp+80], 10
37b6b6a6bsub eax, r13l
37b6b6a6emov [rsp+56], rbx
37b6b6a73mov r9, [rsp+176]
37b6b6a7badd eax, 1
37b6b6a7emov [rsp+48], r12
37b6b6a83mov r8, [rsp+184]
37b6b6a8bcmp eax, esi
37b6b6a8dmov [rsp+40], rdi
37b6b6a92cmovg eax, esi
37b6b6a95sub edx, ecx
37b6b6a97mov [rsp+32], rbp
37b6b6a9clea rcx, [rip+0xd7df8f]
37b6b6aa3mov [rsp+72], 8
37b6b6aacadd edx, r13l
37b6b6aafmov [rsp+248], eax
37b6b6ab6lea eax, [rax+rdx-1]
37b6b6abalea rdx, [rip+0xd7df67]
37b6b6ac1mov [rsp+268], eax
37b6b6ac8lea rax, [rip+0xd7df6d]
37b6b6acfmov [rsp+64], rax
37b6b6ad4call slarft_
37b6b6ad9mov eax, [rsp+164]
37b6b6ae0mov ecx, [r14]
37b6b6ae3mov edx, [rsp+248]
37b6b6aeatest eax, eax
37b6b6aecjne 0x37b6b6950
37b6b6af2mov r11, [rsp+376]
37b6b6afamov eax, [r11]
37b6b6afdadd eax, r13l
37b6b6b00sub eax, ecx
37b6b6b02lea eax, [rdx+rax-1]
37b6b6b06mov [rsp+264], eax
37b6b6b0djmp 0x37b6b696b
37b6b6b12
37b6b6b12 66 0f 1f 44 00 00 f..D..
37b6b6b18
37b6b6b18loc_37b6b6b18:
37b6b6b18lea r11, [rsp+268]
37b6b6b20
37b6b6b20loc_37b6b6b20:
37b6b6b20mov [rsp+88], r11
37b6b6b25mov r9, rsi
37b6b6b28mov r8, rbx
37b6b6b2bmov rdx, r13
37b6b6b2emov rax, [rsp+432]
37b6b6b36mov rcx, rdi
37b6b6b39mov [rsp+104], 1
37b6b6b42mov [rsp+96], 1
37b6b6b4bmov [rsp+80], rax
37b6b6b50mov rax, [rsp+424]
37b6b6b58mov [rsp+72], rax
37b6b6b5dmov rax, [rsp+416]
37b6b6b65mov [rsp+64], rax
37b6b6b6amov rax, [rsp+408]
37b6b6b72mov [rsp+56], rax
37b6b6b77mov rax, [rsp+400]
37b6b6b7fmov [rsp+48], rax
37b6b6b84mov rax, [rsp+392]
37b6b6b8cmov [rsp+40], rax
37b6b6b91mov rax, [rsp+384]
37b6b6b99mov [rsp+32], rax
37b6b6b9ecall sorm2l_
37b6b6ba3
37b6b6ba3loc_37b6b6ba3:
37b6b6ba3mov rcx, [rsp+168]
37b6b6babcall sroundup_lwork_
37b6b6bb0mov rax, [rsp+432]
37b6b6bb8movss [rax], x0
37b6b6bbcjmp 0x37b6b6637
37b6b6bc1
37b6b6bc1 0f 1f 80 00 00 00 00 .......
37b6b6bc8
37b6b6bc8loc_37b6b6bc8:
37b6b6bc8mov [rsp+40], r13
37b6b6bcdlea r11, [rsp+268]
37b6b6bd5mov r9, rdi
37b6b6bd8mov ecx, 2
37b6b6bddmov [rsp+32], 1
37b6b6be6mov rdx, r11
37b6b6be9mov r8l, 1
37b6b6befmov [rsp+168], r11
37b6b6bf7call _gfortran_concat_string
37b6b6bfclea rax, [rip+0xd7de1d]
37b6b6c03mov r9, rbx
37b6b6c06mov [rsp+64], 2
37b6b6c0fmov [rsp+48], rax
37b6b6c14mov rax, [rsp+384]
37b6b6c1clea rdx, [rip+0xd7ddf1]
37b6b6c23lea rcx, [rip+0xd7ddf2]
37b6b6c2amov [rsp+32], rsi
37b6b6c2fmov r8, [rsp+168]
37b6b6c37mov [rsp+56], 6
37b6b6c40mov [rsp+40], rax
37b6b6c45call ilaenv_
37b6b6c4amov edx, eax
37b6b6c4cmov eax, 64
37b6b6c51cmp edx, eax
37b6b6c53cmovle eax, edx
37b6b6c56mov [rsp+184], eax
37b6b6c5dimul eax, r12l
37b6b6c61add eax, 4160
37b6b6c66jmp 0x37b6b674c
37b6b6c6b
37b6b6c6b 0f 1f 44 00 00 ..D..
37b6b6c70
37b6b6c70loc_37b6b6c70:
37b6b6c70sub eax, 4160
37b6b6c75mov [rsp+40], r13
37b6b6c7amov r9, rdi
37b6b6c7dmov ecx, 2
37b6b6c82cdq
37b6b6c83mov r8l, 1
37b6b6c89mov [rsp+32], 1
37b6b6c92idiv r12l
37b6b6c95mov [rsp+192], r11
37b6b6c9dmov rdx, r11
37b6b6ca0mov [rsp+184], eax
37b6b6ca7call _gfortran_concat_string
37b6b6caclea rcx, [rip+0xd7dd6d]
37b6b6cb3mov r9, rbx
37b6b6cb6mov [rsp+64], 2
37b6b6cbfmov [rsp+48], rcx
37b6b6cc4mov rcx, [rsp+384]
37b6b6ccclea rdx, [rip+0xd7dd41]
37b6b6cd3mov [rsp+32], rsi
37b6b6cd8mov r8, [rsp+192]
37b6b6ce0mov [rsp+40], rcx
37b6b6ce5lea rcx, [rip+0xd7dd38]
37b6b6cecmov [rsp+56], 6
37b6b6cf5call ilaenv_
37b6b6cfamov edx, 2
37b6b6cffmov r11, [rsp+192]
37b6b6d07cmp eax, edx
37b6b6d09cmovl eax, edx
37b6b6d0ccmp [rsp+184], eax
37b6b6d13jl 0x37b6b6b20
37b6b6d19mov rax, [rsp+384]
37b6b6d21mov ecx, [rax]
37b6b6d23cmp ecx, [rsp+184]
37b6b6d2ajg 0x37b6b67ee
37b6b6d30jmp 0x37b6b6b20
37b6b6d35
37b6b6d35 0f 1f 00 ...
37b6b6d38
37b6b6d38loc_37b6b6d38:
37b6b6d38mov edx, -10
37b6b6d3dmov eax, 10
37b6b6d42jmp 0x37b6b6612
37b6b6d47
37b6b6d47 66 0f 1f 84 00 00 00 00 00 f........
37b6b6d50
37b6b6d50loc_37b6b6d50:
37b6b6d50mov edx, [rsp+164]
37b6b6d57test edx, edx
37b6b6d59je 0x37b6b6d9e
37b6b6d5bmov eax, [rsi]
37b6b6d5dmov [rsp+264], eax
37b6b6d64
37b6b6d64loc_37b6b6d64:
37b6b6d64mov r14l, [rsp+184]
37b6b6d6clea eax, [rcx-1]
37b6b6d6fxor edx, edx
37b6b6d71div r14l
37b6b6d74mov [rsp+192], r14l
37b6b6d7cmov r14l, 1
37b6b6d82mov r15l, eax
37b6b6d85jmp 0x37b6b6863
37b6b6d8a
37b6b6d8a 66 0f 1f 44 00 00 f..D..
37b6b6d90
37b6b6d90loc_37b6b6d90:
37b6b6d90mov edx, [rbx]
37b6b6d92mov [rsp+260], edx
37b6b6d99jmp 0x37b6b6854
37b6b6d9e
37b6b6d9eloc_37b6b6d9e:
37b6b6d9emov eax, [rbx]
37b6b6da0mov [rsp+260], eax
37b6b6da7jmp 0x37b6b6d64
37b6b6da9
37b6b6da9loc_37b6b6da9:
37b6b6da9neg eax
37b6b6dabjmp 0x37b6b6615
37b6b64e0
37b6b64e0sormql_:
37b6b64e0push r15
37b6b64e2push r14
37b6b64e4push r13
37b6b64e6push r12
37b6b64e8push rbp
37b6b64e9push rdi
37b6b64eapush rsi
37b6b64ebpush rbx
37b6b64ecsub rsp, 280
37b6b64f3mov rbp, [rsp+448]
37b6b64fbmov rax, [rsp+400]
37b6b6503mov [rbp], 0
37b6b650amov eax, [rax]
37b6b650cmov r13, rdx
37b6b650fmov rbx, r8
37b6b6512mov rsi, r9
37b6b6515mov r8l, 1
37b6b651bmov r9l, 1
37b6b6521lea rdx, [rip+0xd7e4e8]
37b6b6528mov rdi, rcx
37b6b652bmov [rsp+176], eax
37b6b6532call lsame_
37b6b6537mov r9l, 1
37b6b653dmov r8l, 1
37b6b6543mov rcx, r13
37b6b6546lea rdx, [rip+0xd7e4c4]
37b6b654dmov [rsp+164], eax
37b6b6554mov r12l, eax
37b6b6557call lsame_
37b6b655cmov r10l, [rsi]
37b6b655fmov r14l, eax
37b6b6562mov rax, [rsp+440]
37b6b656amov r15l, [rax]
37b6b656dmov eax, [rbx]
37b6b656fmov [rsp+160], eax
37b6b6576test r12l, r12l
37b6b6579je 0x37b6b65d0
37b6b657btest r10l, r10l
37b6b657emov r12l, 1
37b6b6584cmovg r12l, r10l
37b6b6588test r14l, r14l
37b6b658bje 0x37b6b667c
37b6b6591
37b6b6591loc_37b6b6591:
37b6b6591mov edx, [rbx]
37b6b6593test edx, edx
37b6b6595js 0x37b6b6608
37b6b6597mov ecx, [rsi]
37b6b6599test ecx, ecx
37b6b659bjs 0x37b6b66b0
37b6b65a1mov rax, [rsp+384]
37b6b65a9mov eax, [rax]
37b6b65abtest eax, eax
37b6b65adjs 0x37b6b65c0
37b6b65afmov r11l, [rsp+160]
37b6b65b7cmp eax, r11l
37b6b65bajle 0x37b6b66c0
37b6b65c0
37b6b65c0loc_37b6b65c0:
37b6b65c0mov edx, -5
37b6b65c5mov eax, 5
37b6b65cajmp 0x37b6b6612
37b6b65cc
37b6b65cc 0f 1f 40 00 ..@.
37b6b65d0
37b6b65d0loc_37b6b65d0:
37b6b65d0mov r9l, 1
37b6b65d6mov r8l, 1
37b6b65dcmov rcx, rdi
37b6b65dfmov [rsp+168], r10l
37b6b65e7lea rdx, [rip+0xd7e424]
37b6b65eecall lsame_
37b6b65f3test eax, eax
37b6b65f5jne 0x37b6b6650
37b6b65f7mov edx, -1
37b6b65fcmov eax, 1
37b6b6601jmp 0x37b6b6612
37b6b6603
37b6b6603 0f 1f 44 00 00 ..D..
37b6b6608
37b6b6608loc_37b6b6608:
37b6b6608mov edx, -3
37b6b660dmov eax, 3
37b6b6612
37b6b6612loc_37b6b6612:
37b6b6612mov [rbp], edx
37b6b6615
37b6b6615loc_37b6b6615:
37b6b6615lea rdx, [rsp+268]
37b6b661dmov r8l, 6
37b6b6623lea rcx, [rip+0xd7e3ea]
37b6b662amov [rsp+268], eax
37b6b6631call xerbla_
37b6b6636nop
37b6b6637
37b6b6637loc_37b6b6637:
37b6b6637add rsp, 280
37b6b663epop rbx
37b6b663fpop rsi
37b6b6640pop rdi
37b6b6641pop rbp
37b6b6642pop r12
37b6b6644pop r13
37b6b6646pop r14
37b6b6648pop r15
37b6b664aret
37b6b664b
37b6b664b 0f 1f 44 00 00 ..D..
37b6b6650
37b6b6650loc_37b6b6650:
37b6b6650mov eax, [rsp+160]
37b6b6657mov r10l, [rsp+168]
37b6b665fmov r12l, 1
37b6b6665test eax, eax
37b6b6667mov [rsp+160], r10l
37b6b666fcmovg r12l, eax
37b6b6673test r14l, r14l
37b6b6676jne 0x37b6b6591
37b6b667c
37b6b667cloc_37b6b667c:
37b6b667cmov r9l, 1
37b6b6682mov r8l, 1
37b6b6688mov rcx, r13
37b6b668blea rdx, [rip+0xd7e381]
37b6b6692call lsame_
37b6b6697test eax, eax
37b6b6699jne 0x37b6b6591
37b6b669fmov edx, -2
37b6b66a4mov eax, 2
37b6b66a9jmp 0x37b6b6612
37b6b66ae
37b6b66ae 66 90 f.
37b6b66b0
37b6b66b0loc_37b6b66b0:
37b6b66b0mov edx, -4
37b6b66b5mov eax, 4
37b6b66bajmp 0x37b6b6612
37b6b66bf
37b6b66bf 90 .
37b6b66c0
37b6b66c0loc_37b6b66c0:
37b6b66c0mov r10, [rsp+400]
37b6b66c8test r11l, r11l
37b6b66cbmov eax, 1
37b6b66d0cmovg eax, r11l
37b6b66d4cmp [r10], eax
37b6b66d7jl 0x37b6b6720
37b6b66d9mov r11, [rsp+424]
37b6b66e1test edx, edx
37b6b66e3mov eax, 1
37b6b66e8cmovg eax, edx
37b6b66ebcmp [r11], eax
37b6b66eejl 0x37b6b6d38
37b6b66f4mov rax, [rsp+440]
37b6b66fccmp [rax], r12l
37b6b66ffjge 0x37b6b6730
37b6b6701cmp r15l, -1
37b6b6705je 0x37b6b6730
37b6b6707mov [rbp], -12
37b6b670emov eax, 12
37b6b6713jmp 0x37b6b6615
37b6b6718
37b6b6718 0f 1f 84 00 00 00 00 00 ........
37b6b6720
37b6b6720loc_37b6b6720:
37b6b6720mov edx, -7
37b6b6725mov eax, 7
37b6b672ajmp 0x37b6b6612
37b6b672f
37b6b672f 90 .
37b6b6730
37b6b6730loc_37b6b6730:
37b6b6730mov eax, [rbp]
37b6b6733test eax, eax
37b6b6735jne 0x37b6b6da9
37b6b673bmov eax, 1
37b6b6740test edx, edx
37b6b6742je 0x37b6b674c
37b6b6744test ecx, ecx
37b6b6746jne 0x37b6b6bc8
37b6b674c
37b6b674cloc_37b6b674c:
37b6b674cmov [rsp+256], eax
37b6b6753lea rax, [rsp+256]
37b6b675bmov rcx, rax
37b6b675emov [rsp+168], rax
37b6b6766call sroundup_lwork_
37b6b676bmov rax, [rsp+432]
37b6b6773movss [rax], x0
37b6b6777mov eax, [rbp]
37b6b677atest eax, eax
37b6b677cjne 0x37b6b6da9
37b6b6782cmp r15l, -1
37b6b6786je 0x37b6b6637
37b6b678cmov r8l, [rbx]
37b6b678ftest r8l, r8l
37b6b6792je 0x37b6b6637
37b6b6798mov ecx, [rsi]
37b6b679atest ecx, ecx
37b6b679cje 0x37b6b6637
37b6b67a2mov [rsp+252], r12l
37b6b67aacmp [rsp+184], 1
37b6b67b2jle 0x37b6b6b18
37b6b67b8mov rax, [rsp+384]
37b6b67c0mov ecx, [rax]
37b6b67c2cmp ecx, [rsp+184]
37b6b67c9jle 0x37b6b6b18
37b6b67cfmov rax, [rsp+440]
37b6b67d7lea r11, [rsp+268]
37b6b67dfmov eax, [rax]
37b6b67e1cmp eax, [rsp+256]
37b6b67e8jl 0x37b6b6c70
37b6b67ee
37b6b67eeloc_37b6b67ee:
37b6b67eemovsxd r8, [rsp+176]
37b6b67f6mov r15l, [rsp+184]
37b6b67fexor eax, eax
37b6b6800test r8, r8
37b6b6803mov ebp, r15l
37b6b6806cmovs r8, rax
37b6b680aimul ebp, r12l
37b6b680emov r12l, [rsp+164]
37b6b6816mov r10, r8
37b6b6819not r10
37b6b681ccmp r12l, r14l
37b6b681fje 0x37b6b6d50
37b6b6825lea r9l, [rcx-1]
37b6b6829mov eax, r9l
37b6b682ccdq
37b6b682didiv r15l
37b6b6830neg r15l
37b6b6833mov [rsp+192], r15l
37b6b683bsub r9l, edx
37b6b683elea r14l, [r9+1]
37b6b6842test r12l, r12l
37b6b6845je 0x37b6b6d90
37b6b684bmov edx, [rsi]
37b6b684dmov [rsp+264], edx
37b6b6854
37b6b6854loc_37b6b6854:
37b6b6854mov eax, r9l
37b6b6857xor edx, edx
37b6b6859div [rsp+184]
37b6b6860mov r15l, eax
37b6b6863
37b6b6863loc_37b6b6863:
37b6b6863movsxd r9, [rsp+192]
37b6b686bmov rax, [rsp+432]
37b6b6873movsxd rdx, ebp
37b6b6876mov [rsp+352], rdi
37b6b687emov [rsp+360], r13
37b6b6886mov rdi, [rsp+400]
37b6b688emov r13l, r14l
37b6b6891lea rax, [rax+4*rdx]
37b6b6895mov rdx, r9
37b6b6898mov [rsp+368], rbx
37b6b68a0imul rdx, r8
37b6b68a4mov [rsp+376], rsi
37b6b68acmov rbx, rax
37b6b68afmov esi, [rsp+184]
37b6b68b6mov [rsp+184], r11
37b6b68beshl rdx, 2
37b6b68c2mov [rsp+224], rdx
37b6b68camovsxd rdx, r14l
37b6b68cdmov r14, [rsp+384]
37b6b68d5imul r8, rdx
37b6b68d9add r8, r10
37b6b68dcmov r10, [rsp+392]
37b6b68e4lea rbp, [r10+4*r8+4]
37b6b68e9lea r10, [4*r9]
37b6b68f1mov [rsp+232], r10
37b6b68f9mov r10, [rsp+408]
37b6b6901lea r12, [r10+4*rdx-4]
37b6b6906lea rdx, [rsp+248]
37b6b690emov [rsp+176], rdx
37b6b6916lea rdx, [rsp+252]
37b6b691emov [rsp+200], rdx
37b6b6926lea rdx, [rsp+264]
37b6b692emov [rsp+216], rdx
37b6b6936lea rdx, [rsp+260]
37b6b693emov [rsp+208], rdx
37b6b6946jmp 0x37b6b6a59
37b6b694b
37b6b694b 0f 1f 44 00 00 ..D..
37b6b6950
37b6b6950loc_37b6b6950:
37b6b6950mov r11, [rsp+368]
37b6b6958mov eax, [r11]
37b6b695badd eax, r13l
37b6b695esub eax, ecx
37b6b6960lea eax, [rdx+rax-1]
37b6b6964mov [rsp+260], eax
37b6b696b
37b6b696bloc_37b6b696b:
37b6b696bmov rax, [rsp+200]
37b6b6973mov [rsp+72], rbx
37b6b6978lea r9, [rip+0xd7e0a9]
37b6b697flea r8, [rip+0xd7e0ac]
37b6b6986mov [rsp+64], rdi
37b6b698bmov rdx, [rsp+360]
37b6b6993mov [rsp+112], rax
37b6b6998mov rax, [rsp+432]
37b6b69a0mov [rsp+56], rbp
37b6b69a5mov rcx, [rsp+352]
37b6b69admov [rsp+104], rax
37b6b69b2mov rax, [rsp+424]
37b6b69bamov [rsp+144], 10
37b6b69c6mov [rsp+96], rax
37b6b69cbmov rax, [rsp+416]
37b6b69d3mov [rsp+136], 8
37b6b69dfmov [rsp+88], rax
37b6b69e4lea rax, [rip+0xd7e051]
37b6b69ebmov [rsp+80], rax
37b6b69f0mov rax, [rsp+176]
37b6b69f8mov [rsp+128], 1
37b6b6a04mov [rsp+48], rax
37b6b6a09mov rax, [rsp+216]
37b6b6a11mov [rsp+120], 1
37b6b6a1amov [rsp+40], rax
37b6b6a1fmov rax, [rsp+208]
37b6b6a27mov [rsp+32], rax
37b6b6a2ccall slarfb_
37b6b6a31test r15l, r15l
37b6b6a34je 0x37b6b6ba3
37b6b6a3amov ecx, [r14]
37b6b6a3dadd rbp, [rsp+224]
37b6b6a45sub r15l, 1
37b6b6a49add r12, [rsp+232]
37b6b6a51add r13l, [rsp+192]
37b6b6a59
37b6b6a59loc_37b6b6a59:
37b6b6a59mov eax, ecx
37b6b6a5bmov edx, [rsp+160]
37b6b6a62mov [rsp+80], 10
37b6b6a6bsub eax, r13l
37b6b6a6emov [rsp+56], rbx
37b6b6a73mov r9, [rsp+176]
37b6b6a7badd eax, 1
37b6b6a7emov [rsp+48], r12
37b6b6a83mov r8, [rsp+184]
37b6b6a8bcmp eax, esi
37b6b6a8dmov [rsp+40], rdi
37b6b6a92cmovg eax, esi
37b6b6a95sub edx, ecx
37b6b6a97mov [rsp+32], rbp
37b6b6a9clea rcx, [rip+0xd7df8f]
37b6b6aa3mov [rsp+72], 8
37b6b6aacadd edx, r13l
37b6b6aafmov [rsp+248], eax
37b6b6ab6lea eax, [rax+rdx-1]
37b6b6abalea rdx, [rip+0xd7df67]
37b6b6ac1mov [rsp+268], eax
37b6b6ac8lea rax, [rip+0xd7df6d]
37b6b6acfmov [rsp+64], rax
37b6b6ad4call slarft_
37b6b6ad9mov eax, [rsp+164]
37b6b6ae0mov ecx, [r14]
37b6b6ae3mov edx, [rsp+248]
37b6b6aeatest eax, eax
37b6b6aecjne 0x37b6b6950
37b6b6af2mov r11, [rsp+376]
37b6b6afamov eax, [r11]
37b6b6afdadd eax, r13l
37b6b6b00sub eax, ecx
37b6b6b02lea eax, [rdx+rax-1]
37b6b6b06mov [rsp+264], eax
37b6b6b0djmp 0x37b6b696b
37b6b6b12
37b6b6b12 66 0f 1f 44 00 00 f..D..
37b6b6b18
37b6b6b18loc_37b6b6b18:
37b6b6b18lea r11, [rsp+268]
37b6b6b20
37b6b6b20loc_37b6b6b20:
37b6b6b20mov [rsp+88], r11
37b6b6b25mov r9, rsi
37b6b6b28mov r8, rbx
37b6b6b2bmov rdx, r13
37b6b6b2emov rax, [rsp+432]
37b6b6b36mov rcx, rdi
37b6b6b39mov [rsp+104], 1
37b6b6b42mov [rsp+96], 1
37b6b6b4bmov [rsp+80], rax
37b6b6b50mov rax, [rsp+424]
37b6b6b58mov [rsp+72], rax
37b6b6b5dmov rax, [rsp+416]
37b6b6b65mov [rsp+64], rax
37b6b6b6amov rax, [rsp+408]
37b6b6b72mov [rsp+56], rax
37b6b6b77mov rax, [rsp+400]
37b6b6b7fmov [rsp+48], rax
37b6b6b84mov rax, [rsp+392]
37b6b6b8cmov [rsp+40], rax
37b6b6b91mov rax, [rsp+384]
37b6b6b99mov [rsp+32], rax
37b6b6b9ecall sorm2l_
37b6b6ba3
37b6b6ba3loc_37b6b6ba3:
37b6b6ba3mov rcx, [rsp+168]
37b6b6babcall sroundup_lwork_
37b6b6bb0mov rax, [rsp+432]
37b6b6bb8movss [rax], x0
37b6b6bbcjmp 0x37b6b6637
37b6b6bc1
37b6b6bc1 0f 1f 80 00 00 00 00 .......
37b6b6bc8
37b6b6bc8loc_37b6b6bc8:
37b6b6bc8mov [rsp+40], r13
37b6b6bcdlea r11, [rsp+268]
37b6b6bd5mov r9, rdi
37b6b6bd8mov ecx, 2
37b6b6bddmov [rsp+32], 1
37b6b6be6mov rdx, r11
37b6b6be9mov r8l, 1
37b6b6befmov [rsp+168], r11
37b6b6bf7call _gfortran_concat_string
37b6b6bfclea rax, [rip+0xd7de1d]
37b6b6c03mov r9, rbx
37b6b6c06mov [rsp+64], 2
37b6b6c0fmov [rsp+48], rax
37b6b6c14mov rax, [rsp+384]
37b6b6c1clea rdx, [rip+0xd7ddf1]
37b6b6c23lea rcx, [rip+0xd7ddf2]
37b6b6c2amov [rsp+32], rsi
37b6b6c2fmov r8, [rsp+168]
37b6b6c37mov [rsp+56], 6
37b6b6c40mov [rsp+40], rax
37b6b6c45call ilaenv_
37b6b6c4amov edx, eax
37b6b6c4cmov eax, 64
37b6b6c51cmp edx, eax
37b6b6c53cmovle eax, edx
37b6b6c56mov [rsp+184], eax
37b6b6c5dimul eax, r12l
37b6b6c61add eax, 4160
37b6b6c66jmp 0x37b6b674c
37b6b6c6b
37b6b6c6b 0f 1f 44 00 00 ..D..
37b6b6c70
37b6b6c70loc_37b6b6c70:
37b6b6c70sub eax, 4160
37b6b6c75mov [rsp+40], r13
37b6b6c7amov r9, rdi
37b6b6c7dmov ecx, 2
37b6b6c82cdq
37b6b6c83mov r8l, 1
37b6b6c89mov [rsp+32], 1
37b6b6c92idiv r12l
37b6b6c95mov [rsp+192], r11
37b6b6c9dmov rdx, r11
37b6b6ca0mov [rsp+184], eax
37b6b6ca7call _gfortran_concat_string
37b6b6caclea rcx, [rip+0xd7dd6d]
37b6b6cb3mov r9, rbx
37b6b6cb6mov [rsp+64], 2
37b6b6cbfmov [rsp+48], rcx
37b6b6cc4mov rcx, [rsp+384]
37b6b6ccclea rdx, [rip+0xd7dd41]
37b6b6cd3mov [rsp+32], rsi
37b6b6cd8mov r8, [rsp+192]
37b6b6ce0mov [rsp+40], rcx
37b6b6ce5lea rcx, [rip+0xd7dd38]
37b6b6cecmov [rsp+56], 6
37b6b6cf5call ilaenv_
37b6b6cfamov edx, 2
37b6b6cffmov r11, [rsp+192]
37b6b6d07cmp eax, edx
37b6b6d09cmovl eax, edx
37b6b6d0ccmp [rsp+184], eax
37b6b6d13jl 0x37b6b6b20
37b6b6d19mov rax, [rsp+384]
37b6b6d21mov ecx, [rax]
37b6b6d23cmp ecx, [rsp+184]
37b6b6d2ajg 0x37b6b67ee
37b6b6d30jmp 0x37b6b6b20
37b6b6d35
37b6b6d35 0f 1f 00 ...
37b6b6d38
37b6b6d38loc_37b6b6d38:
37b6b6d38mov edx, -10
37b6b6d3dmov eax, 10
37b6b6d42jmp 0x37b6b6612
37b6b6d47
37b6b6d47 66 0f 1f 84 00 00 00 00 00 f........
37b6b6d50
37b6b6d50loc_37b6b6d50:
37b6b6d50mov edx, [rsp+164]
37b6b6d57test edx, edx
37b6b6d59je 0x37b6b6d9e
37b6b6d5bmov eax, [rsi]
37b6b6d5dmov [rsp+264], eax
37b6b6d64
37b6b6d64loc_37b6b6d64:
37b6b6d64mov r14l, [rsp+184]
37b6b6d6clea eax, [rcx-1]
37b6b6d6fxor edx, edx
37b6b6d71div r14l
37b6b6d74mov [rsp+192], r14l
37b6b6d7cmov r14l, 1
37b6b6d82mov r15l, eax
37b6b6d85jmp 0x37b6b6863
37b6b6d8a
37b6b6d8a 66 0f 1f 44 00 00 f..D..
37b6b6d90
37b6b6d90loc_37b6b6d90:
37b6b6d90mov edx, [rbx]
37b6b6d92mov [rsp+260], edx
37b6b6d99jmp 0x37b6b6854
37b6b6d9e
37b6b6d9eloc_37b6b6d9e:
37b6b6d9emov eax, [rbx]
37b6b6da0mov [rsp+260], eax
37b6b6da7jmp 0x37b6b6d64
37b6b6da9
37b6b6da9loc_37b6b6da9:
37b6b6da9neg eax
37b6b6dabjmp 0x37b6b6615
37b6b64e0
37b6b6db0
37b6b6db0sormqr_:
37b6b6db0push r15
37b6b6db2push r14
37b6b6db4push r13
37b6b6db6push r12
37b6b6db8push rbp
37b6b6db9push rdi
37b6b6dbapush rsi
37b6b6dbbpush rbx
37b6b6dbcsub rsp, 296
37b6b6dc3mov rax, [rsp+416]
37b6b6dcbmov r12, [rsp+464]
37b6b6dd3mov eax, [rax]
37b6b6dd5mov [r12], 0
37b6b6dddmov [rsp+208], eax
37b6b6de4mov rbp, rdx
37b6b6de7mov rbx, r8
37b6b6deamov rsi, r9
37b6b6dedmov r8l, 1
37b6b6df3mov r9l, 1
37b6b6df9lea rdx, [rip+0xd7dc40]
37b6b6e00mov rdi, rcx
37b6b6e03mov rax, [rsp+440]
37b6b6e0bmov eax, [rax]
37b6b6e0dmov [rsp+216], eax
37b6b6e14call lsame_
37b6b6e19mov r9l, 1
37b6b6e1fmov r8l, 1
37b6b6e25mov rcx, rbp
37b6b6e28lea rdx, [rip+0xd7dc12]
37b6b6e2fmov [rsp+240], eax
37b6b6e36mov r14l, eax
37b6b6e39call lsame_
37b6b6e3emov r13l, [rsi]
37b6b6e41mov [rsp+168], eax
37b6b6e48mov rax, [rsp+456]
37b6b6e50mov r15l, [rax]
37b6b6e53mov eax, [rbx]
37b6b6e55mov [rsp+160], eax
37b6b6e5ctest r14l, r14l
37b6b6e5fje 0x37b6b6ec0
37b6b6e61mov ecx, [rsp+168]
37b6b6e68test r13l, r13l
37b6b6e6bmov r14l, 1
37b6b6e71cmovg r14l, r13l
37b6b6e75test ecx, ecx
37b6b6e77je 0x37b6b6f6a
37b6b6e7d
37b6b6e7dloc_37b6b6e7d:
37b6b6e7dmov eax, [rbx]
37b6b6e7ftest eax, eax
37b6b6e81js 0x37b6b6ef0
37b6b6e83mov edx, [rsi]
37b6b6e85test edx, edx
37b6b6e87js 0x37b6b6fa0
37b6b6e8dmov rcx, [rsp+400]
37b6b6e95mov edx, [rcx]
37b6b6e97test edx, edx
37b6b6e99js 0x37b6b6eaa
37b6b6e9bmov ecx, [rsp+160]
37b6b6ea2cmp edx, ecx
37b6b6ea4jle 0x37b6b6fb0
37b6b6eaa
37b6b6eaaloc_37b6b6eaa:
37b6b6eaamov edx, -5
37b6b6eafmov eax, 5
37b6b6eb4jmp 0x37b6b6efa
37b6b6eb6
37b6b6eb6 66 2e 0f 1f 84 00 00 00 00 00 f.........
37b6b6ec0
37b6b6ec0loc_37b6b6ec0:
37b6b6ec0mov r9l, 1
37b6b6ec6mov r8l, 1
37b6b6ecclea rdx, [rip+0xd7db6f]
37b6b6ed3mov rcx, rdi
37b6b6ed6call lsame_
37b6b6edbtest eax, eax
37b6b6eddjne 0x37b6b6f40
37b6b6edfmov edx, -1
37b6b6ee4mov eax, 1
37b6b6ee9jmp 0x37b6b6efa
37b6b6eeb
37b6b6eeb 0f 1f 44 00 00 ..D..
37b6b6ef0
37b6b6ef0loc_37b6b6ef0:
37b6b6ef0mov edx, -3
37b6b6ef5mov eax, 3
37b6b6efa
37b6b6efaloc_37b6b6efa:
37b6b6efamov [r12], edx
37b6b6efelea r13, [rsp+284]
37b6b6f06lea r11, [rip+0xd7db37]
37b6b6f0d
37b6b6f0dloc_37b6b6f0d:
37b6b6f0dmov r8l, 6
37b6b6f13mov rdx, r13
37b6b6f16mov rcx, r11
37b6b6f19mov [rsp+284], eax
37b6b6f20call xerbla_
37b6b6f25nop
37b6b6f26
37b6b6f26loc_37b6b6f26:
37b6b6f26add rsp, 296
37b6b6f2dpop rbx
37b6b6f2epop rsi
37b6b6f2fpop rdi
37b6b6f30pop rbp
37b6b6f31pop r12
37b6b6f33pop r13
37b6b6f35pop r14
37b6b6f37pop r15
37b6b6f39ret
37b6b6f3a
37b6b6f3a 66 0f 1f 44 00 00 f..D..
37b6b6f40
37b6b6f40loc_37b6b6f40:
37b6b6f40mov eax, [rsp+160]
37b6b6f47mov ecx, [rsp+168]
37b6b6f4emov r14l, 1
37b6b6f54mov [rsp+160], r13l
37b6b6f5ctest eax, eax
37b6b6f5ecmovg r14l, eax
37b6b6f62test ecx, ecx
37b6b6f64jne 0x37b6b6e7d
37b6b6f6a
37b6b6f6aloc_37b6b6f6a:
37b6b6f6amov r9l, 1
37b6b6f70mov r8l, 1
37b6b6f76mov rcx, rbp
37b6b6f79lea rdx, [rip+0xd7dac3]
37b6b6f80call lsame_
37b6b6f85test eax, eax
37b6b6f87jne 0x37b6b6e7d
37b6b6f8dmov edx, -2
37b6b6f92mov eax, 2
37b6b6f97jmp 0x37b6b6efa
37b6b6f9c
37b6b6f9c 0f 1f 40 00 ..@.
37b6b6fa0
37b6b6fa0loc_37b6b6fa0:
37b6b6fa0mov edx, -4
37b6b6fa5mov eax, 4
37b6b6faajmp 0x37b6b6efa
37b6b6faf
37b6b6faf 90 .
37b6b6fb0
37b6b6fb0loc_37b6b6fb0:
37b6b6fb0test ecx, ecx
37b6b6fb2mov edx, 1
37b6b6fb7cmovg edx, ecx
37b6b6fbamov rcx, [rsp+416]
37b6b6fc2cmp [rcx], edx
37b6b6fc4jl 0x37b6b7020
37b6b6fc6mov rcx, [rsp+440]
37b6b6fcetest eax, eax
37b6b6fd0mov edx, 1
37b6b6fd5cmovle eax, edx
37b6b6fd8cmp [rcx], eax
37b6b6fdajl 0x37b6b7650
37b6b6fe0mov rax, [rsp+456]
37b6b6fe8cmp [rax], r14l
37b6b6febjge 0x37b6b702f
37b6b6fedcmp r15l, -1
37b6b6ff1je 0x37b6b76b9
37b6b6ff7mov [r12], -12
37b6b6fffmov eax, 12
37b6b7004lea r13, [rsp+284]
37b6b700clea r11, [rip+0xd7da31]
37b6b7013jmp 0x37b6b6f0d
37b6b7018
37b6b7018 0f 1f 84 00 00 00 00 00 ........
37b6b7020
37b6b7020loc_37b6b7020:
37b6b7020mov edx, -7
37b6b7025mov eax, 7
37b6b702ajmp 0x37b6b6efa
37b6b702f
37b6b702floc_37b6b702f:
37b6b702fmov eax, [r12]
37b6b7033test eax, eax
37b6b7035jne 0x37b6b76c1
37b6b703bmov [rsp+40], rbp
37b6b7040lea r13, [rsp+284]
37b6b7048mov r9, rdi
37b6b704bmov ecx, 2
37b6b7050mov [rsp+32], 1
37b6b7059mov r8l, 1
37b6b705fmov rdx, r13
37b6b7062call _gfortran_concat_string
37b6b7067mov [rsp+32], rsi
37b6b706cmov r9, rbx
37b6b706fmov r8, r13
37b6b7072lea rax, [rip+0xd7d9d7]
37b6b7079lea r11, [rip+0xd7d9c4]
37b6b7080mov [rsp+64], 2
37b6b7089mov [rsp+48], rax
37b6b708emov rax, [rsp+400]
37b6b7096mov rdx, r11
37b6b7099lea rcx, [rip+0xd7d9ac]
37b6b70a0mov [rsp+56], 6
37b6b70a9mov [rsp+40], rax
37b6b70aemov [rsp+200], r11
37b6b70b6call ilaenv_
37b6b70bbmov r10l, 64
37b6b70c1cmp eax, r10l
37b6b70c4mov [rsp+192], eax
37b6b70cbcmovle r10l, eax
37b6b70cfmov r8l, r10l
37b6b70d2mov [rsp+184], r10l
37b6b70daimul r8l, r14l
37b6b70delea eax, [r8+4160]
37b6b70e5mov [rsp+176], r8l
37b6b70edmov [rsp+272], eax
37b6b70f4lea rax, [rsp+272]
37b6b70fcmov rcx, rax
37b6b70ffmov [rsp+224], rax
37b6b7107call sroundup_lwork_
37b6b710cmov rax, [rsp+448]
37b6b7114movsxd r8, [rsp+176]
37b6b711cmov r10l, [rsp+184]
37b6b7124mov r11, [rsp+200]
37b6b712cmovss [rax], x0
37b6b7130mov eax, [r12]
37b6b7134test eax, eax
37b6b7136jne 0x37b6b779e
37b6b713ccmp r15l, -1
37b6b7140je 0x37b6b6f26
37b6b7146mov eax, [rbx]
37b6b7148test eax, eax
37b6b714aje 0x37b6b74d0
37b6b7150mov r15l, [rsi]
37b6b7153test r15l, r15l
37b6b7156je 0x37b6b74d0
37b6b715cmov rax, [rsp+400]
37b6b7164mov ecx, [rax]
37b6b7166test ecx, ecx
37b6b7168je 0x37b6b74d0
37b6b716ecmp [rsp+192], 1
37b6b7176mov [rsp+268], r14l
37b6b717ejle 0x37b6b74e8
37b6b7184cmp ecx, r10l
37b6b7187jle 0x37b6b74e8
37b6b718dmov rax, [rsp+456]
37b6b7195mov eax, [rax]
37b6b7197cmp eax, [rsp+272]
37b6b719ejl 0x37b6b7590
37b6b71a4
37b6b71a4loc_37b6b71a4:
37b6b71a4movsxd r11, [rsp+208]
37b6b71acxor eax, eax
37b6b71aemovsxd r9, [rsp+216]
37b6b71b6mov edx, [rsp+168]
37b6b71bdtest r11, r11
37b6b71c0cmovs r11, rax
37b6b71c4mov rax, r11
37b6b71c7not rax
37b6b71camov [rsp+176], rax
37b6b71d2xor eax, eax
37b6b71d4test r9, r9
37b6b71d7cmovs r9, rax
37b6b71dbmov rax, r9
37b6b71denot rax
37b6b71e1mov [rsp+184], rax
37b6b71e9cmp [rsp+240], edx
37b6b71f0je 0x37b6b7660
37b6b71f6mov edx, [rsp+240]
37b6b71fdtest edx, edx
37b6b71ffje 0x37b6b76a0
37b6b7205mov eax, [rsi]
37b6b7207mov [rsp+280], eax
37b6b720e
37b6b720eloc_37b6b720e:
37b6b720elea eax, [rcx-1]
37b6b7211xor edx, edx
37b6b7213mov [rsp+252], r10l
37b6b721bmov r14l, 1
37b6b7221div r10l
37b6b7224mov r12l, eax
37b6b7227
37b6b7227loc_37b6b7227:
37b6b7227lea rdx, [rsp+268]
37b6b722fmov rax, [rsp+448]
37b6b7237mov [rsp+368], rdi
37b6b723flea r15, [rsp+264]
37b6b7247mov [rsp+168], rdx
37b6b724flea rdx, [rsp+280]
37b6b7257mov [rsp+200], rdx
37b6b725flea rdx, [rsp+276]
37b6b7267lea rdi, [rax+4*r8]
37b6b726bmov [rsp+376], rbp
37b6b7273mov ebp, r10l
37b6b7276mov [rsp+392], rsi
37b6b727emov esi, r14l
37b6b7281mov [rsp+232], r13
37b6b7289mov r13, [rsp+416]
37b6b7291mov [rsp+248], 1
37b6b729cmov [rsp+244], 1
37b6b72a7mov [rsp+192], rdx
37b6b72afmov [rsp+208], r11
37b6b72b7mov [rsp+216], r9
37b6b72bfmov [rsp+384], rbx
37b6b72c7jmp 0x37b6b73ec
37b6b72cc
37b6b72cc 0f 1f 40 00 ..@.
37b6b72d0
37b6b72d0loc_37b6b72d0:
37b6b72d0mov rax, [rsp+384]
37b6b72d8mov [rsp+244], esi
37b6b72dfmov rcx, r14
37b6b72e2mov edx, [rax]
37b6b72e4sub edx, esi
37b6b72e6add edx, 1
37b6b72e9mov [rsp+276], edx
37b6b72f0movsxd rdx, [rsp+248]
37b6b72f8
37b6b72f8loc_37b6b72f8:
37b6b72f8mov rax, [rsp+168]
37b6b7300mov [rsp+72], rdi
37b6b7305lea r9, [rip+0xd7d74c]
37b6b730clea r8, [rip+0xd7d74f]
37b6b7313imul rdx, [rsp+216]
37b6b731cadd rdx, [rsp+184]
37b6b7324mov [rsp+64], r13
37b6b7329mov [rsp+112], rax
37b6b732emov rax, [rsp+448]
37b6b7336add rdx, rcx
37b6b7339mov [rsp+56], rbx
37b6b733emov rcx, [rsp+368]
37b6b7346mov [rsp+104], rax
37b6b734bmov rax, [rsp+440]
37b6b7353mov [rsp+48], r15
37b6b7358mov [rsp+96], rax
37b6b735dmov rax, [rsp+432]
37b6b7365mov [rsp+144], 10
37b6b7371mov [rsp+136], 7
37b6b737dlea rdx, [rax+4*rdx]
37b6b7381lea rax, [rip+0xd7d6e4]
37b6b7388mov [rsp+80], rax
37b6b738dmov rax, [rsp+200]
37b6b7395mov [rsp+88], rdx
37b6b739amov rdx, [rsp+376]
37b6b73a2mov [rsp+40], rax
37b6b73a7mov rax, [rsp+192]
37b6b73afmov [rsp+128], 1
37b6b73bbmov [rsp+32], rax
37b6b73c0mov [rsp+120], 1
37b6b73c9call slarfb_
37b6b73cetest r12l, r12l
37b6b73d1je 0x37b6b756b
37b6b73d7mov rax, [rsp+400]
37b6b73dfadd esi, [rsp+252]
37b6b73e6sub r12l, 1
37b6b73eamov ecx, [rax]
37b6b73ec
37b6b73ecloc_37b6b73ec:
37b6b73ecsub ecx, esi
37b6b73eemov edx, [rsp+160]
37b6b73f5movsxd r14, esi
37b6b73f8mov r9, r15
37b6b73fbadd ecx, 1
37b6b73femov [rsp+56], rdi
37b6b7403mov rax, [rsp+408]
37b6b740bcmp ecx, ebp
37b6b740dmov [rsp+40], r13
37b6b7412mov r8, [rsp+232]
37b6b741amov [rsp+80], 10
37b6b7423cmovg ecx, ebp
37b6b7426sub edx, esi
37b6b7428mov [rsp+72], 7
37b6b7431add edx, 1
37b6b7434mov [rsp+284], edx
37b6b743bmov rdx, [rsp+208]
37b6b7443mov [rsp+264], ecx
37b6b744alea rcx, [rip+0xd7d611]
37b6b7451imul rdx, r14
37b6b7455add rdx, [rsp+176]
37b6b745dadd rdx, r14
37b6b7460lea rbx, [rax+4*rdx]
37b6b7464lea rax, [rip+0xd7d601]
37b6b746bmov [rsp+64], rax
37b6b7470mov rax, [rsp+424]
37b6b7478mov [rsp+32], rbx
37b6b747dlea rdx, [rax+4*r14-4]
37b6b7482mov [rsp+48], rdx
37b6b7487lea rdx, [rip+0xd7d5ca]
37b6b748ecall slarft_
37b6b7493mov eax, [rsp+240]
37b6b749atest eax, eax
37b6b749cjne 0x37b6b72d0
37b6b74a2mov rax, [rsp+392]
37b6b74aamov [rsp+248], esi
37b6b74b1movsxd rcx, [rsp+244]
37b6b74b9mov edx, [rax]
37b6b74bbsub edx, esi
37b6b74bdadd edx, 1
37b6b74c0mov [rsp+280], edx
37b6b74c7mov rdx, r14
37b6b74cajmp 0x37b6b72f8
37b6b74cf
37b6b74cf 90 .
37b6b74d0
37b6b74d0loc_37b6b74d0:
37b6b74d0mov rax, [rsp+448]
37b6b74d8mov [rax], 0x3f800000
37b6b74dejmp 0x37b6b6f26
37b6b74e3
37b6b74e3 0f 1f 44 00 00 ..D..
37b6b74e8
37b6b74e8loc_37b6b74e8:
37b6b74e8mov [rsp+88], r13
37b6b74edmov r9, rsi
37b6b74f0mov r8, rbx
37b6b74f3mov rdx, rbp
37b6b74f6mov rax, [rsp+448]
37b6b74femov rcx, rdi
37b6b7501mov [rsp+104], 1
37b6b750amov [rsp+96], 1
37b6b7513mov [rsp+80], rax
37b6b7518mov rax, [rsp+440]
37b6b7520mov [rsp+72], rax
37b6b7525mov rax, [rsp+432]
37b6b752dmov [rsp+64], rax
37b6b7532mov rax, [rsp+424]
37b6b753amov [rsp+56], rax
37b6b753fmov rax, [rsp+416]
37b6b7547mov [rsp+48], rax
37b6b754cmov rax, [rsp+408]
37b6b7554mov [rsp+40], rax
37b6b7559mov rax, [rsp+400]
37b6b7561mov [rsp+32], rax
37b6b7566call sorm2r_
37b6b756b
37b6b756bloc_37b6b756b:
37b6b756bmov rcx, [rsp+224]
37b6b7573call sroundup_lwork_
37b6b7578mov rax, [rsp+448]
37b6b7580movss [rax], x0
37b6b7584jmp 0x37b6b6f26
37b6b7589
37b6b7589 0f 1f 80 00 00 00 00 .......
37b6b7590
37b6b7590loc_37b6b7590:
37b6b7590sub eax, 4160
37b6b7595mov [rsp+40], rbp
37b6b759amov r9, rdi
37b6b759dmov ecx, 2
37b6b75a2cdq
37b6b75a3mov r8l, 1
37b6b75a9mov [rsp+32], 1
37b6b75b2idiv r14l
37b6b75b5mov [rsp+184], r11
37b6b75bdmov rdx, r13
37b6b75c0mov [rsp+176], eax
37b6b75c7call _gfortran_concat_string
37b6b75ccmov [rsp+32], rsi
37b6b75d1mov r9, rbx
37b6b75d4mov r8, r13
37b6b75d7lea rax, [rip+0xd7d472]
37b6b75demov rdx, [rsp+184]
37b6b75e6mov [rsp+64], 2
37b6b75eflea rcx, [rip+0xd7d45e]
37b6b75f6mov [rsp+48], rax
37b6b75fbmov rax, [rsp+400]
37b6b7603mov [rsp+56], 6
37b6b760cmov [rsp+40], rax
37b6b7611call ilaenv_
37b6b7616mov edx, 2
37b6b761bmov r10l, [rsp+176]
37b6b7623cmp eax, edx
37b6b7625cmovl eax, edx
37b6b7628cmp r10l, eax
37b6b762bjl 0x37b6b74e8
37b6b7631mov rax, [rsp+400]
37b6b7639mov ecx, [rax]
37b6b763bcmp ecx, r10l
37b6b763ejle 0x37b6b74e8
37b6b7644imul r14l, r10l
37b6b7648movsxd r8, r14l
37b6b764bjmp 0x37b6b71a4
37b6b7650
37b6b7650loc_37b6b7650:
37b6b7650mov edx, -10
37b6b7655mov eax, 10
37b6b765ajmp 0x37b6b6efa
37b6b765f
37b6b765f 90 .
37b6b7660
37b6b7660loc_37b6b7660:
37b6b7660lea eax, [rcx-1]
37b6b7663mov r12l, [rsp+240]
37b6b766bcdq
37b6b766cidiv r10l
37b6b766flea eax, [rcx-1]
37b6b7672sub eax, edx
37b6b7674mov edx, r10l
37b6b7677neg edx
37b6b7679lea r14l, [rax+1]
37b6b767dmov [rsp+252], edx
37b6b7684test r12l, r12l
37b6b7687je 0x37b6b76ae
37b6b7689mov edx, [rsi]
37b6b768bmov [rsp+280], edx
37b6b7692
37b6b7692loc_37b6b7692:
37b6b7692xor edx, edx
37b6b7694div r10l
37b6b7697mov r12l, eax
37b6b769ajmp 0x37b6b7227
37b6b769f
37b6b769f 90 .
37b6b76a0
37b6b76a0loc_37b6b76a0:
37b6b76a0mov eax, [rbx]
37b6b76a2mov [rsp+276], eax
37b6b76a9jmp 0x37b6b720e
37b6b76ae
37b6b76aeloc_37b6b76ae:
37b6b76aemov edx, [rbx]
37b6b76b0mov [rsp+276], edx
37b6b76b7jmp 0x37b6b7692
37b6b76b9
37b6b76b9loc_37b6b76b9:
37b6b76b9mov eax, [r12]
37b6b76bdtest eax, eax
37b6b76bfje 0x37b6b76d7
37b6b76c1
37b6b76c1loc_37b6b76c1:
37b6b76c1neg eax
37b6b76c3lea r13, [rsp+284]
37b6b76cblea r11, [rip+0xd7d372]
37b6b76d2jmp 0x37b6b6f0d
37b6b76d7
37b6b76d7loc_37b6b76d7:
37b6b76d7mov [rsp+40], rbp
37b6b76dclea r13, [rsp+284]
37b6b76e4mov r9, rdi
37b6b76e7mov ecx, 2
37b6b76ecmov [rsp+32], 1
37b6b76f5mov r8l, 1
37b6b76fbmov rdx, r13
37b6b76fecall _gfortran_concat_string
37b6b7703mov [rsp+32], rsi
37b6b7708mov r9, rbx
37b6b770bmov r8, r13
37b6b770elea rax, [rip+0xd7d33b]
37b6b7715lea r11, [rip+0xd7d328]
37b6b771cmov [rsp+64], 2
37b6b7725mov [rsp+48], rax
37b6b772amov rax, [rsp+400]
37b6b7732mov rdx, r11
37b6b7735lea rcx, [rip+0xd7d310]
37b6b773cmov [rsp+56], 6
37b6b7745mov [rsp+40], rax
37b6b774amov [rsp+160], r11
37b6b7752call ilaenv_
37b6b7757mov edx, 64
37b6b775clea rcx, [rsp+272]
37b6b7764cmp eax, edx
37b6b7766cmovg eax, edx
37b6b7769imul eax, r14l
37b6b776dadd eax, 4160
37b6b7772mov [rsp+272], eax
37b6b7779call sroundup_lwork_
37b6b777emov rax, [rsp+448]
37b6b7786mov r11, [rsp+160]
37b6b778emovss [rax], x0
37b6b7792mov eax, [r12]
37b6b7796test eax, eax
37b6b7798je 0x37b6b6f26
37b6b779e
37b6b779eloc_37b6b779e:
37b6b779eneg eax
37b6b77a0jmp 0x37b6b6f0d
37b6b6db0
37b6b6db0sormqr_:
37b6b6db0push r15
37b6b6db2push r14
37b6b6db4push r13
37b6b6db6push r12
37b6b6db8push rbp
37b6b6db9push rdi
37b6b6dbapush rsi
37b6b6dbbpush rbx
37b6b6dbcsub rsp, 296
37b6b6dc3mov rax, [rsp+416]
37b6b6dcbmov r12, [rsp+464]
37b6b6dd3mov eax, [rax]
37b6b6dd5mov [r12], 0
37b6b6dddmov [rsp+208], eax
37b6b6de4mov rbp, rdx
37b6b6de7mov rbx, r8
37b6b6deamov rsi, r9
37b6b6dedmov r8l, 1
37b6b6df3mov r9l, 1
37b6b6df9lea rdx, [rip+0xd7dc40]
37b6b6e00mov rdi, rcx
37b6b6e03mov rax, [rsp+440]
37b6b6e0bmov eax, [rax]
37b6b6e0dmov [rsp+216], eax
37b6b6e14call lsame_
37b6b6e19mov r9l, 1
37b6b6e1fmov r8l, 1
37b6b6e25mov rcx, rbp
37b6b6e28lea rdx, [rip+0xd7dc12]
37b6b6e2fmov [rsp+240], eax
37b6b6e36mov r14l, eax
37b6b6e39call lsame_
37b6b6e3emov r13l, [rsi]
37b6b6e41mov [rsp+168], eax
37b6b6e48mov rax, [rsp+456]
37b6b6e50mov r15l, [rax]
37b6b6e53mov eax, [rbx]
37b6b6e55mov [rsp+160], eax
37b6b6e5ctest r14l, r14l
37b6b6e5fje 0x37b6b6ec0
37b6b6e61mov ecx, [rsp+168]
37b6b6e68test r13l, r13l
37b6b6e6bmov r14l, 1
37b6b6e71cmovg r14l, r13l
37b6b6e75test ecx, ecx
37b6b6e77je 0x37b6b6f6a
37b6b6e7d
37b6b6e7dloc_37b6b6e7d:
37b6b6e7dmov eax, [rbx]
37b6b6e7ftest eax, eax
37b6b6e81js 0x37b6b6ef0
37b6b6e83mov edx, [rsi]
37b6b6e85test edx, edx
37b6b6e87js 0x37b6b6fa0
37b6b6e8dmov rcx, [rsp+400]
37b6b6e95mov edx, [rcx]
37b6b6e97test edx, edx
37b6b6e99js 0x37b6b6eaa
37b6b6e9bmov ecx, [rsp+160]
37b6b6ea2cmp edx, ecx
37b6b6ea4jle 0x37b6b6fb0
37b6b6eaa
37b6b6eaaloc_37b6b6eaa:
37b6b6eaamov edx, -5
37b6b6eafmov eax, 5
37b6b6eb4jmp 0x37b6b6efa
37b6b6eb6
37b6b6eb6 66 2e 0f 1f 84 00 00 00 00 00 f.........
37b6b6ec0
37b6b6ec0loc_37b6b6ec0:
37b6b6ec0mov r9l, 1
37b6b6ec6mov r8l, 1
37b6b6ecclea rdx, [rip+0xd7db6f]
37b6b6ed3mov rcx, rdi
37b6b6ed6call lsame_
37b6b6edbtest eax, eax
37b6b6eddjne 0x37b6b6f40
37b6b6edfmov edx, -1
37b6b6ee4mov eax, 1
37b6b6ee9jmp 0x37b6b6efa
37b6b6eeb
37b6b6eeb 0f 1f 44 00 00 ..D..
37b6b6ef0
37b6b6ef0loc_37b6b6ef0:
37b6b6ef0mov edx, -3
37b6b6ef5mov eax, 3
37b6b6efa
37b6b6efaloc_37b6b6efa:
37b6b6efamov [r12], edx
37b6b6efelea r13, [rsp+284]
37b6b6f06lea r11, [rip+0xd7db37]
37b6b6f0d
37b6b6f0dloc_37b6b6f0d:
37b6b6f0dmov r8l, 6
37b6b6f13mov rdx, r13
37b6b6f16mov rcx, r11
37b6b6f19mov [rsp+284], eax
37b6b6f20call xerbla_
37b6b6f25nop
37b6b6f26
37b6b6f26loc_37b6b6f26:
37b6b6f26add rsp, 296
37b6b6f2dpop rbx
37b6b6f2epop rsi
37b6b6f2fpop rdi
37b6b6f30pop rbp
37b6b6f31pop r12
37b6b6f33pop r13
37b6b6f35pop r14
37b6b6f37pop r15
37b6b6f39ret
37b6b6f3a
37b6b6f3a 66 0f 1f 44 00 00 f..D..
37b6b6f40
37b6b6f40loc_37b6b6f40:
37b6b6f40mov eax, [rsp+160]
37b6b6f47mov ecx, [rsp+168]
37b6b6f4emov r14l, 1
37b6b6f54mov [rsp+160], r13l
37b6b6f5ctest eax, eax
37b6b6f5ecmovg r14l, eax
37b6b6f62test ecx, ecx
37b6b6f64jne 0x37b6b6e7d
37b6b6f6a
37b6b6f6aloc_37b6b6f6a:
37b6b6f6amov r9l, 1
37b6b6f70mov r8l, 1
37b6b6f76mov rcx, rbp
37b6b6f79lea rdx, [rip+0xd7dac3]
37b6b6f80call lsame_
37b6b6f85test eax, eax
37b6b6f87jne 0x37b6b6e7d
37b6b6f8dmov edx, -2
37b6b6f92mov eax, 2
37b6b6f97jmp 0x37b6b6efa
37b6b6f9c
37b6b6f9c 0f 1f 40 00 ..@.
37b6b6fa0
37b6b6fa0loc_37b6b6fa0:
37b6b6fa0mov edx, -4
37b6b6fa5mov eax, 4
37b6b6faajmp 0x37b6b6efa
37b6b6faf
37b6b6faf 90 .
37b6b6fb0
37b6b6fb0loc_37b6b6fb0:
37b6b6fb0test ecx, ecx
37b6b6fb2mov edx, 1
37b6b6fb7cmovg edx, ecx
37b6b6fbamov rcx, [rsp+416]
37b6b6fc2cmp [rcx], edx
37b6b6fc4jl 0x37b6b7020
37b6b6fc6mov rcx, [rsp+440]
37b6b6fcetest eax, eax
37b6b6fd0mov edx, 1
37b6b6fd5cmovle eax, edx
37b6b6fd8cmp [rcx], eax
37b6b6fdajl 0x37b6b7650
37b6b6fe0mov rax, [rsp+456]
37b6b6fe8cmp [rax], r14l
37b6b6febjge 0x37b6b702f
37b6b6fedcmp r15l, -1
37b6b6ff1je 0x37b6b76b9
37b6b6ff7mov [r12], -12
37b6b6fffmov eax, 12
37b6b7004lea r13, [rsp+284]
37b6b700clea r11, [rip+0xd7da31]
37b6b7013jmp 0x37b6b6f0d
37b6b7018
37b6b7018 0f 1f 84 00 00 00 00 00 ........
37b6b7020
37b6b7020loc_37b6b7020:
37b6b7020mov edx, -7
37b6b7025mov eax, 7
37b6b702ajmp 0x37b6b6efa
37b6b702f
37b6b702floc_37b6b702f:
37b6b702fmov eax, [r12]
37b6b7033test eax, eax
37b6b7035jne 0x37b6b76c1
37b6b703bmov [rsp+40], rbp
37b6b7040lea r13, [rsp+284]
37b6b7048mov r9, rdi
37b6b704bmov ecx, 2
37b6b7050mov [rsp+32], 1
37b6b7059mov r8l, 1
37b6b705fmov rdx, r13
37b6b7062call _gfortran_concat_string
37b6b7067mov [rsp+32], rsi
37b6b706cmov r9, rbx
37b6b706fmov r8, r13
37b6b7072lea rax, [rip+0xd7d9d7]
37b6b7079lea r11, [rip+0xd7d9c4]
37b6b7080mov [rsp+64], 2
37b6b7089mov [rsp+48], rax
37b6b708emov rax, [rsp+400]
37b6b7096mov rdx, r11
37b6b7099lea rcx, [rip+0xd7d9ac]
37b6b70a0mov [rsp+56], 6
37b6b70a9mov [rsp+40], rax
37b6b70aemov [rsp+200], r11
37b6b70b6call ilaenv_
37b6b70bbmov r10l, 64
37b6b70c1cmp eax, r10l
37b6b70c4mov [rsp+192], eax
37b6b70cbcmovle r10l, eax
37b6b70cfmov r8l, r10l
37b6b70d2mov [rsp+184], r10l
37b6b70daimul r8l, r14l
37b6b70delea eax, [r8+4160]
37b6b70e5mov [rsp+176], r8l
37b6b70edmov [rsp+272], eax
37b6b70f4lea rax, [rsp+272]
37b6b70fcmov rcx, rax
37b6b70ffmov [rsp+224], rax
37b6b7107call sroundup_lwork_
37b6b710cmov rax, [rsp+448]
37b6b7114movsxd r8, [rsp+176]
37b6b711cmov r10l, [rsp+184]
37b6b7124mov r11, [rsp+200]
37b6b712cmovss [rax], x0
37b6b7130mov eax, [r12]
37b6b7134test eax, eax
37b6b7136jne 0x37b6b779e
37b6b713ccmp r15l, -1
37b6b7140je 0x37b6b6f26
37b6b7146mov eax, [rbx]
37b6b7148test eax, eax
37b6b714aje 0x37b6b74d0
37b6b7150mov r15l, [rsi]
37b6b7153test r15l, r15l
37b6b7156je 0x37b6b74d0
37b6b715cmov rax, [rsp+400]
37b6b7164mov ecx, [rax]
37b6b7166test ecx, ecx
37b6b7168je 0x37b6b74d0
37b6b716ecmp [rsp+192], 1
37b6b7176mov [rsp+268], r14l
37b6b717ejle 0x37b6b74e8
37b6b7184cmp ecx, r10l
37b6b7187jle 0x37b6b74e8
37b6b718dmov rax, [rsp+456]
37b6b7195mov eax, [rax]
37b6b7197cmp eax, [rsp+272]
37b6b719ejl 0x37b6b7590
37b6b71a4
37b6b71a4loc_37b6b71a4:
37b6b71a4movsxd r11, [rsp+208]
37b6b71acxor eax, eax
37b6b71aemovsxd r9, [rsp+216]
37b6b71b6mov edx, [rsp+168]
37b6b71bdtest r11, r11
37b6b71c0cmovs r11, rax
37b6b71c4mov rax, r11
37b6b71c7not rax
37b6b71camov [rsp+176], rax
37b6b71d2xor eax, eax
37b6b71d4test r9, r9
37b6b71d7cmovs r9, rax
37b6b71dbmov rax, r9
37b6b71denot rax
37b6b71e1mov [rsp+184], rax
37b6b71e9cmp [rsp+240], edx
37b6b71f0je 0x37b6b7660
37b6b71f6mov edx, [rsp+240]
37b6b71fdtest edx, edx
37b6b71ffje 0x37b6b76a0
37b6b7205mov eax, [rsi]
37b6b7207mov [rsp+280], eax
37b6b720e
37b6b720eloc_37b6b720e:
37b6b720elea eax, [rcx-1]
37b6b7211xor edx, edx
37b6b7213mov [rsp+252], r10l
37b6b721bmov r14l, 1
37b6b7221div r10l
37b6b7224mov r12l, eax
37b6b7227
37b6b7227loc_37b6b7227:
37b6b7227lea rdx, [rsp+268]
37b6b722fmov rax, [rsp+448]
37b6b7237mov [rsp+368], rdi
37b6b723flea r15, [rsp+264]
37b6b7247mov [rsp+168], rdx
37b6b724flea rdx, [rsp+280]
37b6b7257mov [rsp+200], rdx
37b6b725flea rdx, [rsp+276]
37b6b7267lea rdi, [rax+4*r8]
37b6b726bmov [rsp+376], rbp
37b6b7273mov ebp, r10l
37b6b7276mov [rsp+392], rsi
37b6b727emov esi, r14l
37b6b7281mov [rsp+232], r13
37b6b7289mov r13, [rsp+416]
37b6b7291mov [rsp+248], 1
37b6b729cmov [rsp+244], 1
37b6b72a7mov [rsp+192], rdx
37b6b72afmov [rsp+208], r11
37b6b72b7mov [rsp+216], r9
37b6b72bfmov [rsp+384], rbx
37b6b72c7jmp 0x37b6b73ec
37b6b72cc
37b6b72cc 0f 1f 40 00 ..@.
37b6b72d0
37b6b72d0loc_37b6b72d0:
37b6b72d0mov rax, [rsp+384]
37b6b72d8mov [rsp+244], esi
37b6b72dfmov rcx, r14
37b6b72e2mov edx, [rax]
37b6b72e4sub edx, esi
37b6b72e6add edx, 1
37b6b72e9mov [rsp+276], edx
37b6b72f0movsxd rdx, [rsp+248]
37b6b72f8
37b6b72f8loc_37b6b72f8:
37b6b72f8mov rax, [rsp+168]
37b6b7300mov [rsp+72], rdi
37b6b7305lea r9, [rip+0xd7d74c]
37b6b730clea r8, [rip+0xd7d74f]
37b6b7313imul rdx, [rsp+216]
37b6b731cadd rdx, [rsp+184]
37b6b7324mov [rsp+64], r13
37b6b7329mov [rsp+112], rax
37b6b732emov rax, [rsp+448]
37b6b7336add rdx, rcx
37b6b7339mov [rsp+56], rbx
37b6b733emov rcx, [rsp+368]
37b6b7346mov [rsp+104], rax
37b6b734bmov rax, [rsp+440]
37b6b7353mov [rsp+48], r15
37b6b7358mov [rsp+96], rax
37b6b735dmov rax, [rsp+432]
37b6b7365mov [rsp+144], 10
37b6b7371mov [rsp+136], 7
37b6b737dlea rdx, [rax+4*rdx]
37b6b7381lea rax, [rip+0xd7d6e4]
37b6b7388mov [rsp+80], rax
37b6b738dmov rax, [rsp+200]
37b6b7395mov [rsp+88], rdx
37b6b739amov rdx, [rsp+376]
37b6b73a2mov [rsp+40], rax
37b6b73a7mov rax, [rsp+192]
37b6b73afmov [rsp+128], 1
37b6b73bbmov [rsp+32], rax
37b6b73c0mov [rsp+120], 1
37b6b73c9call slarfb_
37b6b73cetest r12l, r12l
37b6b73d1je 0x37b6b756b
37b6b73d7mov rax, [rsp+400]
37b6b73dfadd esi, [rsp+252]
37b6b73e6sub r12l, 1
37b6b73eamov ecx, [rax]
37b6b73ec
37b6b73ecloc_37b6b73ec:
37b6b73ecsub ecx, esi
37b6b73eemov edx, [rsp+160]
37b6b73f5movsxd r14, esi
37b6b73f8mov r9, r15
37b6b73fbadd ecx, 1
37b6b73femov [rsp+56], rdi
37b6b7403mov rax, [rsp+408]
37b6b740bcmp ecx, ebp
37b6b740dmov [rsp+40], r13
37b6b7412mov r8, [rsp+232]
37b6b741amov [rsp+80], 10
37b6b7423cmovg ecx, ebp
37b6b7426sub edx, esi
37b6b7428mov [rsp+72], 7
37b6b7431add edx, 1
37b6b7434mov [rsp+284], edx
37b6b743bmov rdx, [rsp+208]
37b6b7443mov [rsp+264], ecx
37b6b744alea rcx, [rip+0xd7d611]
37b6b7451imul rdx, r14
37b6b7455add rdx, [rsp+176]
37b6b745dadd rdx, r14
37b6b7460lea rbx, [rax+4*rdx]
37b6b7464lea rax, [rip+0xd7d601]
37b6b746bmov [rsp+64], rax
37b6b7470mov rax, [rsp+424]
37b6b7478mov [rsp+32], rbx
37b6b747dlea rdx, [rax+4*r14-4]
37b6b7482mov [rsp+48], rdx
37b6b7487lea rdx, [rip+0xd7d5ca]
37b6b748ecall slarft_
37b6b7493mov eax, [rsp+240]
37b6b749atest eax, eax
37b6b749cjne 0x37b6b72d0
37b6b74a2mov rax, [rsp+392]
37b6b74aamov [rsp+248], esi
37b6b74b1movsxd rcx, [rsp+244]
37b6b74b9mov edx, [rax]
37b6b74bbsub edx, esi
37b6b74bdadd edx, 1
37b6b74c0mov [rsp+280], edx
37b6b74c7mov rdx, r14
37b6b74cajmp 0x37b6b72f8
37b6b74cf
37b6b74cf 90 .
37b6b74d0
37b6b74d0loc_37b6b74d0:
37b6b74d0mov rax, [rsp+448]
37b6b74d8mov [rax], 0x3f800000
37b6b74dejmp 0x37b6b6f26
37b6b74e3
37b6b74e3 0f 1f 44 00 00 ..D..
37b6b74e8
37b6b74e8loc_37b6b74e8:
37b6b74e8mov [rsp+88], r13
37b6b74edmov r9, rsi
37b6b74f0mov r8, rbx
37b6b74f3mov rdx, rbp
37b6b74f6mov rax, [rsp+448]
37b6b74femov rcx, rdi
37b6b7501mov [rsp+104], 1
37b6b750amov [rsp+96], 1
37b6b7513mov [rsp+80], rax
37b6b7518mov rax, [rsp+440]
37b6b7520mov [rsp+72], rax
37b6b7525mov rax, [rsp+432]
37b6b752dmov [rsp+64], rax
37b6b7532mov rax, [rsp+424]
37b6b753amov [rsp+56], rax
37b6b753fmov rax, [rsp+416]
37b6b7547mov [rsp+48], rax
37b6b754cmov rax, [rsp+408]
37b6b7554mov [rsp+40], rax
37b6b7559mov rax, [rsp+400]
37b6b7561mov [rsp+32], rax
37b6b7566call sorm2r_
37b6b756b
37b6b756bloc_37b6b756b:
37b6b756bmov rcx, [rsp+224]
37b6b7573call sroundup_lwork_
37b6b7578mov rax, [rsp+448]
37b6b7580movss [rax], x0
37b6b7584jmp 0x37b6b6f26
37b6b7589
37b6b7589 0f 1f 80 00 00 00 00 .......
37b6b7590
37b6b7590loc_37b6b7590:
37b6b7590sub eax, 4160
37b6b7595mov [rsp+40], rbp
37b6b759amov r9, rdi
37b6b759dmov ecx, 2
37b6b75a2cdq
37b6b75a3mov r8l, 1
37b6b75a9mov [rsp+32], 1
37b6b75b2idiv r14l
37b6b75b5mov [rsp+184], r11
37b6b75bdmov rdx, r13
37b6b75c0mov [rsp+176], eax
37b6b75c7call _gfortran_concat_string
37b6b75ccmov [rsp+32], rsi
37b6b75d1mov r9, rbx
37b6b75d4mov r8, r13
37b6b75d7lea rax, [rip+0xd7d472]
37b6b75demov rdx, [rsp+184]
37b6b75e6mov [rsp+64], 2
37b6b75eflea rcx, [rip+0xd7d45e]
37b6b75f6mov [rsp+48], rax
37b6b75fbmov rax, [rsp+400]
37b6b7603mov [rsp+56], 6
37b6b760cmov [rsp+40], rax
37b6b7611call ilaenv_
37b6b7616mov edx, 2
37b6b761bmov r10l, [rsp+176]
37b6b7623cmp eax, edx
37b6b7625cmovl eax, edx
37b6b7628cmp r10l, eax
37b6b762bjl 0x37b6b74e8
37b6b7631mov rax, [rsp+400]
37b6b7639mov ecx, [rax]
37b6b763bcmp ecx, r10l
37b6b763ejle 0x37b6b74e8
37b6b7644imul r14l, r10l
37b6b7648movsxd r8, r14l
37b6b764bjmp 0x37b6b71a4
37b6b7650
37b6b7650loc_37b6b7650:
37b6b7650mov edx, -10
37b6b7655mov eax, 10
37b6b765ajmp 0x37b6b6efa
37b6b765f
37b6b765f 90 .
37b6b7660
37b6b7660loc_37b6b7660:
37b6b7660lea eax, [rcx-1]
37b6b7663mov r12l, [rsp+240]
37b6b766bcdq
37b6b766cidiv r10l
37b6b766flea eax, [rcx-1]
37b6b7672sub eax, edx
37b6b7674mov edx, r10l
37b6b7677neg edx
37b6b7679lea r14l, [rax+1]
37b6b767dmov [rsp+252], edx
37b6b7684test r12l, r12l
37b6b7687je 0x37b6b76ae
37b6b7689mov edx, [rsi]
37b6b768bmov [rsp+280], edx
37b6b7692
37b6b7692loc_37b6b7692:
37b6b7692xor edx, edx
37b6b7694div r10l
37b6b7697mov r12l, eax
37b6b769ajmp 0x37b6b7227
37b6b769f
37b6b769f 90 .
37b6b76a0
37b6b76a0loc_37b6b76a0:
37b6b76a0mov eax, [rbx]
37b6b76a2mov [rsp+276], eax
37b6b76a9jmp 0x37b6b720e
37b6b76ae
37b6b76aeloc_37b6b76ae:
37b6b76aemov edx, [rbx]
37b6b76b0mov [rsp+276], edx
37b6b76b7jmp 0x37b6b7692
37b6b76b9
37b6b76b9loc_37b6b76b9:
37b6b76b9mov eax, [r12]
37b6b76bdtest eax, eax
37b6b76bfje 0x37b6b76d7
37b6b76c1
37b6b76c1loc_37b6b76c1:
37b6b76c1neg eax
37b6b76c3lea r13, [rsp+284]
37b6b76cblea r11, [rip+0xd7d372]
37b6b76d2jmp 0x37b6b6f0d
37b6b76d7
37b6b76d7loc_37b6b76d7:
37b6b76d7mov [rsp+40], rbp
37b6b76dclea r13, [rsp+284]
37b6b76e4mov r9, rdi
37b6b76e7mov ecx, 2
37b6b76ecmov [rsp+32], 1
37b6b76f5mov r8l, 1
37b6b76fbmov rdx, r13
37b6b76fecall _gfortran_concat_string
37b6b7703mov [rsp+32], rsi
37b6b7708mov r9, rbx
37b6b770bmov r8, r13
37b6b770elea rax, [rip+0xd7d33b]
37b6b7715lea r11, [rip+0xd7d328]
37b6b771cmov [rsp+64], 2
37b6b7725mov [rsp+48], rax
37b6b772amov rax, [rsp+400]
37b6b7732mov rdx, r11
37b6b7735lea rcx, [rip+0xd7d310]
37b6b773cmov [rsp+56], 6
37b6b7745mov [rsp+40], rax
37b6b774amov [rsp+160], r11
37b6b7752call ilaenv_
37b6b7757mov edx, 64
37b6b775clea rcx, [rsp+272]
37b6b7764cmp eax, edx
37b6b7766cmovg eax, edx
37b6b7769imul eax, r14l
37b6b776dadd eax, 4160
37b6b7772mov [rsp+272], eax
37b6b7779call sroundup_lwork_
37b6b777emov rax, [rsp+448]
37b6b7786mov r11, [rsp+160]
37b6b778emovss [rax], x0
37b6b7792mov eax, [r12]
37b6b7796test eax, eax
37b6b7798je 0x37b6b6f26
37b6b779e
37b6b779eloc_37b6b779e:
37b6b779eneg eax
37b6b77a0jmp 0x37b6b6f0d
37b6b6db0
Loading..