File lapack_564f5cd6dd718723530ccdd421a63387e76d5fcdb30f49d1f0425db7bc512296.dll
Function:
    37b86ec70
    37b86ec70dormrq_:
    37b86ec70push r15
    37b86ec72push r14
    37b86ec74push r13
    37b86ec76push r12
    37b86ec78push rbp
    37b86ec79push rdi
    37b86ec7apush rsi
    37b86ec7bpush rbx
    37b86ec7csub rsp, 296
    37b86ec83movups [rsp+272], x6
    37b86ec8bmov rax, [rsp+464]
    37b86ec93mov [rax], 0
    37b86ec99mov rbp, rdx
    37b86ec9cmov rbx, r8
    37b86ec9fmov rsi, r9
    37b86eca2mov r8l, 1
    37b86eca8mov r9l, 1
    37b86ecaelea rdx, [rip+0xbcd91b]
    37b86ecb5mov rdi, rcx
    37b86ecb8call lsame_
    37b86ecbdmov r9l, 1
    37b86ecc3mov r8l, 1
    37b86ecc9mov rcx, rbp
    37b86eccclea rdx, [rip+0xbcd8fe]
    37b86ecd3mov r15l, eax
    37b86ecd6call lsame_
    37b86ecdbmov r11l, [rsi]
    37b86ecdemov r14l, [rbx]
    37b86ece1mov r12l, eax
    37b86ece4mov rax, [rsp+456]
    37b86ececmov r13l, [rax]
    37b86eceftest r15l, r15l
    37b86ecf2je 0x37b86ed40
    37b86ecf4test r11l, r11l
    37b86ecf7mov r10l, 1
    37b86ecfdcmovg r10l, r11l
    37b86ed01test r12l, r12l
    37b86ed04je 0x37b86edee
    37b86ed0a
    37b86ed0aloc_37b86ed0a:
    37b86ed0amov edx, [rbx]
    37b86ed0ctest edx, edx
    37b86ed0ejs 0x37b86ed78
    37b86ed10mov ecx, [rsi]
    37b86ed12test ecx, ecx
    37b86ed14js 0x37b86ee30
    37b86ed1amov rax, [rsp+400]
    37b86ed22mov eax, [rax]
    37b86ed24test eax, eax
    37b86ed26js 0x37b86ed31
    37b86ed28cmp eax, r14l
    37b86ed2bjle 0x37b86ee40
    37b86ed31
    37b86ed31loc_37b86ed31:
    37b86ed31mov edx, -5
    37b86ed36mov eax, 5
    37b86ed3bjmp 0x37b86ed82
    37b86ed3d
    37b86ed3d 0f 1f 00 ...
    37b86ed40
    37b86ed40loc_37b86ed40:
    37b86ed40mov r9l, 1
    37b86ed46mov r8l, 1
    37b86ed4cmov rcx, rdi
    37b86ed4fmov [rsp+168], r11l
    37b86ed57lea rdx, [rip+0xbcd874]
    37b86ed5ecall lsame_
    37b86ed63test eax, eax
    37b86ed65jne 0x37b86edd0
    37b86ed67mov edx, -1
    37b86ed6cmov eax, 1
    37b86ed71jmp 0x37b86ed82
    37b86ed73
    37b86ed73 0f 1f 44 00 00 ..D..
    37b86ed78
    37b86ed78loc_37b86ed78:
    37b86ed78mov edx, -3
    37b86ed7dmov eax, 3
    37b86ed82
    37b86ed82loc_37b86ed82:
    37b86ed82mov rdi, [rsp+464]
    37b86ed8amov [rdi], edx
    37b86ed8c
    37b86ed8cloc_37b86ed8c:
    37b86ed8clea rdx, [rsp+268]
    37b86ed94mov r8l, 6
    37b86ed9alea rcx, [rip+0xbcd833]
    37b86eda1mov [rsp+268], eax
    37b86eda8call xerbla_
    37b86edadnop
    37b86edae
    37b86edaeloc_37b86edae:
    37b86edaemovups x6, [rsp+272]
    37b86edb6add rsp, 296
    37b86edbdpop rbx
    37b86edbepop rsi
    37b86edbfpop rdi
    37b86edc0pop rbp
    37b86edc1pop r12
    37b86edc3pop r13
    37b86edc5pop r14
    37b86edc7pop r15
    37b86edc9ret
    37b86edca
    37b86edca 66 0f 1f 44 00 00 f..D..
    37b86edd0
    37b86edd0loc_37b86edd0:
    37b86edd0test r14l, r14l
    37b86edd3mov r10l, 1
    37b86edd9cmovg r10l, r14l
    37b86edddmov r14l, [rsp+168]
    37b86ede5test r12l, r12l
    37b86ede8jne 0x37b86ed0a
    37b86edee
    37b86edeeloc_37b86edee:
    37b86edeemov r9l, 1
    37b86edf4mov r8l, 1
    37b86edfamov rcx, rbp
    37b86edfdmov [rsp+168], r10l
    37b86ee05lea rdx, [rip+0xbcd7c7]
    37b86ee0ccall lsame_
    37b86ee11mov r10l, [rsp+168]
    37b86ee19test eax, eax
    37b86ee1bjne 0x37b86ed0a
    37b86ee21mov edx, -2
    37b86ee26mov eax, 2
    37b86ee2bjmp 0x37b86ed82
    37b86ee30
    37b86ee30loc_37b86ee30:
    37b86ee30mov edx, -4
    37b86ee35mov eax, 4
    37b86ee3ajmp 0x37b86ed82
    37b86ee3f
    37b86ee3f 90 .
    37b86ee40
    37b86ee40loc_37b86ee40:
    37b86ee40mov r11, [rsp+416]
    37b86ee48test eax, eax
    37b86ee4amov r8l, 1
    37b86ee50cmovle eax, r8l
    37b86ee54cmp [r11], eax
    37b86ee57jl 0x37b86eea8
    37b86ee59mov r11, [rsp+440]
    37b86ee61test edx, edx
    37b86ee63mov eax, 1
    37b86ee68cmovg eax, edx
    37b86ee6bcmp [r11], eax
    37b86ee6ejl 0x37b86f4e0
    37b86ee74mov rax, [rsp+456]
    37b86ee7ccmp [rax], r10l
    37b86ee7fmov rax, [rsp+464]
    37b86ee87jge 0x37b86eec0
    37b86ee89cmp r13l, -1
    37b86ee8dje 0x37b86f55e
    37b86ee93mov [rax], -12
    37b86ee99mov eax, 12
    37b86ee9ejmp 0x37b86ed8c
    37b86eea3
    37b86eea3 0f 1f 44 00 00 ..D..
    37b86eea8
    37b86eea8loc_37b86eea8:
    37b86eea8mov edx, -7
    37b86eeadmov eax, 7
    37b86eeb2jmp 0x37b86ed82
    37b86eeb7
    37b86eeb7 66 0f 1f 84 00 00 00 00 00 f........
    37b86eec0
    37b86eec0loc_37b86eec0:
    37b86eec0mov eax, [rax]
    37b86eec2test eax, eax
    37b86eec4jne 0x37b86f583
    37b86eecatest edx, edx
    37b86eeccje 0x37b86eed6
    37b86eece
    37b86eeceloc_37b86eece:
    37b86eecetest ecx, ecx
    37b86eed0jne 0x37b86f310
    37b86eed6
    37b86eed6loc_37b86eed6:
    37b86eed6movsd_xmm x0, [rip+0xbcd722]
    37b86eedemov edx, 1
    37b86eee3
    37b86eee3loc_37b86eee3:
    37b86eee3mov rcx, [rsp+448]
    37b86eeebmovsd_xmm [rcx], x0
    37b86eeeftest eax, eax
    37b86eef1jne 0x37b86f583
    37b86eef7cmp r13l, -1
    37b86eefbje 0x37b86edae
    37b86ef01mov r8l, [rbx]
    37b86ef04test r8l, r8l
    37b86ef07je 0x37b86edae
    37b86ef0dmov ecx, [rsi]
    37b86ef0ftest ecx, ecx
    37b86ef11je 0x37b86edae
    37b86ef17mov [rsp+256], r10l
    37b86ef1fcmp [rsp+176], 1
    37b86ef27jle 0x37b86f260
    37b86ef2dmov rax, [rsp+400]
    37b86ef35mov ecx, [rax]
    37b86ef37cmp ecx, [rsp+176]
    37b86ef3ejle 0x37b86f260
    37b86ef44mov rax, [rsp+456]
    37b86ef4clea r11, [rsp+268]
    37b86ef54mov eax, [rax]
    37b86ef56cmp eax, edx
    37b86ef58jl 0x37b86f3f0
    37b86ef5e
    37b86ef5eloc_37b86ef5e:
    37b86ef5eimul r10l, [rsp+176]
    37b86ef67cmp r15l, r12l
    37b86ef6aje 0x37b86f4f0
    37b86ef70test r15l, r15l
    37b86ef73je 0x37b86f530
    37b86ef79mov eax, [rsi]
    37b86ef7bmov [rsp+264], eax
    37b86ef82test r12l, r12l
    37b86ef85je 0x37b86f542
    37b86ef8b
    37b86ef8bloc_37b86ef8b:
    37b86ef8bmov r9l, 84
    37b86ef91
    37b86ef91loc_37b86ef91:
    37b86ef91mov r8l, [rsp+176]
    37b86ef99lea eax, [rcx-1]
    37b86ef9cxor edx, edx
    37b86ef9emov r13l, 1
    37b86efa4div r8l
    37b86efa7
    37b86efa7loc_37b86efa7:
    37b86efa7mov rdx, [rsp+448]
    37b86efafmov [rsp+251], r9b
    37b86efb7mov r9, [rsp+408]
    37b86efbfmov [rsp+220], r14l
    37b86efc7mov [rsp+368], rdi
    37b86efcfmov r14, [rsp+416]
    37b86efd7mov [rsp+384], rbx
    37b86efdfmov edi, [rsp+176]
    37b86efe6mov [rsp+392], rsi
    37b86efeemov [rsp+232], r15l
    37b86eff6mov r15, [rsp+400]
    37b86effemov [rsp+236], r8l
    37b86f006mov [rsp+176], r11
    37b86f00emovsxd r10, r10l
    37b86f011movapd x6, x0
    37b86f015mov ebx, eax
    37b86f017lea r10, [rdx+8*r10]
    37b86f01bmovsxd rdx, r8l
    37b86f01eshl rdx, 3
    37b86f022mov rsi, r10
    37b86f025mov [rsp+224], rdx
    37b86f02dmovsxd rdx, r13l
    37b86f030shl rdx, 3
    37b86f034lea rbp, [r9+rdx-8]
    37b86f039mov r9, [rsp+424]
    37b86f041lea r12, [r9+rdx-8]
    37b86f046lea rdx, [rsp+252]
    37b86f04emov [rsp+168], rdx
    37b86f056lea rdx, [rsp+251]
    37b86f05emov [rsp+184], rdx
    37b86f066lea rdx, [rsp+256]
    37b86f06emov [rsp+192], rdx
    37b86f076lea rdx, [rsp+264]
    37b86f07emov [rsp+208], rdx
    37b86f086lea rdx, [rsp+260]
    37b86f08emov [rsp+200], rdx
    37b86f096jmp 0x37b86f1a5
    37b86f09b
    37b86f09b 0f 1f 44 00 00 ..D..
    37b86f0a0
    37b86f0a0loc_37b86f0a0:
    37b86f0a0mov r10, [rsp+384]
    37b86f0a8mov eax, [r10]
    37b86f0abadd eax, r13l
    37b86f0aesub eax, ecx
    37b86f0b0lea eax, [rdx+rax-1]
    37b86f0b4mov [rsp+260], eax
    37b86f0bb
    37b86f0bbloc_37b86f0bb:
    37b86f0bbmov rax, [rsp+192]
    37b86f0c3mov [rsp+72], rsi
    37b86f0c8lea r9, [rip+0xbcd519]
    37b86f0cflea r8, [rip+0xbcd519]
    37b86f0d6mov [rsp+64], r14
    37b86f0dbmov rdx, [rsp+184]
    37b86f0e3mov [rsp+112], rax
    37b86f0e8mov rax, [rsp+448]
    37b86f0f0mov [rsp+56], rbp
    37b86f0f5mov rcx, [rsp+368]
    37b86f0fdmov [rsp+104], rax
    37b86f102mov rax, [rsp+440]
    37b86f10amov [rsp+144], 7
    37b86f116mov [rsp+96], rax
    37b86f11bmov rax, [rsp+432]
    37b86f123mov [rsp+136], 8
    37b86f12fmov [rsp+88], rax
    37b86f134lea rax, [rip+0xbcd4bd]
    37b86f13bmov [rsp+80], rax
    37b86f140mov rax, [rsp+168]
    37b86f148mov [rsp+128], 1
    37b86f154mov [rsp+48], rax
    37b86f159mov rax, [rsp+208]
    37b86f161mov [rsp+120], 1
    37b86f16amov [rsp+40], rax
    37b86f16fmov rax, [rsp+200]
    37b86f177mov [rsp+32], rax
    37b86f17ccall dlarfb_
    37b86f181test ebx, ebx
    37b86f183je 0x37b86f3e0
    37b86f189mov rax, [rsp+224]
    37b86f191mov ecx, [r15]
    37b86f194sub ebx, 1
    37b86f197add r13l, [rsp+236]
    37b86f19fadd rbp, rax
    37b86f1a2add r12, rax
    37b86f1a5
    37b86f1a5loc_37b86f1a5:
    37b86f1a5mov eax, ecx
    37b86f1a7mov edx, [rsp+220]
    37b86f1aemov [rsp+80], 7
    37b86f1b7sub eax, r13l
    37b86f1bamov [rsp+56], rsi
    37b86f1bfmov r9, [rsp+168]
    37b86f1c7add eax, 1
    37b86f1camov [rsp+48], r12
    37b86f1cfmov r8, [rsp+176]
    37b86f1d7cmp eax, edi
    37b86f1d9mov [rsp+40], r14
    37b86f1decmovg eax, edi
    37b86f1e1sub edx, ecx
    37b86f1e3mov [rsp+32], rbp
    37b86f1e8lea rcx, [rip+0xbcd400]
    37b86f1efmov [rsp+72], 8
    37b86f1f8add edx, r13l
    37b86f1fbmov [rsp+252], eax
    37b86f202lea eax, [rax+rdx-1]
    37b86f206lea rdx, [rip+0xbcd3db]
    37b86f20dmov [rsp+268], eax
    37b86f214lea rax, [rip+0xbcd3dd]
    37b86f21bmov [rsp+64], rax
    37b86f220call dlarft_
    37b86f225mov eax, [rsp+232]
    37b86f22cmov ecx, [r15]
    37b86f22fmov edx, [rsp+252]
    37b86f236test eax, eax
    37b86f238jne 0x37b86f0a0
    37b86f23emov r10, [rsp+392]
    37b86f246mov eax, [r10]
    37b86f249add eax, r13l
    37b86f24csub eax, ecx
    37b86f24elea eax, [rdx+rax-1]
    37b86f252mov [rsp+264], eax
    37b86f259jmp 0x37b86f0bb
    37b86f25e
    37b86f25e 66 90 f.
    37b86f260
    37b86f260loc_37b86f260:
    37b86f260lea r11, [rsp+268]
    37b86f268
    37b86f268loc_37b86f268:
    37b86f268mov [rsp+88], r11
    37b86f26dmov r9, rsi
    37b86f270mov r8, rbx
    37b86f273mov rdx, rbp
    37b86f276mov rax, [rsp+448]
    37b86f27emov rcx, rdi
    37b86f281mov [rsp+104], 1
    37b86f28amov [rsp+96], 1
    37b86f293mov [rsp+80], rax
    37b86f298mov rax, [rsp+440]
    37b86f2a0movsd_xmm [rsp+168], x0
    37b86f2a9mov [rsp+72], rax
    37b86f2aemov rax, [rsp+432]
    37b86f2b6mov [rsp+64], rax
    37b86f2bbmov rax, [rsp+424]
    37b86f2c3mov [rsp+56], rax
    37b86f2c8mov rax, [rsp+416]
    37b86f2d0mov [rsp+48], rax
    37b86f2d5mov rax, [rsp+408]
    37b86f2ddmov [rsp+40], rax
    37b86f2e2mov rax, [rsp+400]
    37b86f2eamov [rsp+32], rax
    37b86f2efcall dormr2_
    37b86f2f4movsd_xmm x0, [rsp+168]
    37b86f2fd
    37b86f2fdloc_37b86f2fd:
    37b86f2fdmov rax, [rsp+448]
    37b86f305movsd_xmm [rax], x0
    37b86f309jmp 0x37b86edae
    37b86f30e
    37b86f30e 66 90 f.
    37b86f310
    37b86f310loc_37b86f310:
    37b86f310mov [rsp+40], rbp
    37b86f315lea r11, [rsp+268]
    37b86f31dmov r9, rdi
    37b86f320mov ecx, 2
    37b86f325mov [rsp+32], 1
    37b86f32emov rdx, r11
    37b86f331mov r8l, 1
    37b86f337mov [rsp+184], r10l
    37b86f33fmov [rsp+168], r11
    37b86f347call _gfortran_concat_string
    37b86f34clea rax, [rip+0xbcd28d]
    37b86f353mov r9, rbx
    37b86f356mov [rsp+64], 2
    37b86f35fmov [rsp+48], rax
    37b86f364mov rax, [rsp+400]
    37b86f36clea rdx, [rip+0xbcd261]
    37b86f373lea rcx, [rip+0xbcd262]
    37b86f37amov [rsp+32], rsi
    37b86f37fmov r8, [rsp+168]
    37b86f387mov [rsp+56], 6
    37b86f390mov [rsp+40], rax
    37b86f395call ilaenv_
    37b86f39amov r10l, [rsp+184]
    37b86f3a2pxor x0, x0
    37b86f3a6mov edx, eax
    37b86f3a8mov eax, 64
    37b86f3adcmp edx, eax
    37b86f3afcmovle eax, edx
    37b86f3b2mov edx, eax
    37b86f3b4mov [rsp+176], eax
    37b86f3bbmov rax, [rsp+464]
    37b86f3c3imul edx, r10l
    37b86f3c7mov eax, [rax]
    37b86f3c9add edx, 4160
    37b86f3cfcvtsi2sd x0, edx
    37b86f3d3jmp 0x37b86eee3
    37b86f3d8
    37b86f3d8 0f 1f 84 00 00 00 00 00 ........
    37b86f3e0
    37b86f3e0loc_37b86f3e0:
    37b86f3e0movapd x0, x6
    37b86f3e4jmp 0x37b86f2fd
    37b86f3e9
    37b86f3e9 0f 1f 80 00 00 00 00 .......
    37b86f3f0
    37b86f3f0loc_37b86f3f0:
    37b86f3f0sub eax, 4160
    37b86f3f5mov [rsp+40], rbp
    37b86f3famov r9, rdi
    37b86f3fdmov ecx, 2
    37b86f402cdq
    37b86f403mov r8l, 1
    37b86f409mov [rsp+32], 1
    37b86f412idiv r10l
    37b86f415mov [rsp+184], r10l
    37b86f41dmov [rsp+168], r11
    37b86f425movsd_xmm [rsp+192], x0
    37b86f42emov rdx, r11
    37b86f431mov [rsp+176], eax
    37b86f438call _gfortran_concat_string
    37b86f43dlea rcx, [rip+0xbcd19c]
    37b86f444mov r9, rbx
    37b86f447mov [rsp+64], 2
    37b86f450mov [rsp+48], rcx
    37b86f455mov rcx, [rsp+400]
    37b86f45dlea rdx, [rip+0xbcd170]
    37b86f464mov [rsp+32], rsi
    37b86f469mov r8, [rsp+168]
    37b86f471mov [rsp+40], rcx
    37b86f476lea rcx, [rip+0xbcd167]
    37b86f47dmov [rsp+56], 6
    37b86f486call ilaenv_
    37b86f48bmov edx, 2
    37b86f490mov r11, [rsp+168]
    37b86f498mov r10l, [rsp+184]
    37b86f4a0movsd_xmm x0, [rsp+192]
    37b86f4a9cmp eax, edx
    37b86f4abcmovl eax, edx
    37b86f4aecmp [rsp+176], eax
    37b86f4b5jl 0x37b86f268
    37b86f4bbmov rax, [rsp+400]
    37b86f4c3mov ecx, [rax]
    37b86f4c5cmp ecx, [rsp+176]
    37b86f4ccjle 0x37b86f268
    37b86f4d2jmp 0x37b86ef5e
    37b86f4d7
    37b86f4d7 66 0f 1f 84 00 00 00 00 00 f........
    37b86f4e0
    37b86f4e0loc_37b86f4e0:
    37b86f4e0mov edx, -10
    37b86f4e5mov eax, 10
    37b86f4eajmp 0x37b86ed82
    37b86f4ef
    37b86f4ef 90 .
    37b86f4f0
    37b86f4f0loc_37b86f4f0:
    37b86f4f0mov r9l, [rsp+176]
    37b86f4f8lea eax, [rcx-1]
    37b86f4fbcdq
    37b86f4fcidiv r9l
    37b86f4fflea eax, [rcx-1]
    37b86f502neg r9l
    37b86f505mov r8l, r9l
    37b86f508sub eax, edx
    37b86f50alea r13l, [rax+1]
    37b86f50etest r15l, r15l
    37b86f511je 0x37b86f54d
    37b86f513mov edx, [rsi]
    37b86f515mov r9l, 84
    37b86f51bmov [rsp+264], edx
    37b86f522
    37b86f522loc_37b86f522:
    37b86f522xor edx, edx
    37b86f524div [rsp+176]
    37b86f52bjmp 0x37b86efa7
    37b86f530
    37b86f530loc_37b86f530:
    37b86f530mov eax, [rbx]
    37b86f532mov [rsp+260], eax
    37b86f539test r12l, r12l
    37b86f53cjne 0x37b86ef8b
    37b86f542
    37b86f542loc_37b86f542:
    37b86f542mov r9l, 78
    37b86f548jmp 0x37b86ef91
    37b86f54d
    37b86f54dloc_37b86f54d:
    37b86f54dmov edx, [rbx]
    37b86f54fmov r9l, 78
    37b86f555mov [rsp+260], edx
    37b86f55cjmp 0x37b86f522
    37b86f55e
    37b86f55eloc_37b86f55e:
    37b86f55emov eax, [rax]
    37b86f560test eax, eax
    37b86f562jne 0x37b86f583
    37b86f564test edx, edx
    37b86f566jne 0x37b86eece
    37b86f56cmov rax, [rsp+448]
    37b86f574mov rsi, [rip+0xbcd085]
    37b86f57bmov [rax], rsi
    37b86f57ejmp 0x37b86edae
    37b86f583
    37b86f583loc_37b86f583:
    37b86f583neg eax
    37b86f585jmp 0x37b86ed8c
    37b86ec70
    37b86f58a
    37b86f58a // align 0x10
    37b86f590
    37b86f590dormrz_:
    37b86f590push r15
    37b86f592push r14
    37b86f594push r13
    37b86f596push r12
    37b86f598push rbp
    37b86f599push rdi
    37b86f59apush rsi
    37b86f59bpush rbx
    37b86f59csub rsp, 312
    37b86f5a3movups [rsp+288], x6
    37b86f5abmov rax, [rsp+440]
    37b86f5b3mov eax, [rax]
    37b86f5b5mov [rsp+168], eax
    37b86f5bcmov r12, rdx
    37b86f5bfmov rbx, r8
    37b86f5c2mov rsi, r9
    37b86f5c5mov r8l, 1
    37b86f5cbmov r9l, 1
    37b86f5d1lea rdx, [rip+0xbcd038]
    37b86f5d8mov rdi, rcx
    37b86f5dbmov rax, [rsp+464]
    37b86f5e3mov eax, [rax]
    37b86f5e5mov [rsp+176], eax
    37b86f5ecmov rax, [rsp+488]
    37b86f5f4mov [rax], 0
    37b86f5facall lsame_
    37b86f5ffmov r9l, 1
    37b86f605mov r8l, 1
    37b86f60bmov rcx, r12
    37b86f60elea rdx, [rip+0xbccffc]
    37b86f615mov ebp, eax
    37b86f617call lsame_
    37b86f61cmov r10l, [rsi]
    37b86f61fmov r15l, [rbx]
    37b86f622mov r14l, eax
    37b86f625mov rax, [rsp+480]
    37b86f62dmov r13l, [rax]
    37b86f630test ebp, ebp
    37b86f632je 0x37b86f680
    37b86f634test r10l, r10l
    37b86f637mov eax, 1
    37b86f63ccmovg eax, r10l
    37b86f640mov r11l, eax
    37b86f643test r14l, r14l
    37b86f646je 0x37b86f730
    37b86f64c
    37b86f64cloc_37b86f64c:
    37b86f64cmov edx, [rbx]
    37b86f64etest edx, edx
    37b86f650js 0x37b86f6b8
    37b86f652mov ecx, [rsi]
    37b86f654test ecx, ecx
    37b86f656js 0x37b86f778
    37b86f65cmov rax, [rsp+416]
    37b86f664mov eax, [rax]
    37b86f666test eax, eax
    37b86f668js 0x37b86f673
    37b86f66acmp eax, r15l
    37b86f66djle 0x37b86f790
    37b86f673
    37b86f673loc_37b86f673:
    37b86f673mov edx, -5
    37b86f678mov eax, 5
    37b86f67djmp 0x37b86f6c2
    37b86f67f
    37b86f67f 90 .
    37b86f680
    37b86f680loc_37b86f680:
    37b86f680mov r9l, 1
    37b86f686mov r8l, 1
    37b86f68cmov rcx, rdi
    37b86f68fmov [rsp+184], r10l
    37b86f697lea rdx, [rip+0xbccf74]
    37b86f69ecall lsame_
    37b86f6a3test eax, eax
    37b86f6a5jne 0x37b86f710
    37b86f6a7mov edx, -1
    37b86f6acmov eax, 1
    37b86f6b1jmp 0x37b86f6c2
    37b86f6b3
    37b86f6b3 0f 1f 44 00 00 ..D..
    37b86f6b8
    37b86f6b8loc_37b86f6b8:
    37b86f6b8mov edx, -3
    37b86f6bdmov eax, 3
    37b86f6c2
    37b86f6c2loc_37b86f6c2:
    37b86f6c2mov rdi, [rsp+488]
    37b86f6camov [rdi], edx
    37b86f6cc
    37b86f6ccloc_37b86f6cc:
    37b86f6cclea rdx, [rsp+284]
    37b86f6d4mov r8l, 6
    37b86f6dalea rcx, [rip+0xbccf43]
    37b86f6e1mov [rsp+284], eax
    37b86f6e8call xerbla_
    37b86f6ednop
    37b86f6ee
    37b86f6eeloc_37b86f6ee:
    37b86f6eemovups x6, [rsp+288]
    37b86f6f6add rsp, 312
    37b86f6fdpop rbx
    37b86f6fepop rsi
    37b86f6ffpop rdi
    37b86f700pop rbp
    37b86f701pop r12
    37b86f703pop r13
    37b86f705pop r14
    37b86f707pop r15
    37b86f709ret
    37b86f70a
    37b86f70a 66 0f 1f 44 00 00 f..D..
    37b86f710
    37b86f710loc_37b86f710:
    37b86f710test r15l, r15l
    37b86f713mov eax, 1
    37b86f718cmovg eax, r15l
    37b86f71cmov r15l, [rsp+184]
    37b86f724mov r11l, eax
    37b86f727test r14l, r14l
    37b86f72ajne 0x37b86f64c
    37b86f730
    37b86f730loc_37b86f730:
    37b86f730mov r9l, 1
    37b86f736mov r8l, 1
    37b86f73cmov rcx, r12
    37b86f73fmov [rsp+184], r11l
    37b86f747lea rdx, [rip+0xbccec5]
    37b86f74ecall lsame_
    37b86f753mov r11l, [rsp+184]
    37b86f75btest eax, eax
    37b86f75djne 0x37b86f64c
    37b86f763mov edx, -2
    37b86f768mov eax, 2
    37b86f76djmp 0x37b86f6c2
    37b86f772
    37b86f772 66 0f 1f 44 00 00 f..D..
    37b86f778
    37b86f778loc_37b86f778:
    37b86f778mov edx, -4
    37b86f77dmov eax, 4
    37b86f782jmp 0x37b86f6c2
    37b86f787
    37b86f787 66 0f 1f 84 00 00 00 00 00 f........
    37b86f790
    37b86f790loc_37b86f790:
    37b86f790mov r15, [rsp+424]
    37b86f798mov r8l, [r15]
    37b86f79btest r8l, r8l
    37b86f79ejs 0x37b86f815
    37b86f7a0test ebp, ebp
    37b86f7a2je 0x37b86f810
    37b86f7a4cmp edx, r8l
    37b86f7a7jl 0x37b86f815
    37b86f7a9
    37b86f7a9loc_37b86f7a9:
    37b86f7a9mov r15, [rsp+440]
    37b86f7b1test eax, eax
    37b86f7b3mov r8l, 1
    37b86f7b9cmovle eax, r8l
    37b86f7bdcmp [r15], eax
    37b86f7c0jl 0x37b86ff68
    37b86f7c6mov r15, [rsp+464]
    37b86f7cetest edx, edx
    37b86f7d0mov eax, 1
    37b86f7d5cmovg eax, edx
    37b86f7d8cmp [r15], eax
    37b86f7dbjl 0x37b86ff77
    37b86f7e1mov rax, [rsp+480]
    37b86f7e9cmp [rax], r11l
    37b86f7ecmov rax, [rsp+488]
    37b86f7f4jge 0x37b86f824
    37b86f7f6cmp r13l, -1
    37b86f7faje 0x37b86ff86
    37b86f800mov [rax], -13
    37b86f806mov eax, 13
    37b86f80bjmp 0x37b86f6cc
    37b86f810
    37b86f810loc_37b86f810:
    37b86f810cmp ecx, r8l
    37b86f813jge 0x37b86f7a9
    37b86f815
    37b86f815loc_37b86f815:
    37b86f815mov edx, -6
    37b86f81amov eax, 6
    37b86f81fjmp 0x37b86f6c2
    37b86f824
    37b86f824loc_37b86f824:
    37b86f824mov eax, [rax]
    37b86f826test eax, eax
    37b86f828jne 0x37b86ffab
    37b86f82etest edx, edx
    37b86f830je 0x37b86f83a
    37b86f832
    37b86f832loc_37b86f832:
    37b86f832test ecx, ecx
    37b86f834jne 0x37b86fd20
    37b86f83a
    37b86f83aloc_37b86f83a:
    37b86f83amovsd_xmm x0, [rip+0xbcce06]
    37b86f842mov r10l, 1
    37b86f848
    37b86f848loc_37b86f848:
    37b86f848mov rcx, [rsp+472]
    37b86f850movsd_xmm [rcx], x0
    37b86f854test eax, eax
    37b86f856jne 0x37b86ffab
    37b86f85ccmp r13l, -1
    37b86f860je 0x37b86f6ee
    37b86f866mov r8l, [rbx]
    37b86f869test r8l, r8l
    37b86f86cje 0x37b86fc48
    37b86f872mov r9l, [rsi]
    37b86f875test r9l, r9l
    37b86f878je 0x37b86fc48
    37b86f87emov [rsp+276], r11l
    37b86f886cmp [rsp+196], 1
    37b86f88ejle 0x37b86fc60
    37b86f894mov rax, [rsp+416]
    37b86f89cmov ecx, [rax]
    37b86f89emov edx, ecx
    37b86f8a0cmp ecx, [rsp+196]
    37b86f8a7jle 0x37b86fc60
    37b86f8admov rax, [rsp+480]
    37b86f8b5mov eax, [rax]
    37b86f8b7cmp eax, r10l
    37b86f8bajl 0x37b86fe00
    37b86f8c0
    37b86f8c0loc_37b86f8c0:
    37b86f8c0cmp ebp, r14l
    37b86f8c3je 0x37b86ff30
    37b86f8c9mov r12l, ecx
    37b86f8ccmov r10l, [rsp+196]
    37b86f8d4mov r15l, 1
    37b86f8damov r13l, 1
    37b86f8e0
    37b86f8e0loc_37b86f8e0:
    37b86f8e0mov rax, [rsp+424]
    37b86f8e8mov eax, [rax]
    37b86f8eatest ebp, ebp
    37b86f8ecje 0x37b86fef0
    37b86f8f2sub r8l, eax
    37b86f8f5mov [rsp+284], r9l
    37b86f8fdlea r9l, [r8+1]
    37b86f901
    37b86f901loc_37b86f901:
    37b86f901cmp r14l, 1
    37b86f905sbb eax, eax
    37b86f907and eax, -6
    37b86f90aadd eax, 84
    37b86f90dmov [rsp+267], al
    37b86f914test r10l, r10l
    37b86f917js 0x37b86ff08
    37b86f91dcmp r13l, edx
    37b86f920jg 0x37b86fd0a
    37b86f926sub r12l, r15l
    37b86f929xor edx, edx
    37b86f92bmov eax, r12l
    37b86f92ediv r10l
    37b86f931mov r12l, eax
    37b86f934
    37b86f934loc_37b86f934:
    37b86f934movsxd rax, [rsp+168]
    37b86f93cxor edx, edx
    37b86f93emov r14l, [rsp+196]
    37b86f946movsxd r9, r9l
    37b86f949mov [rsp+384], rdi
    37b86f951movapd x6, x0
    37b86f955test rax, rax
    37b86f958mov [rsp+400], rbx
    37b86f960mov edi, r14l
    37b86f963cmovs rax, rdx
    37b86f967xor r8l, r8l
    37b86f96amovsxd rdx, [rsp+176]
    37b86f972mov [rsp+252], ebp
    37b86f979mov [rsp+196], 1
    37b86f984mov ebp, r13l
    37b86f987test rdx, rdx
    37b86f98amov [rsp+248], r10l
    37b86f992cmovs rdx, r8
    37b86f996imul r9, rax
    37b86f99amov r8l, r14l
    37b86f99dnot rax
    37b86f9a0imul r8l, r11l
    37b86f9a4mov r11, [rsp+472]
    37b86f9acmov [rsp+184], 1
    37b86f9b7mov r15, rdx
    37b86f9bamov [rsp+232], rdx
    37b86f9c2mov r14, [rsp+424]
    37b86f9canot r15
    37b86f9cdadd rax, r9
    37b86f9d0mov [rsp+408], rsi
    37b86f9d8mov [rsp+200], r15
    37b86f9e0lea r15, [rsp+268]
    37b86f9e8movsxd r8, r8l
    37b86f9ebmov [rsp+168], r15
    37b86f9f3lea r15, [rsp+267]
    37b86f9fblea rbx, [r11+8*r8]
    37b86f9ffmov [rsp+208], r15
    37b86fa07lea r15, [rsp+276]
    37b86fa0fmov [rsp+176], rax
    37b86fa17lea rax, [rsp+284]
    37b86fa1fmov [rsp+216], r15
    37b86fa27lea r15, [rsp+280]
    37b86fa2fmov [rsp+224], r15
    37b86fa37mov r15, [rsp+440]
    37b86fa3fmov [rsp+240], rax
    37b86fa47jmp 0x37b86fb7c
    37b86fa4c
    37b86fa4c 0f 1f 40 00 ..@.
    37b86fa50
    37b86fa50loc_37b86fa50:
    37b86fa50mov rax, [rsp+400]
    37b86fa58mov [rsp+184], ebp
    37b86fa5fmov rcx, rsi
    37b86fa62mov edx, [rax]
    37b86fa64sub edx, ebp
    37b86fa66add edx, 1
    37b86fa69mov [rsp+280], edx
    37b86fa70movsxd rdx, [rsp+196]
    37b86fa78
    37b86fa78loc_37b86fa78:
    37b86fa78mov rax, [rsp+216]
    37b86fa80mov [rsp+64], r13
    37b86fa85lea r9, [rip+0xbccba4]
    37b86fa8clea r8, [rip+0xbccba4]
    37b86fa93imul rdx, [rsp+232]
    37b86fa9cadd rdx, [rsp+200]
    37b86faa4mov [rsp+56], r14
    37b86faa9mov [rsp+120], rax
    37b86faaeadd rdx, rcx
    37b86fab1mov rax, [rsp+472]
    37b86fab9mov rcx, [rsp+384]
    37b86fac1mov [rsp+152], 7
    37b86facdmov [rsp+112], rax
    37b86fad2mov rax, [rsp+464]
    37b86fadamov [rsp+144], 8
    37b86fae6mov [rsp+104], rax
    37b86faebmov rax, [rsp+456]
    37b86faf3mov [rsp+136], 1
    37b86fafflea rdx, [rax+8*rdx]
    37b86fb03lea rax, [rip+0xbccb36]
    37b86fb0amov [rsp+80], rbx
    37b86fb0fmov [rsp+88], rax
    37b86fb14mov rax, [rsp+168]
    37b86fb1cmov [rsp+96], rdx
    37b86fb21mov rdx, [rsp+208]
    37b86fb29mov [rsp+48], rax
    37b86fb2emov rax, [rsp+240]
    37b86fb36mov [rsp+128], 1
    37b86fb42mov [rsp+40], rax
    37b86fb47mov rax, [rsp+224]
    37b86fb4fmov [rsp+72], r15
    37b86fb54mov [rsp+32], rax
    37b86fb59call dlarzb_
    37b86fb5eadd ebp, [rsp+248]
    37b86fb65test r12l, r12l
    37b86fb68je 0x37b86fdf0
    37b86fb6emov rax, [rsp+416]
    37b86fb76sub r12l, 1
    37b86fb7amov ecx, [rax]
    37b86fb7c
    37b86fb7cloc_37b86fb7c:
    37b86fb7cmov rax, [rsp+176]
    37b86fb84movsxd rsi, ebp
    37b86fb87sub ecx, ebp
    37b86fb89mov r8, r14
    37b86fb8cadd ecx, 1
    37b86fb8fmov [rsp+56], rbx
    37b86fb94mov r9, [rsp+168]
    37b86fb9clea rdx, [rsi+rax]
    37b86fba0cmp ecx, edi
    37b86fba2mov [rsp+40], r15
    37b86fba7mov rax, [rsp+432]
    37b86fbafmov [rsp+80], 7
    37b86fbb8cmovg ecx, edi
    37b86fbbbmov [rsp+72], 8
    37b86fbc4lea r13, [rax+8*rdx]
    37b86fbc8lea rax, [rip+0xbcca71]
    37b86fbcfmov [rsp+64], rax
    37b86fbd4mov rax, [rsp+448]
    37b86fbdcmov [rsp+32], r13
    37b86fbe1lea rdx, [rax+8*rsi-8]
    37b86fbe6mov [rsp+268], ecx
    37b86fbedlea rcx, [rip+0xbcca43]
    37b86fbf4mov [rsp+48], rdx
    37b86fbf9lea rdx, [rip+0xbcca30]
    37b86fc00call dlarzt_
    37b86fc05mov eax, [rsp+252]
    37b86fc0ctest eax, eax
    37b86fc0ejne 0x37b86fa50
    37b86fc14mov rax, [rsp+408]
    37b86fc1cmov [rsp+196], ebp
    37b86fc23movsxd rcx, [rsp+184]
    37b86fc2bmov edx, [rax]
    37b86fc2dsub edx, ebp
    37b86fc2fadd edx, 1
    37b86fc32mov [rsp+284], edx
    37b86fc39mov rdx, rsi
    37b86fc3cjmp 0x37b86fa78
    37b86fc41
    37b86fc41 0f 1f 80 00 00 00 00 .......
    37b86fc48
    37b86fc48loc_37b86fc48:
    37b86fc48mov rax, [rsp+472]
    37b86fc50mov rbx, [rip+0xbcc9f1]
    37b86fc57mov [rax], rbx
    37b86fc5ajmp 0x37b86f6ee
    37b86fc5f
    37b86fc5f 90 .
    37b86fc60
    37b86fc60loc_37b86fc60:
    37b86fc60mov r9, rsi
    37b86fc63mov r8, rbx
    37b86fc66mov rdx, r12
    37b86fc69mov rcx, rdi
    37b86fc6clea rax, [rsp+272]
    37b86fc74mov [rsp+112], 1
    37b86fc7dmov [rsp+96], rax
    37b86fc82mov rax, [rsp+472]
    37b86fc8amov [rsp+104], 1
    37b86fc93mov [rsp+88], rax
    37b86fc98mov rax, [rsp+464]
    37b86fca0movsd_xmm [rsp+168], x0
    37b86fca9mov [rsp+80], rax
    37b86fcaemov rax, [rsp+456]
    37b86fcb6mov [rsp+72], rax
    37b86fcbbmov rax, [rsp+448]
    37b86fcc3mov [rsp+64], rax
    37b86fcc8mov rax, [rsp+440]
    37b86fcd0mov [rsp+56], rax
    37b86fcd5mov rax, [rsp+432]
    37b86fcddmov [rsp+48], rax
    37b86fce2mov rax, [rsp+424]
    37b86fceamov [rsp+40], rax
    37b86fcefmov rax, [rsp+416]
    37b86fcf7mov [rsp+32], rax
    37b86fcfccall dormr3_
    37b86fd01movsd_xmm x0, [rsp+168]
    37b86fd0a
    37b86fd0aloc_37b86fd0a:
    37b86fd0amov rax, [rsp+472]
    37b86fd12movsd_xmm [rax], x0
    37b86fd16jmp 0x37b86f6ee
    37b86fd1b
    37b86fd1b 0f 1f 44 00 00 ..D..
    37b86fd20
    37b86fd20loc_37b86fd20:
    37b86fd20mov [rsp+40], r12
    37b86fd25lea rax, [rsp+284]
    37b86fd2dmov r9, rdi
    37b86fd30mov ecx, 2
    37b86fd35mov [rsp+32], 1
    37b86fd3emov rdx, rax
    37b86fd41mov r8l, 1
    37b86fd47mov [rsp+200], r11l
    37b86fd4fmov [rsp+184], rax
    37b86fd57call _gfortran_concat_string
    37b86fd5clea rax, [rip+0xbcc8bd]
    37b86fd63mov r9, rbx
    37b86fd66mov [rsp+64], 2
    37b86fd6fmov [rsp+48], rax
    37b86fd74mov rax, [rsp+416]
    37b86fd7clea rdx, [rip+0xbcc891]
    37b86fd83lea rcx, [rip+0xbcc892]
    37b86fd8amov [rsp+32], rsi
    37b86fd8fmov r8, [rsp+184]
    37b86fd97mov [rsp+56], 6
    37b86fda0mov [rsp+40], rax
    37b86fda5call ilaenv_
    37b86fdaamov r11l, [rsp+200]
    37b86fdb2pxor x0, x0
    37b86fdb6mov edx, eax
    37b86fdb8mov eax, 64
    37b86fdbdcmp edx, eax
    37b86fdbfcmovle eax, edx
    37b86fdc2mov r10l, eax
    37b86fdc5mov [rsp+196], eax
    37b86fdccmov rax, [rsp+488]
    37b86fdd4imul r10l, r11l
    37b86fdd8mov eax, [rax]
    37b86fddaadd r10l, 4160
    37b86fde1cvtsi2sd x0, r10l
    37b86fde6jmp 0x37b86f848
    37b86fdeb
    37b86fdeb 0f 1f 44 00 00 ..D..
    37b86fdf0
    37b86fdf0loc_37b86fdf0:
    37b86fdf0movapd x0, x6
    37b86fdf4jmp 0x37b86fd0a
    37b86fdf9
    37b86fdf9 0f 1f 80 00 00 00 00 .......
    37b86fe00
    37b86fe00loc_37b86fe00:
    37b86fe00sub eax, 4160
    37b86fe05mov [rsp+40], r12
    37b86fe0amov r9, rdi
    37b86fe0dmov ecx, 2
    37b86fe12cdq
    37b86fe13mov r8l, 1
    37b86fe19mov [rsp+32], 1
    37b86fe22idiv r11l
    37b86fe25mov [rsp+200], r11l
    37b86fe2dmovsd_xmm [rsp+208], x0
    37b86fe36mov [rsp+196], eax
    37b86fe3dlea rax, [rsp+284]
    37b86fe45mov rdx, rax
    37b86fe48mov [rsp+184], rax
    37b86fe50call _gfortran_concat_string
    37b86fe55lea rcx, [rip+0xbcc7c4]
    37b86fe5cmov r9, rbx
    37b86fe5fmov [rsp+64], 2
    37b86fe68mov [rsp+48], rcx
    37b86fe6dmov rcx, [rsp+416]
    37b86fe75lea rdx, [rip+0xbcc798]
    37b86fe7cmov [rsp+32], rsi
    37b86fe81mov r8, [rsp+184]
    37b86fe89mov [rsp+40], rcx
    37b86fe8elea rcx, [rip+0xbcc797]
    37b86fe95mov [rsp+56], 6
    37b86fe9ecall ilaenv_
    37b86fea3mov edx, 2
    37b86fea8mov r11l, [rsp+200]
    37b86feb0movsd_xmm x0, [rsp+208]
    37b86feb9cmp eax, edx
    37b86febbcmovl eax, edx
    37b86febecmp [rsp+196], eax
    37b86fec5jl 0x37b86fc60
    37b86fecbmov rax, [rsp+416]
    37b86fed3mov ecx, [rax]
    37b86fed5mov edx, ecx
    37b86fed7cmp ecx, [rsp+196]
    37b86fedejle 0x37b86fc60
    37b86fee4mov r8l, [rbx]
    37b86fee7mov r9l, [rsi]
    37b86feeajmp 0x37b86f8c0
    37b86feef
    37b86feef 90 .
    37b86fef0
    37b86fef0loc_37b86fef0:
    37b86fef0sub r9l, eax
    37b86fef3mov [rsp+280], r8l
    37b86fefbadd r9l, 1
    37b86feffjmp 0x37b86f901
    37b86ff04
    37b86ff04 0f 1f 40 00 ..@.
    37b86ff08
    37b86ff08loc_37b86ff08:
    37b86ff08cmp r13l, edx
    37b86ff0bjl 0x37b86fd0a
    37b86ff11mov eax, r15l
    37b86ff14mov r8l, r10l
    37b86ff17xor edx, edx
    37b86ff19sub eax, r12l
    37b86ff1cneg r8l
    37b86ff1fdiv r8l
    37b86ff22mov r12l, eax
    37b86ff25jmp 0x37b86f934
    37b86ff2a
    37b86ff2a 66 0f 1f 44 00 00 f..D..
    37b86ff30
    37b86ff30loc_37b86ff30:
    37b86ff30lea r13l, [rcx-1]
    37b86ff34mov r15l, [rsp+196]
    37b86ff3cmov r12l, 1
    37b86ff42mov eax, r13l
    37b86ff45cdq
    37b86ff46idiv r15l
    37b86ff49neg r15l
    37b86ff4cmov r10l, r15l
    37b86ff4fsub r13l, edx
    37b86ff52mov edx, 1
    37b86ff57add r13l, 1
    37b86ff5bmov r15l, r13l
    37b86ff5ejmp 0x37b86f8e0
    37b86ff63
    37b86ff63 0f 1f 44 00 00 ..D..
    37b86ff68
    37b86ff68loc_37b86ff68:
    37b86ff68mov edx, -8
    37b86ff6dmov eax, 8
    37b86ff72jmp 0x37b86f6c2
    37b86ff77
    37b86ff77loc_37b86ff77:
    37b86ff77mov edx, -11
    37b86ff7cmov eax, 11
    37b86ff81jmp 0x37b86f6c2
    37b86ff86
    37b86ff86loc_37b86ff86:
    37b86ff86mov eax, [rax]
    37b86ff88test eax, eax
    37b86ff8ajne 0x37b86ffab
    37b86ff8ctest edx, edx
    37b86ff8ejne 0x37b86f832
    37b86ff94mov rax, [rsp+472]
    37b86ff9cmov rdi, [rip+0xbcc6a5]
    37b86ffa3mov [rax], rdi
    37b86ffa6jmp 0x37b86f6ee
    37b86ffab
    37b86ffabloc_37b86ffab:
    37b86ffabneg eax
    37b86ffadjmp 0x37b86f6cc
    37b86f590
    37b86ffb2
    37b86ffb2 // align 0x10
    37b86ffc0
    37b86ffc0dormtr_:
    37b86ffc0push r15
    37b86ffc2push r14
    37b86ffc4push r13
    37b86ffc6push r12
    37b86ffc8push rbp
    37b86ffc9push rdi
    37b86ffcapush rsi
    37b86ffcbpush rbx
    37b86ffccsub rsp, 184
    37b86ffd3mov rax, [rsp+328]
    37b86ffdbmov eax, [rax]
    37b86ffddmov [rsp+136], eax
    37b86ffe4mov rbp, rdx
    37b86ffe7mov rbx, r9
    37b86ffeamov rdi, r8
    37b86ffedmov r9l, 1
    37b86fff3mov r8l, 1
    37b86fff9lea rdx, [rip+0xbcc650]
    37b870000mov rsi, rcx
    37b870003mov rax, [rsp+304]
    37b87000bmov eax, [rax]
    37b87000dmov [rsp+140], eax
    37b870014mov rax, [rsp+352]
    37b87001cmov [rax], 0
    37b870022call lsame_
    37b870027mov r9l, 1
    37b87002dmov r8l, 1
    37b870033mov rcx, rbp
    37b870036lea rdx, [rip+0xbcc614]
    37b87003dmov r13l, eax
    37b870040call lsame_
    37b870045mov r12l, [rbx]
    37b870048mov r14l, eax
    37b87004bmov rax, [rsp+344]
    37b870053mov r15l, [rax]
    37b870056mov rax, [rsp+288]
    37b87005emov r10l, [rax]
    37b870061test r13l, r13l
    37b870064je 0x37b870180
    37b87006atest r10l, r10l
    37b87006dmov eax, 1
    37b870072cmovg eax, r10l
    37b870076mov [rsp+128], eax
    37b87007d
    37b87007dloc_37b87007d:
    37b87007dtest r14l, r14l
    37b870080jne 0x37b8700c8
    37b870082mov r9l, 1
    37b870088mov r8l, 1
    37b87008elea rdx, [rip+0xbcc5bb]
    37b870095mov rcx, rbp
    37b870098call lsame_
    37b87009dtest eax, eax
    37b87009fjne 0x37b8700c8
    37b8700a1mov rax, [rsp+352]
    37b8700a9lea r10, [rsp+172]
    37b8700b1mov [rax], -2
    37b8700b7mov eax, -2
    37b8700bc
    37b8700bcloc_37b8700bc:
    37b8700bcneg eax
    37b8700bejmp 0x37b87020c
    37b8700c3
    37b8700c3 0f 1f 44 00 00 ..D..
    37b8700c8
    37b8700c8loc_37b8700c8:
    37b8700c8mov r9l, 1
    37b8700cemov r8l, 1
    37b8700d4lea rdx, [rip+0xbcc578]
    37b8700dbmov rcx, rdi
    37b8700decall lsame_
    37b8700e3test eax, eax
    37b8700e5je 0x37b870240
    37b8700eb
    37b8700ebloc_37b8700eb:
    37b8700ebmov eax, [rbx]
    37b8700edtest eax, eax
    37b8700efjs 0x37b8701f0
    37b8700f5mov rcx, [rsp+288]
    37b8700fdmov edx, [rcx]
    37b8700fftest edx, edx
    37b870101js 0x37b870270
    37b870107mov rcx, [rsp+304]
    37b87010ftest r12l, r12l
    37b870112mov edx, 1
    37b870117cmovg edx, r12l
    37b87011bcmp [rcx], edx
    37b87011djl 0x37b870280
    37b870123mov rcx, [rsp+328]
    37b87012btest eax, eax
    37b87012dmov edx, 1
    37b870132cmovle eax, edx
    37b870135cmp [rcx], eax
    37b870137jl 0x37b870290
    37b87013dmov rax, [rsp+344]
    37b870145mov ecx, [rsp+128]
    37b87014ccmp [rax], ecx
    37b87014emov rax, [rsp+352]
    37b870156jge 0x37b8702a0
    37b87015ccmp r15l, -1
    37b870160je 0x37b8702a0
    37b870166mov [rax], -12
    37b87016clea r10, [rsp+172]
    37b870174mov eax, 12
    37b870179jmp 0x37b87020c
    37b87017e
    37b87017e 66 90 f.
    37b870180
    37b870180loc_37b870180:
    37b870180mov r9l, 1
    37b870186mov r8l, 1
    37b87018cmov rcx, rsi
    37b87018fmov [rsp+128], r10l
    37b870197lea rdx, [rip+0xbcc4b4]
    37b87019ecall lsame_
    37b8701a3test eax, eax
    37b8701a5jne 0x37b8701d0
    37b8701a7mov rax, [rsp+352]
    37b8701aflea r10, [rsp+172]
    37b8701b7mov [rax], -1
    37b8701bdmov eax, -1
    37b8701c2neg eax
    37b8701c4jmp 0x37b87020c
    37b8701c6
    37b8701c6 66 2e 0f 1f 84 00 00 00 00 00 f.........
    37b8701d0
    37b8701d0loc_37b8701d0:
    37b8701d0test r12l, r12l
    37b8701d3mov eax, 1
    37b8701d8cmovg eax, r12l
    37b8701dcmov r12l, [rsp+128]
    37b8701e4mov [rsp+128], eax
    37b8701ebjmp 0x37b87007d
    37b8701f0
    37b8701f0loc_37b8701f0:
    37b8701f0mov edx, -4
    37b8701f5mov eax, 4
    37b8701fa
    37b8701faloc_37b8701fa:
    37b8701famov rsi, [rsp+352]
    37b870202lea r10, [rsp+172]
    37b87020amov [rsi], edx
    37b87020c
    37b87020cloc_37b87020c:
    37b87020cmov r8l, 6
    37b870212mov rdx, r10
    37b870215lea rcx, [rip+0xbcc44e]
    37b87021cmov [rsp+172], eax
    37b870223call xerbla_
    37b870228nop
    37b870229
    37b870229loc_37b870229:
    37b870229add rsp, 184
    37b870230pop rbx
    37b870231pop rsi
    37b870232pop rdi
    37b870233pop rbp
    37b870234pop r12
    37b870236pop r13
    37b870238pop r14
    37b87023apop r15
    37b87023cret
    37b87023d
    37b87023d 0f 1f 00 ...
    37b870240
    37b870240loc_37b870240:
    37b870240mov r9l, 1
    37b870246mov r8l, 1
    37b87024clea rdx, [rip+0xbcc401]
    37b870253mov rcx, rdi
    37b870256call lsame_
    37b87025btest eax, eax
    37b87025djne 0x37b8700eb
    37b870263mov edx, -3
    37b870268mov eax, 3
    37b87026djmp 0x37b8701fa
    37b87026f
    37b87026f 90 .
    37b870270
    37b870270loc_37b870270:
    37b870270mov edx, -5
    37b870275mov eax, 5
    37b87027ajmp 0x37b8701fa
    37b87027f
    37b87027f 90 .
    37b870280
    37b870280loc_37b870280:
    37b870280mov edx, -7
    37b870285mov eax, 7
    37b87028ajmp 0x37b8701fa
    37b87028f
    37b87028f 90 .
    37b870290
    37b870290loc_37b870290:
    37b870290mov edx, -10
    37b870295mov eax, 10
    37b87029ajmp 0x37b8701fa
    37b87029f
    37b87029f 90 .
    37b8702a0
    37b8702a0loc_37b8702a0:
    37b8702a0mov eax, [rax]
    37b8702a2test eax, eax
    37b8702a4jne 0x37b870788
    37b8702aalea rbp, [rsp+164]
    37b8702b2mov [rsp+40], rdi
    37b8702b7mov r9, rsi
    37b8702bamov ecx, 2
    37b8702bfmov [rsp+32], 1
    37b8702c8mov r8l, 1
    37b8702cemov rdx, rbp
    37b8702d1test r14l, r14l
    37b8702d4je 0x37b8704e0
    37b8702datest r13l, r13l
    37b8702ddje 0x37b870580
    37b8702e3call _gfortran_concat_string
    37b8702e8mov eax, [rbx]
    37b8702ealea r11, [rsp+168]
    37b8702f2lea r10, [rsp+172]
    37b8702famov [rsp+64], 2
    37b870303mov r9, r11
    37b870306sub eax, 1
    37b870309mov [rsp+40], r10
    37b87030emov [rsp+168], eax
    37b870315mov [rsp+172], eax
    37b87031clea rax, [rip+0xbcc33d]
    37b870323mov [rsp+48], rax
    37b870328mov rax, [rsp+288]
    37b870330mov [rsp+56], 6
    37b870339mov [rsp+152], r10
    37b870341mov [rsp+32], rax
    37b870346mov [rsp+144], r11
    37b87034e
    37b87034eloc_37b87034e:
    37b87034emov r8, rbp
    37b870351lea rdx, [rip+0xbcc2fd]
    37b870358lea rcx, [rip+0xbcc2fd]
    37b87035fcall ilaenv_
    37b870364mov r11, [rsp+144]
    37b87036cmov r10, [rsp+152]
    37b870374
    37b870374loc_37b870374:
    37b870374imul eax, [rsp+128]
    37b87037cpxor x0, x0
    37b870380cvtsi2sd x0, eax
    37b870384mov rax, [rsp+336]
    37b87038cmovsd_xmm [rax], x0
    37b870390mov rax, [rsp+352]
    37b870398mov eax, [rax]
    37b87039atest eax, eax
    37b87039cjne 0x37b8700bc
    37b8703a2cmp r15l, -1
    37b8703a6je 0x37b870229
    37b8703acmov eax, [rbx]
    37b8703aetest eax, eax
    37b8703b0je 0x37b8704c0
    37b8703b6mov rbx, [rsp+288]
    37b8703bemov edx, [rbx]
    37b8703c0cmp r12l, 1
    37b8703c4je 0x37b8704c0
    37b8703catest edx, edx
    37b8703ccje 0x37b8704c0
    37b8703d2test r13l, r13l
    37b8703d5je 0x37b870690
    37b8703dbsub eax, 1
    37b8703demov [rsp+168], edx
    37b8703e5mov [rsp+164], eax
    37b8703ecmov eax, 8
    37b8703f1test r14l, r14l
    37b8703f4jne 0x37b8706c0
    37b8703fa
    37b8703faloc_37b8703fa:
    37b8703faadd rax, [rsp+320]
    37b870402sub r12l, 1
    37b870406mov r9, r11
    37b870409mov rbx, [rsp+344]
    37b870411mov [rsp+64], rax
    37b870416mov r8, rbp
    37b870419mov rcx, rsi
    37b87041cmov rax, [rsp+312]
    37b870424mov [rsp+88], rbx
    37b870429mov rbx, [rsp+336]
    37b870431lea rdx, [rsp+160]
    37b870439mov [rsp+56], rax
    37b87043emov rax, [rsp+304]
    37b870446mov [rsp+80], rbx
    37b87044bmov rbx, [rsp+328]
    37b870453mov [rsp+48], rax
    37b870458mov rax, [rsp+296]
    37b870460mov [rsp+96], rdx
    37b870465mov rdx, rdi
    37b870468add rax, 8
    37b87046cmov [rsp+72], rbx
    37b870471mov [rsp+112], 1
    37b87047amov [rsp+104], 1
    37b870483mov [rsp+40], rax
    37b870488mov [rsp+32], r10
    37b87048dmovsd_xmm [rsp+128], x0
    37b870496mov [rsp+172], r12l
    37b87049ecall dormqr_
    37b8704a3movsd_xmm x0, [rsp+128]
    37b8704ac
    37b8704acloc_37b8704ac:
    37b8704acmov rax, [rsp+336]
    37b8704b4movsd_xmm [rax], x0
    37b8704b8jmp 0x37b870229
    37b8704bd
    37b8704bd 0f 1f 00 ...
    37b8704c0
    37b8704c0loc_37b8704c0:
    37b8704c0mov rax, [rsp+336]
    37b8704c8mov rdi, [rip+0xbcc1a1]
    37b8704cfmov [rax], rdi
    37b8704d2jmp 0x37b870229
    37b8704d7
    37b8704d7 66 0f 1f 84 00 00 00 00 00 f........
    37b8704e0
    37b8704e0loc_37b8704e0:
    37b8704e0test r13l, r13l
    37b8704e3je 0x37b8705f0
    37b8704e9call _gfortran_concat_string
    37b8704eemov eax, [rbx]
    37b8704f0lea r10, [rsp+172]
    37b8704f8mov [rsp+64], 2
    37b870501mov [rsp+40], r10
    37b870506lea r11, [rsp+168]
    37b87050emov r8, rbp
    37b870511lea rdx, [rip+0xbcc14c]
    37b870518sub eax, 1
    37b87051bmov r9, r11
    37b87051emov [rsp+56], 6
    37b870527lea rcx, [rip+0xbcc12e]
    37b87052emov [rsp+168], eax
    37b870535mov [rsp+172], eax
    37b87053clea rax, [rip+0xbcc11d]
    37b870543mov [rsp+48], rax
    37b870548mov rax, [rsp+288]
    37b870550mov [rsp+152], r10
    37b870558mov [rsp+32], rax
    37b87055dmov [rsp+144], r11
    37b870565call ilaenv_
    37b87056amov r11, [rsp+144]
    37b870572mov r10, [rsp+152]
    37b87057ajmp 0x37b870374
    37b87057f
    37b87057f 90 .
    37b870580
    37b870580loc_37b870580:
    37b870580call _gfortran_concat_string
    37b870585mov rax, [rsp+288]
    37b87058dlea r10, [rsp+172]
    37b870595mov r9, rbx
    37b870598lea r11, [rsp+168]
    37b8705a0mov [rsp+152], r10
    37b8705a8mov eax, [rax]
    37b8705aamov [rsp+144], r11
    37b8705b2mov [rsp+64], 2
    37b8705bbsub eax, 1
    37b8705bemov [rsp+40], r10
    37b8705c3mov [rsp+168], eax
    37b8705camov [rsp+172], eax
    37b8705d1lea rax, [rip+0xbcc088]
    37b8705d8mov [rsp+56], 6
    37b8705e1mov [rsp+48], rax
    37b8705e6mov [rsp+32], r11
    37b8705ebjmp 0x37b87034e
    37b8705f0
    37b8705f0loc_37b8705f0:
    37b8705f0call _gfortran_concat_string
    37b8705f5mov rax, [rsp+288]
    37b8705fdmov r9, rbx
    37b870600mov r8, rbp
    37b870603lea r10, [rsp+172]
    37b87060blea r11, [rsp+168]
    37b870613mov eax, [rax]
    37b870615mov [rsp+40], r10
    37b87061alea rdx, [rip+0xbcc043]
    37b870621lea rcx, [rip+0xbcc034]
    37b870628mov [rsp+32], r11
    37b87062dsub eax, 1
    37b870630mov [rsp+152], r10
    37b870638mov [rsp+168], eax
    37b87063fmov [rsp+172], eax
    37b870646lea rax, [rip+0xbcc013]
    37b87064dmov [rsp+64], 2
    37b870656mov [rsp+56], 6
    37b87065fmov [rsp+48], rax
    37b870664mov [rsp+144], r11
    37b87066ccall ilaenv_
    37b870671mov r10, [rsp+152]
    37b870679mov r11, [rsp+144]
    37b870681jmp 0x37b870374
    37b870686
    37b870686 66 2e 0f 1f 84 00 00 00 00 00 f.........
    37b870690
    37b870690loc_37b870690:
    37b870690sub edx, 1
    37b870693mov [rsp+164], eax
    37b87069amov [rsp+168], edx
    37b8706a1test r14l, r14l
    37b8706a4jne 0x37b8706c0
    37b8706a6movsxd rax, [rsp+136]
    37b8706aexor edx, edx
    37b8706b0test rax, rax
    37b8706b3cmovs rax, rdx
    37b8706b7shl rax, 3
    37b8706bbjmp 0x37b8703fa
    37b8706c0
    37b8706c0loc_37b8706c0:
    37b8706c0sub r12l, 1
    37b8706c4mov [rsp+32], r10
    37b8706c9mov r9, r11
    37b8706ccmov r8, rbp
    37b8706cfmov rbx, [rsp+344]
    37b8706d7mov rcx, rsi
    37b8706damovsxd rax, [rsp+140]
    37b8706e2lea rdx, [rsp+160]
    37b8706eamov [rsp+96], rdx
    37b8706efxor edx, edx
    37b8706f1mov [rsp+88], rbx
    37b8706f6test rax, rax
    37b8706f9mov rbx, [rsp+336]
    37b870701cmovs rax, rdx
    37b870705mov rdx, rdi
    37b870708mov [rsp+112], 1
    37b870711mov [rsp+80], rbx
    37b870716mov rbx, [rsp+328]
    37b87071emov [rsp+104], 1
    37b870727mov [rsp+72], rbx
    37b87072cmov rbx, [rsp+320]
    37b870734movsd_xmm [rsp+128], x0
    37b87073dmov [rsp+64], rbx
    37b870742mov rbx, [rsp+312]
    37b87074amov [rsp+172], r12l
    37b870752mov [rsp+56], rbx
    37b870757mov rbx, [rsp+304]
    37b87075fmov [rsp+48], rbx
    37b870764mov rbx, [rsp+296]
    37b87076clea rax, [rbx+8*rax]
    37b870770mov [rsp+40], rax
    37b870775call dormql_
    37b87077amovsd_xmm x0, [rsp+128]
    37b870783jmp 0x37b8704ac
    37b870788
    37b870788loc_37b870788:
    37b870788neg eax
    37b87078alea r10, [rsp+172]
    37b870792jmp 0x37b87020c
    37b86ffc0
    37b870797
    37b870797 // align 0x10
    37b8707a0
    37b8707a0dpbcon_:
    37b8707a0push r15
    37b8707a2push r14
    37b8707a4push r13
    37b8707a6push r12
    37b8707a8push rbp
    37b8707a9push rdi
    37b8707aapush rsi
    37b8707abpush rbx
    37b8707acsub rsp, 264
    37b8707b3movups [rsp+224], x6
    37b8707bbmovups [rsp+240], x7
    37b8707c3mov rdi, [rsp+408]
    37b8707cbmov r12, [rsp+368]
    37b8707d3mov rbx, [rsp+392]
    37b8707dbmov [rdi], 0
    37b8707e1mov r15, rdx
    37b8707e4mov rsi, r8
    37b8707e7mov rbp, r9
    37b8707eamov r8l, 1
    37b8707f0mov r9l, 1
    37b8707f6lea rdx, [rip+0xbcbe83]
    37b8707fdmov r14, rcx
    37b870800call lsame_
    37b870805mov r13l, eax
    37b870808test eax, eax
    37b87080aje 0x37b870bc8
    37b870810
    37b870810loc_37b870810:
    37b870810mov edx, [r15]
    37b870813test edx, edx
    37b870815js 0x37b870b70
    37b87081bmov eax, [rsi]
    37b87081dtest eax, eax
    37b87081fjs 0x37b870c00
    37b870825cmp eax, [r12]
    37b870829jge 0x37b870c10
    37b87082fmov rax, [rsp+376]
    37b870837pxor x0, x0
    37b87083bmovsd_xmm x1, [rax]
    37b87083fcomisd x0, x1
    37b870843ja 0x37b870cf0
    37b870849mov eax, [rdi]
    37b87084btest eax, eax
    37b87084djne 0x37b870cff
    37b870853mov rax, [rsp+384]
    37b87085bmov [rax], 0
    37b870862test edx, edx
    37b870864je 0x37b870c20
    37b87086aucomisd x1, x0
    37b87086ejp 0x37b870876
    37b870870je 0x37b870b9e
    37b870876
    37b870876loc_37b870876:
    37b870876mov edx, 12
    37b87087blea rcx, [rip+0xbcbe06]
    37b870882lea r14, [rsp+172]
    37b87088acall dlamch_
    37b87088flea rax, [rsp+212]
    37b870897mov [rsp+172], 0
    37b8708a2movsd_xmm x6, [rip+0xbcbe16]
    37b8708aamov [rsp+144], rax
    37b8708b2lea rax, [rsp+176]
    37b8708bamovapd x7, x0
    37b8708bemov [rsp+136], rax
    37b8708c6mov eax, r13l
    37b8708c9mov r13, r15
    37b8708ccmov [rsp+171], 78
    37b8708d4mov r15l, eax
    37b8708d7jmp 0x37b8709fb
    37b8708dc
    37b8708dc 0f 1f 40 00 ..@.
    37b8708e0
    37b8708e0loc_37b8708e0:
    37b8708e0mov [rsp+80], rdx
    37b8708e5lea rdx, [rsp+192]
    37b8708edlea r8, [rip+0xbcbda0]
    37b8708f4mov [rsp+72], rdx
    37b8708f9lea rcx, [rip+0xbcbda5]
    37b870900lea rdx, [rip+0xbcbd95]
    37b870907mov [rsp+104], 9
    37b870910mov [rsp+96], 5
    37b870919mov [rsp+88], rdi
    37b87091emov [rsp+64], rbx
    37b870923mov [rsp+56], r12
    37b870928mov [rsp+48], rbp
    37b87092dmov [rsp+40], rsi
    37b870932mov [rsp+32], r13
    37b870937mov [rsp+152], r9
    37b87093fcall dlatbs_
    37b870944mov [rsp+88], rdi
    37b870949mov r9, [rsp+152]
    37b870951lea r8, [rip+0xbcbd3c]
    37b870958mov [rsp+120], 1
    37b870961lea rcx, [rip+0xbcbd3d]
    37b870968mov [rsp+112], 8
    37b870971mov [rsp+104], 12
    37b87097amov [rsp+96], 5
    37b870983mov eax, [r13]
    37b870987mov [rsp+64], rbx
    37b87098clea edx, [rax+rax]
    37b87098fmov [rsp+56], r12
    37b870994movsxd rdx, edx
    37b870997mov [rsp+48], rbp
    37b87099clea rdx, [rbx+8*rdx]
    37b8709a0mov [rsp+40], rsi
    37b8709a5mov [rsp+80], rdx
    37b8709aalea rdx, [rsp+200]
    37b8709b2mov [rsp+72], rdx
    37b8709b7lea rdx, [rip+0xbcbcec]
    37b8709bemov [rsp+32], r13
    37b8709c3mov [rsp+171], 89
    37b8709cbcall dlatbs_
    37b8709d0
    37b8709d0loc_37b8709d0:
    37b8709d0movsd_xmm x0, [rsp+192]
    37b8709d9mulsd x0, [rsp+200]
    37b8709e2movsd_xmm [rsp+184], x0
    37b8709ebucomisd x0, x6
    37b8709efjp 0x37b870c78
    37b8709f5jne 0x37b870c78
    37b8709fb
    37b8709fbloc_37b8709fb:
    37b8709fbmov rax, [rsp+144]
    37b870a03movsxd rdx, [r13]
    37b870a07mov [rsp+40], r14
    37b870a0cmov r8, rbx
    37b870a0fmov r9, [rsp+400]
    37b870a17mov rcx, r13
    37b870a1amov [rsp+48], rax
    37b870a1fmov rax, [rsp+136]
    37b870a27lea rdx, [rbx+8*rdx]
    37b870a2bmov [rsp+32], rax
    37b870a30call dlacn2_
    37b870a35mov eax, [rsp+172]
    37b870a3ctest eax, eax
    37b870a3eje 0x37b870c30
    37b870a44mov eax, [r13]
    37b870a48lea r9, [rsp+171]
    37b870a50mov [rsp+120], 1
    37b870a59mov [rsp+112], 8
    37b870a62lea edx, [rax+rax]
    37b870a65movsxd rdx, edx
    37b870a68lea rdx, [rbx+8*rdx]
    37b870a6ctest r15l, r15l
    37b870a6fjne 0x37b8708e0
    37b870a75mov [rsp+80], rdx
    37b870a7alea rdx, [rsp+192]
    37b870a82lea r8, [rip+0xbcbc0b]
    37b870a89mov [rsp+72], rdx
    37b870a8elea rcx, [rip+0xbcbc21]
    37b870a95lea rdx, [rip+0xbcbc0e]
    37b870a9cmov [rsp+104], 12
    37b870aa5mov [rsp+96], 5
    37b870aaemov [rsp+88], rdi
    37b870ab3mov [rsp+64], rbx
    37b870ab8mov [rsp+56], r12
    37b870abdmov [rsp+48], rbp
    37b870ac2mov [rsp+40], rsi
    37b870ac7mov [rsp+32], r13
    37b870accmov [rsp+152], r9
    37b870ad4call dlatbs_
    37b870ad9mov [rsp+88], rdi
    37b870ademov r9, [rsp+152]
    37b870ae6lea r8, [rip+0xbcbba7]
    37b870aedmov [rsp+120], 1
    37b870af6lea rcx, [rip+0xbcbbb9]
    37b870afdmov [rsp+112], 8
    37b870b06mov [rsp+104], 9
    37b870b0fmov [rsp+96], 5
    37b870b18mov eax, [r13]
    37b870b1cmov [rsp+64], rbx
    37b870b21lea edx, [rax+rax]
    37b870b24mov [rsp+56], r12
    37b870b29movsxd rdx, edx
    37b870b2cmov [rsp+48], rbp
    37b870b31lea rdx, [rbx+8*rdx]
    37b870b35mov [rsp+40], rsi
    37b870b3amov [rsp+80], rdx
    37b870b3flea rdx, [rsp+200]
    37b870b47mov [rsp+72], rdx
    37b870b4clea rdx, [rip+0xbcbb49]
    37b870b53mov [rsp+32], r13
    37b870b58mov [rsp+171], 89
    37b870b60call dlatbs_
    37b870b65jmp 0x37b8709d0
    37b870b6a
    37b870b6a 66 0f 1f 44 00 00 f..D..
    37b870b70
    37b870b70loc_37b870b70:
    37b870b70mov edx, -2
    37b870b75mov eax, 2
    37b870b7a
    37b870b7aloc_37b870b7a:
    37b870b7amov [rdi], edx
    37b870b7c
    37b870b7cloc_37b870b7c:
    37b870b7clea rdx, [rsp+212]
    37b870b84mov r8l, 6
    37b870b8alea rcx, [rip+0xbcbaf1]
    37b870b91mov [rsp+212], eax
    37b870b98call xerbla_
    37b870b9dnop
    37b870b9e
    37b870b9eloc_37b870b9e:
    37b870b9emovups x6, [rsp+224]
    37b870ba6movups x7, [rsp+240]
    37b870baeadd rsp, 264
    37b870bb5pop rbx
    37b870bb6pop rsi
    37b870bb7pop rdi
    37b870bb8pop rbp
    37b870bb9pop r12
    37b870bbbpop r13
    37b870bbdpop r14
    37b870bbfpop r15
    37b870bc1ret
    37b870bc2
    37b870bc2 66 0f 1f 44 00 00 f..D..
    37b870bc8
    37b870bc8loc_37b870bc8:
    37b870bc8mov r9l, 1
    37b870bcemov r8l, 1
    37b870bd4lea rdx, [rip+0xbcbaa6]
    37b870bdbmov rcx, r14
    37b870bdecall lsame_
    37b870be3test eax, eax
    37b870be5jne 0x37b870810
    37b870bebmov edx, -1
    37b870bf0mov eax, 1
    37b870bf5jmp 0x37b870b7a
    37b870bf7
    37b870bf7 66 0f 1f 84 00 00 00 00 00 f........
    37b870c00
    37b870c00loc_37b870c00:
    37b870c00mov edx, -3
    37b870c05mov eax, 3
    37b870c0ajmp 0x37b870b7a
    37b870c0f
    37b870c0f 90 .
    37b870c10
    37b870c10loc_37b870c10:
    37b870c10mov edx, -5
    37b870c15mov eax, 5
    37b870c1ajmp 0x37b870b7a
    37b870c1f
    37b870c1f 90 .
    37b870c20
    37b870c20loc_37b870c20:
    37b870c20mov rsi, [rip+0xbcba99]
    37b870c27mov [rax], rsi
    37b870c2ajmp 0x37b870b9e
    37b870c2f
    37b870c2f 90 .
    37b870c30
    37b870c30loc_37b870c30:
    37b870c30movsd_xmm x1, [rsp+176]
    37b870c39pxor x0, x0
    37b870c3ducomisd x1, x0
    37b870c41jp 0x37b870c49
    37b870c43je 0x37b870b9e
    37b870c49
    37b870c49loc_37b870c49:
    37b870c49movsd_xmm x0, [rip+0xbcba6f]
    37b870c51mov rax, [rsp+376]
    37b870c59divsd x0, x1
    37b870c5ddivsd x0, [rax]
    37b870c61mov rax, [rsp+384]
    37b870c69movsd_xmm [rax], x0
    37b870c6djmp 0x37b870b9e
    37b870c72
    37b870c72 66 0f 1f 44 00 00 f..D..
    37b870c78
    37b870c78loc_37b870c78:
    37b870c78lea r8, [rip+0xbcba3d]
    37b870c7fmov rdx, rbx
    37b870c82mov rcx, r13
    37b870c85movsd_xmm [rsp+152], x0
    37b870c8ecall idamax_
    37b870c93movsd_xmm x0, [rsp+152]
    37b870c9ccdqe
    37b870c9emovsd_xmm x1, [rbx+8*rax-8]
    37b870ca4andpd x1, [rip+0xbcba24]
    37b870cacmulsd x1, x7
    37b870cb0comisd x1, x0
    37b870cb4ja 0x37b870b9e
    37b870cbapxor x1, x1
    37b870cbeucomisd x0, x1
    37b870cc2jp 0x37b870cca
    37b870cc4je 0x37b870b9e
    37b870cca
    37b870ccaloc_37b870cca:
    37b870ccalea rdx, [rsp+184]
    37b870cd2lea r9, [rip+0xbcb9e3]
    37b870cd9mov r8, rbx
    37b870cdcmov rcx, r13
    37b870cdfcall drscl_
    37b870ce4jmp 0x37b8709fb
    37b870ce9
    37b870ce9 0f 1f 80 00 00 00 00 .......
    37b870cf0
    37b870cf0loc_37b870cf0:
    37b870cf0mov edx, -6
    37b870cf5mov eax, 6
    37b870cfajmp 0x37b870b7a
    37b870cff
    37b870cffloc_37b870cff:
    37b870cffneg eax
    37b870d01jmp 0x37b870b7c
    37b8707a0
    37b870d06
    37b870d06 // align 0x20
    37b870d20
    37b870d20dpbequ_:
    37b870d20push r13
    37b870d22push r12
    37b870d24push rbp
    37b870d25push rdi
    37b870d26push rsi
    37b870d27push rbx
    37b870d28sub rsp, 72
    37b870d2cmov rax, [rsp+160]
    37b870d34mov rbx, [rsp+168]
    37b870d3cmov esi, [rax]
    37b870d3emov rax, [rsp+192]
    37b870d46mov [rax], 0
    37b870d4cmov r12, rdx
    37b870d4fmov rbp, r8
    37b870d52mov rdi, r9
    37b870d55mov r8l, 1
    37b870d5bmov r9l, 1
    37b870d61lea rdx, [rip+0xbcb978]
    37b870d68mov r13, rcx
    37b870d6bcall lsame_
    37b870d70mov r11l, eax
    37b870d73test eax, eax
    37b870d75je 0x37b870f60
    37b870d7b
    37b870d7bloc_37b870d7b:
    37b870d7bmov r10l, [r12]
    37b870d7ftest r10l, r10l
    37b870d82js 0x37b870f20
    37b870d88movsxd rax, [rbp]
    37b870d8ctest eax, eax
    37b870d8ejs 0x37b871030
    37b870d94mov rdx, [rsp+160]
    37b870d9ccmp eax, [rdx]
    37b870d9ejge 0x37b871040
    37b870da4mov rcx, [rsp+192]
    37b870dacmov edx, [rcx]
    37b870daetest edx, edx
    37b870db0jne 0x37b87105c
    37b870db6test r10l, r10l
    37b870db9je 0x37b870fa8
    37b870dbftest r11l, r11l
    37b870dc2je 0x37b871050
    37b870dc8lea edx, [rax+1]
    37b870dcbmovsxd rdx, edx
    37b870dce
    37b870dceloc_37b870dce:
    37b870dcemovsd_xmm x1, [rdi+8*rax]
    37b870dd3mov rax, [rsp+184]
    37b870ddbmovsd_xmm [rbx], x1
    37b870ddfmovsd_xmm [rax], x1
    37b870de3cmp r10l, 1
    37b870de7je 0x37b870fe0
    37b870dedmovsxd rax, esi
    37b870df0lea r8l, [r10-2]
    37b870df4movapd x2, x1
    37b870df8xor ecx, ecx
    37b870dfatest rax, rax
    37b870dfdlea r8, [rbx+8*r8+16]
    37b870e02cmovs rax, rcx
    37b870e06mov rcx, rax
    37b870e09lea r11, [8*rax]
    37b870e11not rcx
    37b870e14lea rax, [rcx+2*rax]
    37b870e18mov rcx, rbx
    37b870e1badd rax, rdx
    37b870e1elea rdx, [rdi+8*rax]
    37b870e22lea rax, [rbx+8]
    37b870e26nop [rax]
    37b870e2anop [rax+rax]
    37b870e35nop [rax+rax]
    37b870e40
    37b870e40loc_37b870e40:
    37b870e40movsd_xmm x0, [rdx]
    37b870e44add rax, 8
    37b870e48add rdx, r11
    37b870e4bmovsd_xmm [rax-8], x0
    37b870e50minsd x1, x0
    37b870e54maxsd x2, x0
    37b870e58cmp rax, r8
    37b870e5bjne 0x37b870e40
    37b870e5dpxor x0, x0
    37b870e61mov rax, [rsp+184]
    37b870e69comisd x0, x1
    37b870e6dmovsd_xmm [rax], x2
    37b870e71jae 0x37b870ff0
    37b870e77mov eax, r10l
    37b870e7amovddup x3, [rip+0xbcb866]
    37b870e82shr eax, 1
    37b870e84shl rax, 4
    37b870e88add rax, rbx
    37b870e8bnop [rax+rax]
    37b870e95nop [rax+rax]
    37b870ea0
    37b870ea0loc_37b870ea0:
    37b870ea0movupd x4, [rcx]
    37b870ea4movapd x2, x3
    37b870ea8add rcx, 16
    37b870eacsqrtpd x0, x4
    37b870eb0divpd x2, x0
    37b870eb4movups [rcx-16], x2
    37b870eb8cmp rax, rcx
    37b870ebbjne 0x37b870ea0
    37b870ebdtest r10b, 1
    37b870ec1je 0x37b870eea
    37b870ec3or r10l, 1
    37b870ec7
    37b870ec7loc_37b870ec7:
    37b870ec7sub r10l, 1
    37b870ecbmovsd_xmm x0, [rip+0xbcb815]
    37b870ed3movsxd r10, r10l
    37b870ed6movsd_xmm x2, [rbx+8*r10]
    37b870edcsqrtsd x2, x2
    37b870ee0divsd x0, x2
    37b870ee4movsd_xmm [rbx+8*r10], x0
    37b870eea
    37b870eealoc_37b870eea:
    37b870eeamov rax, [rsp+184]
    37b870ef2sqrtsd x1, x1
    37b870ef6movsd_xmm x0, [rax]
    37b870efamov rax, [rsp+176]
    37b870f02sqrtsd x0, x0
    37b870f06divsd x1, x0
    37b870f0amovsd_xmm [rax], x1
    37b870f0eadd rsp, 72
    37b870f12pop rbx
    37b870f13pop rsi
    37b870f14pop rdi
    37b870f15pop rbp
    37b870f16pop r12
    37b870f18pop r13
    37b870f1aret
    37b870f1b
    37b870f1b 0f 1f 44 00 00 ..D..
    37b870f20
    37b870f20loc_37b870f20:
    37b870f20mov eax, -2
    37b870f25mov edx, 2
    37b870f2a
    37b870f2aloc_37b870f2a:
    37b870f2amov rdi, [rsp+192]
    37b870f32mov [rdi], eax
    37b870f34
    37b870f34loc_37b870f34:
    37b870f34mov [rsp+60], edx
    37b870f38mov r8l, 6
    37b870f3elea rdx, [rsp+60]
    37b870f43lea rcx, [rip+0xbcb798]
    37b870f4acall xerbla_
    37b870f4fnop
    37b870f50
    37b870f50loc_37b870f50:
    37b870f50add rsp, 72
    37b870f54pop rbx
    37b870f55pop rsi
    37b870f56pop rdi
    37b870f57pop rbp
    37b870f58pop r12
    37b870f5apop r13
    37b870f5cret
    37b870f5d
    37b870f5d 0f 1f 00 ...
    37b870f60
    37b870f60loc_37b870f60:
    37b870f60mov r9l, 1
    37b870f66mov r8l, 1
    37b870f6cmov rcx, r13
    37b870f6fmov [rsp+44], eax
    37b870f73lea rdx, [rip+0xbcb767]
    37b870f7acall lsame_
    37b870f7fmov r11l, [rsp+44]
    37b870f84test eax, eax
    37b870f86jne 0x37b870d7b
    37b870f8cmov rax, [rsp+192]
    37b870f94mov edx, 1
    37b870f99mov [rax], -1
    37b870f9fjmp 0x37b870f34
    37b870fa1
    37b870fa1 0f 1f 80 00 00 00 00 .......
    37b870fa8
    37b870fa8loc_37b870fa8:
    37b870fa8mov rax, [rsp+176]
    37b870fb0mov rsi, [rip+0xbcb731]
    37b870fb7mov [rax], rsi
    37b870fbamov rax, [rsp+184]
    37b870fc2mov [rax], 0
    37b870fc9add rsp, 72
    37b870fcdpop rbx
    37b870fcepop rsi
    37b870fcfpop rdi
    37b870fd0pop rbp
    37b870fd1pop r12
    37b870fd3pop r13
    37b870fd5ret
    37b870fd6
    37b870fd6 66 2e 0f 1f 84 00 00 00 00 00 f.........
    37b870fe0
    37b870fe0loc_37b870fe0:
    37b870fe0pxor x0, x0
    37b870fe4comisd x0, x1
    37b870fe8jb 0x37b870ec7
    37b870feenop
    37b870ff0
    37b870ff0loc_37b870ff0:
    37b870ff0mov eax, 1
    37b870ff5pxor x0, x0
    37b870ff9jmp 0x37b87100d
    37b870ffb
    37b870ffb 0f 1f 44 00 00 ..D..
    37b871000
    37b871000loc_37b871000:
    37b871000add rax, 1
    37b871004cmp r10l, eax
    37b871007jl 0x37b870f50
    37b87100d
    37b87100dloc_37b87100d:
    37b87100dcomisd x0, [rbx+8*rax-8]
    37b871013jb 0x37b871000
    37b871015mov rsi, [rsp+192]
    37b87101dmov [rsi], eax
    37b87101fadd rsp, 72
    37b871023pop rbx
    37b871024pop rsi
    37b871025pop rdi
    37b871026pop rbp
    37b871027pop r12
    37b871029pop r13
    37b87102bret
    37b87102c
    37b87102c 0f 1f 40 00 ..@.
    37b871030
    37b871030loc_37b871030:
    37b871030mov eax, -3
    37b871035mov edx, 3
    37b87103ajmp 0x37b870f2a
    37b87103f
    37b87103f 90 .
    37b871040
    37b871040loc_37b871040:
    37b871040mov eax, -5
    37b871045mov edx, 5
    37b87104ajmp 0x37b870f2a
    37b87104f
    37b87104f 90 .
    37b871050
    37b871050loc_37b871050:
    37b871050xor eax, eax
    37b871052mov edx, 1
    37b871057jmp 0x37b870dce
    37b87105c
    37b87105cloc_37b87105c:
    37b87105cneg edx
    37b87105ejmp 0x37b870f34
    37b870d20
    37b871063
    37b871063 // align 0x20
    37b871080
    37b871080dpbrfs_:
    37b871080push r15
    37b871082push r14
    37b871084push r13
    37b871086push r12
    37b871088push rbp
    37b871089push rdi
    37b87108apush rsi
    37b87108bpush rbx
    37b87108csub rsp, 376
    37b871093movups [rsp+272], x6
    37b87109bmovups [rsp+288], x7
    37b8710a3movups [rsp+304], x8
    37b8710acmovups [rsp+320], x9
    37b8710b5movups [rsp+336], x10
    37b8710bemovups [rsp+352], x11
    37b8710c7mov r14, [rsp+520]
    37b8710cfmov r15, [rsp+536]
    37b8710d7mov r12, [rsp+480]
    37b8710dfmov r13, [rsp+560]
    37b8710e7mov eax, [r14]
    37b8710eamov rbp, [rsp+568]
    37b8710f2mov [rsp+112], eax
    37b8710f6mov rax, [rsp+488]
    37b8710femov rbx, r9
    37b871101mov r9l, 1
    37b871107mov [rsp+456], rdx
    37b87110flea rdx, [rip+0xbcb5da]
    37b871116mov eax, [rax]
    37b871118mov [rsp+464], r8
    37b871120mov r8l, 1
    37b871126mov [rsp+448], rcx
    37b87112emov [rsp+104], eax
    37b871132mov eax, [r15]
    37b871135mov [rsp+120], eax
    37b871139mov rax, [rsp+576]
    37b871141mov [rax], 0
    37b871147call lsame_
    37b87114cmov [rsp+200], eax
    37b871153test eax, eax
    37b871155je 0x37b87124e
    37b87115b
    37b87115bloc_37b87115b:
    37b87115bmov rax, [rsp+456]
    37b871163mov esi, [rax]
    37b871165test esi, esi
    37b871167js 0x37b8711d0
    37b871169mov rax, [rsp+464]
    37b871171mov edi, [rax]
    37b871173test edi, edi
    37b871175js 0x37b871285
    37b87117bmov edx, [rbx]
    37b87117dtest edx, edx
    37b87117fjs 0x37b871294
    37b871185mov rax, [rsp+488]
    37b87118dcmp edi, [rax]
    37b87118fjge 0x37b8712a3
    37b871195mov rax, [rsp+504]
    37b87119dcmp edi, [rax]
    37b87119fjge 0x37b8712b2
    37b8711a5test esi, esi
    37b8711a7mov eax, 1
    37b8711accmovg eax, esi
    37b8711afcmp [r14], eax
    37b8711b2jl 0x37b871e01
    37b8711b8cmp [r15], eax
    37b8711bbjge 0x37b8712c8
    37b8711c1mov edx, -12
    37b8711c6mov eax, 12
    37b8711cbjmp 0x37b8711da
    37b8711cd
    37b8711cd 0f 1f 00 ...
    37b8711d0
    37b8711d0loc_37b8711d0:
    37b8711d0mov edx, -2
    37b8711d5mov eax, 2
    37b8711da
    37b8711daloc_37b8711da:
    37b8711damov rbx, [rsp+576]
    37b8711e2mov [rbx], edx
    37b8711e4
    37b8711e4loc_37b8711e4:
    37b8711e4lea rdx, [rsp+260]
    37b8711ecmov r8l, 6
    37b8711f2lea rcx, [rip+0xbcb4f9]
    37b8711f9mov [rsp+260], eax
    37b871200call xerbla_
    37b871205nop
    37b871206
    37b871206loc_37b871206:
    37b871206movups x6, [rsp+272]
    37b87120emovups x7, [rsp+288]
    37b871216movups x8, [rsp+304]
    37b87121fmovups x9, [rsp+320]
    37b871228movups x10, [rsp+336]
    37b871231movups x11, [rsp+352]
    37b87123aadd rsp, 376
    37b871241pop rbx
    37b871242pop rsi
    37b871243pop rdi
    37b871244pop rbp
    37b871245pop r12
    37b871247pop r13
    37b871249pop r14
    37b87124bpop r15
    37b87124dret
    37b87124e
    37b87124eloc_37b87124e:
    37b87124emov rcx, [rsp+448]
    37b871256mov r9l, 1
    37b87125cmov r8l, 1
    37b871262lea rdx, [rip+0xbcb488]
    37b871269call lsame_
    37b87126etest eax, eax
    37b871270jne 0x37b87115b
    37b871276mov edx, -1
    37b87127bmov eax, 1
    37b871280jmp 0x37b8711da
    37b871285
    37b871285loc_37b871285:
    37b871285mov edx, -3
    37b87128amov eax, 3
    37b87128fjmp 0x37b8711da
    37b871294
    37b871294loc_37b871294:
    37b871294mov edx, -4
    37b871299mov eax, 4
    37b87129ejmp 0x37b8711da
    37b8712a3
    37b8712a3loc_37b8712a3:
    37b8712a3mov edx, -6
    37b8712a8mov eax, 6
    37b8712adjmp 0x37b8711da
    37b8712b2
    37b8712b2loc_37b8712b2:
    37b8712b2mov edx, -8
    37b8712b7mov eax, 8
    37b8712bcjmp 0x37b8711da
    37b8712c1
    37b8712c1 0f 1f 80 00 00 00 00 .......
    37b8712c8
    37b8712c8loc_37b8712c8:
    37b8712c8mov rax, [rsp+576]
    37b8712d0mov eax, [rax]
    37b8712d2test eax, eax
    37b8712d4jne 0x37b871e10
    37b8712datest esi, esi
    37b8712dcje 0x37b871dc8
    37b8712e2test edx, edx
    37b8712e4je 0x37b871206
    37b8712eamov edx, 7
    37b8712eflea rcx, [rip+0xbcb402]
    37b8712f6call dlamch_
    37b8712fbmov edx, 12
    37b871300lea rcx, [rip+0xbcb3f8]
    37b871307movapd x7, x0
    37b87130bcall dlamch_
    37b871310mov r14l, [rbx]
    37b871313test r14l, r14l
    37b871316jle 0x37b871206
    37b87131cmovsxd rbx, [rsp+104]
    37b871321xor eax, eax
    37b871323pxor x8, x8
    37b871328movsxd rdx, [rsp+112]
    37b87132dmovsxd r8, [rsp+120]
    37b871332mov [rsp+128], 1
    37b87133etest rbx, rbx
    37b871341mov [rsp+120], -1
    37b87134amovddup x9, [rip+0xbcb3dd]
    37b871353cmovns rax, rbx
    37b871357add esi, 1
    37b87135amov [rsp+480], r12
    37b871362mov rbx, [rsp+544]
    37b87136amov r10, [rsp+456]
    37b871372mov [rsp+104], rax
    37b871377lea eax, [rdi+rdi+2]
    37b87137blea rdi, [rsp+256]
    37b871383cmp eax, esi
    37b871385cmovg eax, esi
    37b871388lea rsi, [rsp+260]
    37b871390cvtsi2sd x8, eax
    37b871395mulsd x0, x8
    37b87139amov rax, [rsp+456]
    37b8713a2mov r15l, [rax]
    37b8713a5xor eax, eax
    37b8713a7test rdx, rdx
    37b8713aacmovs rdx, rax
    37b8713aemovapd x10, x0
    37b8713b3lea rax, [8*rdx]
    37b8713bbmovapd x11, x0
    37b8713c0divsd x10, x7
    37b8713c5mov [rsp+232], rax
    37b8713cdmov rax, [rsp+512]
    37b8713d5sub rax, 8
    37b8713d9mov [rsp+192], rax
    37b8713e1xor eax, eax
    37b8713e3test r8, r8
    37b8713e6cmovs r8, rax
    37b8713ealea rax, [8*r8]
    37b8713f2mov [rsp+248], r8
    37b8713famov [rsp+240], rax
    37b871402mov rax, [rsp+528]
    37b87140asub rax, 8
    37b87140emov [rsp+152], rax
    37b871416
    37b871416loc_37b871416:
    37b871416mov rax, [rsp+192]
    37b87141emov [rsp+204], r14l
    37b871426mov [rsp+208], rbx
    37b87142emovsd_xmm x6, [rip+0xbcb2ea]
    37b871436lea rdx, [rax+8]
    37b87143amov [rsp+568], rbp
    37b871442mov r12, [rsp+480]
    37b87144amov [rsp+160], rdx
    37b871452mov rdx, [rsp+152]
    37b87145amov [rsp+148], 1
    37b871465lea r9, [rdx+8]
    37b871469mov [rsp+216], rdi
    37b871471mov edx, r15l
    37b871474mov [rsp+136], r9
    37b87147cmov [rsp+224], rsi
    37b871484mov rsi, rax
    37b871487
    37b871487loc_37b871487:
    37b871487lea rbx, [rip+0xbcb27e]
    37b87148emovsxd rax, edx
    37b871491mov rdx, [rsp+160]
    37b871499mov rcx, r10
    37b87149cmov [rsp+32], rbx
    37b8714a1lea r9, [r13+8*rax]
    37b8714a6mov r8, rbx
    37b8714a9mov [rsp+456], r10
    37b8714b1call dcopy_
    37b8714b6mov r10, [rsp+456]
    37b8714bemov [rsp+88], 1
    37b8714c7lea r9, [rip+0xbcb242]
    37b8714cemov [rsp+80], rbx
    37b8714d3mov r8, [rsp+464]
    37b8714dbmovsxd rax, [r10]
    37b8714demov [rsp+56], rbx
    37b8714e3mov rdx, r10
    37b8714e6mov [rsp+32], r12
    37b8714ebmov rcx, [rsp+448]
    37b8714f3lea rax, [r13+8*rax]
    37b8714f8mov [rsp+72], rax
    37b8714fdlea rax, [rip+0xbcb214]
    37b871504mov [rsp+64], rax
    37b871509mov rax, [rsp+136]
    37b871511mov [rsp+48], rax
    37b871516mov rax, [rsp+488]
    37b87151emov [rsp+40], rax
    37b871523call dsbmv_
    37b871528mov r10, [rsp+456]
    37b871530mov edx, [r10]
    37b871533test edx, edx
    37b871535jle 0x37b871dbc
    37b87153blea eax, [rdx-1]
    37b87153emov ecx, 1
    37b871543lea r14, [rax+2]
    37b871547nop [rax]
    37b87154anop [rax+rax]
    37b871555nop [rax+rax]
    37b871560
    37b871560loc_37b871560:
    37b871560movsd_xmm x0, [rsi+8*rcx]
    37b871565andpd x0, [rip+0xbcb1c3]
    37b87156dmovsd_xmm [r13+8*rcx-8], x0
    37b871574add rcx, 1
    37b871578cmp rcx, r14
    37b87157bjne 0x37b871560
    37b87157dmov rdi, [rsp+464]
    37b871585mov ecx, [rsp+200]
    37b87158cmovsxd rbx, [rdi]
    37b87158ftest ecx, ecx
    37b871591je 0x37b8718d0
    37b871597mov [rsp+168], edx
    37b87159emov rdi, [rsp+152]
    37b8715a6lea r15, [r12+8*rbx]
    37b8715aamov rbp, -1
    37b8715b1mov [rsp+176], rax
    37b8715b9mov r11l, 1
    37b8715bfmov [rsp+184], rsi
    37b8715c7mov [rsp+456], r10
    37b8715cfmov [rsp+112], r14
    37b8715d4mov r14, [rsp+120]
    37b8715d9nop [rax]
    37b8715e0
    37b8715e0loc_37b8715e0:
    37b8715e0mov ecx, 1
    37b8715e5mov eax, 1
    37b8715eamovsd_xmm x2, [rdi+8*r11]
    37b8715f0andpd x2, [rip+0xbcb138]
    37b8715f8sub ecx, ebx
    37b8715fatest ecx, ecx
    37b8715fccmovle ecx, eax
    37b8715ffcmp ecx, r11l
    37b871602jge 0x37b8718c0
    37b871608mov esi, r11l
    37b87160bsub esi, ecx
    37b87160dcmp esi, 1
    37b871610je 0x37b871a92
    37b871616lea r8, [rbp+rbx]
    37b87161bmovddup x3, x2
    37b87161fpxor x1, x1
    37b871623movsxd rax, ecx
    37b871626add r8, rax
    37b871629mov r9, [rsp+528]
    37b871631lea rdx, [r13+8*rax-8]
    37b871636add rax, r14
    37b871639lea r10, [r12+8*r8]
    37b87163dmov r8l, esi
    37b871640shr r8l, 1
    37b871643lea r9, [r9+8*rax]
    37b871647xor eax, eax
    37b871649shl r8, 4
    37b87164dnop [rax]
    37b871650
    37b871650loc_37b871650:
    37b871650movupd x5, [r10+rax]
    37b871656movapd x0, x3
    37b87165amovapd x4, x5
    37b87165emovupd x5, [rdx+rax]
    37b871663andpd x4, x9
    37b871668mulpd x0, x4
    37b87166caddpd x0, x5
    37b871670movups [rdx+rax], x0
    37b871674movupd x0, [r9+rax]
    37b87167aadd rax, 16
    37b87167eandpd x0, x9
    37b871683mulpd x0, x4
    37b871687addsd x1, x0
    37b87168bunpckhpd x0, x0
    37b87168faddsd x1, x0
    37b871693cmp r8, rax
    37b871696jne 0x37b871650
    37b871698test sil, 1
    37b87169cje 0x37b8716f2
    37b87169eand esi, -2
    37b8716a1add ecx, esi
    37b8716a3
    37b8716a3loc_37b8716a3:
    37b8716a3movsxd rax, ecx
    37b8716a6add ecx, ebx
    37b8716a8movapd x0, x2
    37b8716acmov rsi, [rsp+528]
    37b8716b4movsxd rcx, ecx
    37b8716b7add rcx, rbp
    37b8716bamovsd_xmm x3, [r12+8*rcx]
    37b8716c0andpd x3, [rip+0xbcb068]
    37b8716c8mulsd x0, x3
    37b8716ccaddsd x0, [r13+8*rax-8]
    37b8716d3movsd_xmm [r13+8*rax-8], x0
    37b8716daadd rax, r14
    37b8716ddmovsd_xmm x0, [rsi+8*rax]
    37b8716e2andpd x0, [rip+0xbcb046]
    37b8716eamulsd x0, x3
    37b8716eeaddsd x1, x0
    37b8716f2
    37b8716f2loc_37b8716f2:
    37b8716f2movsd_xmm x0, [r15+8*rbp+8]
    37b8716f9sub rbx, 1
    37b8716fdandpd x0, [rip+0xbcb02b]
    37b871705add rbp, [rsp+104]
    37b87170amulsd x0, x2
    37b87170eaddsd x0, [r13+8*r11-8]
    37b871715addsd x0, x1
    37b871719movsd_xmm [r13+8*r11-8], x0
    37b871720add r11, 1
    37b871724cmp r11, [rsp+112]
    37b871729jne 0x37b8715e0
    37b87172fmov edx, [rsp+168]
    37b871736mov rax, [rsp+176]
    37b87173elea r11, [r13+8]
    37b871742mov rsi, [rsp+184]
    37b87174amov r10, [rsp+456]
    37b871752
    37b871752loc_37b871752:
    37b871752lea r8, [r11+8*rax]
    37b871756mov rcx, r13
    37b871759pxor x2, x2
    37b87175dmovsxd rax, edx
    37b871760nop [rax+rax]
    37b87176anop [rax+rax]
    37b871775nop [rax+rax]
    37b871780
    37b871780loc_37b871780:
    37b871780movsd_xmm x1, [rcx]
    37b871784movsd_xmm x0, [rcx+8*rax]
    37b871789andpd x0, [rip+0xbcaf9f]
    37b871791comisd x1, x10
    37b871796ja 0x37b8717a2
    37b871798addsd x0, x11
    37b87179daddsd x1, x11
    37b8717a2
    37b8717a2loc_37b8717a2:
    37b8717a2divsd x0, x1
    37b8717a6add rcx, 8
    37b8717aamaxsd x2, x0
    37b8717aecmp r8, rcx
    37b8717b1jne 0x37b871780
    37b8717b3
    37b8717b3loc_37b8717b3:
    37b8717b3comisd x2, x7
    37b8717b7mov rdi, [rsp+552]
    37b8717bfmov rbx, [rsp+128]
    37b8717c7movsd_xmm [rdi+8*rbx-8], x2
    37b8717cdjbe 0x37b871a9b
    37b8717d3addsd x2, x2
    37b8717d7comisd x6, x2
    37b8717dbjb 0x37b871a9b
    37b8717e1cmp [rsp+148], 6
    37b8717e9je 0x37b871a9b
    37b8717eflea rax, [r13+8*rax]
    37b8717f4mov [rsp+56], r10
    37b8717f9mov rbx, [rsp+576]
    37b871801mov rdx, r10
    37b871804mov [rsp+48], rax
    37b871809mov rax, [rsp+504]
    37b871811lea r9, [rip+0xbcaef4]
    37b871818lea rdi, [rip+0xbcaeed]
    37b87181fmov [rsp+64], rbx
    37b871824mov r8, [rsp+464]
    37b87182cmov [rsp+40], rax
    37b871831mov rax, [rsp+496]
    37b871839mov rcx, [rsp+448]
    37b871841mov [rsp+456], r10
    37b871849mov [rsp+32], rax
    37b87184emov [rsp+72], 1
    37b871857call dpbtrs_
    37b87185cmov r10, [rsp+456]
    37b871864mov r9, rdi
    37b871867mov rbx, [rsp+136]
    37b87186flea rdx, [rip+0xbcaea2]
    37b871876movsxd rax, [r10]
    37b871879mov [rsp+40], rdi
    37b87187emov rcx, r10
    37b871881mov [rsp+32], rbx
    37b871886lea r8, [r13+8*rax]
    37b87188bcall daxpy_
    37b871890mov rax, [rsp+552]
    37b871898mov rdi, [rsp+128]
    37b8718a0mov r10, [rsp+456]
    37b8718a8add [rsp+148], 1
    37b8718b0movsd_xmm x6, [rax+8*rdi-8]
    37b8718b6mov edx, [r10]
    37b8718b9jmp 0x37b871487
    37b8718be
    37b8718be 66 90 f.
    37b8718c0
    37b8718c0loc_37b8718c0:
    37b8718c0pxor x1, x1
    37b8718c4jmp 0x37b8716f2
    37b8718c9
    37b8718c9 0f 1f 80 00 00 00 00 .......
    37b8718d0
    37b8718d0loc_37b8718d0:
    37b8718d0lea r11, [r13+8]
    37b8718d4mov [rsp+112], rax
    37b8718d9lea r14l, [rdx+1]
    37b8718ddsub ebx, 1
    37b8718e0mov rdi, [rsp+152]
    37b8718e8mov rcx, r11
    37b8718eblea r15, [r12+16]
    37b8718f0mov [rsp+456], r10
    37b8718f8mov [rsp+176], r11
    37b871900mov rbp, -1
    37b871907mov [rsp+168], rsi
    37b87190fmov rsi, [rsp+104]
    37b871914lea r9, [rdi+16]
    37b871918mov edi, 1
    37b87191dnop [rax]
    37b871920
    37b871920loc_37b871920:
    37b871920movsd_xmm x2, [r9-8]
    37b871926movsd_xmm x0, [r12+8*rbp+8]
    37b87192dmov eax, edi
    37b87192fadd edi, 1
    37b871932andpd x2, [rip+0xbcadf6]
    37b87193aandpd x0, [rip+0xbcadee]
    37b871942lea r8l, [rbx+rdi]
    37b871946cmp r8l, edx
    37b871949mulsd x0, x2
    37b87194dcmovg r8l, edx
    37b871951addsd x0, [rcx-8]
    37b871956movsd_xmm [rcx-8], x0
    37b87195bcmp edi, r8l
    37b87195ejg 0x37b871a80
    37b871964sub r8l, eax
    37b871967cmp r8l, 1
    37b87196bje 0x37b871a86
    37b871971mov r10l, r8l
    37b871974lea r11, [r15+8*rbp]
    37b871978movddup x3, x2
    37b87197cxor eax, eax
    37b87197eshr r10l, 1
    37b871981pxor x1, x1
    37b871985shl r10, 4
    37b871989nop [rax]
    37b871990
    37b871990loc_37b871990:
    37b871990movupd x5, [r11+rax]
    37b871996movapd x0, x3
    37b87199aandpd x5, x9
    37b87199fmulpd x0, x5
    37b8719a3movapd x4, x5
    37b8719a7movupd x5, [rcx+rax]
    37b8719acaddpd x0, x5
    37b8719b0movups [rcx+rax], x0
    37b8719b4movupd x0, [r9+rax]
    37b8719baadd rax, 16
    37b8719beandpd x0, x9
    37b8719c3mulpd x0, x4
    37b8719c7addsd x1, x0
    37b8719cbunpckhpd x0, x0
    37b8719cfaddsd x1, x0
    37b8719d3cmp rax, r10
    37b8719d6jne 0x37b871990
    37b8719d8test r8b, 1
    37b8719dcje 0x37b871a3a
    37b8719deand r8l, -2
    37b8719e2add r8l, edi
    37b8719e5
    37b8719e5loc_37b8719e5:
    37b8719e5mov eax, 2
    37b8719eamovsxd r10, r8l
    37b8719edsub eax, edi
    37b8719efadd eax, r8l
    37b8719f2cdqe
    37b8719f4add rax, rbp
    37b8719f7movsd_xmm x3, [r12+8*rax]
    37b8719fdandpd x3, [rip+0xbcad2b]
    37b871a05mov rax, [rsp+528]
    37b871a0dmulsd x2, x3
    37b871a11addsd x2, [r13+8*r10-8]
    37b871a18movsd_xmm [r13+8*r10-8], x2
    37b871a1fadd r10, [rsp+120]
    37b871a24movsd_xmm x0, [rax+8*r10]
    37b871a2aandpd x0, [rip+0xbcacfe]
    37b871a32mulsd x0, x3
    37b871a36addsd x1, x0
    37b871a3a
    37b871a3aloc_37b871a3a:
    37b871a3amovsd_xmm x0, [rcx-8]
    37b871a3f
    37b871a3floc_37b871a3f:
    37b871a3faddsd x0, x1
    37b871a43add rbp, rsi
    37b871a46add rcx, 8
    37b871a4aadd r9, 8
    37b871a4emovsd_xmm [rcx-16], x0
    37b871a53cmp r14l, edi
    37b871a56jne 0x37b871920
    37b871a5cmov rax, [rsp+112]
    37b871a61mov rsi, [rsp+168]
    37b871a69mov r10, [rsp+456]
    37b871a71mov r11, [rsp+176]
    37b871a79jmp 0x37b871752
    37b871a7e
    37b871a7e 66 90 f.
    37b871a80
    37b871a80loc_37b871a80:
    37b871a80pxor x1, x1
    37b871a84jmp 0x37b871a3f
    37b871a86
    37b871a86loc_37b871a86:
    37b871a86mov r8l, edi
    37b871a89pxor x1, x1
    37b871a8djmp 0x37b8719e5
    37b871a92
    37b871a92loc_37b871a92:
    37b871a92pxor x1, x1
    37b871a96jmp 0x37b8716a3
    37b871a9b
    37b871a9bloc_37b871a9b:
    37b871a9bmov r14l, [rsp+204]
    37b871aa3mov r9, [rsp+136]
    37b871aabmov rbx, [rsp+208]
    37b871ab3mov rbp, [rsp+568]
    37b871abbmov rdi, [rsp+216]
    37b871ac3mov rsi, [rsp+224]
    37b871acbtest edx, edx
    37b871acdjle 0x37b871b36
    37b871acfmovapd x3, x8
    37b871ad4lea ecx, [rdx-1]
    37b871ad7mov rdx, r13
    37b871adamulsd x3, x7
    37b871adelea rcx, [r13+8*rcx+8]
    37b871ae3nop [rax]
    37b871aeanop [rax+rax]
    37b871af5nop [rax+rax]
    37b871b00
    37b871b00loc_37b871b00:
    37b871b00movsd_xmm x1, [rdx]
    37b871b04movsd_xmm x0, [rdx+8*rax]
    37b871b09andpd x0, [rip+0xbcac1f]
    37b871b11movapd x2, x1
    37b871b15comisd x1, x10
    37b871b1amulsd x2, x3
    37b871b1eaddsd x0, x2
    37b871b22ja 0x37b871b29
    37b871b24addsd x0, x11
    37b871b29
    37b871b29loc_37b871b29:
    37b871b29movsd_xmm [rdx], x0
    37b871b2dadd rdx, 8
    37b871b31cmp rdx, rcx
    37b871b34jne 0x37b871b00
    37b871b36
    37b871b36loc_37b871b36:
    37b871b36mov [rsp+256], 0
    37b871b41mov r12, r13
    37b871b44mov r15, r9
    37b871b47mov r13, r10
    37b871b4anop [rax+rax]
    37b871b50
    37b871b50loc_37b871b50:
    37b871b50shl rax, 3
    37b871b54mov [rsp+48], rsi
    37b871b59mov rcx, r13
    37b871b5cmov r9, rbp
    37b871b5fmov [rsp+40], rdi
    37b871b64lea r8, [r12+rax]
    37b871b68mov [rsp+32], rbx
    37b871b6dlea rdx, [r8+rax]
    37b871b71call dlacn2_
    37b871b76mov edx, [rsp+256]
    37b871b7dmov ecx, [r13]
    37b871b81test edx, edx
    37b871b83je 0x37b871c39
    37b871b89movsxd rax, ecx
    37b871b8clea r8, [r12+8*rax]
    37b871b90cmp edx, 1
    37b871b93je 0x37b871d02
    37b871b99cmp edx, 2
    37b871b9cjne 0x37b871b50
    37b871b9etest ecx, ecx
    37b871ba0jle 0x37b871bd7
    37b871ba2sub ecx, 1
    37b871ba5mov rdx, r8
    37b871ba8add rcx, rax
    37b871babneg rax
    37b871baelea rcx, [r12+8*rcx+8]
    37b871bb3shl rax, 3
    37b871bb7nop [rax+rax]
    37b871bc0
    37b871bc0loc_37b871bc0:
    37b871bc0movsd_xmm x0, [rdx]
    37b871bc4mulsd x0, [rdx+rax]
    37b871bc9add rdx, 8
    37b871bcdmovsd_xmm [rdx-8], x0
    37b871bd2cmp rdx, rcx
    37b871bd5jne 0x37b871bc0
    37b871bd7
    37b871bd7loc_37b871bd7:
    37b871bd7mov rax, [rsp+576]
    37b871bdfmov [rsp+48], r8
    37b871be4mov rdx, r13
    37b871be7lea r9, [rip+0xbcab1e]
    37b871beemov [rsp+56], r13
    37b871bf3mov r8, [rsp+464]
    37b871bfbmov [rsp+64], rax
    37b871c00mov rax, [rsp+504]
    37b871c08mov [rsp+72], 1
    37b871c11mov rcx, [rsp+448]
    37b871c19mov [rsp+40], rax
    37b871c1emov rax, [rsp+496]
    37b871c26mov [rsp+32], rax
    37b871c2bcall dpbtrs_
    37b871c30movsxd rax, [r13]
    37b871c34jmp 0x37b871b50
    37b871c39
    37b871c39loc_37b871c39:
    37b871c39mov r9, r15
    37b871c3cmov r10, r13
    37b871c3fmov r15l, ecx
    37b871c42mov r13, r12
    37b871c45test ecx, ecx
    37b871c47jle 0x37b871cb2
    37b871c49mov rdx, [rsp+528]
    37b871c51lea eax, [rcx-1]
    37b871c54add rax, [rsp+120]
    37b871c59pxor x1, x1
    37b871c5dlea rax, [rdx+8*rax+16]
    37b871c62nop [rax+rax]
    37b871c6anop [rax+rax]
    37b871c75nop [rax+rax]
    37b871c80
    37b871c80loc_37b871c80:
    37b871c80movsd_xmm x0, [r9]
    37b871c85andpd x0, [rip+0xbcaaa3]
    37b871c8dadd r9, 8
    37b871c91maxsd x1, x0
    37b871c95cmp r9, rax
    37b871c98jne 0x37b871c80
    37b871c9apxor x0, x0
    37b871c9eucomisd x1, x0
    37b871ca2jp 0x37b871ca6
    37b871ca4je 0x37b871cb2
    37b871ca6
    37b871ca6loc_37b871ca6:
    37b871ca6movsd_xmm x0, [rbx]
    37b871caadivsd x0, x1
    37b871caemovsd_xmm [rbx], x0
    37b871cb2
    37b871cb2loc_37b871cb2:
    37b871cb2add [rsp+128], 1
    37b871cbbmov rax, [rsp+128]
    37b871cc3add rbx, 8
    37b871cc7mov rcx, [rsp+232]
    37b871ccfadd [rsp+192], rcx
    37b871cd7mov rcx, [rsp+240]
    37b871cdfadd [rsp+152], rcx
    37b871ce7mov rcx, [rsp+248]
    37b871cefadd [rsp+120], rcx
    37b871cf4cmp r14l, eax
    37b871cf7jge 0x37b871416
    37b871cfdjmp 0x37b871206
    37b871d02
    37b871d02loc_37b871d02:
    37b871d02mov rax, [rsp+576]
    37b871d0amov [rsp+48], r8
    37b871d0fmov rdx, r13
    37b871d12lea r9, [rip+0xbca9f3]
    37b871d19mov [rsp+56], r13
    37b871d1emov rcx, [rsp+448]
    37b871d26mov [rsp+64], rax
    37b871d2bmov rax, [rsp+504]
    37b871d33mov [rsp+72], 1
    37b871d3cmov r8, [rsp+464]
    37b871d44mov [rsp+40], rax
    37b871d49mov rax, [rsp+496]
    37b871d51mov [rsp+32], rax
    37b871d56call dpbtrs_
    37b871d5bmov ecx, [r13]
    37b871d5fmovsxd rax, ecx
    37b871d62test ecx, ecx
    37b871d64jle 0x37b871b50
    37b871d6asub ecx, 1
    37b871d6dlea rdx, [r12+8*rax]
    37b871d71add rcx, rax
    37b871d74lea r9, [r12+8*rcx+8]
    37b871d79lea rcx, [8*rax]
    37b871d81neg rcx
    37b871d84nop [rax+rax]
    37b871d8anop [rax+rax]
    37b871d95nop [rax+rax]
    37b871da0
    37b871da0loc_37b871da0:
    37b871da0movsd_xmm x0, [rdx]
    37b871da4mulsd x0, [rdx+rcx]
    37b871da9add rdx, 8
    37b871dadmovsd_xmm [rdx-8], x0
    37b871db2cmp r9, rdx
    37b871db5jne 0x37b871da0
    37b871db7jmp 0x37b871b50
    37b871dbc
    37b871dbcloc_37b871dbc:
    37b871dbcpxor x2, x2
    37b871dc0movsxd rax, edx
    37b871dc3jmp 0x37b8717b3
    37b871dc8
    37b871dc8loc_37b871dc8:
    37b871dc8test edx, edx
    37b871dcaje 0x37b871206
    37b871dd0lea rbx, [8*rdx]
    37b871dd8mov rcx, [rsp+544]
    37b871de0xor edx, edx
    37b871de2mov r8, rbx
    37b871de5call memset
    37b871deamov rcx, [rsp+552]
    37b871df2mov r8, rbx
    37b871df5xor edx, edx
    37b871df7call memset
    37b871dfcjmp 0x37b871206
    37b871e01
    37b871e01loc_37b871e01:
    37b871e01mov edx, -10
    37b871e06mov eax, 10
    37b871e0bjmp 0x37b8711da
    37b871e10
    37b871e10loc_37b871e10:
    37b871e10neg eax
    37b871e12jmp 0x37b8711e4
    37b871080