File lapack_564f5cd6dd718723530ccdd421a63387e76d5fcdb30f49d1f0425db7bc512296.dll
Function:
    37c42bd30
    37c42bd30zunmrq_64_:
    37c42bd30push r15
    37c42bd32push r14
    37c42bd34push r13
    37c42bd36push r12
    37c42bd38push rbp
    37c42bd39push rdi
    37c42bd3apush rsi
    37c42bd3bpush rbx
    37c42bd3csub rsp, 328
    37c42bd43movups [rsp+304], x6
    37c42bd4bmov rax, [rsp+496]
    37c42bd53mov [rax], 0
    37c42bd5amov rbp, rdx
    37c42bd5dmov rbx, r8
    37c42bd60mov rsi, r9
    37c42bd63mov r8l, 1
    37c42bd69mov r9l, 1
    37c42bd6flea rdx, [rip+0x48cda]
    37c42bd76mov rdi, rcx
    37c42bd79call lsame_64_
    37c42bd7emov r9l, 1
    37c42bd84mov r8l, 1
    37c42bd8amov rcx, rbp
    37c42bd8dlea rdx, [rip+0x48cbd]
    37c42bd94mov r15, rax
    37c42bd97call lsame_64_
    37c42bd9cmov r11, [rsi]
    37c42bd9fmov r14, [rbx]
    37c42bda2mov r12, rax
    37c42bda5mov rax, [rsp+488]
    37c42bdadmov r13, [rax]
    37c42bdb0test r15, r15
    37c42bdb3je 0x37c42be10
    37c42bdb5test r11, r11
    37c42bdb8mov r10l, 1
    37c42bdbecmovg r10, r11
    37c42bdc2test r12, r12
    37c42bdc5je 0x37c42bece
    37c42bdcb
    37c42bdcbloc_37c42bdcb:
    37c42bdcbmov rdx, [rbx]
    37c42bdcetest rdx, rdx
    37c42bdd1js 0x37c42be50
    37c42bdd3mov rcx, [rsi]
    37c42bdd6test rcx, rcx
    37c42bdd9js 0x37c42bf18
    37c42bddfmov rax, [rsp+432]
    37c42bde7mov rax, [rax]
    37c42bdeatest rax, rax
    37c42bdedjs 0x37c42bdf8
    37c42bdefcmp rax, r14
    37c42bdf2jle 0x37c42bf30
    37c42bdf8
    37c42bdf8loc_37c42bdf8:
    37c42bdf8mov rdx, -5
    37c42bdffmov eax, 5
    37c42be04jmp 0x37c42be5c
    37c42be06
    37c42be06 66 2e 0f 1f 84 00 00 00 00 00 f.........
    37c42be10
    37c42be10loc_37c42be10:
    37c42be10mov r9l, 1
    37c42be16mov r8l, 1
    37c42be1cmov rcx, rdi
    37c42be1fmov [rsp+168], r11
    37c42be27lea rdx, [rip+0x48c24]
    37c42be2ecall lsame_64_
    37c42be33test rax, rax
    37c42be36jne 0x37c42beb0
    37c42be38mov rdx, -1
    37c42be3fmov eax, 1
    37c42be44jmp 0x37c42be5c
    37c42be46
    37c42be46 66 2e 0f 1f 84 00 00 00 00 00 f.........
    37c42be50
    37c42be50loc_37c42be50:
    37c42be50mov rdx, -3
    37c42be57mov eax, 3
    37c42be5c
    37c42be5cloc_37c42be5c:
    37c42be5cmov rdi, [rsp+496]
    37c42be64mov [rdi], rdx
    37c42be67
    37c42be67loc_37c42be67:
    37c42be67lea rdx, [rsp+296]
    37c42be6fmov r8l, 6
    37c42be75lea rcx, [rip+0x48bd8]
    37c42be7cmov [rsp+296], rax
    37c42be84call xerbla_64_
    37c42be89nop
    37c42be8a
    37c42be8aloc_37c42be8a:
    37c42be8amovups x6, [rsp+304]
    37c42be92add rsp, 328
    37c42be99pop rbx
    37c42be9apop rsi
    37c42be9bpop rdi
    37c42be9cpop rbp
    37c42be9dpop r12
    37c42be9fpop r13
    37c42bea1pop r14
    37c42bea3pop r15
    37c42bea5ret
    37c42bea6
    37c42bea6 66 2e 0f 1f 84 00 00 00 00 00 f.........
    37c42beb0
    37c42beb0loc_37c42beb0:
    37c42beb0test r14, r14
    37c42beb3mov r10l, 1
    37c42beb9cmovg r10, r14
    37c42bebdmov r14, [rsp+168]
    37c42bec5test r12, r12
    37c42bec8jne 0x37c42bdcb
    37c42bece
    37c42beceloc_37c42bece:
    37c42becemov r9l, 1
    37c42bed4mov r8l, 1
    37c42bedamov rcx, rbp
    37c42beddmov [rsp+168], r10
    37c42bee5lea rdx, [rip+0x48b67]
    37c42beeccall lsame_64_
    37c42bef1mov r10, [rsp+168]
    37c42bef9test rax, rax
    37c42befcjne 0x37c42bdcb
    37c42bf02mov rdx, -2
    37c42bf09mov eax, 2
    37c42bf0ejmp 0x37c42be5c
    37c42bf13
    37c42bf13 0f 1f 44 00 00 ..D..
    37c42bf18
    37c42bf18loc_37c42bf18:
    37c42bf18mov rdx, -4
    37c42bf1fmov eax, 4
    37c42bf24jmp 0x37c42be5c
    37c42bf29
    37c42bf29 0f 1f 80 00 00 00 00 .......
    37c42bf30
    37c42bf30loc_37c42bf30:
    37c42bf30mov r11, [rsp+448]
    37c42bf38test rax, rax
    37c42bf3bmov r8l, 1
    37c42bf41cmovle rax, r8
    37c42bf45cmp [r11], rax
    37c42bf48jl 0x37c42bfa0
    37c42bf4amov r11, [rsp+472]
    37c42bf52test rdx, rdx
    37c42bf55mov eax, 1
    37c42bf5acmovg rax, rdx
    37c42bf5ecmp [r11], rax
    37c42bf61jl 0x37c42c610
    37c42bf67mov rax, [rsp+488]
    37c42bf6fcmp [rax], r10
    37c42bf72mov rax, [rsp+496]
    37c42bf7ajge 0x37c42bfb8
    37c42bf7ccmp r13, -1
    37c42bf80je 0x37c42c6b2
    37c42bf86mov [rax], -12
    37c42bf8dmov eax, 12
    37c42bf92jmp 0x37c42be67
    37c42bf97
    37c42bf97 66 0f 1f 84 00 00 00 00 00 f........
    37c42bfa0
    37c42bfa0loc_37c42bfa0:
    37c42bfa0mov rdx, -7
    37c42bfa7mov eax, 7
    37c42bfacjmp 0x37c42be5c
    37c42bfb1
    37c42bfb1 0f 1f 80 00 00 00 00 .......
    37c42bfb8
    37c42bfb8loc_37c42bfb8:
    37c42bfb8mov rax, [rax]
    37c42bfbbtest rax, rax
    37c42bfbejne 0x37c42c6e2
    37c42bfc4test rdx, rdx
    37c42bfc7je 0x37c42bfd2
    37c42bfc9
    37c42bfc9loc_37c42bfc9:
    37c42bfc9test rcx, rcx
    37c42bfccjne 0x37c42c440
    37c42bfd2
    37c42bfd2loc_37c42bfd2:
    37c42bfd2movsd_xmm x0, [rip+0x48ab6]
    37c42bfdamov edx, 1
    37c42bfdf
    37c42bfdfloc_37c42bfdf:
    37c42bfdfmov rcx, [rsp+480]
    37c42bfe7mov [rcx+8], 0
    37c42bfefmovsd_xmm [rcx], x0
    37c42bff3test rax, rax
    37c42bff6jne 0x37c42c6e2
    37c42bffccmp r13, -1
    37c42c000je 0x37c42be8a
    37c42c006cmp [rbx], 0
    37c42c00aje 0x37c42be8a
    37c42c010cmp [rsi], 0
    37c42c014je 0x37c42be8a
    37c42c01amov [rsp+272], r10
    37c42c022cmp [rsp+176], 1
    37c42c02bjle 0x37c42c388
    37c42c031mov rax, [rsp+432]
    37c42c039mov rcx, [rax]
    37c42c03ccmp rcx, [rsp+176]
    37c42c044jle 0x37c42c388
    37c42c04amov rax, [rsp+488]
    37c42c052lea r11, [rsp+296]
    37c42c05amov rax, [rax]
    37c42c05dcmp rax, rdx
    37c42c060jl 0x37c42c520
    37c42c066
    37c42c066loc_37c42c066:
    37c42c066imul r10, [rsp+176]
    37c42c06fcmp r15, r12
    37c42c072je 0x37c42c628
    37c42c078test r15, r15
    37c42c07bje 0x37c42c680
    37c42c081mov rax, [rsi]
    37c42c084mov [rsp+288], rax
    37c42c08ctest r12, r12
    37c42c08fje 0x37c42c694
    37c42c095
    37c42c095loc_37c42c095:
    37c42c095mov r8l, 67
    37c42c09b
    37c42c09bloc_37c42c09b:
    37c42c09bmov r9, [rsp+176]
    37c42c0a3lea rax, [rcx-1]
    37c42c0a7xor edx, edx
    37c42c0a9mov r13l, 1
    37c42c0afdiv r9
    37c42c0b2mov [rsp+248], r9
    37c42c0bamov rbp, rax
    37c42c0bd
    37c42c0bdloc_37c42c0bd:
    37c42c0bdmov rdx, [rsp+440]
    37c42c0c5shl r10, 4
    37c42c0c9mov rax, [rsp+480]
    37c42c0d1mov [rsp+400], rdi
    37c42c0d9mov [rsp+416], rbx
    37c42c0e1mov rdi, [rsp+448]
    37c42c0e9movapd x6, x0
    37c42c0edlea r12, [rip+0x48994]
    37c42c0f4sub rdx, 16
    37c42c0f8add rax, r10
    37c42c0fbmov [rsp+424], rsi
    37c42c103mov rsi, [rsp+176]
    37c42c10bmov [rsp+184], rdx
    37c42c113lea rdx, [rsp+264]
    37c42c11bmov rbx, rax
    37c42c11emov [rsp+168], rdx
    37c42c126mov rdx, [rsp+456]
    37c42c12emov [rsp+240], r15
    37c42c136mov r15, r13
    37c42c139mov r13, [rsp+432]
    37c42c141sub rdx, 16
    37c42c145mov [rsp+263], r8b
    37c42c14dmov [rsp+192], rdx
    37c42c155lea rdx, [rsp+263]
    37c42c15dmov [rsp+200], rdx
    37c42c165lea rdx, [rsp+272]
    37c42c16dmov [rsp+208], rdx
    37c42c175lea rdx, [rsp+288]
    37c42c17dmov [rsp+224], rdx
    37c42c185lea rdx, [rsp+280]
    37c42c18dmov [rsp+216], rdx
    37c42c195mov [rsp+232], r14
    37c42c19dmov [rsp+176], r11
    37c42c1a5jmp 0x37c42c2a6
    37c42c1aa
    37c42c1aa 66 0f 1f 44 00 00 f..D..
    37c42c1b0
    37c42c1b0loc_37c42c1b0:
    37c42c1b0mov r10, [rsp+416]
    37c42c1b8mov rax, [r10]
    37c42c1bbadd rax, r15
    37c42c1besub rax, rcx
    37c42c1c1lea rax, [rdx+rax-1]
    37c42c1c6mov [rsp+280], rax
    37c42c1ce
    37c42c1celoc_37c42c1ce:
    37c42c1cemov rax, [rsp+208]
    37c42c1d6mov [rsp+80], r12
    37c42c1dblea r9, [rip+0x48896]
    37c42c1e2lea r8, [rip+0x48896]
    37c42c1e9mov [rsp+72], rbx
    37c42c1eemov rdx, [rsp+200]
    37c42c1f6mov [rsp+112], rax
    37c42c1fbmov rax, [rsp+480]
    37c42c203mov [rsp+64], rdi
    37c42c208mov rcx, [rsp+400]
    37c42c210mov [rsp+104], rax
    37c42c215mov rax, [rsp+472]
    37c42c21dmov [rsp+56], r14
    37c42c222mov [rsp+96], rax
    37c42c227mov rax, [rsp+464]
    37c42c22fmov [rsp+144], 7
    37c42c23bmov [rsp+88], rax
    37c42c240mov rax, [rsp+168]
    37c42c248mov [rsp+136], 8
    37c42c254mov [rsp+48], rax
    37c42c259mov rax, [rsp+224]
    37c42c261mov [rsp+128], 1
    37c42c26dmov [rsp+40], rax
    37c42c272mov rax, [rsp+216]
    37c42c27amov [rsp+120], 1
    37c42c283mov [rsp+32], rax
    37c42c288call zlarfb_64_
    37c42c28dtest rbp, rbp
    37c42c290je 0x37c42c510
    37c42c296mov rcx, [r13]
    37c42c29aadd r15, [rsp+248]
    37c42c2a2sub rbp, 1
    37c42c2a6
    37c42c2a6loc_37c42c2a6:
    37c42c2a6mov rax, rcx
    37c42c2a9mov [rsp+64], r12
    37c42c2aemov rdx, [rsp+232]
    37c42c2b6sub rax, r15
    37c42c2b9mov [rsp+56], rbx
    37c42c2bemov r9, [rsp+168]
    37c42c2c6add rax, 1
    37c42c2camov [rsp+40], rdi
    37c42c2cfmov r8, [rsp+176]
    37c42c2d7mov [rsp+80], 7
    37c42c2e0cmp rax, rsi
    37c42c2e3mov [rsp+72], 8
    37c42c2eccmovg rax, rsi
    37c42c2f0sub rdx, rcx
    37c42c2f3mov rcx, [rsp+184]
    37c42c2fbadd rdx, r15
    37c42c2femov [rsp+264], rax
    37c42c306lea rax, [rax+rdx-1]
    37c42c30blea rdx, [rip+0x48766]
    37c42c312mov [rsp+296], rax
    37c42c31amov rax, r15
    37c42c31dshl rax, 4
    37c42c321lea r14, [rcx+rax]
    37c42c325add rax, [rsp+192]
    37c42c32dlea rcx, [rip+0x4874b]
    37c42c334mov [rsp+48], rax
    37c42c339mov [rsp+32], r14
    37c42c33ecall zlarft_64_
    37c42c343mov rcx, [r13]
    37c42c347mov rdx, [rsp+264]
    37c42c34fcmp [rsp+240], 0
    37c42c358jne 0x37c42c1b0
    37c42c35emov r10, [rsp+424]
    37c42c366mov rax, [r10]
    37c42c369add rax, r15
    37c42c36csub rax, rcx
    37c42c36flea rax, [rdx+rax-1]
    37c42c374mov [rsp+288], rax
    37c42c37cjmp 0x37c42c1ce
    37c42c381
    37c42c381 0f 1f 80 00 00 00 00 .......
    37c42c388
    37c42c388loc_37c42c388:
    37c42c388lea r11, [rsp+296]
    37c42c390
    37c42c390loc_37c42c390:
    37c42c390mov [rsp+88], r11
    37c42c395mov r9, rsi
    37c42c398mov r8, rbx
    37c42c39bmov rdx, rbp
    37c42c39emov rax, [rsp+480]
    37c42c3a6mov rcx, rdi
    37c42c3a9mov [rsp+104], 1
    37c42c3b2mov [rsp+96], 1
    37c42c3bbmov [rsp+80], rax
    37c42c3c0mov rax, [rsp+472]
    37c42c3c8movsd_xmm [rsp+168], x0
    37c42c3d1mov [rsp+72], rax
    37c42c3d6mov rax, [rsp+464]
    37c42c3demov [rsp+64], rax
    37c42c3e3mov rax, [rsp+456]
    37c42c3ebmov [rsp+56], rax
    37c42c3f0mov rax, [rsp+448]
    37c42c3f8mov [rsp+48], rax
    37c42c3fdmov rax, [rsp+440]
    37c42c405mov [rsp+40], rax
    37c42c40amov rax, [rsp+432]
    37c42c412mov [rsp+32], rax
    37c42c417call zunmr2_64_
    37c42c41cmovsd_xmm x0, [rsp+168]
    37c42c425
    37c42c425loc_37c42c425:
    37c42c425mov rax, [rsp+480]
    37c42c42dmov [rax+8], 0
    37c42c435movsd_xmm [rax], x0
    37c42c439jmp 0x37c42be8a
    37c42c43e
    37c42c43e 66 90 f.
    37c42c440
    37c42c440loc_37c42c440:
    37c42c440mov [rsp+40], rbp
    37c42c445lea r11, [rsp+296]
    37c42c44dmov r9, rdi
    37c42c450mov ecx, 2
    37c42c455mov [rsp+32], 1
    37c42c45emov rdx, r11
    37c42c461mov r8l, 1
    37c42c467mov [rsp+184], r10
    37c42c46fmov [rsp+168], r11
    37c42c477call _gfortran_concat_string
    37c42c47clea rax, [rip+0x485e5]
    37c42c483mov r9, rbx
    37c42c486mov [rsp+64], 2
    37c42c48fmov [rsp+48], rax
    37c42c494mov rax, [rsp+432]
    37c42c49clea rdx, [rip+0x485b1]
    37c42c4a3lea rcx, [rip+0x485b6]
    37c42c4aamov [rsp+32], rsi
    37c42c4afmov r8, [rsp+168]
    37c42c4b7mov [rsp+56], 6
    37c42c4c0mov [rsp+40], rax
    37c42c4c5call ilaenv_64_
    37c42c4camov r10, [rsp+184]
    37c42c4d2pxor x0, x0
    37c42c4d6mov rdx, rax
    37c42c4d9mov eax, 64
    37c42c4decmp rdx, rax
    37c42c4e1cmovle rax, rdx
    37c42c4e5mov rdx, rax
    37c42c4e8mov [rsp+176], rax
    37c42c4f0mov rax, [rsp+496]
    37c42c4f8imul rdx, r10
    37c42c4fcmov rax, [rax]
    37c42c4ffadd rdx, 4160
    37c42c506cvtsi2sd x0, rdx
    37c42c50bjmp 0x37c42bfdf
    37c42c510
    37c42c510loc_37c42c510:
    37c42c510movapd x0, x6
    37c42c514jmp 0x37c42c425
    37c42c519
    37c42c519 0f 1f 80 00 00 00 00 .......
    37c42c520
    37c42c520loc_37c42c520:
    37c42c520sub rax, 4160
    37c42c526mov [rsp+40], rbp
    37c42c52bmov r9, rdi
    37c42c52emov ecx, 2
    37c42c533cqo
    37c42c535mov r8l, 1
    37c42c53bmov [rsp+32], 1
    37c42c544idiv r10
    37c42c547mov [rsp+184], r10
    37c42c54fmov [rsp+168], r11
    37c42c557movsd_xmm [rsp+192], x0
    37c42c560mov rdx, r11
    37c42c563mov [rsp+176], rax
    37c42c56bcall _gfortran_concat_string
    37c42c570lea rcx, [rip+0x484f1]
    37c42c577mov r9, rbx
    37c42c57amov [rsp+64], 2
    37c42c583mov [rsp+48], rcx
    37c42c588mov rcx, [rsp+432]
    37c42c590lea rdx, [rip+0x484bd]
    37c42c597mov [rsp+32], rsi
    37c42c59cmov r8, [rsp+168]
    37c42c5a4mov [rsp+40], rcx
    37c42c5a9lea rcx, [rip+0x484c0]
    37c42c5b0mov [rsp+56], 6
    37c42c5b9call ilaenv_64_
    37c42c5bemov edx, 2
    37c42c5c3mov r11, [rsp+168]
    37c42c5cbmov r10, [rsp+184]
    37c42c5d3movsd_xmm x0, [rsp+192]
    37c42c5dccmp rax, rdx
    37c42c5dfcmovl rax, rdx
    37c42c5e3cmp [rsp+176], rax
    37c42c5ebjl 0x37c42c390
    37c42c5f1mov rax, [rsp+432]
    37c42c5f9mov rcx, [rax]
    37c42c5fccmp rcx, [rsp+176]
    37c42c604jle 0x37c42c390
    37c42c60ajmp 0x37c42c066
    37c42c60f
    37c42c60f 90 .
    37c42c610
    37c42c610loc_37c42c610:
    37c42c610mov rdx, -10
    37c42c617mov eax, 10
    37c42c61cjmp 0x37c42be5c
    37c42c621
    37c42c621 0f 1f 80 00 00 00 00 .......
    37c42c628
    37c42c628loc_37c42c628:
    37c42c628mov r9, [rsp+176]
    37c42c630lea rax, [rcx-1]
    37c42c634cqo
    37c42c636idiv r9
    37c42c639lea rax, [rcx-1]
    37c42c63dneg r9
    37c42c640mov [rsp+248], r9
    37c42c648sub rax, rdx
    37c42c64blea r13, [rax+1]
    37c42c64ftest r15, r15
    37c42c652je 0x37c42c69f
    37c42c654mov rdx, [rsi]
    37c42c657mov r8l, 67
    37c42c65dmov [rsp+288], rdx
    37c42c665
    37c42c665loc_37c42c665:
    37c42c665xor edx, edx
    37c42c667div [rsp+176]
    37c42c66fmov rbp, rax
    37c42c672jmp 0x37c42c0bd
    37c42c677
    37c42c677 66 0f 1f 84 00 00 00 00 00 f........
    37c42c680
    37c42c680loc_37c42c680:
    37c42c680mov rax, [rbx]
    37c42c683mov [rsp+280], rax
    37c42c68btest r12, r12
    37c42c68ejne 0x37c42c095
    37c42c694
    37c42c694loc_37c42c694:
    37c42c694mov r8l, 78
    37c42c69ajmp 0x37c42c09b
    37c42c69f
    37c42c69floc_37c42c69f:
    37c42c69fmov rdx, [rbx]
    37c42c6a2mov r8l, 78
    37c42c6a8mov [rsp+280], rdx
    37c42c6b0jmp 0x37c42c665
    37c42c6b2
    37c42c6b2loc_37c42c6b2:
    37c42c6b2mov rax, [rax]
    37c42c6b5test rax, rax
    37c42c6b8jne 0x37c42c6e2
    37c42c6batest rdx, rdx
    37c42c6bdjne 0x37c42bfc9
    37c42c6c3mov rax, [rsp+480]
    37c42c6cbmov rsi, [rip+0x483be]
    37c42c6d2mov [rax+8], 0
    37c42c6damov [rax], rsi
    37c42c6ddjmp 0x37c42be8a
    37c42c6e2
    37c42c6e2loc_37c42c6e2:
    37c42c6e2neg rax
    37c42c6e5jmp 0x37c42be67
    37c42bd30
    37c42c6ea
    37c42c6ea // align 0x10
    37c42c6f0
    37c42c6f0zunmrz_64_:
    37c42c6f0push r15
    37c42c6f2push r14
    37c42c6f4push r13
    37c42c6f6push r12
    37c42c6f8push rbp
    37c42c6f9push rdi
    37c42c6fapush rsi
    37c42c6fbpush rbx
    37c42c6fcsub rsp, 328
    37c42c703movups [rsp+304], x6
    37c42c70bmov rax, [rsp+456]
    37c42c713mov rax, [rax]
    37c42c716mov rdi, rdx
    37c42c719mov rbx, r8
    37c42c71cmov rsi, r9
    37c42c71fmov r8l, 1
    37c42c725mov r9l, 1
    37c42c72bmov [rsp+168], rax
    37c42c733lea rdx, [rip+0x48366]
    37c42c73amov r14, rcx
    37c42c73dmov rax, [rsp+480]
    37c42c745mov rax, [rax]
    37c42c748mov [rsp+176], rax
    37c42c750mov rax, [rsp+504]
    37c42c758mov [rax], 0
    37c42c75fcall lsame_64_
    37c42c764mov r9l, 1
    37c42c76amov r8l, 1
    37c42c770mov rcx, rdi
    37c42c773lea rdx, [rip+0x48327]
    37c42c77amov r15, rax
    37c42c77dcall lsame_64_
    37c42c782mov r10, [rsi]
    37c42c785mov rbp, [rbx]
    37c42c788mov r12, rax
    37c42c78bmov rax, [rsp+496]
    37c42c793mov r13, [rax]
    37c42c796test r15, r15
    37c42c799je 0x37c42c7f8
    37c42c79btest r10, r10
    37c42c79emov eax, 1
    37c42c7a3cmovg rax, r10
    37c42c7a7mov [rsp+160], rax
    37c42c7aftest r12, r12
    37c42c7b2je 0x37c42c8b5
    37c42c7b8
    37c42c7b8loc_37c42c7b8:
    37c42c7b8mov rdx, [rbx]
    37c42c7bbtest rdx, rdx
    37c42c7bejs 0x37c42c830
    37c42c7c0mov rcx, [rsi]
    37c42c7c3test rcx, rcx
    37c42c7c6js 0x37c42c8f0
    37c42c7ccmov rax, [rsp+432]
    37c42c7d4mov rax, [rax]
    37c42c7d7test rax, rax
    37c42c7dajs 0x37c42c7e5
    37c42c7dccmp rax, rbp
    37c42c7dfjle 0x37c42c908
    37c42c7e5
    37c42c7e5loc_37c42c7e5:
    37c42c7e5mov rdx, -5
    37c42c7ecmov eax, 5
    37c42c7f1jmp 0x37c42c83c
    37c42c7f3
    37c42c7f3 0f 1f 44 00 00 ..D..
    37c42c7f8
    37c42c7f8loc_37c42c7f8:
    37c42c7f8mov r9l, 1
    37c42c7femov r8l, 1
    37c42c804mov rcx, r14
    37c42c807mov [rsp+184], r10
    37c42c80flea rdx, [rip+0x4828c]
    37c42c816call lsame_64_
    37c42c81btest rax, rax
    37c42c81ejne 0x37c42c890
    37c42c820mov rdx, -1
    37c42c827mov eax, 1
    37c42c82cjmp 0x37c42c83c
    37c42c82e
    37c42c82e 66 90 f.
    37c42c830
    37c42c830loc_37c42c830:
    37c42c830mov rdx, -3
    37c42c837mov eax, 3
    37c42c83c
    37c42c83cloc_37c42c83c:
    37c42c83cmov rdi, [rsp+504]
    37c42c844mov [rdi], rdx
    37c42c847
    37c42c847loc_37c42c847:
    37c42c847lea rdx, [rsp+296]
    37c42c84fmov r8l, 6
    37c42c855lea rcx, [rip+0x48264]
    37c42c85cmov [rsp+296], rax
    37c42c864call xerbla_64_
    37c42c869nop
    37c42c86a
    37c42c86aloc_37c42c86a:
    37c42c86amovups x6, [rsp+304]
    37c42c872add rsp, 328
    37c42c879pop rbx
    37c42c87apop rsi
    37c42c87bpop rdi
    37c42c87cpop rbp
    37c42c87dpop r12
    37c42c87fpop r13
    37c42c881pop r14
    37c42c883pop r15
    37c42c885ret
    37c42c886
    37c42c886 66 2e 0f 1f 84 00 00 00 00 00 f.........
    37c42c890
    37c42c890loc_37c42c890:
    37c42c890test rbp, rbp
    37c42c893mov eax, 1
    37c42c898cmovg rax, rbp
    37c42c89cmov rbp, [rsp+184]
    37c42c8a4mov [rsp+160], rax
    37c42c8actest r12, r12
    37c42c8afjne 0x37c42c7b8
    37c42c8b5
    37c42c8b5loc_37c42c8b5:
    37c42c8b5mov r9l, 1
    37c42c8bbmov r8l, 1
    37c42c8c1lea rdx, [rip+0x481db]
    37c42c8c8mov rcx, rdi
    37c42c8cbcall lsame_64_
    37c42c8d0test rax, rax
    37c42c8d3jne 0x37c42c7b8
    37c42c8d9mov rdx, -2
    37c42c8e0mov eax, 2
    37c42c8e5jmp 0x37c42c83c
    37c42c8ea
    37c42c8ea 66 0f 1f 44 00 00 f..D..
    37c42c8f0
    37c42c8f0loc_37c42c8f0:
    37c42c8f0mov rdx, -4
    37c42c8f7mov eax, 4
    37c42c8fcjmp 0x37c42c83c
    37c42c901
    37c42c901 0f 1f 80 00 00 00 00 .......
    37c42c908
    37c42c908loc_37c42c908:
    37c42c908mov r11, [rsp+440]
    37c42c910mov r8, [r11]
    37c42c913test r8, r8
    37c42c916js 0x37c42c9a5
    37c42c91ctest r15, r15
    37c42c91fje 0x37c42c9a0
    37c42c921cmp rdx, r8
    37c42c924jl 0x37c42c9a5
    37c42c926
    37c42c926loc_37c42c926:
    37c42c926mov r11, [rsp+456]
    37c42c92etest rax, rax
    37c42c931mov r8l, 1
    37c42c937cmovle rax, r8
    37c42c93bcmp [r11], rax
    37c42c93ejl 0x37c42d160
    37c42c944mov r11, [rsp+480]
    37c42c94ctest rdx, rdx
    37c42c94fmov eax, 1
    37c42c954cmovg rax, rdx
    37c42c958cmp [r11], rax
    37c42c95bjl 0x37c42d171
    37c42c961mov rax, [rsp+496]
    37c42c969mov r11, [rsp+160]
    37c42c971cmp [rax], r11
    37c42c974mov rax, [rsp+504]
    37c42c97cjge 0x37c42c9b6
    37c42c97ecmp r13, -1
    37c42c982je 0x37c42d182
    37c42c988mov [rax], -13
    37c42c98fmov eax, 13
    37c42c994jmp 0x37c42c847
    37c42c999
    37c42c999 0f 1f 80 00 00 00 00 .......
    37c42c9a0
    37c42c9a0loc_37c42c9a0:
    37c42c9a0cmp rcx, r8
    37c42c9a3jge 0x37c42c926
    37c42c9a5
    37c42c9a5loc_37c42c9a5:
    37c42c9a5mov rdx, -6
    37c42c9acmov eax, 6
    37c42c9b1jmp 0x37c42c83c
    37c42c9b6
    37c42c9b6loc_37c42c9b6:
    37c42c9b6mov rax, [rax]
    37c42c9b9test rax, rax
    37c42c9bcjne 0x37c42d1b2
    37c42c9c2test rdx, rdx
    37c42c9c5je 0x37c42c9d0
    37c42c9c7
    37c42c9c7loc_37c42c9c7:
    37c42c9c7test rcx, rcx
    37c42c9cajne 0x37c42cf68
    37c42c9d0
    37c42c9d0loc_37c42c9d0:
    37c42c9d0movsd_xmm x0, [rip+0x48110]
    37c42c9d8mov r10l, 1
    37c42c9de
    37c42c9deloc_37c42c9de:
    37c42c9demov rdx, [rsp+488]
    37c42c9e6mov [rdx+8], 0
    37c42c9eemovsd_xmm [rdx], x0
    37c42c9f2test rax, rax
    37c42c9f5jne 0x37c42d1b2
    37c42c9fbcmp r13, -1
    37c42c9ffje 0x37c42c86a
    37c42ca05cmp [rbx], 0
    37c42ca09je 0x37c42c86a
    37c42ca0fcmp [rsi], 0
    37c42ca13je 0x37c42c86a
    37c42ca19mov [rsp+40], rdi
    37c42ca1elea rbp, [rsp+296]
    37c42ca26mov r9, r14
    37c42ca29mov ecx, 2
    37c42ca2emov [rsp+32], 1
    37c42ca37mov r8l, 1
    37c42ca3dmov rdx, rbp
    37c42ca40movsd_xmm [rsp+192], x0
    37c42ca49mov [rsp+200], r10
    37c42ca51mov [rsp+184], rbp
    37c42ca59call _gfortran_concat_string
    37c42ca5emov [rsp+32], rsi
    37c42ca63mov r9, rbx
    37c42ca66mov r8, rbp
    37c42ca69lea rax, [rip+0x48048]
    37c42ca70lea rcx, [rip+0x48039]
    37c42ca77mov [rsp+64], 2
    37c42ca80mov [rsp+48], rax
    37c42ca85mov rax, [rsp+432]
    37c42ca8dlea rdx, [rip+0x48010]
    37c42ca94mov [rsp+56], 6
    37c42ca9dmov [rsp+40], rax
    37c42caa2call ilaenv_64_
    37c42caa7mov r11l, 64
    37c42caadmov rcx, [rsp+160]
    37c42cab5movsd_xmm x0, [rsp+192]
    37c42cabecmp rax, r11
    37c42cac1cmovle r11, rax
    37c42cac5cmp rax, 1
    37c42cac9mov [rsp+280], rcx
    37c42cad1jle 0x37c42ce78
    37c42cad7mov rax, [rsp+432]
    37c42cadfmov rcx, [rax]
    37c42cae2mov rdx, rcx
    37c42cae5cmp rcx, r11
    37c42cae8jle 0x37c42cea0
    37c42caeemov rax, [rsp+496]
    37c42caf6mov rax, [rax]
    37c42caf9cmp rax, [rsp+200]
    37c42cb01jl 0x37c42d0a0
    37c42cb07
    37c42cb07loc_37c42cb07:
    37c42cb07cmp r15, r12
    37c42cb0aje 0x37c42d070
    37c42cb10mov rbp, rcx
    37c42cb13mov r8, r11
    37c42cb16mov r10l, 1
    37c42cb1cmov r13l, 1
    37c42cb22
    37c42cb22loc_37c42cb22:
    37c42cb22mov rdi, [rsp+440]
    37c42cb2amov r9, [rbx]
    37c42cb2dmov rax, [rsi]
    37c42cb30mov rdi, [rdi]
    37c42cb33test r15, r15
    37c42cb36je 0x37c42d030
    37c42cb3cmov [rsp+296], rax
    37c42cb44sub r9, rdi
    37c42cb47add r9, 1
    37c42cb4b
    37c42cb4bloc_37c42cb4b:
    37c42cb4bcmp r12, 1
    37c42cb4fsbb eax, eax
    37c42cb51and eax, 11
    37c42cb54add eax, 67
    37c42cb57mov [rsp+263], al
    37c42cb5etest r8, r8
    37c42cb61js 0x37c42d048
    37c42cb67cmp r13, rdx
    37c42cb6ajg 0x37c42cf4a
    37c42cb70sub rbp, r10
    37c42cb73xor edx, edx
    37c42cb75mov rax, rbp
    37c42cb78div r8
    37c42cb7bmov rbp, rax
    37c42cb7e
    37c42cb7eloc_37c42cb7e:
    37c42cb7emov rdi, [rsp+168]
    37c42cb86xor eax, eax
    37c42cb88mov r10, [rsp+464]
    37c42cb90mov [rsp+400], r14
    37c42cb98mov [rsp+416], rbx
    37c42cba0movapd x6, x0
    37c42cba4mov rbx, r11
    37c42cba7mov r14, [rsp+456]
    37c42cbaftest rdi, rdi
    37c42cbb2mov [rsp+248], r15
    37c42cbbalea r12, [rip+0x47f1f]
    37c42cbc1lea r15, [rsp+264]
    37c42cbc9cmovns rax, rdi
    37c42cbcdmov rdi, [rsp+176]
    37c42cbd5xor edx, edx
    37c42cbd7mov [rsp+168], 1
    37c42cbe3mov [rsp+232], r8
    37c42cbebtest rdi, rdi
    37c42cbeemov [rsp+424], rsi
    37c42cbf6cmovns rdx, rdi
    37c42cbfaimul r9, rax
    37c42cbfesub r10, 16
    37c42cc02not rax
    37c42cc05mov [rsp+224], r10
    37c42cc0dlea r10, [rsp+263]
    37c42cc15mov rdi, rdx
    37c42cc18mov [rsp+200], r10
    37c42cc20lea r10, [rsp+280]
    37c42cc28not rdi
    37c42cc2badd r9, rax
    37c42cc2emov [rsp+208], r10
    37c42cc36lea r10, [rsp+288]
    37c42cc3emov [rsp+176], rdi
    37c42cc46mov rdi, [rsp+160]
    37c42cc4eshl r9, 4
    37c42cc52add r9, [rsp+448]
    37c42cc5amov [rsp+216], r10
    37c42cc62imul rdi, r11
    37c42cc66mov [rsp+192], r9
    37c42cc6emov [rsp+160], 1
    37c42cc7amov [rsp+240], rdx
    37c42cc82shl rdi, 4
    37c42cc86add rdi, [rsp+488]
    37c42cc8ejmp 0x37c42cdc3
    37c42cc93
    37c42cc93 0f 1f 44 00 00 ..D..
    37c42cc98
    37c42cc98loc_37c42cc98:
    37c42cc98mov rax, [rsp+416]
    37c42cca0mov [rsp+160], r13
    37c42cca8mov rax, [rax]
    37c42ccabsub rax, r13
    37c42ccaeadd rax, 1
    37c42ccb2mov [rsp+288], rax
    37c42ccba
    37c42ccbaloc_37c42ccba:
    37c42ccbamov rax, [rsp+208]
    37c42ccc2mov [rsp+48], r15
    37c42ccc7lea r9, [rip+0x47e02]
    37c42cccelea r8, [rip+0x47e02]
    37c42ccd5mov rdx, [rsp+200]
    37c42ccddmov rcx, [rsp+400]
    37c42cce5mov [rsp+152], 7
    37c42ccf1mov [rsp+120], rax
    37c42ccf6mov rax, [rsp+488]
    37c42ccfemov [rsp+144], 8
    37c42cd0amov [rsp+112], rax
    37c42cd0fmov rax, [rsp+480]
    37c42cd17mov [rsp+136], 1
    37c42cd23mov [rsp+104], rax
    37c42cd28mov rax, [rsp+168]
    37c42cd30imul rax, [rsp+240]
    37c42cd39add rax, [rsp+176]
    37c42cd41mov [rsp+88], r12
    37c42cd46add rax, [rsp+160]
    37c42cd4emov [rsp+80], rdi
    37c42cd53shl rax, 4
    37c42cd57add rax, [rsp+472]
    37c42cd5fmov [rsp+72], r14
    37c42cd64mov [rsp+96], rax
    37c42cd69mov rax, [rsp+440]
    37c42cd71mov [rsp+128], 1
    37c42cd7dmov [rsp+56], rax
    37c42cd82mov rax, [rsp+184]
    37c42cd8amov [rsp+64], rsi
    37c42cd8fmov [rsp+40], rax
    37c42cd94mov rax, [rsp+216]
    37c42cd9cmov [rsp+32], rax
    37c42cda1call zlarzb_64_
    37c42cda6add r13, [rsp+232]
    37c42cdaesub rbp, 1
    37c42cdb2jb 0x37c42d020
    37c42cdb8mov rax, [rsp+432]
    37c42cdc0mov rcx, [rax]
    37c42cdc3
    37c42cdc3loc_37c42cdc3:
    37c42cdc3sub rcx, r13
    37c42cdc6mov rax, r13
    37c42cdc9mov [rsp+64], r12
    37c42cdcemov r9, r15
    37c42cdd1add rcx, 1
    37c42cdd5mov [rsp+56], rdi
    37c42cddamov rsi, [rsp+192]
    37c42cde2lea rdx, [rip+0x47ce7]
    37c42cde9cmp rcx, rbx
    37c42cdecmov [rsp+40], r14
    37c42cdf1mov r8, [rsp+440]
    37c42cdf9mov [rsp+80], 7
    37c42ce02cmovg rcx, rbx
    37c42ce06shl rax, 4
    37c42ce0amov [rsp+72], 8
    37c42ce13add rsi, rax
    37c42ce16add rax, [rsp+224]
    37c42ce1emov [rsp+48], rax
    37c42ce23mov [rsp+32], rsi
    37c42ce28mov [rsp+264], rcx
    37c42ce30lea rcx, [rip+0x47ca0]
    37c42ce37call zlarzt_64_
    37c42ce3ccmp [rsp+248], 0
    37c42ce45jne 0x37c42cc98
    37c42ce4bmov rax, [rsp+424]
    37c42ce53mov [rsp+168], r13
    37c42ce5bmov rax, [rax]
    37c42ce5esub rax, r13
    37c42ce61add rax, 1
    37c42ce65mov [rsp+296], rax
    37c42ce6djmp 0x37c42ccba
    37c42ce72
    37c42ce72 66 0f 1f 44 00 00 f..D..
    37c42ce78
    37c42ce78loc_37c42ce78:
    37c42ce78mov eax, 2
    37c42ce7d
    37c42ce7dloc_37c42ce7d:
    37c42ce7dcmp r11, rax
    37c42ce80jl 0x37c42cea0
    37c42ce82mov rax, [rsp+432]
    37c42ce8amov rcx, [rax]
    37c42ce8dmov rdx, rcx
    37c42ce90cmp rcx, r11
    37c42ce93jg 0x37c42cb07
    37c42ce99nop [rax]
    37c42cea0
    37c42cea0loc_37c42cea0:
    37c42cea0mov r9, rsi
    37c42cea3mov r8, rbx
    37c42cea6mov rdx, rdi
    37c42cea9mov rcx, r14
    37c42ceaclea rax, [rsp+272]
    37c42ceb4mov [rsp+112], 1
    37c42cebdmov [rsp+96], rax
    37c42cec2mov rax, [rsp+488]
    37c42cecamov [rsp+104], 1
    37c42ced3mov [rsp+88], rax
    37c42ced8mov rax, [rsp+480]
    37c42cee0movsd_xmm [rsp+160], x0
    37c42cee9mov [rsp+80], rax
    37c42ceeemov rax, [rsp+472]
    37c42cef6mov [rsp+72], rax
    37c42cefbmov rax, [rsp+464]
    37c42cf03mov [rsp+64], rax
    37c42cf08mov rax, [rsp+456]
    37c42cf10mov [rsp+56], rax
    37c42cf15mov rax, [rsp+448]
    37c42cf1dmov [rsp+48], rax
    37c42cf22mov rax, [rsp+440]
    37c42cf2amov [rsp+40], rax
    37c42cf2fmov rax, [rsp+432]
    37c42cf37mov [rsp+32], rax
    37c42cf3ccall zunmr3_64_
    37c42cf41movsd_xmm x0, [rsp+160]
    37c42cf4a
    37c42cf4aloc_37c42cf4a:
    37c42cf4amov rax, [rsp+488]
    37c42cf52mov [rax+8], 0
    37c42cf5amovsd_xmm [rax], x0
    37c42cf5ejmp 0x37c42c86a
    37c42cf63
    37c42cf63 0f 1f 44 00 00 ..D..
    37c42cf68
    37c42cf68loc_37c42cf68:
    37c42cf68mov [rsp+40], rdi
    37c42cf6dlea rax, [rsp+296]
    37c42cf75mov r9, r14
    37c42cf78mov ecx, 2
    37c42cf7dmov [rsp+32], 1
    37c42cf86mov rdx, rax
    37c42cf89mov r8l, 1
    37c42cf8fmov [rsp+184], rax
    37c42cf97call _gfortran_concat_string
    37c42cf9clea rax, [rip+0x47b15]
    37c42cfa3mov r9, rbx
    37c42cfa6mov [rsp+64], 2
    37c42cfafmov [rsp+48], rax
    37c42cfb4mov rax, [rsp+432]
    37c42cfbclea rdx, [rip+0x47ae1]
    37c42cfc3lea rcx, [rip+0x47ae6]
    37c42cfcamov [rsp+32], rsi
    37c42cfcfmov r8, [rsp+184]
    37c42cfd7mov [rsp+56], 6
    37c42cfe0mov [rsp+40], rax
    37c42cfe5call ilaenv_64_
    37c42cfeamov edx, 64
    37c42cfefpxor x0, x0
    37c42cff3cmp rax, rdx
    37c42cff6cmovg rax, rdx
    37c42cffaimul rax, [rsp+160]
    37c42d003lea r10, [rax+4160]
    37c42d00amov rax, [rsp+504]
    37c42d012cvtsi2sd x0, r10
    37c42d017mov rax, [rax]
    37c42d01ajmp 0x37c42c9de
    37c42d01f
    37c42d01f 90 .
    37c42d020
    37c42d020loc_37c42d020:
    37c42d020movapd x0, x6
    37c42d024jmp 0x37c42cf4a
    37c42d029
    37c42d029 0f 1f 80 00 00 00 00 .......
    37c42d030
    37c42d030loc_37c42d030:
    37c42d030sub rax, rdi
    37c42d033mov [rsp+288], r9
    37c42d03blea r9, [rax+1]
    37c42d03fjmp 0x37c42cb4b
    37c42d044
    37c42d044 0f 1f 40 00 ..@.
    37c42d048
    37c42d048loc_37c42d048:
    37c42d048cmp r13, rdx
    37c42d04bjl 0x37c42cf4a
    37c42d051mov rax, r10
    37c42d054mov r10, r8
    37c42d057xor edx, edx
    37c42d059sub rax, rbp
    37c42d05cneg r10
    37c42d05fdiv r10
    37c42d062mov rbp, rax
    37c42d065jmp 0x37c42cb7e
    37c42d06a
    37c42d06a 66 0f 1f 44 00 00 f..D..
    37c42d070
    37c42d070loc_37c42d070:
    37c42d070lea r10, [rcx-1]
    37c42d074mov r8, r11
    37c42d077mov ebp, 1
    37c42d07cmov rax, r10
    37c42d07fneg r8
    37c42d082cqo
    37c42d084idiv r11
    37c42d087sub r10, rdx
    37c42d08amov edx, 1
    37c42d08flea r13, [r10+1]
    37c42d093mov r10, r13
    37c42d096jmp 0x37c42cb22
    37c42d09b
    37c42d09b 0f 1f 44 00 00 ..D..
    37c42d0a0
    37c42d0a0loc_37c42d0a0:
    37c42d0a0sub rax, 4160
    37c42d0a6mov [rsp+40], rdi
    37c42d0abmov rbp, [rsp+184]
    37c42d0b3mov r9, r14
    37c42d0b6cqo
    37c42d0b8mov r8l, 1
    37c42d0bemov ecx, 2
    37c42d0c3mov [rsp+32], 1
    37c42d0ccidiv [rsp+160]
    37c42d0d4movsd_xmm [rsp+200], x0
    37c42d0ddmov rdx, rbp
    37c42d0e0mov [rsp+192], rax
    37c42d0e8call _gfortran_concat_string
    37c42d0edmov [rsp+32], rsi
    37c42d0f2mov r9, rbx
    37c42d0f5mov r8, rbp
    37c42d0f8lea rax, [rip+0x479b9]
    37c42d0fflea rdx, [rip+0x4799e]
    37c42d106mov [rsp+64], 2
    37c42d10fmov [rsp+48], rax
    37c42d114mov rax, [rsp+432]
    37c42d11clea rcx, [rip+0x479a5]
    37c42d123mov [rsp+56], 6
    37c42d12cmov [rsp+40], rax
    37c42d131call ilaenv_64_
    37c42d136mov edx, 2
    37c42d13bmov r11, [rsp+192]
    37c42d143movsd_xmm x0, [rsp+200]
    37c42d14ccmp rax, rdx
    37c42d14fcmovl rax, rdx
    37c42d153jmp 0x37c42ce7d
    37c42d158
    37c42d158 0f 1f 84 00 00 00 00 00 ........
    37c42d160
    37c42d160loc_37c42d160:
    37c42d160mov rdx, -8
    37c42d167mov eax, 8
    37c42d16cjmp 0x37c42c83c
    37c42d171
    37c42d171loc_37c42d171:
    37c42d171mov rdx, -11
    37c42d178mov eax, 11
    37c42d17djmp 0x37c42c83c
    37c42d182
    37c42d182loc_37c42d182:
    37c42d182mov rax, [rax]
    37c42d185test rax, rax
    37c42d188jne 0x37c42d1b2
    37c42d18atest rdx, rdx
    37c42d18djne 0x37c42c9c7
    37c42d193mov rax, [rsp+488]
    37c42d19bmov rbx, [rip+0x47946]
    37c42d1a2mov [rax+8], 0
    37c42d1aamov [rax], rbx
    37c42d1adjmp 0x37c42c86a
    37c42d1b2
    37c42d1b2loc_37c42d1b2:
    37c42d1b2neg rax
    37c42d1b5jmp 0x37c42c847
    37c42c6f0
    37c42d1ba
    37c42d1ba // align 0x10
    37c42d1c0
    37c42d1c0zunmtr_64_:
    37c42d1c0push r15
    37c42d1c2push r14
    37c42d1c4push r13
    37c42d1c6push r12
    37c42d1c8push rbp
    37c42d1c9push rdi
    37c42d1capush rsi
    37c42d1cbpush rbx
    37c42d1ccsub rsp, 216
    37c42d1d3mov rax, [rsp+360]
    37c42d1dbmov rax, [rax]
    37c42d1demov rbp, rdx
    37c42d1e1mov rbx, r9
    37c42d1e4lea rdx, [rip+0x47905]
    37c42d1ebmov rdi, r8
    37c42d1eemov r9l, 1
    37c42d1f4mov [rsp+144], rax
    37c42d1fcmov r8l, 1
    37c42d202mov rsi, rcx
    37c42d205mov rax, [rsp+336]
    37c42d20dmov rax, [rax]
    37c42d210mov [rsp+152], rax
    37c42d218mov rax, [rsp+384]
    37c42d220mov [rax], 0
    37c42d227call lsame_64_
    37c42d22cmov r9l, 1
    37c42d232mov r8l, 1
    37c42d238mov rcx, rbp
    37c42d23blea rdx, [rip+0x478af]
    37c42d242mov r13, rax
    37c42d245call lsame_64_
    37c42d24amov r12, [rbx]
    37c42d24dmov r14, rax
    37c42d250mov rax, [rsp+376]
    37c42d258mov r15, [rax]
    37c42d25bmov rax, [rsp+320]
    37c42d263mov r10, [rax]
    37c42d266test r13, r13
    37c42d269je 0x37c42d390
    37c42d26ftest r10, r10
    37c42d272mov eax, 1
    37c42d277cmovg rax, r10
    37c42d27bmov [rsp+136], rax
    37c42d283
    37c42d283loc_37c42d283:
    37c42d283test r14, r14
    37c42d286jne 0x37c42d2d0
    37c42d288mov r9l, 1
    37c42d28emov r8l, 1
    37c42d294lea rdx, [rip+0x47855]
    37c42d29bmov rcx, rbp
    37c42d29ecall lsame_64_
    37c42d2a3test rax, rax
    37c42d2a6jne 0x37c42d2d0
    37c42d2a8mov rax, [rsp+384]
    37c42d2b0lea r10, [rsp+200]
    37c42d2b8mov [rax], -2
    37c42d2bfmov rax, -2
    37c42d2c6
    37c42d2c6loc_37c42d2c6:
    37c42d2c6neg rax
    37c42d2c9jmp 0x37c42d427
    37c42d2ce
    37c42d2ce 66 90 f.
    37c42d2d0
    37c42d2d0loc_37c42d2d0:
    37c42d2d0mov r9l, 1
    37c42d2d6mov r8l, 1
    37c42d2dclea rdx, [rip+0x47810]
    37c42d2e3mov rcx, rdi
    37c42d2e6call lsame_64_
    37c42d2ebtest rax, rax
    37c42d2eeje 0x37c42d460
    37c42d2f4
    37c42d2f4loc_37c42d2f4:
    37c42d2f4mov rax, [rbx]
    37c42d2f7test rax, rax
    37c42d2fajs 0x37c42d408
    37c42d300mov rcx, [rsp+320]
    37c42d308cmp [rcx], 0
    37c42d30cjs 0x37c42d498
    37c42d312mov rcx, [rsp+336]
    37c42d31atest r12, r12
    37c42d31dmov edx, 1
    37c42d322cmovg rdx, r12
    37c42d326cmp [rcx], rdx
    37c42d329jl 0x37c42d4b0
    37c42d32fmov rcx, [rsp+360]
    37c42d337test rax, rax
    37c42d33amov edx, 1
    37c42d33fcmovle rax, rdx
    37c42d343cmp [rcx], rax
    37c42d346jl 0x37c42d4c8
    37c42d34cmov rax, [rsp+376]
    37c42d354mov rcx, [rsp+136]
    37c42d35ccmp [rax], rcx
    37c42d35fmov rax, [rsp+384]
    37c42d367jge 0x37c42d4e0
    37c42d36dcmp r15, -1
    37c42d371je 0x37c42d4e0
    37c42d377mov [rax], -12
    37c42d37elea r10, [rsp+200]
    37c42d386mov eax, 12
    37c42d38bjmp 0x37c42d427
    37c42d390
    37c42d390loc_37c42d390:
    37c42d390mov r9l, 1
    37c42d396mov r8l, 1
    37c42d39cmov rcx, rsi
    37c42d39fmov [rsp+136], r10
    37c42d3a7lea rdx, [rip+0x47744]
    37c42d3aecall lsame_64_
    37c42d3b3test rax, rax
    37c42d3b6jne 0x37c42d3e0
    37c42d3b8mov rax, [rsp+384]
    37c42d3c0lea r10, [rsp+200]
    37c42d3c8mov [rax], -1
    37c42d3cfmov rax, -1
    37c42d3d6jmp 0x37c42d2c6
    37c42d3db
    37c42d3db 0f 1f 44 00 00 ..D..
    37c42d3e0
    37c42d3e0loc_37c42d3e0:
    37c42d3e0test r12, r12
    37c42d3e3mov eax, 1
    37c42d3e8cmovg rax, r12
    37c42d3ecmov r12, [rsp+136]
    37c42d3f4mov [rsp+136], rax
    37c42d3fcjmp 0x37c42d283
    37c42d401
    37c42d401 0f 1f 80 00 00 00 00 .......
    37c42d408
    37c42d408loc_37c42d408:
    37c42d408mov rdx, -4
    37c42d40fmov eax, 4
    37c42d414
    37c42d414loc_37c42d414:
    37c42d414mov rdi, [rsp+384]
    37c42d41clea r10, [rsp+200]
    37c42d424mov [rdi], rdx
    37c42d427
    37c42d427loc_37c42d427:
    37c42d427mov r8l, 6
    37c42d42dmov rdx, r10
    37c42d430lea rcx, [rip+0x476df]
    37c42d437mov [rsp+200], rax
    37c42d43fcall xerbla_64_
    37c42d444nop
    37c42d445
    37c42d445loc_37c42d445:
    37c42d445add rsp, 216
    37c42d44cpop rbx
    37c42d44dpop rsi
    37c42d44epop rdi
    37c42d44fpop rbp
    37c42d450pop r12
    37c42d452pop r13
    37c42d454pop r14
    37c42d456pop r15
    37c42d458ret
    37c42d459
    37c42d459 0f 1f 80 00 00 00 00 .......
    37c42d460
    37c42d460loc_37c42d460:
    37c42d460mov r9l, 1
    37c42d466mov r8l, 1
    37c42d46clea rdx, [rip+0x47681]
    37c42d473mov rcx, rdi
    37c42d476call lsame_64_
    37c42d47btest rax, rax
    37c42d47ejne 0x37c42d2f4
    37c42d484mov rdx, -3
    37c42d48bmov eax, 3
    37c42d490jmp 0x37c42d414
    37c42d492
    37c42d492 66 0f 1f 44 00 00 f..D..
    37c42d498
    37c42d498loc_37c42d498:
    37c42d498mov rdx, -5
    37c42d49fmov eax, 5
    37c42d4a4jmp 0x37c42d414
    37c42d4a9
    37c42d4a9 0f 1f 80 00 00 00 00 .......
    37c42d4b0
    37c42d4b0loc_37c42d4b0:
    37c42d4b0mov rdx, -7
    37c42d4b7mov eax, 7
    37c42d4bcjmp 0x37c42d414
    37c42d4c1
    37c42d4c1 0f 1f 80 00 00 00 00 .......
    37c42d4c8
    37c42d4c8loc_37c42d4c8:
    37c42d4c8mov rdx, -10
    37c42d4cfmov eax, 10
    37c42d4d4jmp 0x37c42d414
    37c42d4d9
    37c42d4d9 0f 1f 80 00 00 00 00 .......
    37c42d4e0
    37c42d4e0loc_37c42d4e0:
    37c42d4e0mov rax, [rax]
    37c42d4e3test rax, rax
    37c42d4e6jne 0x37c42da00
    37c42d4eclea rbp, [rsp+184]
    37c42d4f4mov [rsp+40], rdi
    37c42d4f9mov r9, rsi
    37c42d4fcmov ecx, 2
    37c42d501mov [rsp+32], 1
    37c42d50amov r8l, 1
    37c42d510mov rdx, rbp
    37c42d513test r14, r14
    37c42d516je 0x37c42d740
    37c42d51ctest r13, r13
    37c42d51fje 0x37c42d7e8
    37c42d525call _gfortran_concat_string
    37c42d52amov rax, [rbx]
    37c42d52dlea r11, [rsp+192]
    37c42d535lea r10, [rsp+200]
    37c42d53dmov [rsp+64], 2
    37c42d546mov r9, r11
    37c42d549sub rax, 1
    37c42d54dmov [rsp+40], r10
    37c42d552mov [rsp+192], rax
    37c42d55amov [rsp+200], rax
    37c42d562lea rax, [rip+0x4759f]
    37c42d569mov [rsp+48], rax
    37c42d56emov rax, [rsp+320]
    37c42d576mov [rsp+56], 6
    37c42d57fmov [rsp+168], r10
    37c42d587mov [rsp+32], rax
    37c42d58cmov [rsp+160], r11
    37c42d594
    37c42d594loc_37c42d594:
    37c42d594mov r8, rbp
    37c42d597lea rdx, [rip+0x47557]
    37c42d59elea rcx, [rip+0x4755b]
    37c42d5a5call ilaenv_64_
    37c42d5aamov r11, [rsp+160]
    37c42d5b2mov r10, [rsp+168]
    37c42d5ba
    37c42d5baloc_37c42d5ba:
    37c42d5baimul rax, [rsp+136]
    37c42d5c3pxor x0, x0
    37c42d5c7cvtsi2sd x0, rax
    37c42d5ccmov rax, [rsp+368]
    37c42d5d4movsd_xmm [rax], x0
    37c42d5d8mov [rax+8], 0
    37c42d5e0mov rax, [rsp+384]
    37c42d5e8mov rax, [rax]
    37c42d5ebtest rax, rax
    37c42d5eejne 0x37c42d2c6
    37c42d5f4cmp r15, -1
    37c42d5f8je 0x37c42d445
    37c42d5femov rax, [rbx]
    37c42d601test rax, rax
    37c42d604je 0x37c42d720
    37c42d60amov rbx, [rsp+320]
    37c42d612mov rdx, [rbx]
    37c42d615cmp r12, 1
    37c42d619je 0x37c42d720
    37c42d61ftest rdx, rdx
    37c42d622je 0x37c42d720
    37c42d628test r13, r13
    37c42d62bje 0x37c42d900
    37c42d631sub rax, 1
    37c42d635mov [rsp+192], rdx
    37c42d63dmov [rsp+184], rax
    37c42d645mov eax, 16
    37c42d64atest r14, r14
    37c42d64djne 0x37c42d938
    37c42d653
    37c42d653loc_37c42d653:
    37c42d653add rax, [rsp+352]
    37c42d65bsub r12, 1
    37c42d65fmov r9, r11
    37c42d662mov rbx, [rsp+376]
    37c42d66amov [rsp+64], rax
    37c42d66fmov r8, rbp
    37c42d672mov rcx, rsi
    37c42d675mov rax, [rsp+344]
    37c42d67dmov [rsp+88], rbx
    37c42d682mov rbx, [rsp+368]
    37c42d68alea rdx, [rsp+176]
    37c42d692mov [rsp+56], rax
    37c42d697mov rax, [rsp+336]
    37c42d69fmov [rsp+80], rbx
    37c42d6a4mov rbx, [rsp+360]
    37c42d6acmov [rsp+48], rax
    37c42d6b1mov rax, [rsp+328]
    37c42d6b9mov [rsp+96], rdx
    37c42d6bemov rdx, rdi
    37c42d6c1add rax, 16
    37c42d6c5mov [rsp+72], rbx
    37c42d6camov [rsp+112], 1
    37c42d6d3mov [rsp+104], 1
    37c42d6dcmov [rsp+40], rax
    37c42d6e1mov [rsp+32], r10
    37c42d6e6movsd_xmm [rsp+136], x0
    37c42d6efmov [rsp+200], r12
    37c42d6f7call zunmqr_64_
    37c42d6fcmovsd_xmm x0, [rsp+136]
    37c42d705
    37c42d705loc_37c42d705:
    37c42d705mov rax, [rsp+368]
    37c42d70dmov [rax+8], 0
    37c42d715movsd_xmm [rax], x0
    37c42d719jmp 0x37c42d445
    37c42d71e
    37c42d71e 66 90 f.
    37c42d720
    37c42d720loc_37c42d720:
    37c42d720mov rax, [rsp+368]
    37c42d728movq x0, [rip+0x473f0]
    37c42d730movups [rax], x0
    37c42d733jmp 0x37c42d445
    37c42d738
    37c42d738 0f 1f 84 00 00 00 00 00 ........
    37c42d740
    37c42d740loc_37c42d740:
    37c42d740test r13, r13
    37c42d743je 0x37c42d860
    37c42d749call _gfortran_concat_string
    37c42d74emov rax, [rbx]
    37c42d751lea r10, [rsp+200]
    37c42d759mov [rsp+64], 2
    37c42d762mov [rsp+40], r10
    37c42d767lea r11, [rsp+192]
    37c42d76fmov r8, rbp
    37c42d772lea rdx, [rip+0x47397]
    37c42d779sub rax, 1
    37c42d77dmov r9, r11
    37c42d780mov [rsp+56], 6
    37c42d789lea rcx, [rip+0x47370]
    37c42d790mov [rsp+192], rax
    37c42d798mov [rsp+200], rax
    37c42d7a0lea rax, [rip+0x47361]
    37c42d7a7mov [rsp+48], rax
    37c42d7acmov rax, [rsp+320]
    37c42d7b4mov [rsp+168], r10
    37c42d7bcmov [rsp+32], rax
    37c42d7c1mov [rsp+160], r11
    37c42d7c9call ilaenv_64_
    37c42d7cemov r11, [rsp+160]
    37c42d7d6mov r10, [rsp+168]
    37c42d7dejmp 0x37c42d5ba
    37c42d7e3
    37c42d7e3 0f 1f 44 00 00 ..D..
    37c42d7e8
    37c42d7e8loc_37c42d7e8:
    37c42d7e8call _gfortran_concat_string
    37c42d7edmov rax, [rsp+320]
    37c42d7f5lea r10, [rsp+200]
    37c42d7fdmov r9, rbx
    37c42d800lea r11, [rsp+192]
    37c42d808mov [rsp+168], r10
    37c42d810mov rax, [rax]
    37c42d813mov [rsp+160], r11
    37c42d81bmov [rsp+64], 2
    37c42d824sub rax, 1
    37c42d828mov [rsp+40], r10
    37c42d82dmov [rsp+192], rax
    37c42d835mov [rsp+200], rax
    37c42d83dlea rax, [rip+0x472c4]
    37c42d844mov [rsp+56], 6
    37c42d84dmov [rsp+48], rax
    37c42d852mov [rsp+32], r11
    37c42d857jmp 0x37c42d594
    37c42d85c
    37c42d85c 0f 1f 40 00 ..@.
    37c42d860
    37c42d860loc_37c42d860:
    37c42d860call _gfortran_concat_string
    37c42d865mov rax, [rsp+320]
    37c42d86dmov r9, rbx
    37c42d870mov r8, rbp
    37c42d873lea r10, [rsp+200]
    37c42d87blea r11, [rsp+192]
    37c42d883mov rax, [rax]
    37c42d886mov [rsp+40], r10
    37c42d88blea rdx, [rip+0x4727e]
    37c42d892lea rcx, [rip+0x47267]
    37c42d899mov [rsp+32], r11
    37c42d89esub rax, 1
    37c42d8a2mov [rsp+168], r10
    37c42d8aamov [rsp+192], rax
    37c42d8b2mov [rsp+200], rax
    37c42d8balea rax, [rip+0x47247]
    37c42d8c1mov [rsp+64], 2
    37c42d8camov [rsp+56], 6
    37c42d8d3mov [rsp+48], rax
    37c42d8d8mov [rsp+160], r11
    37c42d8e0call ilaenv_64_
    37c42d8e5mov r10, [rsp+168]
    37c42d8edmov r11, [rsp+160]
    37c42d8f5jmp 0x37c42d5ba
    37c42d8fa
    37c42d8fa 66 0f 1f 44 00 00 f..D..
    37c42d900
    37c42d900loc_37c42d900:
    37c42d900sub rdx, 1
    37c42d904mov [rsp+184], rax
    37c42d90cmov [rsp+192], rdx
    37c42d914test r14, r14
    37c42d917jne 0x37c42d938
    37c42d919mov rbx, [rsp+144]
    37c42d921xor eax, eax
    37c42d923test rbx, rbx
    37c42d926cmovns rax, rbx
    37c42d92ashl rax, 4
    37c42d92ejmp 0x37c42d653
    37c42d933
    37c42d933 0f 1f 44 00 00 ..D..
    37c42d938
    37c42d938loc_37c42d938:
    37c42d938sub r12, 1
    37c42d93cmov [rsp+32], r10
    37c42d941mov r9, r11
    37c42d944mov r8, rbp
    37c42d947lea rax, [rsp+176]
    37c42d94fmov rdx, rdi
    37c42d952mov rcx, rsi
    37c42d955mov rbx, [rsp+152]
    37c42d95dmov [rsp+96], rax
    37c42d962mov rax, [rsp+376]
    37c42d96amov [rsp+112], 1
    37c42d973mov [rsp+88], rax
    37c42d978mov rax, [rsp+368]
    37c42d980mov [rsp+104], 1
    37c42d989mov [rsp+80], rax
    37c42d98emov rax, [rsp+360]
    37c42d996movsd_xmm [rsp+136], x0
    37c42d99fmov [rsp+72], rax
    37c42d9a4mov rax, [rsp+352]
    37c42d9acmov [rsp+200], r12
    37c42d9b4mov [rsp+64], rax
    37c42d9b9mov rax, [rsp+344]
    37c42d9c1mov [rsp+56], rax
    37c42d9c6mov rax, [rsp+336]
    37c42d9cemov [rsp+48], rax
    37c42d9d3xor eax, eax
    37c42d9d5test rbx, rbx
    37c42d9d8cmovns rax, rbx
    37c42d9dcshl rax, 4
    37c42d9e0add rax, [rsp+328]
    37c42d9e8mov [rsp+40], rax
    37c42d9edcall zunmql_64_
    37c42d9f2movsd_xmm x0, [rsp+136]
    37c42d9fbjmp 0x37c42d705
    37c42da00
    37c42da00loc_37c42da00:
    37c42da00neg rax
    37c42da03lea r10, [rsp+200]
    37c42da0bjmp 0x37c42d427
    37c42d1c0
    37c42da10
    37c42da10 // align 0x20
    37c42da20
    37c42da20zupgtr_64_:
    37c42da20push r15
    37c42da22push r14
    37c42da24push r13
    37c42da26push r12
    37c42da28push rbp
    37c42da29push rdi
    37c42da2apush rsi
    37c42da2bpush rbx
    37c42da2csub rsp, 120
    37c42da30mov r12, [rsp+248]
    37c42da38mov rax, [rsp+232]
    37c42da40mov rdi, [rsp+224]
    37c42da48mov [r12], 0
    37c42da50mov rbp, [rax]
    37c42da53mov r14, rdx
    37c42da56mov rsi, r8
    37c42da59mov rbx, r9
    37c42da5cmov r8l, 1
    37c42da62mov r9l, 1
    37c42da68lea rdx, [rip+0x470c1]
    37c42da6fmov r15, rcx
    37c42da72call lsame_64_
    37c42da77mov r13, rax
    37c42da7atest rax, rax
    37c42da7dje 0x37c42dc40
    37c42da83
    37c42da83loc_37c42da83:
    37c42da83mov r8, [r14]
    37c42da86test r8, r8
    37c42da89js 0x37c42dae0
    37c42da8bmov rcx, [rsp+232]
    37c42da93mov eax, 1
    37c42da98cmovg rax, r8
    37c42da9ccmp [rcx], rax
    37c42da9fjge 0x37c42daf0
    37c42daa1mov rdx, -6
    37c42daa8mov eax, 6
    37c42daad
    37c42daadloc_37c42daad:
    37c42daadmov [r12], rdx
    37c42dab1
    37c42dab1loc_37c42dab1:
    37c42dab1lea rdx, [rsp+104]
    37c42dab6mov r8l, 6
    37c42dabcmov [rsp+104], rax
    37c42dac1lea rcx, [rip+0x4706a]
    37c42dac8call xerbla_64_
    37c42dacdnop
    37c42dace
    37c42daceloc_37c42dace:
    37c42daceadd rsp, 120
    37c42dad2pop rbx
    37c42dad3pop rsi
    37c42dad4pop rdi
    37c42dad5pop rbp
    37c42dad6pop r12
    37c42dad8pop r13
    37c42dadapop r14
    37c42dadcpop r15
    37c42daderet
    37c42dadf
    37c42dadf 90 .
    37c42dae0
    37c42dae0loc_37c42dae0:
    37c42dae0mov rdx, -2
    37c42dae7mov eax, 2
    37c42daecjmp 0x37c42daad
    37c42daee
    37c42daee 66 90 f.
    37c42daf0
    37c42daf0loc_37c42daf0:
    37c42daf0mov rax, [r12]
    37c42daf4test rax, rax
    37c42daf7jne 0x37c42ddb6
    37c42dafdtest r8, r8
    37c42db00je 0x37c42dace
    37c42db02xor eax, eax
    37c42db04test rbp, rbp
    37c42db07cmovs rbp, rax
    37c42db0bmov rax, rbp
    37c42db0enot rax
    37c42db11test r13, r13
    37c42db14je 0x37c42dc76
    37c42db1amov rdx, r8
    37c42db1dimul rdx, rbp
    37c42db21add rax, rdx
    37c42db24cmp r8, 1
    37c42db28je 0x37c42dbd5
    37c42db2emov r12, r8
    37c42db31mov r11l, 1
    37c42db37mov rcx, rdi
    37c42db3ashl rbp, 4
    37c42db3eshl r12, 4
    37c42db42pxor x1, x1
    37c42db46add r11, 1
    37c42db4axor edx, edx
    37c42db4cmov r13l, 2
    37c42db52movups [rcx+r12-16], x1
    37c42db58cmp r8, r11
    37c42db5bje 0x37c42dbaa
    37c42db5dnop [rax]
    37c42db60
    37c42db60loc_37c42db60:
    37c42db60add r13, 1
    37c42db64lea r14, [rdx+1]
    37c42db68add rcx, rbp
    37c42db6bxor r9l, r9l
    37c42db6emov r10, r13
    37c42db71xor edx, edx
    37c42db73shl r10, 4
    37c42db77add r10, rsi
    37c42db7anop [rax+rax]
    37c42db80
    37c42db80loc_37c42db80:
    37c42db80movupd x0, [r10+r9]
    37c42db86add rdx, 1
    37c42db8amovups [rcx+r9], x0
    37c42db8fadd r9, 16
    37c42db93cmp rdx, r14
    37c42db96jne 0x37c42db80
    37c42db98add r13, r11
    37c42db9badd r11, 1
    37c42db9fmovups [rcx+r12-16], x1
    37c42dba5cmp r8, r11
    37c42dba8jne 0x37c42db60
    37c42dbaa
    37c42dbaaloc_37c42dbaa:
    37c42dbaamov r9, rax
    37c42dbadmov edx, 1
    37c42dbb2pxor x0, x0
    37c42dbb6shl r9, 4
    37c42dbbaadd r9, rdi
    37c42dbbdnop [rax]
    37c42dbc0
    37c42dbc0loc_37c42dbc0:
    37c42dbc0mov rcx, rdx
    37c42dbc3add rdx, 1
    37c42dbc7shl rcx, 4
    37c42dbcbmovups [r9+rcx], x0
    37c42dbd0cmp r8, rdx
    37c42dbd3jne 0x37c42dbc0
    37c42dbd5
    37c42dbd5loc_37c42dbd5:
    37c42dbd5add rax, r8
    37c42dbd8sub r8, 1
    37c42dbdclea rdx, [rsp+96]
    37c42dbe1mov r9, rdi
    37c42dbe4shl rax, 4
    37c42dbe8mov [rsp+88], r8
    37c42dbedlea rcx, [rsp+88]
    37c42dbf2movq x0, [rip+0x46f46]
    37c42dbfamovups [rdi+rax], x0
    37c42dbfelea rax, [rsp+80]
    37c42dc03mov [rsp+56], rax
    37c42dc08mov rax, [rsp+240]
    37c42dc10mov [rsp+40], rbx
    37c42dc15mov [rsp+48], rax
    37c42dc1amov rax, [rsp+232]
    37c42dc22mov [rsp+96], r8
    37c42dc27mov [rsp+32], rax
    37c42dc2cmov [rsp+104], r8
    37c42dc31lea r8, [rsp+104]
    37c42dc36call zung2l_64_
    37c42dc3bjmp 0x37c42dace
    37c42dc40
    37c42dc40loc_37c42dc40:
    37c42dc40mov r9l, 1
    37c42dc46mov r8l, 1
    37c42dc4clea rdx, [rip+0x46ede]
    37c42dc53mov rcx, r15
    37c42dc56call lsame_64_
    37c42dc5btest rax, rax
    37c42dc5ejne 0x37c42da83
    37c42dc64mov [r12], -1
    37c42dc6cmov eax, 1
    37c42dc71jmp 0x37c42dab1
    37c42dc76
    37c42dc76loc_37c42dc76:
    37c42dc76movq x0, [rip+0x46ec2]
    37c42dc7emovups [rdi], x0
    37c42dc81cmp r8, 1
    37c42dc85je 0x37c42dace
    37c42dc8blea r12, [r8+1]
    37c42dc8fmov edx, 2
    37c42dc94pxor x0, x0
    37c42dc98nop [rax+rax]
    37c42dca0
    37c42dca0loc_37c42dca0:
    37c42dca0mov rcx, rdx
    37c42dca3add rdx, 1
    37c42dca7shl rcx, 4
    37c42dcabmovups [rdi+rcx-16], x0
    37c42dcb0cmp rdx, r12
    37c42dcb3jne 0x37c42dca0
    37c42dcb5lea r10, [rbp+rbp]
    37c42dcbalea rcx, [r8-2]
    37c42dcbepxor x1, x1
    37c42dcc2mov r13, rbp
    37c42dcc5lea rdx, [r10+rax]
    37c42dcc9mov [rsp+72], rax
    37c42dcceshl r13, 4
    37c42dcd2mov r9l, 3
    37c42dcd8shl rdx, 4
    37c42dcdclea r14, [r13+16]
    37c42dce0lea rbp, [rdi+rdx+16]
    37c42dce5lea r11, [rdi+rdx+48]
    37c42dceanop [rax+rax]
    37c42dcf0
    37c42dcf0loc_37c42dcf0:
    37c42dcf0mov rax, r12
    37c42dcf3movups [rbp], x1
    37c42dcf7sub rax, rcx
    37c42dcfacmp r8, rax
    37c42dcfdjl 0x37c42dd3b
    37c42dcfflea r15, [r9-1]
    37c42dd03xor eax, eax
    37c42dd05xor edx, edx
    37c42dd07shl r15, 4
    37c42dd0badd r15, rsi
    37c42dd0enop [rax]
    37c42dd15nop [rax+rax]
    37c42dd20
    37c42dd20loc_37c42dd20:
    37c42dd20movupd x0, [r15+rax]
    37c42dd26add rdx, 1
    37c42dd2amovups [r11+rax], x0
    37c42dd2fadd rax, 16
    37c42dd33cmp rdx, rcx
    37c42dd36jne 0x37c42dd20
    37c42dd38add r9, rcx
    37c42dd3b
    37c42dd3bloc_37c42dd3b:
    37c42dd3bsub rcx, 1
    37c42dd3fadd r9, 2
    37c42dd43add rbp, r13
    37c42dd46add r11, r14
    37c42dd49cmp rcx, -1
    37c42dd4djne 0x37c42dcf0
    37c42dd4fsub r8, 1
    37c42dd53mov [rsp+40], rbx
    37c42dd58mov rax, [rsp+72]
    37c42dd5dlea rdx, [rsp+96]
    37c42dd62mov rsi, [rsp+240]
    37c42dd6amov [rsp+88], r8
    37c42dd6flea rcx, [rsp+88]
    37c42dd74mov rbx, [rsp+232]
    37c42dd7cmov [rsp+96], r8
    37c42dd81lea rax, [rax+r10+2]
    37c42dd86mov [rsp+104], r8
    37c42dd8blea r8, [rsp+80]
    37c42dd90shl rax, 4
    37c42dd94mov [rsp+56], r8
    37c42dd99lea r9, [rdi+rax]
    37c42dd9dlea r8, [rsp+104]
    37c42dda2mov [rsp+48], rsi
    37c42dda7mov [rsp+32], rbx
    37c42ddaccall zung2r_64_
    37c42ddb1jmp 0x37c42dace
    37c42ddb6
    37c42ddb6loc_37c42ddb6:
    37c42ddb6neg rax
    37c42ddb9jmp 0x37c42dab1
    37c42da20
    37c42ddbe
    37c42ddbe // align 0x10
    37c42ddc0
    37c42ddc0zupmtr_64_:
    37c42ddc0push r15
    37c42ddc2push r14
    37c42ddc4push r13
    37c42ddc6push r12
    37c42ddc8push rbp
    37c42ddc9push rdi
    37c42ddcapush rsi
    37c42ddcbpush rbx
    37c42ddccsub rsp, 200
    37c42ddd3mov rax, [rsp+336]
    37c42dddbmov r13, [rax]
    37c42dddemov rax, [rsp+352]
    37c42dde6mov [rax], 0
    37c42ddedmov rbx, rdx
    37c42ddf0mov r14, r8
    37c42ddf3mov r12, r9
    37c42ddf6mov r8l, 1
    37c42ddfcmov r9l, 1
    37c42de02lea rdx, [rip+0x46d47]
    37c42de09mov [rsp+272], rcx
    37c42de11call lsame_64_
    37c42de16mov r9l, 1
    37c42de1cmov r8l, 1
    37c42de22mov rcx, r14
    37c42de25lea rdx, [rip+0x46d25]
    37c42de2cmov rdi, rax
    37c42de2fcall lsame_64_
    37c42de34mov r9l, 1
    37c42de3amov r8l, 1
    37c42de40mov rcx, rbx
    37c42de43lea rdx, [rip+0x46d08]
    37c42de4amov rbp, rax
    37c42de4dcall lsame_64_
    37c42de52mov r15, rax
    37c42de55test rdi, rdi
    37c42de58je 0x37c42e168
    37c42de5emov rsi, [r12]
    37c42de62
    37c42de62loc_37c42de62:
    37c42de62test r15, r15
    37c42de65je 0x37c42e1b0
    37c42de6b
    37c42de6bloc_37c42de6b:
    37c42de6btest rbp, rbp
    37c42de6eje 0x37c42e130
    37c42de74
    37c42de74loc_37c42de74:
    37c42de74mov rdx, [r12]
    37c42de78test rdx, rdx
    37c42de7bjs 0x37c42e0e0
    37c42de81mov rax, [rsp+304]
    37c42de89mov rcx, [rax]
    37c42de8ctest rcx, rcx
    37c42de8fjs 0x37c42e4c0
    37c42de95mov rbx, [rsp+336]
    37c42de9dtest rdx, rdx
    37c42dea0mov eax, 1
    37c42dea5cmovg rax, rdx
    37c42dea9cmp [rbx], rax
    37c42deacjl 0x37c42e490
    37c42deb2mov rax, [rsp+352]
    37c42debamov rax, [rax]
    37c42debdtest rax, rax
    37c42dec0jne 0x37c42e5ad
    37c42dec6test rdx, rdx
    37c42dec9je 0x37c42e11a
    37c42decftest rcx, rcx
    37c42ded2je 0x37c42e11a
    37c42ded8lea rbx, [rsi-1]
    37c42dedctest r15, r15
    37c42dedfjne 0x37c42e1e8
    37c42dee5cmp rdi, rbp
    37c42dee8je 0x37c42e500
    37c42deeetest rdi, rdi
    37c42def1je 0x37c42e580
    37c42def7mov [rsp+168], rcx
    37c42deff
    37c42deffloc_37c42deff:
    37c42defftest rbx, rbx
    37c42df02jle 0x37c42e11a
    37c42df08lea r14, [rsi-2]
    37c42df0cmov r15l, 2
    37c42df12mov ebx, 1
    37c42df17mov [rsp+144], 1
    37c42df23
    37c42df23loc_37c42df23:
    37c42df23xor r8l, r8l
    37c42df26test r13, r13
    37c42df29mov [rsp+136], rsi
    37c42df31mov rsi, [rsp+320]
    37c42df39cmovns r8, r13
    37c42df3dmov [rsp+296], r12
    37c42df45mov r13l, 1
    37c42df4bmov r12, r15
    37c42df4emov r15, rbp
    37c42df51mov ebp, 1
    37c42df56mov rax, r8
    37c42df59mov [rsp+128], r8
    37c42df61not rax
    37c42df64mov [rsp+120], rax
    37c42df69lea rax, [rsp+176]
    37c42df71mov [rsp+112], rax
    37c42df76lea rax, [rsp+168]
    37c42df7emov [rsp+104], rax
    37c42df83lea rax, [rsp+160]
    37c42df8bmov [rsp+88], rax
    37c42df90lea rax, [rip+0x46bc9]
    37c42df97mov [rsp+96], rax
    37c42df9cjmp 0x37c42e0ab
    37c42dfa1
    37c42dfa1 0f 1f 80 00 00 00 00 .......
    37c42dfa8
    37c42dfa8loc_37c42dfa8:
    37c42dfa8mov rax, [rsp+296]
    37c42dfb0lea rbp, [rbx+1]
    37c42dfb4mov rax, [rax]
    37c42dfb7mov rdx, rax
    37c42dfbamov [rsp+152], rax
    37c42dfc2sub rdx, rbx
    37c42dfc5mov [rsp+160], rdx
    37c42dfcd
    37c42dfcdloc_37c42dfcd:
    37c42dfcdmov rdx, rbx
    37c42dfd0shl rdx, 4
    37c42dfd4movsd_xmm x0, [rsi+rdx-16]
    37c42dfdamovsd_xmm x1, [rsi+rdx-8]
    37c42dfe0test r15, r15
    37c42dfe3jne 0x37c42dfed
    37c42dfe5xorpd x1, [rip+0x46b83]
    37c42dfed
    37c42dfedloc_37c42dfed:
    37c42dfedlea rcx, [r12-1]
    37c42dff2mov r8, [rsp+104]
    37c42dff7mov rax, [rsp+344]
    37c42dfffmov [rsp+72], 1
    37c42e008mov rdx, [rsp+128]
    37c42e010shl rcx, 4
    37c42e014unpcklpd x0, x1
    37c42e018mov [rsp+64], rax
    37c42e01dmov rax, [rsp+336]
    37c42e025imul rdx, r13
    37c42e029add rdx, [rsp+120]
    37c42e02emovups [rsp+176], x0
    37c42e036mov [rsp+56], rax
    37c42e03bmov rax, [rsp+112]
    37c42e040add rdx, rbp
    37c42e043shl rdx, 4
    37c42e047add rdx, [rsp+328]
    37c42e04fmov [rsp+40], rax
    37c42e054mov rax, [rsp+96]
    37c42e059mov [rsp+48], rdx
    37c42e05emov rdx, [rsp+88]
    37c42e063mov [rsp+32], rax
    37c42e068mov rax, [rsp+312]
    37c42e070lea r9, [rax+rcx]
    37c42e074mov rcx, [rsp+272]
    37c42e07ccall zlarf1f_64_
    37c42e081mov rax, r12
    37c42e084cmp rdi, r15
    37c42e087je 0x37c42e4a8
    37c42e08dmov rcx, [rsp+136]
    37c42e095sub rax, rbx
    37c42e098lea r12, [rax+rcx+1]
    37c42e09d
    37c42e09dloc_37c42e09d:
    37c42e09dadd rbx, [rsp+144]
    37c42e0a5sub r14, 1
    37c42e0a9jb 0x37c42e11a
    37c42e0ab
    37c42e0abloc_37c42e0ab:
    37c42e0abtest rdi, rdi
    37c42e0aejne 0x37c42dfa8
    37c42e0b4mov rax, [rsp+304]
    37c42e0bclea r13, [rbx+1]
    37c42e0c0mov rax, [rax]
    37c42e0c3mov rdx, rax
    37c42e0c6mov [rsp+152], rax
    37c42e0cesub rdx, rbx
    37c42e0d1mov [rsp+168], rdx
    37c42e0d9jmp 0x37c42dfcd
    37c42e0de
    37c42e0de 66 90 f.
    37c42e0e0
    37c42e0e0loc_37c42e0e0:
    37c42e0e0mov rdx, -4
    37c42e0e7mov eax, 4
    37c42e0ec
    37c42e0ecloc_37c42e0ec:
    37c42e0ecmov rdi, [rsp+352]
    37c42e0f4mov [rdi], rdx
    37c42e0f7
    37c42e0f7loc_37c42e0f7:
    37c42e0f7lea rdx, [rsp+176]
    37c42e0ffmov r8l, 6
    37c42e105lea rcx, [rip+0x46a49]
    37c42e10cmov [rsp+176], rax
    37c42e114call xerbla_64_
    37c42e119nop
    37c42e11a
    37c42e11aloc_37c42e11a:
    37c42e11aadd rsp, 200
    37c42e121pop rbx
    37c42e122pop rsi
    37c42e123pop rdi
    37c42e124pop rbp
    37c42e125pop r12
    37c42e127pop r13
    37c42e129pop r14
    37c42e12bpop r15
    37c42e12dret
    37c42e12e
    37c42e12e 66 90 f.
    37c42e130
    37c42e130loc_37c42e130:
    37c42e130mov r9l, 1
    37c42e136mov r8l, 1
    37c42e13clea rdx, [rip+0x46a11]
    37c42e143mov rcx, r14
    37c42e146call lsame_64_
    37c42e14btest rax, rax
    37c42e14ejne 0x37c42de74
    37c42e154mov rdx, -3
    37c42e15bmov eax, 3
    37c42e160jmp 0x37c42e0ec
    37c42e162
    37c42e162 66 0f 1f 44 00 00 f..D..
    37c42e168
    37c42e168loc_37c42e168:
    37c42e168mov rax, [rsp+304]
    37c42e170mov rcx, [rsp+272]
    37c42e178mov r9l, 1
    37c42e17emov r8l, 1
    37c42e184lea rdx, [rip+0x469c8]
    37c42e18bmov rsi, [rax]
    37c42e18ecall lsame_64_
    37c42e193test rax, rax
    37c42e196jne 0x37c42de62
    37c42e19cmov rdx, -1
    37c42e1a3mov eax, 1
    37c42e1a8jmp 0x37c42e0ec
    37c42e1ad
    37c42e1ad 0f 1f 00 ...
    37c42e1b0
    37c42e1b0loc_37c42e1b0:
    37c42e1b0mov r9l, 1
    37c42e1b6mov r8l, 1
    37c42e1bclea rdx, [rip+0x4698d]
    37c42e1c3mov rcx, rbx
    37c42e1c6call lsame_64_
    37c42e1cbtest rax, rax
    37c42e1cejne 0x37c42de6b
    37c42e1d4mov rdx, -2
    37c42e1dbmov eax, 2
    37c42e1e0jmp 0x37c42e0ec
    37c42e1e5
    37c42e1e5 0f 1f 00 ...
    37c42e1e8
    37c42e1e8loc_37c42e1e8:
    37c42e1e8cmp rdi, rbp
    37c42e1ebje 0x37c42e540
    37c42e1f1test rdi, rdi
    37c42e1f4je 0x37c42e570
    37c42e1famov [rsp+168], rcx
    37c42e202
    37c42e202loc_37c42e202:
    37c42e202test rbx, rbx
    37c42e205jle 0x37c42e11a
    37c42e20blea r12, [rsi+1]
    37c42e20fmov r14, -1
    37c42e216imul r12, rsi
    37c42e21asub rsi, 2
    37c42e21esar r12, 1
    37c42e221sub r12, 1
    37c42e225
    37c42e225loc_37c42e225:
    37c42e225lea rax, [rsp+176]
    37c42e22dmov r13, [rsp+320]
    37c42e235mov [rsp+112], rax
    37c42e23alea rax, [rsp+168]
    37c42e242mov [rsp+104], rax
    37c42e247lea rax, [rsp+160]
    37c42e24fmov [rsp+88], rax
    37c42e254lea rax, [rip+0x46905]
    37c42e25bmov [rsp+96], rax
    37c42e260test rdi, rdi
    37c42e263jne 0x37c42e3d6
    37c42e269
    37c42e269loc_37c42e269:
    37c42e269mov rax, rbx
    37c42e26cmov [rsp+168], rbx
    37c42e274shl rax, 4
    37c42e278movsd_xmm x1, [r13+rax-8]
    37c42e27fmovsd_xmm x0, [r13+rax-16]
    37c42e286test rbp, rbp
    37c42e289je 0x37c42e328
    37c42e28fmov rcx, [rsp+344]
    37c42e297sub r12, rbx
    37c42e29aunpcklpd x0, x1
    37c42e29eadd rbx, r14
    37c42e2a1mov rax, r12
    37c42e2a4mov r8, [rsp+104]
    37c42e2a9mov rdx, [rsp+88]
    37c42e2aemov [rsp+72], 1
    37c42e2b7mov [rsp+64], rcx
    37c42e2bcmov rcx, [rsp+336]
    37c42e2c4shl rax, 4
    37c42e2c8sub r12, 1
    37c42e2ccmovups [rsp+176], x0
    37c42e2d4mov [rsp+56], rcx
    37c42e2d9mov rcx, [rsp+328]
    37c42e2e1mov [rsp+48], rcx
    37c42e2e6mov rcx, [rsp+112]
    37c42e2ebmov [rsp+40], rcx
    37c42e2f0mov rcx, [rsp+96]
    37c42e2f5mov [rsp+32], rcx
    37c42e2famov rcx, [rsp+312]
    37c42e302lea r9, [rcx+rax]
    37c42e306mov rcx, [rsp+272]
    37c42e30ecall zlarf1l_64_
    37c42e313sub rsi, 1
    37c42e317jae 0x37c42e269
    37c42e31djmp 0x37c42e11a
    37c42e322
    37c42e322 66 0f 1f 44 00 00 f..D..
    37c42e328
    37c42e328loc_37c42e328:
    37c42e328mov rcx, [rsp+344]
    37c42e330mov r13, r12
    37c42e333xorpd x1, [rip+0x46835]
    37c42e33bmov [rsp+72], 1
    37c42e344sub r13, rbx
    37c42e347mov r8, [rsp+104]
    37c42e34cmov rdx, [rsp+88]
    37c42e351sub rsi, 1
    37c42e355mov [rsp+64], rcx
    37c42e35amov rcx, [rsp+336]
    37c42e362mov rax, r13
    37c42e365unpcklpd x0, x1
    37c42e369shl rax, 4
    37c42e36dmovups [rsp+176], x0
    37c42e375mov [rsp+56], rcx
    37c42e37amov rcx, [rsp+328]
    37c42e382mov [rsp+48], rcx
    37c42e387mov rcx, [rsp+112]
    37c42e38cmov [rsp+40], rcx
    37c42e391mov rcx, [rsp+96]
    37c42e396mov [rsp+32], rcx
    37c42e39bmov rcx, [rsp+312]
    37c42e3a3lea r9, [rcx+rax]
    37c42e3a7mov rcx, [rsp+272]
    37c42e3afcall zlarf1l_64_
    37c42e3b4test rdi, rdi
    37c42e3b7je 0x37c42e4d8
    37c42e3bdcmp rsi, -1
    37c42e3c1je 0x37c42e11a
    37c42e3c7lea r12, [r13-1]
    37c42e3cbmov r13, [rsp+320]
    37c42e3d3add rbx, r14
    37c42e3d6
    37c42e3d6loc_37c42e3d6:
    37c42e3d6mov rax, rbx
    37c42e3d9mov [rsp+160], rbx
    37c42e3e1shl rax, 4
    37c42e3e5movsd_xmm x1, [r13+rax-8]
    37c42e3ecmovsd_xmm x0, [r13+rax-16]
    37c42e3f3test rbp, rbp
    37c42e3f6je 0x37c42e328
    37c42e3fcmov rcx, [rsp+344]
    37c42e404mov rax, r12
    37c42e407mov r8, [rsp+104]
    37c42e40cmov [rsp+72], 1
    37c42e415sub rax, rbx
    37c42e418mov rdx, [rsp+88]
    37c42e41dunpcklpd x0, x1
    37c42e421lea r12, [rbx+r12+2]
    37c42e426mov [rsp+64], rcx
    37c42e42bmov rcx, [rsp+336]
    37c42e433shl rax, 4
    37c42e437add rbx, r14
    37c42e43amovups [rsp+176], x0
    37c42e442mov [rsp+56], rcx
    37c42e447mov rcx, [rsp+328]
    37c42e44fmov [rsp+48], rcx
    37c42e454mov rcx, [rsp+112]
    37c42e459mov [rsp+40], rcx
    37c42e45emov rcx, [rsp+96]
    37c42e463mov [rsp+32], rcx
    37c42e468mov rcx, [rsp+312]
    37c42e470lea r9, [rcx+rax]
    37c42e474mov rcx, [rsp+272]
    37c42e47ccall zlarf1l_64_
    37c42e481sub rsi, 1
    37c42e485jae 0x37c42e3d6
    37c42e48bjmp 0x37c42e11a
    37c42e490
    37c42e490loc_37c42e490:
    37c42e490mov rdx, -9
    37c42e497mov eax, 9
    37c42e49cjmp 0x37c42e0ec
    37c42e4a1
    37c42e4a1 0f 1f 80 00 00 00 00 .......
    37c42e4a8
    37c42e4a8loc_37c42e4a8:
    37c42e4a8sub rax, [rsp+136]
    37c42e4b0lea r12, [rbx+rax-2]
    37c42e4b5jmp 0x37c42e09d
    37c42e4ba
    37c42e4ba 66 0f 1f 44 00 00 f..D..
    37c42e4c0
    37c42e4c0loc_37c42e4c0:
    37c42e4c0mov rdx, -5
    37c42e4c7mov eax, 5
    37c42e4ccjmp 0x37c42e0ec
    37c42e4d1
    37c42e4d1 0f 1f 80 00 00 00 00 .......
    37c42e4d8
    37c42e4d8loc_37c42e4d8:
    37c42e4d8cmp rsi, -1
    37c42e4dcje 0x37c42e11a
    37c42e4e2lea r12, [rbx+r12+2]
    37c42e4e7mov r13, [rsp+320]
    37c42e4efadd rbx, r14
    37c42e4f2jmp 0x37c42e269
    37c42e4f7
    37c42e4f7 66 0f 1f 84 00 00 00 00 00 f........
    37c42e500
    37c42e500loc_37c42e500:
    37c42e500test rdi, rdi
    37c42e503jne 0x37c42e5a0
    37c42e509mov [rsp+160], rdx
    37c42e511
    37c42e511loc_37c42e511:
    37c42e511cmp rsi, 1
    37c42e515jle 0x37c42e11a
    37c42e51blea rax, [rsi+1]
    37c42e51flea r14, [rsi-2]
    37c42e523mov [rsp+144], -1
    37c42e52fimul rax, rsi
    37c42e533sar rax, 1
    37c42e536lea r15, [rax-1]
    37c42e53ajmp 0x37c42df23
    37c42e53f
    37c42e53f 90 .
    37c42e540
    37c42e540loc_37c42e540:
    37c42e540test rdi, rdi
    37c42e543jne 0x37c42e590
    37c42e545mov [rsp+160], rdx
    37c42e54d
    37c42e54dloc_37c42e54d:
    37c42e54dtest rbx, rbx
    37c42e550jle 0x37c42e11a
    37c42e556sub rsi, 2
    37c42e55amov r14l, 1
    37c42e560mov r12l, 2
    37c42e566mov ebx, 1
    37c42e56bjmp 0x37c42e225
    37c42e570
    37c42e570loc_37c42e570:
    37c42e570mov [rsp+160], rdx
    37c42e578jmp 0x37c42e202
    37c42e57d
    37c42e57d 0f 1f 00 ...
    37c42e580
    37c42e580loc_37c42e580:
    37c42e580mov [rsp+160], rdx
    37c42e588jmp 0x37c42deff
    37c42e58d
    37c42e58d 0f 1f 00 ...
    37c42e590
    37c42e590loc_37c42e590:
    37c42e590mov [rsp+168], rcx
    37c42e598jmp 0x37c42e54d
    37c42e59a
    37c42e59a 66 0f 1f 44 00 00 f..D..
    37c42e5a0
    37c42e5a0loc_37c42e5a0:
    37c42e5a0mov [rsp+168], rcx
    37c42e5a8jmp 0x37c42e511
    37c42e5ad
    37c42e5adloc_37c42e5ad:
    37c42e5adneg rax
    37c42e5b0jmp 0x37c42e0f7
    37c42ddc0