File lapack_564f5cd6dd718723530ccdd421a63387e76d5fcdb30f49d1f0425db7bc512296.dll
Function:
    37b6b2f80
    37b6b2f80sorm22_:
    37b6b2f80push r15
    37b6b2f82push r14
    37b6b2f84push r13
    37b6b2f86push r12
    37b6b2f88push rbp
    37b6b2f89push rdi
    37b6b2f8apush rsi
    37b6b2f8bpush rbx
    37b6b2f8csub rsp, 280
    37b6b2f93mov rax, [rsp+408]
    37b6b2f9bmov r12, [rsp+448]
    37b6b2fa3mov rbx, [rsp+384]
    37b6b2fabmov rsi, [rsp+392]
    37b6b2fb3mov eax, [rax]
    37b6b2fb5mov [r12], 0
    37b6b2fbdmov r15, [rsp+432]
    37b6b2fc5mov [rsp+152], eax
    37b6b2fccmov rax, [rsp+424]
    37b6b2fd4mov rdi, rdx
    37b6b2fd7lea rdx, [rip+0xd81952]
    37b6b2fdemov [rsp+368], r8
    37b6b2fe6mov r8l, 1
    37b6b2fecmov rbp, rcx
    37b6b2fefmov eax, [rax]
    37b6b2ff1mov [rsp+376], r9
    37b6b2ff9mov r9l, 1
    37b6b2fffmov [rsp+168], eax
    37b6b3006call lsame_
    37b6b300bmov r9l, 1
    37b6b3011mov r8l, 1
    37b6b3017mov rcx, rdi
    37b6b301alea rdx, [rip+0xd81910]
    37b6b3021mov r13l, eax
    37b6b3024call lsame_
    37b6b3029mov [rsp+176], eax
    37b6b3030mov rax, [rsp+440]
    37b6b3038mov eax, [rax]
    37b6b303amov [rsp+136], eax
    37b6b3041mov eax, [rbx]
    37b6b3043test r13l, r13l
    37b6b3046je 0x37b6b3150
    37b6b304cmov rcx, [rsp+368]
    37b6b3054mov r14l, 1
    37b6b305amov ecx, [rcx]
    37b6b305cmov [rsp+144], ecx
    37b6b3063test eax, eax
    37b6b3065jne 0x37b6b31e8
    37b6b306b
    37b6b306bloc_37b6b306b:
    37b6b306bmov r9l, 1
    37b6b3071mov r8l, 1
    37b6b3077lea rdx, [rip+0xd818b3]
    37b6b307emov rcx, rdi
    37b6b3081call lsame_
    37b6b3086test eax, eax
    37b6b3088je 0x37b6b3208
    37b6b308e
    37b6b308eloc_37b6b308e:
    37b6b308emov rax, [rsp+368]
    37b6b3096mov r8l, [rax]
    37b6b3099test r8l, r8l
    37b6b309cjs 0x37b6b31a0
    37b6b30a2mov rax, [rsp+376]
    37b6b30aamov ecx, [rax]
    37b6b30actest ecx, ecx
    37b6b30aejs 0x37b6b3250
    37b6b30b4mov eax, [rbx]
    37b6b30b6test eax, eax
    37b6b30b8js 0x37b6b3240
    37b6b30bemov r10l, [rsi]
    37b6b30c1mov r11l, [rsp+144]
    37b6b30c9mov edx, -5
    37b6b30celea r9l, [rax+r10]
    37b6b30d2mov eax, 5
    37b6b30d7cmp r9l, r11l
    37b6b30dajne 0x37b6b31aa
    37b6b30e0test r10l, r10l
    37b6b30e3js 0x37b6b4620
    37b6b30e9mov rdx, [rsp+408]
    37b6b30f1test r11l, r11l
    37b6b30f4mov eax, 1
    37b6b30f9cmovg eax, r11l
    37b6b30fdcmp [rdx], eax
    37b6b30ffjl 0x37b6b4630
    37b6b3105mov rdx, [rsp+424]
    37b6b310dtest r8l, r8l
    37b6b3110mov eax, 1
    37b6b3115cmovg eax, r8l
    37b6b3119cmp [rdx], eax
    37b6b311bjl 0x37b6b463f
    37b6b3121mov rax, [rsp+440]
    37b6b3129cmp [rax], r14l
    37b6b312cjge 0x37b6b325f
    37b6b3132cmp [rsp+136], -1
    37b6b313aje 0x37b6b464e
    37b6b3140mov [r12], -12
    37b6b3148mov eax, 12
    37b6b314djmp 0x37b6b31ae
    37b6b314f
    37b6b314f 90 .
    37b6b3150
    37b6b3150loc_37b6b3150:
    37b6b3150mov rcx, [rsp+376]
    37b6b3158mov r14l, 1
    37b6b315emov ecx, [rcx]
    37b6b3160mov [rsp+144], ecx
    37b6b3167test eax, eax
    37b6b3169jne 0x37b6b31f8
    37b6b316f
    37b6b316floc_37b6b316f:
    37b6b316fmov r9l, 1
    37b6b3175mov r8l, 1
    37b6b317blea rdx, [rip+0xd817b0]
    37b6b3182mov rcx, rbp
    37b6b3185call lsame_
    37b6b318atest eax, eax
    37b6b318cjne 0x37b6b306b
    37b6b3192mov edx, -1
    37b6b3197mov eax, 1
    37b6b319cjmp 0x37b6b31aa
    37b6b319e
    37b6b319e 66 90 f.
    37b6b31a0
    37b6b31a0loc_37b6b31a0:
    37b6b31a0mov edx, -3
    37b6b31a5mov eax, 3
    37b6b31aa
    37b6b31aaloc_37b6b31aa:
    37b6b31aamov [r12], edx
    37b6b31ae
    37b6b31aeloc_37b6b31ae:
    37b6b31aelea rdx, [rsp+268]
    37b6b31b6mov r8l, 6
    37b6b31bclea rcx, [rip+0xd81771]
    37b6b31c3mov [rsp+268], eax
    37b6b31cacall xerbla_
    37b6b31cfnop
    37b6b31d0
    37b6b31d0loc_37b6b31d0:
    37b6b31d0add rsp, 280
    37b6b31d7pop rbx
    37b6b31d8pop rsi
    37b6b31d9pop rdi
    37b6b31dapop rbp
    37b6b31dbpop r12
    37b6b31ddpop r13
    37b6b31dfpop r14
    37b6b31e1pop r15
    37b6b31e3ret
    37b6b31e4
    37b6b31e4 0f 1f 40 00 ..@.
    37b6b31e8
    37b6b31e8loc_37b6b31e8:
    37b6b31e8mov eax, [rsi]
    37b6b31eatest eax, eax
    37b6b31eccmovne r14l, ecx
    37b6b31f0jmp 0x37b6b306b
    37b6b31f5
    37b6b31f5 0f 1f 00 ...
    37b6b31f8
    37b6b31f8loc_37b6b31f8:
    37b6b31f8mov eax, [rsi]
    37b6b31fatest eax, eax
    37b6b31fccmovne r14l, ecx
    37b6b3200jmp 0x37b6b316f
    37b6b3205
    37b6b3205 0f 1f 00 ...
    37b6b3208
    37b6b3208loc_37b6b3208:
    37b6b3208mov r9l, 1
    37b6b320emov r8l, 1
    37b6b3214lea rdx, [rip+0xd81718]
    37b6b321bmov rcx, rdi
    37b6b321ecall lsame_
    37b6b3223test eax, eax
    37b6b3225jne 0x37b6b308e
    37b6b322bmov edx, -2
    37b6b3230mov eax, 2
    37b6b3235jmp 0x37b6b31aa
    37b6b323a
    37b6b323a 66 0f 1f 44 00 00 f..D..
    37b6b3240
    37b6b3240loc_37b6b3240:
    37b6b3240mov edx, -5
    37b6b3245mov eax, 5
    37b6b324ajmp 0x37b6b31aa
    37b6b324f
    37b6b324f 90 .
    37b6b3250
    37b6b3250loc_37b6b3250:
    37b6b3250mov edx, -4
    37b6b3255mov eax, 4
    37b6b325ajmp 0x37b6b31aa
    37b6b325f
    37b6b325floc_37b6b325f:
    37b6b325fmov eax, [r12]
    37b6b3263test eax, eax
    37b6b3265jne 0x37b6b4656
    37b6b326bmov eax, r8l
    37b6b326eimul eax, ecx
    37b6b3271mov [rsp+264], eax
    37b6b3278lea rax, [rsp+264]
    37b6b3280mov rcx, rax
    37b6b3283mov [rsp+216], rax
    37b6b328bcall sroundup_lwork_
    37b6b3290mov eax, [r12]
    37b6b3294movss [r15], x0
    37b6b3299test eax, eax
    37b6b329bjne 0x37b6b4656
    37b6b32a1cmp [rsp+136], -1
    37b6b32a9je 0x37b6b31d0
    37b6b32afmov rax, [rsp+368]
    37b6b32b7mov ecx, [rax]
    37b6b32b9test ecx, ecx
    37b6b32bbje 0x37b6b3860
    37b6b32c1mov rax, [rsp+376]
    37b6b32c9mov r11l, [rax]
    37b6b32cctest r11l, r11l
    37b6b32cfje 0x37b6b3860
    37b6b32d5mov r8l, [rbx]
    37b6b32d8test r8l, r8l
    37b6b32dbje 0x37b6b3cd0
    37b6b32e1mov r9l, [rsi]
    37b6b32e4test r9l, r9l
    37b6b32e7je 0x37b6b37c0
    37b6b32edmovsxd rdi, [rsp+152]
    37b6b32f5xor eax, eax
    37b6b32f7mov rdx, [rsp+440]
    37b6b32fftest rdi, rdi
    37b6b3302mov edx, [rdx]
    37b6b3304cmovns rax, rdi
    37b6b3308movsxd rdi, [rsp+168]
    37b6b3310mov [rsp+152], rax
    37b6b3318not rax
    37b6b331bmov [rsp+160], rax
    37b6b3323xor eax, eax
    37b6b3325test rdi, rdi
    37b6b3328cmovs rdi, rax
    37b6b332cmov eax, [rsp+264]
    37b6b3333cmp eax, edx
    37b6b3335mov [rsp+168], rdi
    37b6b333dcmovg eax, edx
    37b6b3340cdq
    37b6b3341idiv [rsp+144]
    37b6b3348mov edx, 1
    37b6b334dtest eax, eax
    37b6b334fcmovg edx, eax
    37b6b3352mov r10l, edx
    37b6b3355test r13l, r13l
    37b6b3358je 0x37b6b3870
    37b6b335emov ebp, [rsp+176]
    37b6b3365lea eax, [r11-1]
    37b6b3369xor edx, edx
    37b6b336bdiv r10l
    37b6b336etest ebp, ebp
    37b6b3370je 0x37b6b41c0
    37b6b3376test r11l, r11l
    37b6b3379jle 0x37b6b37a1
    37b6b337fmovsxd rdx, r10l
    37b6b3382mov r14, [rsp+424]
    37b6b338amov [rsp+168], -1
    37b6b3396lea rbp, [rsp+268]
    37b6b339eimul rdi, rdx
    37b6b33a2lea rdx, [rip+0xd815ab]
    37b6b33a9mov [rsp+144], rdx
    37b6b33b1lea rdx, [rip+0xd815a8]
    37b6b33b8lea r12, [rip+0xd81589]
    37b6b33bfmov [rsp+192], rdx
    37b6b33c7mov rdx, [rsp+416]
    37b6b33cfmov [rsp+240], rdi
    37b6b33d7lea rdi, [rip+0xd81564]
    37b6b33demov [rsp+176], rdi
    37b6b33e6lea rdi, [rip+0xd8155f]
    37b6b33edadd rdx, 4
    37b6b33f1mov [rsp+184], rdi
    37b6b33f9lea rdi, [rip+0xd81551]
    37b6b3400mov [rsp+136], rdi
    37b6b3408lea rdi, [rsp+260]
    37b6b3410mov [rsp+200], rdx
    37b6b3418mov edx, r11l
    37b6b341bmov r11l, eax
    37b6b341emov eax, 1
    37b6b3423jmp 0x37b6b3465
    37b6b3425
    37b6b3425 0f 1f 00 ...
    37b6b3428
    37b6b3428loc_37b6b3428:
    37b6b3428mov rcx, [rsp+240]
    37b6b3430add [rsp+168], rcx
    37b6b3438sub r11l, 1
    37b6b343cmov rcx, [rsp+376]
    37b6b3444mov r10l, [rsp+224]
    37b6b344cmov eax, [rsp+236]
    37b6b3453mov r9l, [rsi]
    37b6b3456mov edx, [rcx]
    37b6b3458mov rcx, [rsp+368]
    37b6b3460add eax, r10l
    37b6b3463mov ecx, [rcx]
    37b6b3465
    37b6b3465loc_37b6b3465:
    37b6b3465sub edx, eax
    37b6b3467mov [rsp+236], eax
    37b6b346emov r13, [rsp+168]
    37b6b3476mov r8, rbp
    37b6b3479add edx, 1
    37b6b347cmov rax, [rsp+416]
    37b6b3484mov [rsp+48], rdi
    37b6b3489cmp edx, r10l
    37b6b348cmov [rsp+40], r15
    37b6b3491cmovg edx, r10l
    37b6b3495add r9l, 1
    37b6b3499mov [rsp+56], 3
    37b6b34a2mov [rsp+32], r14
    37b6b34a7movsxd r9, r9l
    37b6b34aamov [rsp+260], ecx
    37b6b34b1add r9, r13
    37b6b34b4mov rcx, [rsp+136]
    37b6b34bclea r9, [rax+4*r9]
    37b6b34c0mov [rsp+268], edx
    37b6b34c7mov rdx, rbx
    37b6b34camov [rsp+208], r11l
    37b6b34d2mov [rsp+224], r10l
    37b6b34dacall slacpy_
    37b6b34dfmov rax, [rsp+408]
    37b6b34e7mov [rsp+112], 8
    37b6b34f0lea r8, [rip+0xd8145d]
    37b6b34f7mov [rsp+80], rdi
    37b6b34fcmov r10, [rsp+160]
    37b6b3504mov [rsp+72], r15
    37b6b3509mov r9, [rsp+400]
    37b6b3511mov [rsp+64], rax
    37b6b3516mov rcx, [rsp+192]
    37b6b351emov [rsp+104], 12
    37b6b3527mov [rsp+96], 5
    37b6b3530mov [rsp+88], 4
    37b6b3539mov eax, [rsi]
    37b6b353bmov [rsp+48], r12
    37b6b3540lea edx, [rax+1]
    37b6b3543mov [rsp+40], rbp
    37b6b3548movsxd rdx, edx
    37b6b354bmov [rsp+32], rbx
    37b6b3550imul rdx, [rsp+152]
    37b6b3559lea rdx, [r10+rdx+1]
    37b6b355elea rdx, [r9+4*rdx]
    37b6b3562lea r9, [rip+0xd813d1]
    37b6b3569mov [rsp+56], rdx
    37b6b356emov rdx, [rsp+184]
    37b6b3576call strmm_
    37b6b357bmov [rsp+96], rdi
    37b6b3580mov r9, rbp
    37b6b3583mov r8, rbx
    37b6b3586mov rdx, [rsp+200]
    37b6b358emov [rsp+88], r15
    37b6b3593mov [rsp+168], r13
    37b6b359blea r13, [rdx+4*r13]
    37b6b359fmov rdx, [rsp+408]
    37b6b35a7mov [rsp+80], r12
    37b6b35acmov [rsp+112], 12
    37b6b35b5mov [rsp+56], rdx
    37b6b35bamov rdx, [rsp+400]
    37b6b35c2mov [rsp+104], 12
    37b6b35cbmov [rsp+48], rdx
    37b6b35d0mov rdx, [rsp+144]
    37b6b35d8mov [rsp+72], r14
    37b6b35ddmov [rsp+64], r13
    37b6b35e2mov rcx, rdx
    37b6b35e5mov [rsp+40], r12
    37b6b35eamov [rsp+32], rsi
    37b6b35efcall sgemm_
    37b6b35f4mov [rsp+48], rdi
    37b6b35f9mov r9, r13
    37b6b35fcmov r8, rbp
    37b6b35ffmov [rsp+56], 3
    37b6b3608movsxd rdx, [rbx]
    37b6b360bmov [rsp+32], r14
    37b6b3610mov rcx, [rsp+136]
    37b6b3618lea rdx, [r15+4*rdx]
    37b6b361cmov [rsp+40], rdx
    37b6b3621mov rdx, rsi
    37b6b3624call slacpy_
    37b6b3629movsxd rdx, [rbx]
    37b6b362cmov r9, [rsp+408]
    37b6b3634mov [rsp+112], 8
    37b6b363dmov [rsp+104], 12
    37b6b3646lea r8, [rip+0xd81307]
    37b6b364dshl rdx, 2
    37b6b3651mov [rsp+64], r9
    37b6b3656lea r9, [rip+0xd812dd]
    37b6b365dlea rcx, [r15+rdx]
    37b6b3661add rdx, [rsp+400]
    37b6b3669mov [rsp+80], rdi
    37b6b366emov [rsp+72], rcx
    37b6b3673mov rcx, [rsp+192]
    37b6b367bmov [rsp+56], rdx
    37b6b3680mov rdx, [rsp+176]
    37b6b3688mov [rsp+96], 5
    37b6b3691mov [rsp+88], 4
    37b6b369amov [rsp+48], r12
    37b6b369fmov [rsp+40], rbp
    37b6b36a4mov [rsp+32], rsi
    37b6b36a9call strmm_
    37b6b36aemovsxd r8, [rbx]
    37b6b36b1mov r9l, [rsi]
    37b6b36b4mov [rsp+112], 12
    37b6b36bdmov rax, [rsp+168]
    37b6b36c5mov r11, [rsp+400]
    37b6b36cdmov [rsp+96], rdi
    37b6b36d2mov rcx, r8
    37b6b36d5lea edx, [r9+1]
    37b6b36d9lea r8, [r15+4*r8]
    37b6b36ddmov r9, [rsp+416]
    37b6b36e5movsxd rdx, edx
    37b6b36e8add ecx, 1
    37b6b36ebmov [rsp+88], r8
    37b6b36f0movsxd rcx, ecx
    37b6b36f3lea r8, [rax+rdx]
    37b6b36f7mov [rsp+80], r12
    37b6b36fcimul rdx, [rsp+152]
    37b6b3705lea r8, [r9+4*r8]
    37b6b3709mov [rsp+72], r14
    37b6b370eadd rdx, [rsp+160]
    37b6b3716mov [rsp+64], r8
    37b6b371bmov r8, rsi
    37b6b371emov r9, [rsp+408]
    37b6b3726add rdx, rcx
    37b6b3729mov [rsp+40], r12
    37b6b372elea rdx, [r11+4*rdx]
    37b6b3732mov [rsp+32], rbx
    37b6b3737mov [rsp+56], r9
    37b6b373cmov r9, rbp
    37b6b373fmov [rsp+48], rdx
    37b6b3744mov rdx, [rsp+144]
    37b6b374cmov [rsp+104], 12
    37b6b3755mov rcx, rdx
    37b6b3758call sgemm_
    37b6b375dmov [rsp+48], r14
    37b6b3762mov r9, r15
    37b6b3765mov r8, rbp
    37b6b3768mov [rsp+40], r13
    37b6b376dmov rdx, [rsp+368]
    37b6b3775mov [rsp+32], rdi
    37b6b377amov rcx, [rsp+136]
    37b6b3782mov [rsp+56], 3
    37b6b378bcall slacpy_
    37b6b3790mov r11l, [rsp+208]
    37b6b3798test r11l, r11l
    37b6b379bjne 0x37b6b3428
    37b6b37a1
    37b6b37a1loc_37b6b37a1:
    37b6b37a1mov rcx, [rsp+216]
    37b6b37a9call sroundup_lwork_
    37b6b37aemovss [r15], x0
    37b6b37b3jmp 0x37b6b31d0
    37b6b37b8
    37b6b37b8 0f 1f 84 00 00 00 00 00 ........
    37b6b37c0
    37b6b37c0loc_37b6b37c0:
    37b6b37c0mov rax, [rsp+424]
    37b6b37c8mov r8, rdi
    37b6b37cbmov rcx, rbp
    37b6b37cemov [rsp+112], 8
    37b6b37d7mov [rsp+104], 1
    37b6b37e0lea r9, [rip+0xd81153]
    37b6b37e7lea rdx, [rip+0xd8115e]
    37b6b37eemov [rsp+80], rax
    37b6b37f3mov rax, [rsp+416]
    37b6b37fbmov [rsp+96], 5
    37b6b3804mov [rsp+72], rax
    37b6b3809mov rax, [rsp+408]
    37b6b3811mov [rsp+88], 1
    37b6b381amov [rsp+64], rax
    37b6b381fmov rax, [rsp+400]
    37b6b3827mov [rsp+56], rax
    37b6b382clea rax, [rip+0xd81115]
    37b6b3833mov [rsp+48], rax
    37b6b3838mov rax, [rsp+376]
    37b6b3840mov [rsp+40], rax
    37b6b3845mov rax, [rsp+368]
    37b6b384dmov [rsp+32], rax
    37b6b3852call strmm_
    37b6b3857nop [rax+rax]
    37b6b3860
    37b6b3860loc_37b6b3860:
    37b6b3860mov [r15], 0x3f800000
    37b6b3867jmp 0x37b6b31d0
    37b6b386c
    37b6b386c 0f 1f 40 00 ..@.
    37b6b3870
    37b6b3870loc_37b6b3870:
    37b6b3870mov rax, [rsp+168]
    37b6b3878xor edx, edx
    37b6b387anot rax
    37b6b387dmov [rsp+192], rax
    37b6b3885lea eax, [rcx-1]
    37b6b3888div r10l
    37b6b388bmov edx, [rsp+176]
    37b6b3892test edx, edx
    37b6b3894je 0x37b6b3d78
    37b6b389atest ecx, ecx
    37b6b389cjle 0x37b6b37a1
    37b6b38a2lea rdi, [rip+0xd81099]
    37b6b38a9lea rdx, [rip+0xd810a4]
    37b6b38b0mov r14, [rsp+424]
    37b6b38b8mov r11l, 1
    37b6b38bemov [rsp+176], rdi
    37b6b38c6lea rdi, [rip+0xd8107f]
    37b6b38cdlea rbp, [rsp+268]
    37b6b38d5mov [rsp+184], rdi
    37b6b38ddlea rdi, [rip+0xd8106d]
    37b6b38e4lea r12, [rip+0xd8105d]
    37b6b38ebmov [rsp+144], rdx
    37b6b38f3lea rdx, [rip+0xd81073]
    37b6b38famov [rsp+136], rdi
    37b6b3902lea rdi, [rsp+260]
    37b6b390amov [rsp+200], rdx
    37b6b3912mov edx, r8l
    37b6b3915jmp 0x37b6b3942
    37b6b3917
    37b6b3917 66 0f 1f 84 00 00 00 00 00 f........
    37b6b3920
    37b6b3920loc_37b6b3920:
    37b6b3920mov rcx, [rsp+368]
    37b6b3928mov r11l, [rsp+236]
    37b6b3930sub eax, 1
    37b6b3933mov r10l, [rsp+240]
    37b6b393bmov edx, [rbx]
    37b6b393dmov ecx, [rcx]
    37b6b393fadd r11l, r10l
    37b6b3942
    37b6b3942loc_37b6b3942:
    37b6b3942sub ecx, r11l
    37b6b3945movsxd r13, r11l
    37b6b3948mov [rsp+48], rdi
    37b6b394dmov r8, rsi
    37b6b3950add ecx, 1
    37b6b3953mov [rsp+240], r10l
    37b6b395bcmp ecx, r10l
    37b6b395emov [rsp+40], r15
    37b6b3963cmovg ecx, r10l
    37b6b3967add edx, 1
    37b6b396amov r10, [rsp+416]
    37b6b3972mov [rsp+56], 3
    37b6b397bmov [rsp+32], r14
    37b6b3980movsxd rdx, edx
    37b6b3983imul rdx, [rsp+168]
    37b6b398cadd rdx, [rsp+192]
    37b6b3994mov [rsp+268], ecx
    37b6b399bmov [rsp+260], ecx
    37b6b39a2add rdx, r13
    37b6b39a5mov rcx, [rsp+136]
    37b6b39adlea r9, [r10+4*rdx]
    37b6b39b1mov rdx, rbp
    37b6b39b4mov [rsp+236], r11l
    37b6b39bcmov [rsp+224], eax
    37b6b39c3call slacpy_
    37b6b39c8mov rdx, [rsp+408]
    37b6b39d0mov [rsp+80], rdi
    37b6b39d5lea r9, [rip+0xd80f5e]
    37b6b39dcmov r10, [rsp+400]
    37b6b39e4mov [rsp+72], r15
    37b6b39e9lea r8, [rip+0xd80f64]
    37b6b39f0mov [rsp+112], 8
    37b6b39f9mov rcx, [rsp+200]
    37b6b3a01mov [rsp+104], 12
    37b6b3a0amov [rsp+96], 5
    37b6b3a13mov [rsp+88], 5
    37b6b3a1cmov [rsp+64], rdx
    37b6b3a21movsxd rdx, [rbx]
    37b6b3a24mov [rsp+48], r12
    37b6b3a29lea rdx, [r10+4*rdx]
    37b6b3a2dmov [rsp+40], rsi
    37b6b3a32mov [rsp+56], rdx
    37b6b3a37mov rdx, [rsp+176]
    37b6b3a3fmov [rsp+32], rbp
    37b6b3a44call strmm_
    37b6b3a49mov [rsp+96], rdi
    37b6b3a4emov r9, rsi
    37b6b3a51mov r8, rbp
    37b6b3a54mov rdx, [rsp+416]
    37b6b3a5cmov [rsp+88], r15
    37b6b3a61mov [rsp+112], 12
    37b6b3a6alea rax, [rdx+4*r13-4]
    37b6b3a6fmov rdx, [rsp+408]
    37b6b3a77mov [rsp+80], r12
    37b6b3a7cmov [rsp+48], rax
    37b6b3a81mov [rsp+72], rdx
    37b6b3a86mov rdx, [rsp+400]
    37b6b3a8emov [rsp+104], 12
    37b6b3a97mov [rsp+64], rdx
    37b6b3a9cmov rdx, [rsp+144]
    37b6b3aa4mov [rsp+56], r14
    37b6b3aa9mov [rsp+40], r12
    37b6b3aaemov rcx, rdx
    37b6b3ab1mov [rsp+32], rbx
    37b6b3ab6mov [rsp+208], rax
    37b6b3abecall sgemm_
    37b6b3ac3mov [rsp+48], rdi
    37b6b3ac8mov r9, [rsp+208]
    37b6b3ad0mov r8, rbx
    37b6b3ad3mov [rsp+56], 3
    37b6b3adcmov edx, [rsi]
    37b6b3adeimul edx, [rsp+260]
    37b6b3ae6mov [rsp+32], r14
    37b6b3aebmov rcx, [rsp+136]
    37b6b3af3movsxd rdx, edx
    37b6b3af6lea rdx, [r15+4*rdx]
    37b6b3afamov [rsp+40], rdx
    37b6b3affmov rdx, rbp
    37b6b3b02call slacpy_
    37b6b3b07mov edx, [rsi]
    37b6b3b09mov r10l, [rsp+260]
    37b6b3b11mov [rsp+112], 8
    37b6b3b1amov r8, [rsp+160]
    37b6b3b22mov [rsp+80], rdi
    37b6b3b27imul r10l, edx
    37b6b3b2badd edx, 1
    37b6b3b2emov r9, [rsp+400]
    37b6b3b36mov [rsp+104], 12
    37b6b3b3fmovsxd rdx, edx
    37b6b3b42mov [rsp+48], r12
    37b6b3b47imul rdx, [rsp+152]
    37b6b3b50mov [rsp+96], 5
    37b6b3b59movsxd rcx, r10l
    37b6b3b5cmov r10, [rsp+408]
    37b6b3b64mov [rsp+40], rbx
    37b6b3b69lea rdx, [r8+rdx+1]
    37b6b3b6elea rcx, [r15+4*rcx]
    37b6b3b72mov [rsp+88], 5
    37b6b3b7blea rdx, [r9+4*rdx]
    37b6b3b7fmov [rsp+72], rcx
    37b6b3b84mov rcx, [rsp+200]
    37b6b3b8clea r9, [rip+0xd80da7]
    37b6b3b93mov [rsp+64], r10
    37b6b3b98lea r8, [rip+0xd80db5]
    37b6b3b9fmov [rsp+56], rdx
    37b6b3ba4mov rdx, [rsp+184]
    37b6b3bacmov [rsp+32], rbp
    37b6b3bb1call strmm_
    37b6b3bb6mov r9l, [rbx]
    37b6b3bb9mov ecx, [rsi]
    37b6b3bbbmov [rsp+104], 12
    37b6b3bc4mov r10, [rsp+400]
    37b6b3bccmov r11, [rsp+416]
    37b6b3bd4mov [rsp+96], rdi
    37b6b3bd9lea edx, [r9+1]
    37b6b3bddmov r9l, [rsp+260]
    37b6b3be5mov [rsp+80], r12
    37b6b3beamovsxd rdx, edx
    37b6b3bedmov [rsp+56], r14
    37b6b3bf2imul r9l, ecx
    37b6b3bf6add ecx, 1
    37b6b3bf9mov [rsp+40], r12
    37b6b3bfemovsxd rcx, ecx
    37b6b3c01mov [rsp+32], rsi
    37b6b3c06imul rcx, [rsp+152]
    37b6b3c0fadd rcx, [rsp+160]
    37b6b3c17mov [rsp+112], 12
    37b6b3c20add rcx, rdx
    37b6b3c23movsxd r8, r9l
    37b6b3c26mov r9, [rsp+408]
    37b6b3c2eimul rdx, [rsp+168]
    37b6b3c37add rdx, [rsp+192]
    37b6b3c3flea rcx, [r10+4*rcx]
    37b6b3c43add rdx, r13
    37b6b3c46lea r8, [r15+4*r8]
    37b6b3c4amov [rsp+72], r9
    37b6b3c4fmov r9, rbx
    37b6b3c52lea rdx, [r11+4*rdx]
    37b6b3c56mov [rsp+88], r8
    37b6b3c5bmov r8, rbp
    37b6b3c5emov [rsp+64], rcx
    37b6b3c63mov [rsp+48], rdx
    37b6b3c68mov rdx, [rsp+144]
    37b6b3c70mov rcx, rdx
    37b6b3c73call sgemm_
    37b6b3c78mov [rsp+48], r14
    37b6b3c7dmov r9, r15
    37b6b3c80mov rdx, rbp
    37b6b3c83mov rax, [rsp+208]
    37b6b3c8bmov [rsp+32], rdi
    37b6b3c90mov r8, [rsp+376]
    37b6b3c98mov rcx, [rsp+136]
    37b6b3ca0mov [rsp+56], 3
    37b6b3ca9mov [rsp+40], rax
    37b6b3caecall slacpy_
    37b6b3cb3mov eax, [rsp+224]
    37b6b3cbatest eax, eax
    37b6b3cbcjne 0x37b6b3920
    37b6b3cc2jmp 0x37b6b37a1
    37b6b3cc7
    37b6b3cc7 66 0f 1f 84 00 00 00 00 00 f........
    37b6b3cd0
    37b6b3cd0loc_37b6b3cd0:
    37b6b3cd0mov rax, [rsp+424]
    37b6b3cd8mov r8, rdi
    37b6b3cdbmov rcx, rbp
    37b6b3cdemov [rsp+112], 8
    37b6b3ce7mov [rsp+104], 1
    37b6b3cf0lea r9, [rip+0xd80c43]
    37b6b3cf7lea rdx, [rip+0xd80c44]
    37b6b3cfemov [rsp+80], rax
    37b6b3d03mov rax, [rsp+416]
    37b6b3d0bmov [rsp+96], 5
    37b6b3d14mov [rsp+72], rax
    37b6b3d19mov rax, [rsp+408]
    37b6b3d21mov [rsp+88], 1
    37b6b3d2amov [rsp+64], rax
    37b6b3d2fmov rax, [rsp+400]
    37b6b3d37mov [rsp+56], rax
    37b6b3d3clea rax, [rip+0xd80c05]
    37b6b3d43mov [rsp+48], rax
    37b6b3d48mov rax, [rsp+376]
    37b6b3d50mov [rsp+40], rax
    37b6b3d55mov rax, [rsp+368]
    37b6b3d5dmov [rsp+32], rax
    37b6b3d62call strmm_
    37b6b3d67mov [r15], 0x3f800000
    37b6b3d6ejmp 0x37b6b31d0
    37b6b3d73
    37b6b3d73 0f 1f 44 00 00 ..D..
    37b6b3d78
    37b6b3d78loc_37b6b3d78:
    37b6b3d78test ecx, ecx
    37b6b3d7ajle 0x37b6b37a1
    37b6b3d80lea rdi, [rip+0xd80bbb]
    37b6b3d87lea rdx, [rip+0xd80bc6]
    37b6b3d8emov r11l, 1
    37b6b3d94mov [rsp+176], rdi
    37b6b3d9clea rdi, [rip+0xd80ba9]
    37b6b3da3lea r14, [rip+0xd80bc3]
    37b6b3daamov [rsp+184], rdi
    37b6b3db2lea rdi, [rip+0xd80b98]
    37b6b3db9lea rbp, [rsp+268]
    37b6b3dc1mov [rsp+144], rdx
    37b6b3dc9lea rdx, [rip+0xd80b94]
    37b6b3dd0lea r12, [rip+0xd80b71]
    37b6b3dd7mov [rsp+136], rdi
    37b6b3ddflea rdi, [rsp+260]
    37b6b3de7mov [rsp+200], r14
    37b6b3defmov r14, [rsp+424]
    37b6b3df7mov [rsp+224], rdx
    37b6b3dffmov edx, r9l
    37b6b3e02jmp 0x37b6b3e2a
    37b6b3e04
    37b6b3e04 0f 1f 40 00 ..@.
    37b6b3e08
    37b6b3e08loc_37b6b3e08:
    37b6b3e08mov rcx, [rsp+368]
    37b6b3e10mov r11l, [rsp+240]
    37b6b3e18sub eax, 1
    37b6b3e1bmov r10l, [rsp+248]
    37b6b3e23mov edx, [rsi]
    37b6b3e25mov ecx, [rcx]
    37b6b3e27add r11l, r10l
    37b6b3e2a
    37b6b3e2aloc_37b6b3e2a:
    37b6b3e2asub ecx, r11l
    37b6b3e2dmovsxd r13, r11l
    37b6b3e30mov [rsp+48], rdi
    37b6b3e35mov r8, rbx
    37b6b3e38add ecx, 1
    37b6b3e3bmov [rsp+240], r11l
    37b6b3e43mov r11, [rsp+416]
    37b6b3e4bcmp ecx, r10l
    37b6b3e4emov [rsp+40], r15
    37b6b3e53cmovg ecx, r10l
    37b6b3e57add edx, 1
    37b6b3e5amov [rsp+56], 3
    37b6b3e63mov [rsp+32], r14
    37b6b3e68movsxd rdx, edx
    37b6b3e6bimul rdx, [rsp+168]
    37b6b3e74add rdx, [rsp+192]
    37b6b3e7cmov [rsp+268], ecx
    37b6b3e83mov [rsp+260], ecx
    37b6b3e8aadd rdx, r13
    37b6b3e8dmov rcx, [rsp+136]
    37b6b3e95lea r9, [r11+4*rdx]
    37b6b3e99mov rdx, rbp
    37b6b3e9cmov [rsp+236], eax
    37b6b3ea3mov [rsp+248], r10l
    37b6b3eabcall slacpy_
    37b6b3eb0mov rdx, [rsp+408]
    37b6b3eb8mov [rsp+112], 8
    37b6b3ec1lea r9, [rip+0xd80a72]
    37b6b3ec8mov [rsp+104], 9
    37b6b3ed1mov r11, [rsp+160]
    37b6b3ed9lea r8, [rip+0xd80a84]
    37b6b3ee0mov [rsp+80], rdi
    37b6b3ee5mov r10, [rsp+400]
    37b6b3eedmov [rsp+72], r15
    37b6b3ef2mov rcx, [rsp+200]
    37b6b3efamov [rsp+96], 5
    37b6b3f03mov [rsp+88], 5
    37b6b3f0cmov [rsp+64], rdx
    37b6b3f11mov edx, [rsi]
    37b6b3f13mov [rsp+48], r12
    37b6b3f18add edx, 1
    37b6b3f1bmov [rsp+40], rbx
    37b6b3f20movsxd rdx, edx
    37b6b3f23mov [rsp+32], rbp
    37b6b3f28imul rdx, [rsp+152]
    37b6b3f31lea rdx, [r11+rdx+1]
    37b6b3f36lea rdx, [r10+4*rdx]
    37b6b3f3amov [rsp+56], rdx
    37b6b3f3fmov rdx, [rsp+184]
    37b6b3f47call strmm_
    37b6b3f4cmov [rsp+96], rdi
    37b6b3f51mov r9, rbx
    37b6b3f54mov r8, rbp
    37b6b3f57mov r10, [rsp+408]
    37b6b3f5fmov [rsp+88], r15
    37b6b3f64mov rdx, [rsp+416]
    37b6b3f6cmov [rsp+80], r12
    37b6b3f71mov [rsp+72], r10
    37b6b3f76mov r10, [rsp+400]
    37b6b3f7elea rdx, [rdx+4*r13-4]
    37b6b3f83mov [rsp+56], r14
    37b6b3f88mov rcx, [rsp+144]
    37b6b3f90mov [rsp+64], r10
    37b6b3f95mov [rsp+48], rdx
    37b6b3f9amov [rsp+112], 9
    37b6b3fa3mov [rsp+104], 12
    37b6b3facmov [rsp+40], r12
    37b6b3fb1mov [rsp+32], rsi
    37b6b3fb6mov [rsp+208], rdx
    37b6b3fbemov rdx, [rsp+224]
    37b6b3fc6call sgemm_
    37b6b3fcbmov [rsp+48], rdi
    37b6b3fd0mov r9, [rsp+208]
    37b6b3fd8mov r8, rsi
    37b6b3fdbmov [rsp+56], 3
    37b6b3fe4mov edx, [rbx]
    37b6b3fe6imul edx, [rsp+260]
    37b6b3feemov [rsp+32], r14
    37b6b3ff3mov rcx, [rsp+136]
    37b6b3ffbmovsxd rdx, edx
    37b6b3ffelea rdx, [r15+4*rdx]
    37b6b4002mov [rsp+40], rdx
    37b6b4007mov rdx, rbp
    37b6b400acall slacpy_
    37b6b400fmovsxd rdx, [rbx]
    37b6b4012mov r10l, [rsp+260]
    37b6b401amov [rsp+112], 8
    37b6b4023mov [rsp+104], 9
    37b6b402clea r9, [rip+0xd80907]
    37b6b4033lea r8, [rip+0xd8092a]
    37b6b403aimul r10l, edx
    37b6b403emov [rsp+80], rdi
    37b6b4043mov [rsp+96], 5
    37b6b404cmov [rsp+88], 5
    37b6b4055movsxd rcx, r10l
    37b6b4058mov r10, [rsp+408]
    37b6b4060mov [rsp+48], r12
    37b6b4065lea rcx, [r15+4*rcx]
    37b6b4069mov [rsp+40], rsi
    37b6b406emov [rsp+64], r10
    37b6b4073mov r10, [rsp+400]
    37b6b407bmov [rsp+72], rcx
    37b6b4080mov rcx, [rsp+200]
    37b6b4088lea rdx, [r10+4*rdx]
    37b6b408cmov [rsp+32], rbp
    37b6b4091mov [rsp+56], rdx
    37b6b4096mov rdx, [rsp+176]
    37b6b409ecall strmm_
    37b6b40a3mov r10l, [rsi]
    37b6b40a6mov ecx, [rbx]
    37b6b40a8mov [rsp+96], rdi
    37b6b40admov rax, [rsp+416]
    37b6b40b5mov r11, [rsp+400]
    37b6b40bdmov [rsp+80], r12
    37b6b40c2mov r9, rsi
    37b6b40c5lea edx, [r10+1]
    37b6b40c9mov r10l, [rsp+260]
    37b6b40d1mov [rsp+56], r14
    37b6b40d6movsxd rdx, edx
    37b6b40d9mov [rsp+40], r12
    37b6b40deimul r10l, ecx
    37b6b40e2add ecx, 1
    37b6b40e5mov [rsp+32], rbx
    37b6b40eamov [rsp+112], 9
    37b6b40f3movsxd rcx, ecx
    37b6b40f6mov [rsp+104], 12
    37b6b40ffmovsxd r8, r10l
    37b6b4102mov r10, [rsp+408]
    37b6b410alea r8, [r15+4*r8]
    37b6b410emov [rsp+88], r8
    37b6b4113mov r8, [rsp+152]
    37b6b411bmov [rsp+72], r10
    37b6b4120imul r8, rdx
    37b6b4124add r8, [rsp+160]
    37b6b412cimul rdx, [rsp+168]
    37b6b4135add r8, rcx
    37b6b4138add rdx, [rsp+192]
    37b6b4140add rdx, r13
    37b6b4143lea rcx, [r11+4*r8]
    37b6b4147mov r8, rbp
    37b6b414alea rdx, [rax+4*rdx]
    37b6b414emov [rsp+64], rcx
    37b6b4153mov rcx, [rsp+144]
    37b6b415bmov [rsp+48], rdx
    37b6b4160mov rdx, [rsp+224]
    37b6b4168call sgemm_
    37b6b416dmov rdx, [rsp+208]
    37b6b4175mov r9, r15
    37b6b4178mov [rsp+56], 3
    37b6b4181mov [rsp+48], r14
    37b6b4186mov r8, [rsp+376]
    37b6b418emov [rsp+40], rdx
    37b6b4193mov rcx, [rsp+136]
    37b6b419bmov rdx, rbp
    37b6b419emov [rsp+32], rdi
    37b6b41a3call slacpy_
    37b6b41a8mov eax, [rsp+236]
    37b6b41aftest eax, eax
    37b6b41b1jne 0x37b6b3e08
    37b6b41b7jmp 0x37b6b37a1
    37b6b41bc
    37b6b41bc 0f 1f 40 00 ..@.
    37b6b41c0
    37b6b41c0loc_37b6b41c0:
    37b6b41c0test r11l, r11l
    37b6b41c3jle 0x37b6b37a1
    37b6b41c9mov rdi, [rsp+168]
    37b6b41d1movsxd rdx, r10l
    37b6b41d4mov [rsp+168], -1
    37b6b41e0lea rbp, [rsp+268]
    37b6b41e8mov r14, [rsp+424]
    37b6b41f0lea r12, [rip+0xd80751]
    37b6b41f7imul rdi, rdx
    37b6b41fblea rdx, [rip+0xd80752]
    37b6b4202mov [rsp+144], rdx
    37b6b420alea rdx, [rip+0xd8074f]
    37b6b4211mov [rsp+192], rdx
    37b6b4219mov rdx, [rsp+416]
    37b6b4221mov [rsp+248], rdi
    37b6b4229lea rdi, [rip+0xd80712]
    37b6b4230add rdx, 4
    37b6b4234mov [rsp+176], rdi
    37b6b423clea rdi, [rip+0xd80709]
    37b6b4243mov [rsp+184], rdi
    37b6b424blea rdi, [rip+0xd806ff]
    37b6b4252mov [rsp+200], rdx
    37b6b425alea rdx, [rip+0xd80703]
    37b6b4261mov [rsp+136], rdi
    37b6b4269lea rdi, [rsp+260]
    37b6b4271mov [rsp+208], rdx
    37b6b4279mov edx, r11l
    37b6b427cmov r11l, eax
    37b6b427fmov eax, 1
    37b6b4284jmp 0x37b6b42cd
    37b6b4286
    37b6b4286 66 2e 0f 1f 84 00 00 00 00 00 f.........
    37b6b4290
    37b6b4290loc_37b6b4290:
    37b6b4290mov rcx, [rsp+248]
    37b6b4298add [rsp+168], rcx
    37b6b42a0sub r11l, 1
    37b6b42a4mov rcx, [rsp+376]
    37b6b42acmov r10l, [rsp+236]
    37b6b42b4mov eax, [rsp+240]
    37b6b42bbmov r8l, [rbx]
    37b6b42bemov edx, [rcx]
    37b6b42c0mov rcx, [rsp+368]
    37b6b42c8add eax, r10l
    37b6b42cbmov ecx, [rcx]
    37b6b42cd
    37b6b42cdloc_37b6b42cd:
    37b6b42cdsub edx, eax
    37b6b42cfmov [rsp+240], eax
    37b6b42d6mov r13, [rsp+168]
    37b6b42deadd edx, 1
    37b6b42e1mov rax, [rsp+416]
    37b6b42e9mov [rsp+48], rdi
    37b6b42eecmp edx, r10l
    37b6b42f1mov [rsp+40], r15
    37b6b42f6cmovg edx, r10l
    37b6b42faadd r8l, 1
    37b6b42femov [rsp+56], 3
    37b6b4307mov [rsp+32], r14
    37b6b430cmovsxd r8, r8l
    37b6b430fadd r8, r13
    37b6b4312mov [rsp+260], ecx
    37b6b4319mov rcx, [rsp+136]
    37b6b4321lea r9, [rax+4*r8]
    37b6b4325mov [rsp+268], edx
    37b6b432cmov r8, rbp
    37b6b432fmov rdx, rsi
    37b6b4332mov [rsp+224], r11l
    37b6b433amov [rsp+236], r10l
    37b6b4342call slacpy_
    37b6b4347mov rax, [rsp+408]
    37b6b434fmov [rsp+112], 8
    37b6b4358lea r9, [rip+0xd805db]
    37b6b435fmov [rsp+104], 9
    37b6b4368mov rcx, [rsp+192]
    37b6b4370lea r8, [rip+0xd805ed]
    37b6b4377mov [rsp+64], rax
    37b6b437cmov rax, [rsp+400]
    37b6b4384mov [rsp+96], 5
    37b6b438dmov [rsp+88], 4
    37b6b4396mov [rsp+80], rdi
    37b6b439bmov [rsp+72], r15
    37b6b43a0movsxd rdx, [rbx]
    37b6b43a3mov [rsp+48], r12
    37b6b43a8lea rdx, [rax+4*rdx]
    37b6b43acmov [rsp+40], rbp
    37b6b43b1mov [rsp+56], rdx
    37b6b43b6mov rdx, [rsp+176]
    37b6b43bemov [rsp+32], rsi
    37b6b43c3call strmm_
    37b6b43c8mov [rsp+96], rdi
    37b6b43cdmov r9, rbp
    37b6b43d0mov r8, rsi
    37b6b43d3mov rdx, [rsp+200]
    37b6b43dbmov [rsp+88], r15
    37b6b43e0mov [rsp+168], r13
    37b6b43e8mov rcx, [rsp+208]
    37b6b43f0lea r13, [rdx+4*r13]
    37b6b43f4mov rdx, [rsp+408]
    37b6b43fcmov [rsp+80], r12
    37b6b4401mov [rsp+112], 12
    37b6b440amov [rsp+56], rdx
    37b6b440fmov rdx, [rsp+400]
    37b6b4417mov [rsp+104], 9
    37b6b4420mov [rsp+48], rdx
    37b6b4425mov rdx, [rsp+144]
    37b6b442dmov [rsp+72], r14
    37b6b4432mov [rsp+64], r13
    37b6b4437mov [rsp+40], r12
    37b6b443cmov [rsp+32], rbx
    37b6b4441call sgemm_
    37b6b4446mov [rsp+48], rdi
    37b6b444bmov r9, r13
    37b6b444emov r8, rbp
    37b6b4451mov [rsp+56], 3
    37b6b445amovsxd rdx, [rsi]
    37b6b445dmov [rsp+32], r14
    37b6b4462mov rcx, [rsp+136]
    37b6b446alea rdx, [r15+4*rdx]
    37b6b446emov [rsp+40], rdx
    37b6b4473mov rdx, rbx
    37b6b4476call slacpy_
    37b6b447bmovsxd rcx, [rsi]
    37b6b447emov r10, [rsp+160]
    37b6b4486mov [rsp+112], 8
    37b6b448fmov r9, [rsp+400]
    37b6b4497mov [rsp+80], rdi
    37b6b449clea r8, [rip+0xd804c1]
    37b6b44a3mov rdx, rcx
    37b6b44a6lea rcx, [r15+4*rcx]
    37b6b44aamov r11, [rsp+408]
    37b6b44b2mov [rsp+104], 9
    37b6b44bbadd edx, 1
    37b6b44bemov [rsp+72], rcx
    37b6b44c3mov rcx, [rsp+192]
    37b6b44cbmovsxd rdx, edx
    37b6b44cemov [rsp+64], r11
    37b6b44d3imul rdx, [rsp+152]
    37b6b44dcmov [rsp+96], 5
    37b6b44e5mov [rsp+88], 4
    37b6b44eelea rdx, [r10+rdx+1]
    37b6b44f3mov [rsp+48], r12
    37b6b44f8lea rdx, [r9+4*rdx]
    37b6b44fcmov [rsp+40], rbp
    37b6b4501lea r9, [rip+0xd80432]
    37b6b4508mov [rsp+56], rdx
    37b6b450dmov rdx, [rsp+184]
    37b6b4515mov [rsp+32], rbx
    37b6b451acall strmm_
    37b6b451fmovsxd r8, [rsi]
    37b6b4522mov r9l, [rbx]
    37b6b4525mov [rsp+112], 12
    37b6b452emov rax, [rsp+168]
    37b6b4536mov r11, [rsp+400]
    37b6b453emov [rsp+96], rdi
    37b6b4543mov rdx, r8
    37b6b4546lea ecx, [r9+1]
    37b6b454alea r8, [r15+4*r8]
    37b6b454emov r9, [rsp+416]
    37b6b4556movsxd rcx, ecx
    37b6b4559add edx, 1
    37b6b455cmov [rsp+88], r8
    37b6b4561movsxd rdx, edx
    37b6b4564lea r8, [rax+rcx]
    37b6b4568mov [rsp+80], r12
    37b6b456dimul rdx, [rsp+152]
    37b6b4576lea r8, [r9+4*r8]
    37b6b457amov [rsp+72], r14
    37b6b457fadd rdx, [rsp+160]
    37b6b4587mov [rsp+64], r8
    37b6b458cmov r8, rbx
    37b6b458fmov r9, [rsp+408]
    37b6b4597add rdx, rcx
    37b6b459amov [rsp+40], r12
    37b6b459flea rdx, [r11+4*rdx]
    37b6b45a3mov [rsp+32], rsi
    37b6b45a8mov rcx, [rsp+208]
    37b6b45b0mov [rsp+56], r9
    37b6b45b5mov r9, rbp
    37b6b45b8mov [rsp+48], rdx
    37b6b45bdmov rdx, [rsp+144]
    37b6b45c5mov [rsp+104], 9
    37b6b45cecall sgemm_
    37b6b45d3mov [rsp+48], r14
    37b6b45d8mov r9, r15
    37b6b45dbmov r8, rbp
    37b6b45demov [rsp+40], r13
    37b6b45e3mov rdx, [rsp+368]
    37b6b45ebmov [rsp+32], rdi
    37b6b45f0mov rcx, [rsp+136]
    37b6b45f8mov [rsp+56], 3
    37b6b4601call slacpy_
    37b6b4606mov r11l, [rsp+224]
    37b6b460etest r11l, r11l
    37b6b4611jne 0x37b6b4290
    37b6b4617jmp 0x37b6b37a1
    37b6b461c
    37b6b461c 0f 1f 40 00 ..@.
    37b6b4620
    37b6b4620loc_37b6b4620:
    37b6b4620mov edx, -6
    37b6b4625mov eax, 6
    37b6b462ajmp 0x37b6b31aa
    37b6b462f
    37b6b462f 90 .
    37b6b4630
    37b6b4630loc_37b6b4630:
    37b6b4630mov edx, -8
    37b6b4635mov eax, 8
    37b6b463ajmp 0x37b6b31aa
    37b6b463f
    37b6b463floc_37b6b463f:
    37b6b463fmov edx, -10
    37b6b4644mov eax, 10
    37b6b4649jmp 0x37b6b31aa
    37b6b464e
    37b6b464eloc_37b6b464e:
    37b6b464emov eax, [r12]
    37b6b4652test eax, eax
    37b6b4654je 0x37b6b465d
    37b6b4656
    37b6b4656loc_37b6b4656:
    37b6b4656neg eax
    37b6b4658jmp 0x37b6b31ae
    37b6b465d
    37b6b465dloc_37b6b465d:
    37b6b465dmov eax, r8l
    37b6b4660imul eax, ecx
    37b6b4663lea rcx, [rsp+264]
    37b6b466bmov [rsp+264], eax
    37b6b4672call sroundup_lwork_
    37b6b4677mov eax, [r12]
    37b6b467bmovss [r15], x0
    37b6b4680test eax, eax
    37b6b4682je 0x37b6b31d0
    37b6b4688jmp 0x37b6b4656
    37b6b2f80
    37b6b468a
    37b6b468a // align 0x10
    37b6b4690
    37b6b4690sormbr_:
    37b6b4690push r15
    37b6b4692push r14
    37b6b4694push r13
    37b6b4696push r12
    37b6b4698push rbp
    37b6b4699push rdi
    37b6b469apush rsi
    37b6b469bpush rbx
    37b6b469csub rsp, 200
    37b6b46a3mov rax, [rsp+328]
    37b6b46abmov eax, [rax]
    37b6b46admov [rsp+148], eax
    37b6b46b4mov rsi, rdx
    37b6b46b7mov rdi, r8
    37b6b46bamov rbx, r9
    37b6b46bdmov r8l, 1
    37b6b46c3mov r9l, 1
    37b6b46c9lea rdx, [rip+0xd802b0]
    37b6b46d0mov r12, rcx
    37b6b46d3mov rax, [rsp+352]
    37b6b46dbmov eax, [rax]
    37b6b46ddmov [rsp+144], eax
    37b6b46e4mov rax, [rsp+376]
    37b6b46ecmov [rax], 0
    37b6b46f2call lsame_
    37b6b46f7mov r9l, 1
    37b6b46fdmov r8l, 1
    37b6b4703mov rcx, rsi
    37b6b4706lea rdx, [rip+0xd80274]
    37b6b470dmov ebp, eax
    37b6b470fcall lsame_
    37b6b4714mov r9l, 1
    37b6b471amov r8l, 1
    37b6b4720mov rcx, rdi
    37b6b4723lea rdx, [rip+0xd80258]
    37b6b472amov r15l, eax
    37b6b472dcall lsame_
    37b6b4732mov r14l, [rbx]
    37b6b4735mov [rsp+128], eax
    37b6b473cmov rax, [rsp+368]
    37b6b4744mov eax, [rax]
    37b6b4746mov [rsp+132], eax
    37b6b474dmov rax, [rsp+304]
    37b6b4755mov r13l, [rax]
    37b6b4758test r15l, r15l
    37b6b475bje 0x37b6b4800
    37b6b4761test ebp, ebp
    37b6b4763je 0x37b6b4938
    37b6b4769
    37b6b4769loc_37b6b4769:
    37b6b4769test r13l, r13l
    37b6b476cmov eax, 1
    37b6b4771cmovg eax, r13l
    37b6b4775mov [rsp+136], eax
    37b6b477c
    37b6b477cloc_37b6b477c:
    37b6b477cmov ecx, [rsp+128]
    37b6b4783test ecx, ecx
    37b6b4785je 0x37b6b48a0
    37b6b478b
    37b6b478bloc_37b6b478b:
    37b6b478bmov eax, [rbx]
    37b6b478dtest eax, eax
    37b6b478fjs 0x37b6b4850
    37b6b4795mov rdx, [rsp+304]
    37b6b479dmov edx, [rdx]
    37b6b479ftest edx, edx
    37b6b47a1js 0x37b6b49e0
    37b6b47a7mov rcx, [rsp+312]
    37b6b47afmov edx, [rcx]
    37b6b47b1test edx, edx
    37b6b47b3js 0x37b6b4960
    37b6b47b9mov rcx, [rsp+328]
    37b6b47c1mov ecx, [rcx]
    37b6b47c3test ebp, ebp
    37b6b47c5je 0x37b6b4970
    37b6b47cbtest r14l, r14l
    37b6b47cemov edx, 1
    37b6b47d3cmovg edx, r14l
    37b6b47d7cmp edx, ecx
    37b6b47d9jle 0x37b6b498b
    37b6b47df
    37b6b47dfloc_37b6b47df:
    37b6b47dfmov rax, [rsp+376]
    37b6b47e7lea r12, [rsp+188]
    37b6b47efmov [rax], -8
    37b6b47f5mov eax, -8
    37b6b47fa
    37b6b47faloc_37b6b47fa:
    37b6b47faneg eax
    37b6b47fcjmp 0x37b6b486c
    37b6b47fe
    37b6b47fe 66 90 f.
    37b6b4800
    37b6b4800loc_37b6b4800:
    37b6b4800test ebp, ebp
    37b6b4802je 0x37b6b48f0
    37b6b4808
    37b6b4808loc_37b6b4808:
    37b6b4808mov r9l, 1
    37b6b480emov r8l, 1
    37b6b4814lea rdx, [rip+0xd80168]
    37b6b481bmov rcx, rsi
    37b6b481ecall lsame_
    37b6b4823test eax, eax
    37b6b4825jne 0x37b6b48d0
    37b6b482bmov rax, [rsp+376]
    37b6b4833lea r12, [rsp+188]
    37b6b483bmov [rax], -2
    37b6b4841mov eax, -2
    37b6b4846neg eax
    37b6b4848jmp 0x37b6b486c
    37b6b484a
    37b6b484a 66 0f 1f 44 00 00 f..D..
    37b6b4850
    37b6b4850loc_37b6b4850:
    37b6b4850mov edx, -4
    37b6b4855mov eax, 4
    37b6b485a
    37b6b485aloc_37b6b485a:
    37b6b485amov rdi, [rsp+376]
    37b6b4862lea r12, [rsp+188]
    37b6b486amov [rdi], edx
    37b6b486c
    37b6b486cloc_37b6b486c:
    37b6b486cmov r8l, 6
    37b6b4872mov rdx, r12
    37b6b4875lea rcx, [rip+0xd8011e]
    37b6b487cmov [rsp+188], eax
    37b6b4883call xerbla_
    37b6b4888nop
    37b6b4889
    37b6b4889loc_37b6b4889:
    37b6b4889add rsp, 200
    37b6b4890pop rbx
    37b6b4891pop rsi
    37b6b4892pop rdi
    37b6b4893pop rbp
    37b6b4894pop r12
    37b6b4896pop r13
    37b6b4898pop r14
    37b6b489apop r15
    37b6b489cret
    37b6b489d
    37b6b489d 0f 1f 00 ...
    37b6b48a0
    37b6b48a0loc_37b6b48a0:
    37b6b48a0mov r9l, 1
    37b6b48a6mov r8l, 1
    37b6b48aclea rdx, [rip+0xd800d1]
    37b6b48b3mov rcx, rdi
    37b6b48b6call lsame_
    37b6b48bbtest eax, eax
    37b6b48bdjne 0x37b6b478b
    37b6b48c3mov edx, -3
    37b6b48c8mov eax, 3
    37b6b48cdjmp 0x37b6b485a
    37b6b48cf
    37b6b48cf 90 .
    37b6b48d0
    37b6b48d0loc_37b6b48d0:
    37b6b48d0test r14l, r14l
    37b6b48d3mov eax, 1
    37b6b48d8cmovg eax, r14l
    37b6b48dcmov r14l, r13l
    37b6b48dfmov [rsp+136], eax
    37b6b48e6jmp 0x37b6b477c
    37b6b48eb
    37b6b48eb 0f 1f 44 00 00 ..D..
    37b6b48f0
    37b6b48f0loc_37b6b48f0:
    37b6b48f0mov r9l, 1
    37b6b48f6mov r8l, 1
    37b6b48fclea rdx, [rip+0xd8009d]
    37b6b4903mov rcx, r12
    37b6b4906call lsame_
    37b6b490btest eax, eax
    37b6b490djne 0x37b6b4808
    37b6b4913
    37b6b4913loc_37b6b4913:
    37b6b4913mov rax, [rsp+376]
    37b6b491blea r12, [rsp+188]
    37b6b4923mov [rax], -1
    37b6b4929mov eax, -1
    37b6b492eneg eax
    37b6b4930jmp 0x37b6b486c
    37b6b4935
    37b6b4935 0f 1f 00 ...
    37b6b4938
    37b6b4938loc_37b6b4938:
    37b6b4938mov r9l, 1
    37b6b493emov r8l, 1
    37b6b4944lea rdx, [rip+0xd80055]
    37b6b494bmov rcx, r12
    37b6b494ecall lsame_
    37b6b4953test eax, eax
    37b6b4955jne 0x37b6b4769
    37b6b495bjmp 0x37b6b4913
    37b6b495d
    37b6b495d 0f 1f 00 ...
    37b6b4960
    37b6b4960loc_37b6b4960:
    37b6b4960mov edx, -6
    37b6b4965mov eax, 6
    37b6b496ajmp 0x37b6b485a
    37b6b496f
    37b6b496f 90 .
    37b6b4970
    37b6b4970loc_37b6b4970:
    37b6b4970cmp edx, r14l
    37b6b4973mov r8l, 1
    37b6b4979cmovg edx, r14l
    37b6b497dtest edx, edx
    37b6b497fcmovle edx, r8l
    37b6b4983cmp edx, ecx
    37b6b4985jg 0x37b6b47df
    37b6b498b
    37b6b498bloc_37b6b498b:
    37b6b498bmov rcx, [rsp+352]
    37b6b4993test eax, eax
    37b6b4995mov edx, 1
    37b6b499acmovle eax, edx
    37b6b499dcmp [rcx], eax
    37b6b499fjl 0x37b6b49f0
    37b6b49a1mov rax, [rsp+368]
    37b6b49a9mov ecx, [rsp+136]
    37b6b49b0cmp [rax], ecx
    37b6b49b2mov rax, [rsp+376]
    37b6b49bajge 0x37b6b4a00
    37b6b49bccmp [rsp+132], -1
    37b6b49c4je 0x37b6b4a00
    37b6b49c6mov [rax], -13
    37b6b49cclea r12, [rsp+188]
    37b6b49d4mov eax, 13
    37b6b49d9jmp 0x37b6b486c
    37b6b49de
    37b6b49de 66 90 f.
    37b6b49e0
    37b6b49e0loc_37b6b49e0:
    37b6b49e0mov edx, -5
    37b6b49e5mov eax, 5
    37b6b49eajmp 0x37b6b485a
    37b6b49ef
    37b6b49ef 90 .
    37b6b49f0
    37b6b49f0loc_37b6b49f0:
    37b6b49f0mov edx, -11
    37b6b49f5mov eax, 11
    37b6b49fajmp 0x37b6b485a
    37b6b49ff
    37b6b49ff 90 .
    37b6b4a00
    37b6b4a00loc_37b6b4a00:
    37b6b4a00mov eax, [rax]
    37b6b4a02test eax, eax
    37b6b4a04jne 0x37b6b5089
    37b6b4a0alea r13, [rsp+180]
    37b6b4a12mov [rsp+40], rdi
    37b6b4a17mov r9, rsi
    37b6b4a1amov ecx, 2
    37b6b4a1fmov [rsp+32], 1
    37b6b4a28mov r8l, 1
    37b6b4a2emov rdx, r13
    37b6b4a31test ebp, ebp
    37b6b4a33je 0x37b6b4c60
    37b6b4a39test r15l, r15l
    37b6b4a3cje 0x37b6b4e08
    37b6b4a42call _gfortran_concat_string
    37b6b4a47mov eax, [rbx]
    37b6b4a49lea r12, [rsp+188]
    37b6b4a51mov [rsp+64], 2
    37b6b4a5amov [rsp+40], r12
    37b6b4a5flea r9, [rsp+184]
    37b6b4a67mov r8, r13
    37b6b4a6alea rdx, [rip+0xd7ff14]
    37b6b4a71sub eax, 1
    37b6b4a74lea rcx, [rip+0xd7ff11]
    37b6b4a7bmov [rsp+56], 6
    37b6b4a84mov [rsp+184], eax
    37b6b4a8bmov [rsp+188], eax
    37b6b4a92lea rax, [rip+0xd7fef7]
    37b6b4a99mov [rsp+48], rax
    37b6b4a9emov rax, [rsp+304]
    37b6b4aa6mov [rsp+152], r9
    37b6b4aaemov [rsp+32], rax
    37b6b4ab3call ilaenv_
    37b6b4ab8
    37b6b4ab8loc_37b6b4ab8:
    37b6b4ab8imul eax, [rsp+136]
    37b6b4ac0mov [rsp+176], eax
    37b6b4ac7lea rax, [rsp+176]
    37b6b4acfmov rcx, rax
    37b6b4ad2mov [rsp+136], rax
    37b6b4adacall sroundup_lwork_
    37b6b4adfmov rax, [rsp+360]
    37b6b4ae7movss [rax], x0
    37b6b4aebmov rax, [rsp+376]
    37b6b4af3mov eax, [rax]
    37b6b4af5test eax, eax
    37b6b4af7jne 0x37b6b47fa
    37b6b4afdcmp [rsp+132], -1
    37b6b4b05je 0x37b6b4889
    37b6b4b0bmov rax, [rsp+360]
    37b6b4b13mov [rax], 0x3f800000
    37b6b4b19mov eax, [rbx]
    37b6b4b1btest eax, eax
    37b6b4b1dje 0x37b6b4889
    37b6b4b23mov rcx, [rsp+304]
    37b6b4b2bmov ecx, [rcx]
    37b6b4b2dtest ecx, ecx
    37b6b4b2fje 0x37b6b4889
    37b6b4b35movsxd rdx, [rsp+144]
    37b6b4b3dxor r8l, r8l
    37b6b4b40mov r11, [rsp+312]
    37b6b4b48test rdx, rdx
    37b6b4b4bmov r9l, [r11]
    37b6b4b4ecmovs rdx, r8
    37b6b4b52mov r10, rdx
    37b6b4b55not r10
    37b6b4b58test ebp, ebp
    37b6b4b5aje 0x37b6b4ce8
    37b6b4b60cmp r14l, r9l
    37b6b4b63jge 0x37b6b4f10
    37b6b4b69cmp r14l, 1
    37b6b4b6djle 0x37b6b4c40
    37b6b4b73test r15l, r15l
    37b6b4b76je 0x37b6b5078
    37b6b4b7csub eax, 1
    37b6b4b7fmov edx, 4
    37b6b4b84
    37b6b4b84loc_37b6b4b84:
    37b6b4b84mov [rsp+32], r12
    37b6b4b89mov r9, [rsp+152]
    37b6b4b91mov r8, r13
    37b6b4b94mov [rsp+180], eax
    37b6b4b9blea eax, [r14-1]
    37b6b4b9fmov [rsp+188], eax
    37b6b4ba6lea rax, [rsp+172]
    37b6b4baemov [rsp+96], rax
    37b6b4bb3mov rax, [rsp+368]
    37b6b4bbbmov [rsp+104], 1
    37b6b4bc4mov [rsp+88], rax
    37b6b4bc9mov rax, [rsp+360]
    37b6b4bd1mov [rsp+184], ecx
    37b6b4bd8mov rcx, rsi
    37b6b4bdbmov [rsp+80], rax
    37b6b4be0mov rax, [rsp+352]
    37b6b4be8mov [rsp+112], 1
    37b6b4bf1mov [rsp+72], rax
    37b6b4bf6mov rax, [rsp+344]
    37b6b4bfeadd rax, rdx
    37b6b4c01mov rdx, rdi
    37b6b4c04mov [rsp+64], rax
    37b6b4c09mov rax, [rsp+336]
    37b6b4c11mov [rsp+56], rax
    37b6b4c16mov rax, [rsp+328]
    37b6b4c1emov [rsp+48], rax
    37b6b4c23mov rax, [rsp+320]
    37b6b4c2badd rax, 4
    37b6b4c2fmov [rsp+40], rax
    37b6b4c34call sormqr_
    37b6b4c39nop [rax]
    37b6b4c40
    37b6b4c40loc_37b6b4c40:
    37b6b4c40mov rcx, [rsp+136]
    37b6b4c48call sroundup_lwork_
    37b6b4c4dmov rax, [rsp+360]
    37b6b4c55movss [rax], x0
    37b6b4c59jmp 0x37b6b4889
    37b6b4c5e
    37b6b4c5e 66 90 f.
    37b6b4c60
    37b6b4c60loc_37b6b4c60:
    37b6b4c60test r15l, r15l
    37b6b4c63je 0x37b6b4e90
    37b6b4c69call _gfortran_concat_string
    37b6b4c6emov eax, [rbx]
    37b6b4c70lea r12, [rsp+188]
    37b6b4c78mov [rsp+64], 2
    37b6b4c81mov [rsp+40], r12
    37b6b4c86lea r9, [rsp+184]
    37b6b4c8emov r8, r13
    37b6b4c91lea rdx, [rip+0xd7fcfc]
    37b6b4c98sub eax, 1
    37b6b4c9blea rcx, [rip+0xd7fcea]
    37b6b4ca2mov [rsp+56], 6
    37b6b4cabmov [rsp+184], eax
    37b6b4cb2mov [rsp+188], eax
    37b6b4cb9lea rax, [rip+0xd7fcd0]
    37b6b4cc0mov [rsp+48], rax
    37b6b4cc5mov rax, [rsp+304]
    37b6b4ccdmov [rsp+152], r9
    37b6b4cd5mov [rsp+32], rax
    37b6b4cdacall ilaenv_
    37b6b4cdfjmp 0x37b6b4ab8
    37b6b4ce4
    37b6b4ce4 0f 1f 40 00 ..@.
    37b6b4ce8
    37b6b4ce8loc_37b6b4ce8:
    37b6b4ce8cmp [rsp+128], 1
    37b6b4cf0sbb r8l, r8l
    37b6b4cf3and r8l, -6
    37b6b4cf7add r8l, 84
    37b6b4cfbmov [rsp+171], r8b
    37b6b4d03cmp r14l, r9l
    37b6b4d06jg 0x37b6b4fb0
    37b6b4d0ccmp r14l, 1
    37b6b4d10jle 0x37b6b4c40
    37b6b4d16movsxd r8, [rsp+148]
    37b6b4d1exor r9l, r9l
    37b6b4d21test r8, r8
    37b6b4d24cmovs r8, r9
    37b6b4d28mov r9, r8
    37b6b4d2bnot r9
    37b6b4d2etest r15l, r15l
    37b6b4d31je 0x37b6b5060
    37b6b4d37sub eax, 1
    37b6b4d3amov edx, 4
    37b6b4d3f
    37b6b4d3floc_37b6b4d3f:
    37b6b4d3fmov [rsp+180], eax
    37b6b4d46lea eax, [r14-1]
    37b6b4d4amov rbx, [rsp+320]
    37b6b4d52mov [rsp+188], eax
    37b6b4d59lea rax, [rsp+172]
    37b6b4d61mov [rsp+96], rax
    37b6b4d66mov rax, [rsp+368]
    37b6b4d6emov [rsp+104], 1
    37b6b4d77mov [rsp+88], rax
    37b6b4d7cmov rax, [rsp+360]
    37b6b4d84mov [rsp+32], r12
    37b6b4d89mov [rsp+80], rax
    37b6b4d8emov rax, [rsp+352]
    37b6b4d96mov [rsp+184], ecx
    37b6b4d9dmov rcx, rsi
    37b6b4da0mov [rsp+72], rax
    37b6b4da5mov rax, [rsp+344]
    37b6b4dadmov [rsp+112], 1
    37b6b4db6add rax, rdx
    37b6b4db9lea rdx, [rsp+171]
    37b6b4dc1mov [rsp+64], rax
    37b6b4dc6mov rax, [rsp+336]
    37b6b4dcemov [rsp+56], rax
    37b6b4dd3mov rax, [rsp+328]
    37b6b4ddbmov [rsp+48], rax
    37b6b4de0lea rax, [r9+2*r8+1]
    37b6b4de5mov r8, r13
    37b6b4de8mov r9, [rsp+152]
    37b6b4df0lea rax, [rbx+4*rax]
    37b6b4df4mov [rsp+40], rax
    37b6b4df9call sormlq_
    37b6b4dfejmp 0x37b6b4c40
    37b6b4e03
    37b6b4e03 0f 1f 44 00 00 ..D..
    37b6b4e08
    37b6b4e08loc_37b6b4e08:
    37b6b4e08call _gfortran_concat_string
    37b6b4e0dmov rax, [rsp+304]
    37b6b4e15mov r9, rbx
    37b6b4e18mov r8, r13
    37b6b4e1blea r12, [rsp+188]
    37b6b4e23lea rdx, [rip+0xd7fb5b]
    37b6b4e2amov eax, [rax]
    37b6b4e2cmov [rsp+40], r12
    37b6b4e31lea rcx, [rip+0xd7fb54]
    37b6b4e38mov [rsp+64], 2
    37b6b4e41mov [rsp+56], 6
    37b6b4e4asub eax, 1
    37b6b4e4dmov [rsp+184], eax
    37b6b4e54mov [rsp+188], eax
    37b6b4e5blea rax, [rip+0xd7fb2e]
    37b6b4e62mov [rsp+48], rax
    37b6b4e67lea rax, [rsp+184]
    37b6b4e6fmov [rsp+32], rax
    37b6b4e74mov [rsp+152], rax
    37b6b4e7ccall ilaenv_
    37b6b4e81jmp 0x37b6b4ab8
    37b6b4e86
    37b6b4e86 66 2e 0f 1f 84 00 00 00 00 00 f.........
    37b6b4e90
    37b6b4e90loc_37b6b4e90:
    37b6b4e90call _gfortran_concat_string
    37b6b4e95mov rax, [rsp+304]
    37b6b4e9dmov r9, rbx
    37b6b4ea0mov r8, r13
    37b6b4ea3lea r12, [rsp+188]
    37b6b4eablea rdx, [rip+0xd7fae2]
    37b6b4eb2mov eax, [rax]
    37b6b4eb4mov [rsp+40], r12
    37b6b4eb9lea rcx, [rip+0xd7facc]
    37b6b4ec0mov [rsp+64], 2
    37b6b4ec9mov [rsp+56], 6
    37b6b4ed2sub eax, 1
    37b6b4ed5mov [rsp+184], eax
    37b6b4edcmov [rsp+188], eax
    37b6b4ee3lea rax, [rip+0xd7faa6]
    37b6b4eeamov [rsp+48], rax
    37b6b4eeflea rax, [rsp+184]
    37b6b4ef7mov [rsp+32], rax
    37b6b4efcmov [rsp+152], rax
    37b6b4f04call ilaenv_
    37b6b4f09jmp 0x37b6b4ab8
    37b6b4f0e
    37b6b4f0e 66 90 f.
    37b6b4f10
    37b6b4f10loc_37b6b4f10:
    37b6b4f10mov [rsp+32], r11
    37b6b4f15mov r8, rbx
    37b6b4f18mov rdx, rdi
    37b6b4f1bmov rcx, rsi
    37b6b4f1elea rax, [rsp+172]
    37b6b4f26mov r9, [rsp+304]
    37b6b4f2emov [rsp+112], 1
    37b6b4f37mov [rsp+96], rax
    37b6b4f3cmov rax, [rsp+368]
    37b6b4f44mov [rsp+104], 1
    37b6b4f4dmov [rsp+88], rax
    37b6b4f52mov rax, [rsp+360]
    37b6b4f5amov [rsp+80], rax
    37b6b4f5fmov rax, [rsp+352]
    37b6b4f67mov [rsp+72], rax
    37b6b4f6cmov rax, [rsp+344]
    37b6b4f74mov [rsp+64], rax
    37b6b4f79mov rax, [rsp+336]
    37b6b4f81mov [rsp+56], rax
    37b6b4f86mov rax, [rsp+328]
    37b6b4f8emov [rsp+48], rax
    37b6b4f93mov rax, [rsp+320]
    37b6b4f9bmov [rsp+40], rax
    37b6b4fa0call sormqr_
    37b6b4fa5jmp 0x37b6b4c40
    37b6b4faa
    37b6b4faa 66 0f 1f 44 00 00 f..D..
    37b6b4fb0
    37b6b4fb0loc_37b6b4fb0:
    37b6b4fb0lea rax, [rsp+172]
    37b6b4fb8mov r8, rbx
    37b6b4fbbmov rcx, rsi
    37b6b4fbemov [rsp+112], 1
    37b6b4fc7mov [rsp+96], rax
    37b6b4fccmov rax, [rsp+368]
    37b6b4fd4lea rdx, [rsp+171]
    37b6b4fdcmov [rsp+104], 1
    37b6b4fe5mov r9, [rsp+304]
    37b6b4fedmov [rsp+88], rax
    37b6b4ff2mov rax, [rsp+360]
    37b6b4ffamov [rsp+80], rax
    37b6b4fffmov rax, [rsp+352]
    37b6b5007mov [rsp+72], rax
    37b6b500cmov rax, [rsp+344]
    37b6b5014mov [rsp+64], rax
    37b6b5019mov rax, [rsp+336]
    37b6b5021mov [rsp+56], rax
    37b6b5026mov rax, [rsp+328]
    37b6b502emov [rsp+48], rax
    37b6b5033mov rax, [rsp+320]
    37b6b503bmov [rsp+40], rax
    37b6b5040mov rax, [rsp+312]
    37b6b5048mov [rsp+32], rax
    37b6b504dcall sormlq_
    37b6b5052jmp 0x37b6b4c40
    37b6b5057
    37b6b5057 66 0f 1f 84 00 00 00 00 00 f........
    37b6b5060
    37b6b5060loc_37b6b5060:
    37b6b5060lea rdx, [r10+2*rdx+1]
    37b6b5065sub ecx, 1
    37b6b5068shl rdx, 2
    37b6b506cjmp 0x37b6b4d3f
    37b6b5071
    37b6b5071 0f 1f 80 00 00 00 00 .......
    37b6b5078
    37b6b5078loc_37b6b5078:
    37b6b5078lea rdx, [r10+2*rdx+1]
    37b6b507dsub ecx, 1
    37b6b5080shl rdx, 2
    37b6b5084jmp 0x37b6b4b84
    37b6b5089
    37b6b5089loc_37b6b5089:
    37b6b5089neg eax
    37b6b508blea r12, [rsp+188]
    37b6b5093jmp 0x37b6b486c
    37b6b4690
    37b6b5098
    37b6b5098 // align 0x10
    37b6b50a0
    37b6b50a0sormhr_:
    37b6b50a0push r15
    37b6b50a2push r14
    37b6b50a4push r13
    37b6b50a6push r12
    37b6b50a8push rbp
    37b6b50a9push rdi
    37b6b50aapush rsi
    37b6b50abpush rbx
    37b6b50acsub rsp, 184
    37b6b50b3mov rax, [rsp+312]
    37b6b50bbmov r14, [rsp+296]
    37b6b50c3mov eax, [rax]
    37b6b50c5mov [rsp+136], eax
    37b6b50ccmov rsi, rcx
    37b6b50cfmov rbx, r8
    37b6b50d2mov rdi, r9
    37b6b50d5mov rbp, rdx
    37b6b50d8mov rax, [rsp+336]
    37b6b50e0mov rcx, [rsp+288]
    37b6b50e8mov r9l, 1
    37b6b50eemov r8l, 1
    37b6b50f4lea rdx, [rip+0xd7f8b5]
    37b6b50fbmov eax, [rax]
    37b6b50fdmov [rsp+140], eax
    37b6b5104mov rax, [rsp+360]
    37b6b510cmov [rax], 0
    37b6b5112mov eax, [r14]
    37b6b5115sub eax, [rcx]
    37b6b5117mov rcx, rsi
    37b6b511amov [rsp+168], eax
    37b6b5121call lsame_
    37b6b5126mov r10l, [rdi]
    37b6b5129mov r13l, [rbx]
    37b6b512cmov r12l, eax
    37b6b512fmov rax, [rsp+352]
    37b6b5137mov r15l, [rax]
    37b6b513atest r12l, r12l
    37b6b513dje 0x37b6b51c0
    37b6b5143test r10l, r10l
    37b6b5146mov eax, 1
    37b6b514bcmovg eax, r10l
    37b6b514fmov [rsp+128], eax
    37b6b5156
    37b6b5156loc_37b6b5156:
    37b6b5156mov r9l, 1
    37b6b515cmov r8l, 1
    37b6b5162lea rdx, [rip+0xd7f849]
    37b6b5169mov rcx, rbp
    37b6b516ccall lsame_
    37b6b5171test eax, eax
    37b6b5173je 0x37b6b5280
    37b6b5179
    37b6b5179loc_37b6b5179:
    37b6b5179mov eax, [rbx]
    37b6b517btest eax, eax
    37b6b517djs 0x37b6b5210
    37b6b5183mov edx, [rdi]
    37b6b5185test edx, edx
    37b6b5187js 0x37b6b52b8
    37b6b518dmov rcx, [rsp+288]
    37b6b5195test r13l, r13l
    37b6b5198mov edx, 1
    37b6b519dcmovg edx, r13l
    37b6b51a1mov ecx, [rcx]
    37b6b51a3cmp ecx, edx
    37b6b51a5jg 0x37b6b51af
    37b6b51a7test ecx, ecx
    37b6b51a9jg 0x37b6b52d0
    37b6b51af
    37b6b51afloc_37b6b51af:
    37b6b51afmov edx, -5
    37b6b51b4mov eax, 5
    37b6b51b9jmp 0x37b6b521a
    37b6b51bb
    37b6b51bb 0f 1f 44 00 00 ..D..
    37b6b51c0
    37b6b51c0loc_37b6b51c0:
    37b6b51c0mov r9l, 1
    37b6b51c6mov r8l, 1
    37b6b51ccmov rcx, rsi
    37b6b51cfmov [rsp+128], r10l
    37b6b51d7lea rdx, [rip+0xd7f7d3]
    37b6b51decall lsame_
    37b6b51e3test eax, eax
    37b6b51e5jne 0x37b6b5260
    37b6b51e7mov rax, [rsp+360]
    37b6b51eflea r13, [rsp+172]
    37b6b51f7mov [rax], -1
    37b6b51fdmov eax, -1
    37b6b5202
    37b6b5202loc_37b6b5202:
    37b6b5202neg eax
    37b6b5204jmp 0x37b6b522c
    37b6b5206
    37b6b5206 66 2e 0f 1f 84 00 00 00 00 00 f.........
    37b6b5210
    37b6b5210loc_37b6b5210:
    37b6b5210mov edx, -3
    37b6b5215mov eax, 3
    37b6b521a
    37b6b521aloc_37b6b521a:
    37b6b521amov rdi, [rsp+360]
    37b6b5222lea r13, [rsp+172]
    37b6b522amov [rdi], edx
    37b6b522c
    37b6b522cloc_37b6b522c:
    37b6b522cmov r8l, 6
    37b6b5232mov rdx, r13
    37b6b5235lea rcx, [rip+0xd7f788]
    37b6b523cmov [rsp+172], eax
    37b6b5243call xerbla_
    37b6b5248nop
    37b6b5249
    37b6b5249loc_37b6b5249:
    37b6b5249add rsp, 184
    37b6b5250pop rbx
    37b6b5251pop rsi
    37b6b5252pop rdi
    37b6b5253pop rbp
    37b6b5254pop r12
    37b6b5256pop r13
    37b6b5258pop r14
    37b6b525apop r15
    37b6b525cret
    37b6b525d
    37b6b525d 0f 1f 00 ...
    37b6b5260
    37b6b5260loc_37b6b5260:
    37b6b5260test r13l, r13l
    37b6b5263mov eax, 1
    37b6b5268cmovg eax, r13l
    37b6b526cmov r13l, [rsp+128]
    37b6b5274mov [rsp+128], eax
    37b6b527bjmp 0x37b6b5156
    37b6b5280
    37b6b5280loc_37b6b5280:
    37b6b5280mov r9l, 1
    37b6b5286mov r8l, 1
    37b6b528clea rdx, [rip+0xd7f720]
    37b6b5293mov rcx, rbp
    37b6b5296call lsame_
    37b6b529btest eax, eax
    37b6b529djne 0x37b6b5179
    37b6b52a3mov edx, -2
    37b6b52a8mov eax, 2
    37b6b52adjmp 0x37b6b521a
    37b6b52b2
    37b6b52b2 66 0f 1f 44 00 00 f..D..
    37b6b52b8
    37b6b52b8loc_37b6b52b8:
    37b6b52b8mov edx, -4
    37b6b52bdmov eax, 4
    37b6b52c2jmp 0x37b6b521a
    37b6b52c7
    37b6b52c7 66 0f 1f 84 00 00 00 00 00 f........
    37b6b52d0
    37b6b52d0loc_37b6b52d0:
    37b6b52d0cmp ecx, r13l
    37b6b52d3mov r8l, [r14]
    37b6b52d6cmovg ecx, r13l
    37b6b52dacmp r8l, ecx
    37b6b52ddjl 0x37b6b52e4
    37b6b52dfcmp r8l, r13l
    37b6b52e2jle 0x37b6b52f8
    37b6b52e4
    37b6b52e4loc_37b6b52e4:
    37b6b52e4mov edx, -6
    37b6b52e9mov eax, 6
    37b6b52eejmp 0x37b6b521a
    37b6b52f3
    37b6b52f3 0f 1f 44 00 00 ..D..
    37b6b52f8
    37b6b52f8loc_37b6b52f8:
    37b6b52f8mov rcx, [rsp+312]
    37b6b5300cmp [rcx], edx
    37b6b5302jl 0x37b6b5617
    37b6b5308mov edx, 1
    37b6b530dtest eax, eax
    37b6b530fcmovle eax, edx
    37b6b5312mov rdx, [rsp+336]
    37b6b531acmp [rdx], eax
    37b6b531cjl 0x37b6b5626
    37b6b5322mov rax, [rsp+352]
    37b6b532amov edx, [rsp+128]
    37b6b5331cmp [rax], edx
    37b6b5333mov rax, [rsp+360]
    37b6b533bjge 0x37b6b5360
    37b6b533dcmp r15l, -1
    37b6b5341je 0x37b6b5360
    37b6b5343mov [rax], -13
    37b6b5349lea r13, [rsp+172]
    37b6b5351mov eax, 13
    37b6b5356jmp 0x37b6b522c
    37b6b535b
    37b6b535b 0f 1f 44 00 00 ..D..
    37b6b5360
    37b6b5360loc_37b6b5360:
    37b6b5360mov eax, [rax]
    37b6b5362test eax, eax
    37b6b5364jne 0x37b6b5635
    37b6b536alea r13, [rsp+172]
    37b6b5372mov [rsp+40], rbp
    37b6b5377mov r9, rsi
    37b6b537amov ecx, 2
    37b6b537fmov [rsp+32], 1
    37b6b5388mov r8l, 1
    37b6b538emov rdx, r13
    37b6b5391test r12l, r12l
    37b6b5394je 0x37b6b55b0
    37b6b539acall _gfortran_concat_string
    37b6b539flea r14, [rsp+168]
    37b6b53a7mov [rsp+32], rdi
    37b6b53acmov r8, r13
    37b6b53aflea rax, [rip+0xd7f60a]
    37b6b53b6mov [rsp+40], r14
    37b6b53bbmov r9, r14
    37b6b53belea rdx, [rip+0xd7f5ef]
    37b6b53c5mov [rsp+64], 2
    37b6b53celea rcx, [rip+0xd7f5e7]
    37b6b53d5mov [rsp+56], 6
    37b6b53demov [rsp+48], rax
    37b6b53e3call ilaenv_
    37b6b53e8
    37b6b53e8loc_37b6b53e8:
    37b6b53e8imul eax, [rsp+128]
    37b6b53f0mov [rsp+160], eax
    37b6b53f7lea rax, [rsp+160]
    37b6b53ffmov rcx, rax
    37b6b5402mov [rsp+128], rax
    37b6b540acall sroundup_lwork_
    37b6b540fmov rax, [rsp+344]
    37b6b5417movss [rax], x0
    37b6b541bmov rax, [rsp+360]
    37b6b5423mov eax, [rax]
    37b6b5425test eax, eax
    37b6b5427jne 0x37b6b5202
    37b6b542dcmp r15l, -1
    37b6b5431je 0x37b6b5249
    37b6b5437mov ecx, [rbx]
    37b6b5439test ecx, ecx
    37b6b543bje 0x37b6b5598
    37b6b5441mov ebx, [rdi]
    37b6b5443test ebx, ebx
    37b6b5445je 0x37b6b5598
    37b6b544bmov r9l, [rsp+168]
    37b6b5453test r9l, r9l
    37b6b5456je 0x37b6b5598
    37b6b545cmovsxd r8, [rsp+136]
    37b6b5464xor eax, eax
    37b6b5466test r8, r8
    37b6b5469cmovs r8, rax
    37b6b546dmov rax, [rsp+288]
    37b6b5475movsxd rax, [rax]
    37b6b5478mov r11, r8
    37b6b547bnot r11
    37b6b547elea r10l, [rax+1]
    37b6b5482movsxd r10, r10l
    37b6b5485test r12l, r12l
    37b6b5488jne 0x37b6b5608
    37b6b548emovsxd rdx, [rsp+140]
    37b6b5496xor ebx, ebx
    37b6b5498test rdx, rdx
    37b6b549bcmovs rdx, rbx
    37b6b549fmov rbx, rdx
    37b6b54a2imul rdx, r10
    37b6b54a6not rbx
    37b6b54a9add rdx, rbx
    37b6b54acmov ebx, r9l
    37b6b54afmov r9l, ecx
    37b6b54b2mov ecx, 1
    37b6b54b7
    37b6b54b7loc_37b6b54b7:
    37b6b54b7add rdx, rcx
    37b6b54bamov [rsp+32], r14
    37b6b54bfmov rcx, [rsp+328]
    37b6b54c7mov rdi, [rsp+352]
    37b6b54cfmov [rsp+172], ebx
    37b6b54d6lea rdx, [rcx+4*rdx]
    37b6b54damov rcx, rsi
    37b6b54ddmov [rsp+164], r9l
    37b6b54e5lea r9, [rsp+156]
    37b6b54edmov [rsp+64], rdx
    37b6b54f2mov rdx, [rsp+320]
    37b6b54famov [rsp+88], rdi
    37b6b54ffmov rdi, [rsp+344]
    37b6b5507lea rdx, [rdx+4*rax-4]
    37b6b550cmov [rsp+96], r9
    37b6b5511mov r9, r13
    37b6b5514imul rax, r8
    37b6b5518mov [rsp+80], rdi
    37b6b551dmov rdi, [rsp+336]
    37b6b5525lea r8, [rsp+164]
    37b6b552dmov [rsp+56], rdx
    37b6b5532mov rdx, [rsp+304]
    37b6b553amov [rsp+72], rdi
    37b6b553fmov rdi, [rsp+312]
    37b6b5547mov [rsp+112], 1
    37b6b5550add rax, r11
    37b6b5553add rax, r10
    37b6b5556mov [rsp+48], rdi
    37b6b555bmov [rsp+104], 1
    37b6b5564lea rax, [rdx+4*rax]
    37b6b5568mov rdx, rbp
    37b6b556bmov [rsp+40], rax
    37b6b5570call sormqr_
    37b6b5575mov rcx, [rsp+128]
    37b6b557dcall sroundup_lwork_
    37b6b5582mov rax, [rsp+344]
    37b6b558amovss [rax], x0
    37b6b558ejmp 0x37b6b5249
    37b6b5593
    37b6b5593 0f 1f 44 00 00 ..D..
    37b6b5598
    37b6b5598loc_37b6b5598:
    37b6b5598mov rax, [rsp+344]
    37b6b55a0mov [rax], 0x3f800000
    37b6b55a6jmp 0x37b6b5249
    37b6b55ab
    37b6b55ab 0f 1f 44 00 00 ..D..
    37b6b55b0
    37b6b55b0loc_37b6b55b0:
    37b6b55b0call _gfortran_concat_string
    37b6b55b5lea r14, [rsp+168]
    37b6b55bdmov r9, rbx
    37b6b55c0mov r8, r13
    37b6b55c3lea rax, [rip+0xd7f3f6]
    37b6b55camov [rsp+40], r14
    37b6b55cflea rdx, [rip+0xd7f3de]
    37b6b55d6mov [rsp+64], 2
    37b6b55dflea rcx, [rip+0xd7f3d6]
    37b6b55e6mov [rsp+56], 6
    37b6b55efmov [rsp+48], rax
    37b6b55f4mov [rsp+32], r14
    37b6b55f9call ilaenv_
    37b6b55fejmp 0x37b6b53e8
    37b6b5603
    37b6b5603 0f 1f 44 00 00 ..D..
    37b6b5608
    37b6b5608loc_37b6b5608:
    37b6b5608mov rcx, r10
    37b6b560bmov rdx, -1
    37b6b5612jmp 0x37b6b54b7
    37b6b5617
    37b6b5617loc_37b6b5617:
    37b6b5617mov edx, -8
    37b6b561cmov eax, 8
    37b6b5621jmp 0x37b6b521a
    37b6b5626
    37b6b5626loc_37b6b5626:
    37b6b5626mov edx, -11
    37b6b562bmov eax, 11
    37b6b5630jmp 0x37b6b521a
    37b6b5635
    37b6b5635loc_37b6b5635:
    37b6b5635neg eax
    37b6b5637lea r13, [rsp+172]
    37b6b563fjmp 0x37b6b522c
    37b6b50a0