Function at 0x492dd0
Capabilities:
Terminate process
Write file on windows

Disassembly:
push ebp
mov ebp, esp
sub esp, 0x460
mov dword [ebp - 8], edi
mov dword [ebp - 0xc], esi
mov dword [ebp - 0x10], ebx
mov eax, dword [ebp + 8]
mov dword [ebp - 0x3f4], eax
call dword [sym.imp.KERNEL32.dll_IsDebuggerPresent]
test eax, eax
jne 0x492e13
push str.FOR__IS_DEBUGGER_PRESENT
call fcn.0049e640
pop ecx
test eax, eax
jne 0x492e13
push str.FOR_DEBUGGER_IS_PRESENT
call fcn.0049e640
pop ecx
test eax, eax
je 0x492e1c
mov dword [ebp - 0x14], 1
jmp 0x492e23
mov dword [ebp - 0x14], 0
push str.FOR_DISABLE_STACK_TRACE
call fcn.0049e640
xor edx, edx
test eax, eax
setne dl
lea eax, [ebp - 0x18]
mov dword [ebp - 0x448], edx
push eax
push 0
push 0x4000
call fcn.00484a50
add esp, 0x10
mov edx, dword [0x5113b4]
xor ebx, ebx
test eax, eax
sete bl
movzx eax, word [ebp - 0x3f4]
mov dword [ebp - 4], eax
test edx, edx
je 0x492f6b
mov dword [0x5113b4], 0
call dword [sym.imp.KERNEL32.dll_GetThreadLocale]
push str.ifcore_msg.dll
lea edx, [ebp - 0x8c]
push eax
push str._lu__s
push edx
call fcn.004d2c54
add esp, 0x10
lea eax, [ebp - 0x8c]
push eax
call dword [sym.imp.KERNEL32.dll_LoadLibraryA]
mov dword [0x524b58], eax
test eax, eax
je 0x493325
mov dword [0x5113b8], 0
mov dword [ebp - 0x44c], ebx
xor esi, esi
mov edi, 0x1c2
lea ecx, [ebp - 0x1c]
mov eax, edi
mov edx, 0x5200e0
call fcn.00492bd0
mov ecx, dword [ebp - 0x1c]
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x492ef0
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x492edb
dec eax
mov ebx, eax
lea eax, [esi*4 + 0x5113bc]
push eax
inc ebx
push 0
push ebx
call fcn.00484a50
push ebx
push dword [ebp - 0x1c]
push dword [esi*4 + 0x5113bc]
call fcn.004d2cd0
add esp, 0x18
inc edi
inc esi
cmp esi, 5
jl 0x492ec7
mov ebx, dword [ebp - 0x44c]
lea ecx, [ebp - 0x1c]
mov eax, 0x1c7
mov edx, 0x5200e0
call fcn.00492bd0
push 0x10
push dword [ebp - 0x1c]
push str.forrtl
call fcn.004d2cd0
add esp, 0xc
lea ecx, [ebp - 0x1c]
mov eax, 0x1f9
mov edx, 0x5200e0
call fcn.00492bd0
push 0x40
push dword [ebp - 0x1c]
push str.Intel_r__Visual_Fortran_run_time_error
call fcn.004d2cd0
add esp, 0xc
mov ecx, dword [ebp - 4]
xor edx, edx
lea eax, [edx*8]
cmp ecx, dword [eax + edx*4 + 0x50ff20]
je 0x49398d
inc edx
cmp edx, 0x1b7
jl 0x492f70
xor edi, edi
xor esi, esi
mov eax, dword [ebp + 0xc]
test eax, eax
jle 0x492fb2
lea edx, [ebp - 0x3a4]
lea eax, [ebp + 0x10]
push eax
push edi
push edx
call fcn.004d3079
add esp, 0xc
lea edi, [ebp - 0x3a4]
mov eax, dword [0x5200f4]
mov dword [ebp - 0x3f0], eax
test eax, eax
je 0x493033
mov ecx, edi
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x492fda
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x492fc5
dec eax
cmp eax, dword [ebp - 0x3f0]
mov dword [ebp - 0x454], eax
jb 0x492fff
push dword [ebp - 0x3f0]
push edi
push dword [0x5200f0]
call fcn.004e26a0
add esp, 0xc
jmp 0x493033
push dword [ebp - 0x454]
push edi
push dword [0x5200f0]
call fcn.004e26a0
mov ecx, dword [0x5200f0]
mov eax, dword [ebp - 0x454]
mov edx, dword [0x5200f4]
add ecx, eax
sub edx, eax
push edx
push 0x20
push ecx
call fcn.004e2770
add esp, 0x18
push 0x5200e8
call fcn.004833c0
pop ecx
mov eax, dword [0x5200ec]
test eax, eax
jne 0x493073
mov dword [0x5200ec], 1
push str.FORT0
call fcn.004d29b8
pop ecx
test eax, eax
je 0x493073
push 0x5116b0
push 0x4fb08c
push eax
call fcn.004d32e4
add esp, 0xc
mov eax, dword [esi*4 + 0x5113bc]
mov dword [0x5200e8], 0
test ebx, ebx
mov dword [ebp - 0x3f0], eax
je 0x4930bc
push dword [ebp - 4]
push dword [ebp - 0x3f0]
push 0x51ffe0
call fcn.004d2c54
push edi
push 0x51ffe0
push str._s_s_r_n
push dword [ebp - 0x18]
call fcn.004d2c54
add esp, 0x1c
jmp 0x4932db
mov ecx, eax
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x4930d5
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x4930c0
dec eax
mov dword [ebp - 0x454], eax
mov ecx, edi
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x4930f4
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x4930df
dec eax
mov edx, dword [ebp - 0x454]
lea ecx, [ebp - 0x18]
push ecx
lea eax, [edx + eax + 0x15]
push 0
push eax
call fcn.00484a50
add esp, 0xc
test eax, eax
je 0x4932ad
mov eax, dword [ebp - 0x3f4]
mov edx, dword [0x5113b4]
mov dword [ebp - 0x28], eax
test edx, edx
mov dword [ebp - 0x30], 0x1f6
mov dword [ebp - 0x2c], 1
je 0x493247
mov dword [0x5113b4], 0
call dword [sym.imp.KERNEL32.dll_GetThreadLocale]
push str.ifcore_msg.dll
lea edx, [ebp - 0x3f4]
push eax
push str._lu__s
push edx
call fcn.004d2c54
add esp, 0x10
lea eax, [ebp - 0x3f4]
push eax
call dword [sym.imp.KERNEL32.dll_LoadLibraryA]
mov dword [0x524b58], eax
test eax, eax
je 0x493337
mov dword [0x5113b8], 0
mov dword [ebp - 0x44c], ebx
mov dword [ebp - 0x450], esi
xor edi, edi
mov eax, 0x1c2
mov ebx, eax
lea ecx, [ebp - 0x24]
mov eax, ebx
mov edx, 0x5200e0
call fcn.00492bd0
mov ecx, dword [ebp - 0x24]
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x4931c6
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x4931b1
dec eax
lea edx, [edi*4 + 0x5113bc]
push edx
push 0
mov esi, eax
inc esi
push esi
call fcn.00484a50
push esi
push dword [ebp - 0x24]
push dword [edi*4 + 0x5113bc]
call fcn.004d2cd0
add esp, 0x18
inc ebx
inc edi
cmp edi, 5
jl 0x49319d
mov ebx, dword [ebp - 0x44c]
mov esi, dword [ebp - 0x450]
lea ecx, [ebp - 0x24]
mov eax, 0x1c7
mov edx, 0x5200e0
call fcn.00492bd0
push 0x10
push dword [ebp - 0x24]
push str.forrtl
call fcn.004d2cd0
add esp, 0xc
lea ecx, [ebp - 0x24]
mov eax, 0x1f9
mov edx, 0x5200e0
call fcn.00492bd0
push 0x40
push dword [ebp - 0x24]
push str.Intel_r__Visual_Fortran_run_time_error
call fcn.004d2cd0
add esp, 0xc
xor edx, edx
lea eax, [edx*8]
mov ecx, dword [eax + edx*4 + 0x50ff20]
cmp ecx, 0x1f6
je 0x493363
inc edx
cmp edx, 0x1b7
jl 0x493249
mov dword [ebp - 0x454], eax
mov eax, dword [ebp - 0x2c]
test eax, eax
jle 0x493349
lea eax, [ebp - 0x28]
push eax
push dword [ebp - 0x454]
push 0x51fee0
call fcn.004d3079
add esp, 0xc
push 0x51fee0
push 0x4fb020
push 0x5116b0
call fcn.004d3308
add esp, 0xc
jmp 0x4932db
push dword [ebp - 4]
push dword [ebp - 0x3f0]
push 0x51ffe0
call fcn.004d2c54
push edi
push 0x51ffe0
push str._s_s_r_n
push dword [ebp - 0x18]
call fcn.004d2c54
add esp, 0x1c
mov ebx, 2
cmp esi, 4
je 0x4936a0
mov eax, dword [0x524934]
test eax, eax
je 0x493300
mov edx, dword [ebp - 0x448]
test edx, edx
jne 0x493300
cmp ebx, 1
je 0x493418
test ebx, ebx
jne 0x493454
mov eax, dword [ebp - 0x14]
test eax, eax
je 0x493318
cmp esi, 3
je 0x49368a
mov ebx, dword [ebp - 0x10]
mov esi, dword [ebp - 0xc]
mov edi, dword [ebp - 8]
mov esp, ebp
pop ebp
ret
mov eax, dword [0x5113b8]
test eax, eax
je 0x492eba
jmp 0x492f6b
mov eax, dword [0x5113b8]
test eax, eax
je 0x493188
jmp 0x493247
push 0x100
push dword [ebp - 0x454]
push 0x51fee0
call fcn.004d2cd0
jmp 0x493291
mov ecx, dword [eax + edx*4 + 0x50ff24]
mov edi, dword [0x5113b8]
mov dword [0x5200e0], ecx
test edi, edi
je 0x49338c
mov eax, dword [eax + edx*4 + 0x50ff28]
mov dword [ebp - 0x454], eax
jmp 0x493272
mov eax, dword [eax + edx*4 + 0x50ff28]
mov dword [ebp - 0x454], eax
lea edx, [ebp - 0x38]
push 0
push 0x200
push edx
push 0x409
push 0x800001f6
push dword [0x524b58]
push 0x900
call dword [sym.imp.KERNEL32.dll_FormatMessageA]
test eax, eax
je 0x493272
mov ecx, dword [ebp - 0x38]
mov dword [ebp - 0x454], ecx
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x4933e7
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x4933d2
dec eax
cmp eax, 1
jbe 0x493272
mov edx, ecx
movsx ecx, byte [edx + eax - 2]
cmp ecx, 0xd
jne 0x493272
movsx ecx, byte [edx + eax - 1]
cmp ecx, 0xa
jne 0x493272
mov byte [edx + eax - 2], 0
jmp 0x493272
mov edx, dword [eax + 4]
test edx, edx
jne 0x493447
cmp esi, 3
je 0x493447
mov edx, dword [ebp - 4]
cmp edx, 0x197
je 0x493447
cmp edx, 0x196
je 0x493447
cmp edx, 0x195
je 0x493447
cmp edx, 0x194
jne 0x493454
push dword [ebp - 0x18]
push dword [eax]
call fcn.004a49f0
add esp, 8
push str.FOR_DIAGNOSTIC_LOG_FILE
mov ebx, dword [ebp - 0x18]
call fcn.004d29b8
pop ecx
test eax, eax
je 0x493499
mov edx, dword [ebp - 4]
cmp edx, 0xaa
je 0x493623
push 0x4fb08c
push eax
call fcn.004d139e
add esp, 8
mov edi, eax
test edi, edi
je 0x493499
push edi
push ebx
call fcn.004d3457
push edi
call fcn.004d125e
add esp, 0xc
push str.FOR_DISABLE_DIAGNOSTIC_DISPLAY
call fcn.0049e640
pop ecx
test eax, eax
jne 0x4934f6
mov eax, dword [0x5212e8]
test eax, eax
je 0x4934c6
push 0x2010
push str.Intel_r__Visual_Fortran_run_time_error
push ebx
call fcn.004eb810
add esp, 0xc
jmp 0x4934f6
push 0
call dword [sym.imp.KERNEL32.dll_GetModuleHandleA]
mov ecx, dword [eax + 0x3c]
movzx edx, word [ecx + eax + 0x18]
cmp edx, 0x10b
je 0x49353b
mov eax, dword [ebp - 4]
cmp eax, 0xaa
je 0x493504
push 0x5116b0
push ebx
call fcn.004d3457
add esp, 8
push dword [ebp - 0x18]
call fcn.004849b0
pop ecx
jmp 0x493308
push 0xfffffffffffffff4
call dword [sym.imp.KERNEL32.dll_GetStdHandle]
mov edi, eax
mov ecx, ebx
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x493527
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x493512
dec eax
lea edx, [ebp - 0x44c]
push 0
push edx
push eax
push ebx
push edi
call dword [sym.imp.KERNEL32.dll_WriteFile]
jmp 0x4934f6
movzx eax, word [ecx + eax + 0x5c]
cmp eax, 2
jne 0x4934de
push 0x4fb0d4
call dword [sym.imp.KERNEL32.dll_LoadLibraryA]
test eax, eax
je 0x493595
push 0x4fb090
push eax
call dword [sym.imp.KERNEL32.dll_GetProcAddress]
test eax, eax
je 0x493595
push 0x12010
push str.Intel_r__Visual_Fortran_run_time_error
push ebx
push 0
call eax
test eax, eax
jne 0x4934f6
mov eax, dword [ebp - 4]
cmp eax, 0xaa
je 0x4935af
push 0x5116b0
push ebx
call fcn.004d3457
jmp 0x4934f3
mov eax, dword [ebp - 4]
cmp eax, 0xaa
je 0x4935e9
push 0x5116b0
push ebx
call fcn.004d3457
jmp 0x4934f3
push 0xfffffffffffffff4
call dword [sym.imp.KERNEL32.dll_GetStdHandle]
mov edi, eax
mov ecx, ebx
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x4935d2
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x4935bd
dec eax
lea edx, [ebp - 0x454]
push 0
push edx
push eax
push ebx
push edi
call dword [sym.imp.KERNEL32.dll_WriteFile]
jmp 0x4934f6
push 0xfffffffffffffff4
call dword [sym.imp.KERNEL32.dll_GetStdHandle]
mov edi, eax
mov ecx, ebx
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x49360c
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x4935f7
dec eax
lea edx, [ebp - 0x450]
push 0
push edx
push eax
push ebx
push edi
call dword [sym.imp.KERNEL32.dll_WriteFile]
jmp 0x4934f6
xor edx, edx
push edx
push 0x80
push 4
push edx
push edx
push 0x40000000
push eax
call dword [sym.imp.KERNEL32.dll_CreateFileA]
mov edi, eax
cmp edi, 0xffffffff
je 0x493499
push 2
xor eax, eax
push eax
push eax
push edi
call dword [sym.imp.KERNEL32.dll_SetFilePointer]
mov ecx, ebx
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x49366c
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x493657
dec eax
lea edx, [ebp - 0x448]
push 0
push edx
push eax
push ebx
push edi
call dword [sym.imp.KERNEL32.dll_WriteFile]
push edi
call dword [sym.imp.KERNEL32.dll_CloseHandle]
jmp 0x493499
mov eax, dword [0x524934]
mov edx, dword [eax + 4]
test edx, edx
jne 0x493318
int3
mov eax, dword [ebp - 0x448]
test eax, eax
jne 0x4936b8
mov eax, dword [0x524934]
test eax, eax
je 0x4936b8
cmp ebx, 1
je 0x4936e1
test ebx, ebx
jne 0x4936ee
mov eax, dword [0x524934]
test eax, eax
je 0x493924
mov eax, dword [eax + 4]
test eax, eax
je 0x493924
mov ebx, dword [ebp - 0x10]
mov esi, dword [ebp - 0xc]
mov edi, dword [ebp - 8]
mov esp, ebp
pop ebp
ret
push dword [ebp - 0x18]
push dword [eax]
call fcn.004a49f0
add esp, 8
push str.FOR_DIAGNOSTIC_LOG_FILE
mov ebx, dword [ebp - 0x18]
call fcn.004d29b8
pop ecx
test eax, eax
je 0x493733
mov edx, dword [ebp - 4]
cmp edx, 0xaa
je 0x4938bd
push 0x4fb08c
push eax
call fcn.004d139e
add esp, 8
mov esi, eax
test esi, esi
je 0x493733
push esi
push ebx
call fcn.004d3457
push esi
call fcn.004d125e
add esp, 0xc
push str.FOR_DISABLE_DIAGNOSTIC_DISPLAY
call fcn.0049e640
pop ecx
test eax, eax
jne 0x493790
mov eax, dword [0x5212e8]
test eax, eax
je 0x493760
push 0x2010
push str.Intel_r__Visual_Fortran_run_time_error
push ebx
call fcn.004eb810
add esp, 0xc
jmp 0x493790
push 0
call dword [sym.imp.KERNEL32.dll_GetModuleHandleA]
mov ecx, dword [eax + 0x3c]
movzx edx, word [ecx + eax + 0x18]
cmp edx, 0x10b
je 0x4937d5
mov eax, dword [ebp - 4]
cmp eax, 0xaa
je 0x49379e
push 0x5116b0
push ebx
call fcn.004d3457
add esp, 8
push dword [ebp - 0x18]
call fcn.004849b0
pop ecx
jmp 0x4936bc
push 0xfffffffffffffff4
call dword [sym.imp.KERNEL32.dll_GetStdHandle]
mov esi, eax
mov ecx, ebx
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x4937c1
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x4937ac
dec eax
lea edx, [ebp - 0x44c]
push 0
push edx
push eax
push ebx
push esi
call dword [sym.imp.KERNEL32.dll_WriteFile]
jmp 0x493790
movzx eax, word [ecx + eax + 0x5c]
cmp eax, 2
jne 0x493778
push 0x4fb0d4
call dword [sym.imp.KERNEL32.dll_LoadLibraryA]
test eax, eax
je 0x49382f
push 0x4fb090
push eax
call dword [sym.imp.KERNEL32.dll_GetProcAddress]
test eax, eax
je 0x49382f
push 0x12010
push str.Intel_r__Visual_Fortran_run_time_error
push ebx
push 0
call eax
test eax, eax
jne 0x493790
mov eax, dword [ebp - 4]
cmp eax, 0xaa
je 0x493849
push 0x5116b0
push ebx
call fcn.004d3457
jmp 0x49378d
mov eax, dword [ebp - 4]
cmp eax, 0xaa
je 0x493883
push 0x5116b0
push ebx
call fcn.004d3457
jmp 0x49378d
push 0xfffffffffffffff4
call dword [sym.imp.KERNEL32.dll_GetStdHandle]
mov esi, eax
mov ecx, ebx
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x49386c
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x493857
dec eax
lea edx, [ebp - 0x454]
push 0
push edx
push eax
push ebx
push esi
call dword [sym.imp.KERNEL32.dll_WriteFile]
jmp 0x493790
push 0xfffffffffffffff4
call dword [sym.imp.KERNEL32.dll_GetStdHandle]
mov esi, eax
mov ecx, ebx
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x4938a6
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x493891
dec eax
lea edx, [ebp - 0x450]
push 0
push edx
push eax
push ebx
push esi
call dword [sym.imp.KERNEL32.dll_WriteFile]
jmp 0x493790
xor edx, edx
push edx
push 0x80
push 4
push edx
push edx
push 0x40000000
push eax
call dword [sym.imp.KERNEL32.dll_CreateFileA]
mov esi, eax
cmp esi, 0xffffffff
je 0x493733
push 2
xor eax, eax
push eax
push eax
push esi
call dword [sym.imp.KERNEL32.dll_SetFilePointer]
mov ecx, ebx
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x493906
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x4938f1
dec eax
lea edx, [ebp - 0x448]
push 0
push edx
push eax
push ebx
push esi
call dword [sym.imp.KERNEL32.dll_WriteFile]
push esi
call dword [sym.imp.KERNEL32.dll_CloseHandle]
jmp 0x493733
call fcn.004a0bd0
mov eax, dword [0x524934]
test eax, eax
je 0x493943
push eax
call fcn.004849b0
pop ecx
mov dword [0x524934], 0
mov eax, dword [ebp - 0x14]
test eax, eax
je 0x49394b
int3
push str.f77_dump_flag
call fcn.0049e640
pop ecx
test eax, eax
jne 0x493988
push str.decfort_dump_flag
call fcn.0049e640
pop ecx
test eax, eax
jne 0x493988
mov eax, dword [0x5212e8]
test eax, eax
je 0x49397f
push 1
call fcn.004eb810
pop ecx
jmp 0x493318
push dword [ebp - 4]
call fcn.004d1a02
pop ecx
call fcn.004d3599
mov esi, dword [eax + edx*4 + 0x50ff24]
mov ecx, dword [0x5113b8]
test ecx, ecx
je 0x4939a7
mov edi, dword [eax + edx*4 + 0x50ff28]
jmp 0x493a0c
mov edi, dword [eax + edx*4 + 0x50ff28]
mov eax, dword [ebp - 4]
lea edx, [ebp - 0x20]
push 0
lea ecx, [eax - 0x80000000]
push 0x200
push edx
push 0x409
push ecx
push dword [0x524b58]
push 0x900
call dword [sym.imp.KERNEL32.dll_FormatMessageA]
test eax, eax
je 0x493a0c
mov edi, dword [ebp - 0x20]
mov ecx, edi
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x4939f9
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x4939e4
dec eax
cmp eax, 1
jbe 0x493a0c
movsx edx, byte [edi + eax - 2]
cmp edx, 0xd
je 0x493b9a
lea eax, [ebp - 0x218]
xor edx, edx
push edx
push 0x189
push eax
push edx
push edx
push edi
push 0x600
call dword [sym.imp.KERNEL32.dll_FormatMessageA]
test eax, eax
jne 0x492f91
mov eax, dword [0x5113b4]
test eax, eax
je 0x493b59
mov dword [0x5113b4], 0
call dword [sym.imp.KERNEL32.dll_GetThreadLocale]
push str.ifcore_msg.dll
lea edx, [ebp - 0x444]
push eax
push str._lu__s
push edx
call fcn.004d2c54
add esp, 0x10
lea eax, [ebp - 0x444]
push eax
call dword [sym.imp.KERNEL32.dll_LoadLibraryA]
mov dword [0x524b58], eax
test eax, eax
je 0x493bb2
mov dword [0x5113b8], 0
mov dword [ebp - 0x454], edi
mov dword [ebp - 0x44c], ebx
mov dword [ebp - 0x450], esi
xor eax, eax
mov edx, 0x1c2
mov ebx, eax
mov esi, edx
lea ecx, [ebp - 0x34]
mov eax, esi
mov edx, 0x5200e0
call fcn.00492bd0
mov ecx, dword [ebp - 0x34]
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x493ad2
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x493abd
dec eax
lea ecx, [ebx*4 + 0x5113bc]
push ecx
push 0
mov edi, eax
inc edi
push edi
call fcn.00484a50
push edi
push dword [ebp - 0x34]
push dword [ebx*4 + 0x5113bc]
call fcn.004d2cd0
add esp, 0x18
inc esi
inc ebx
cmp ebx, 5
jl 0x493aa9
mov edi, dword [ebp - 0x454]
mov ebx, dword [ebp - 0x44c]
mov esi, dword [ebp - 0x450]
lea ecx, [ebp - 0x34]
mov eax, 0x1c7
mov edx, 0x5200e0
call fcn.00492bd0
push 0x10
push dword [ebp - 0x34]
push str.forrtl
call fcn.004d2cd0
add esp, 0xc
lea ecx, [ebp - 0x34]
mov eax, 0x1f9
mov edx, 0x5200e0
call fcn.00492bd0
push 0x40
push dword [ebp - 0x34]
push str.Intel_r__Visual_Fortran_run_time_error
call fcn.004d2cd0
add esp, 0xc
xor edx, edx
lea eax, [edx*8]
mov ecx, dword [eax + edx*4 + 0x50ff20]
cmp ecx, 0x1f4
je 0x493bc1
inc edx
cmp edx, 0x1b7
jl 0x493b5b
lea eax, [ebp - 0x218]
push edi
push 0x4fb020
push eax
call fcn.004d2c54
add esp, 0xc
lea edi, [ebp - 0x218]
jmp 0x492f91
movsx edx, byte [edi + eax - 1]
cmp edx, 0xa
jne 0x493a0c
mov byte [edi + eax - 2], 0
jmp 0x493a0c
mov eax, dword [0x5113b8]
test eax, eax
je 0x493a8c
jmp 0x493b59
mov esi, dword [eax + edx*4 + 0x50ff24]
mov ecx, dword [0x5113b8]
test ecx, ecx
je 0x493bdb
mov edi, dword [eax + edx*4 + 0x50ff28]
jmp 0x493b7a
mov edi, dword [eax + edx*4 + 0x50ff28]
lea eax, [ebp - 0x3c]
push 0
push 0x200
push eax
push 0x409
push 0x800001f4
push dword [0x524b58]
push 0x900
call dword [sym.imp.KERNEL32.dll_FormatMessageA]
test eax, eax
je 0x493b7a
mov edi, dword [ebp - 0x3c]
mov ecx, edi
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x493c2c
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x493c17
dec eax
cmp eax, 1
jbe 0x493b7a
movsx edx, byte [edi + eax - 2]
cmp edx, 0xd
jne 0x493b7a
movsx edx, byte [edi + eax - 1]
cmp edx, 0xa
jne 0x493b7a
mov byte [edi + eax - 2], 0
jmp 0x493b7a