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

Disassembly:
push ebp
mov ebp, esp
sub esp, 0x45c
mov dword [ebp - 0xc], ebx
mov dword [ebp - 0x10], edi
mov dword [ebp - 0x14], esi
mov eax, dword [ebp + 8]
mov dword [ebp - 0x3f0], eax
call dword [sym.imp.KERNEL32.dll_IsDebuggerPresent]
test eax, eax
jne 0x404e23
push str.FOR__IS_DEBUGGER_PRESENT
call fcn.00420890
pop ecx
test eax, eax
jne 0x404e23
push str.FOR_DEBUGGER_IS_PRESENT
call fcn.00420890
pop ecx
test eax, eax
je 0x404e2a
mov esi, 1
jmp 0x404e2c
xor esi, esi
push str.FOR_DISABLE_STACK_TRACE
call fcn.00420890
xor edx, edx
test eax, eax
setne dl
lea eax, [ebp - 0x18]
mov dword [ebp - 0x444], edx
push eax
push 0
push 0x4000
call fcn.00419250
add esp, 0x10
xor ebx, ebx
test eax, eax
sete bl
movzx eax, word [ebp - 0x3f0]
cmp dword [0x4e1644], 0
mov dword [ebp - 8], eax
je 0x404f81
mov dword [0x4e1644], 0
call dword [sym.imp.KERNEL32.dll_GetThreadLocale]
push str.ifcore_msg.dll
lea edx, [ebp - 0x8e]
push eax
push str._lu__s
push edx
call fcn.004532e0
add esp, 0x10
lea eax, [ebp - 0x8e]
push eax
call dword [sym.imp.KERNEL32.dll_LoadLibraryA]
mov dword [0x4ee184], eax
test eax, eax
je 0x405338
mov dword [0x4e1648], 0
mov dword [ebp - 0x44c], ebx
mov dword [ebp - 0x448], esi
xor edi, edi
mov eax, 0x1c2
mov ebx, eax
lea ecx, [ebp - 0x1c]
mov eax, ebx
mov edx, 0x4e3ac0
call fcn.00404be0
mov ecx, dword [ebp - 0x1c]
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x404f00
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x404eeb
dec eax
lea edx, [edi*4 + 0x4e164c]
push edx
push 0
mov esi, eax
inc esi
push esi
call fcn.00419250
push esi
push dword [ebp - 0x1c]
push dword [edi*4 + 0x4e164c]
call fcn.004531b0
add esp, 0x18
inc ebx
inc edi
cmp edi, 5
jl 0x404ed7
mov ebx, dword [ebp - 0x44c]
mov esi, dword [ebp - 0x448]
lea ecx, [ebp - 0x1c]
mov eax, 0x1c7
mov edx, 0x4e3ac0
call fcn.00404be0
push 0x10
push dword [ebp - 0x1c]
push str.forrtl
call fcn.004531b0
add esp, 0xc
lea ecx, [ebp - 0x1c]
mov eax, 0x1f9
mov edx, 0x4e3ac0
call fcn.00404be0
push 0x40
push dword [ebp - 0x1c]
push str.Intel_r__Visual_Fortran_run_time_error
call fcn.004531b0
add esp, 0xc
mov ecx, dword [ebp - 8]
xor edx, edx
lea eax, [edx*8]
cmp ecx, dword [eax + edx*4 + 0x4e0180]
je 0x40598a
inc edx
cmp edx, 0x1bb
jl 0x404f86
xor edi, edi
mov dword [ebp - 4], edi
cmp dword [ebp + 0xc], 0
jle 0x404fc8
lea edx, [ebp - 0x3a0]
lea eax, [ebp + 0x10]
push eax
push edi
push edx
call fcn.004537d0
add esp, 0xc
lea edi, [ebp - 0x3a0]
mov eax, dword [0x4e3ad4]
mov dword [ebp - 0x3ec], eax
test eax, eax
je 0x405049
mov ecx, edi
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x404ff0
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x404fdb
dec eax
cmp eax, dword [ebp - 0x3ec]
mov dword [ebp - 0x450], eax
jb 0x405015
push dword [ebp - 0x3ec]
push edi
push dword [0x4e3ad0]
call fcn.004a62b0
add esp, 0xc
jmp 0x405049
push dword [ebp - 0x450]
push edi
push dword [0x4e3ad0]
call fcn.004a62b0
mov ecx, dword [0x4e3ad0]
mov eax, dword [ebp - 0x450]
mov edx, dword [0x4e3ad4]
add ecx, eax
sub edx, eax
push edx
push 0x20
push ecx
call fcn.004a6330
add esp, 0x18
push 0x4e3ac8
call fcn.00410e10
pop ecx
mov eax, dword [0x4e3acc]
test eax, eax
jne 0x405089
mov dword [0x4e3acc], 1
push str.FORT0
call fcn.00453930
pop ecx
test eax, eax
je 0x405089
push 0x4e17a8
push 0x4c66d8
push eax
call fcn.00454330
add esp, 0xc
mov eax, dword [ebp - 4]
mov edx, dword [eax*4 + 0x4e164c]
mov dword [0x4e3ac8], 0
test ebx, ebx
mov dword [ebp - 0x3ec], edx
je 0x4050d5
push dword [ebp - 8]
push dword [ebp - 0x3ec]
push 0x4e38c0
call fcn.004532e0
push edi
push 0x4e38c0
push str._s_s_r_n
push dword [ebp - 0x18]
call fcn.004532e0
add esp, 0x1c
jmp 0x4052f0
mov ecx, edx
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x4050ee
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x4050d9
dec eax
mov dword [ebp - 0x450], eax
mov ecx, edi
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x40510d
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x4050f8
dec eax
mov edx, dword [ebp - 0x450]
lea ecx, [ebp - 0x18]
push ecx
lea eax, [edx + eax + 0x15]
push 0
push eax
call fcn.00419250
add esp, 0xc
test eax, eax
je 0x4052c2
cmp dword [0x4e1644], 0
mov eax, dword [ebp - 0x3f0]
mov dword [ebp - 0x28], eax
mov dword [ebp - 0x30], 0x1f6
mov dword [ebp - 0x2c], 1
je 0x40525f
mov dword [0x4e1644], 0
call dword [sym.imp.KERNEL32.dll_GetThreadLocale]
push str.ifcore_msg.dll
lea edx, [ebp - 0x3f0]
push eax
push str._lu__s
push edx
call fcn.004532e0
add esp, 0x10
lea eax, [ebp - 0x3f0]
push eax
call dword [sym.imp.KERNEL32.dll_LoadLibraryA]
mov dword [0x4ee184], eax
test eax, eax
je 0x40534a
mov dword [0x4e1648], 0
mov dword [ebp - 0x44c], ebx
mov dword [ebp - 0x448], esi
xor edi, edi
mov eax, 0x1c2
mov ebx, eax
lea ecx, [ebp - 0x24]
mov eax, ebx
mov edx, 0x4e3ac0
call fcn.00404be0
mov ecx, dword [ebp - 0x24]
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x4051de
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x4051c9
dec eax
lea edx, [edi*4 + 0x4e164c]
push edx
push 0
mov esi, eax
inc esi
push esi
call fcn.00419250
push esi
push dword [ebp - 0x24]
push dword [edi*4 + 0x4e164c]
call fcn.004531b0
add esp, 0x18
inc ebx
inc edi
cmp edi, 5
jl 0x4051b5
mov ebx, dword [ebp - 0x44c]
mov esi, dword [ebp - 0x448]
lea ecx, [ebp - 0x24]
mov eax, 0x1c7
mov edx, 0x4e3ac0
call fcn.00404be0
push 0x10
push dword [ebp - 0x24]
push str.forrtl
call fcn.004531b0
add esp, 0xc
lea ecx, [ebp - 0x24]
mov eax, 0x1f9
mov edx, 0x4e3ac0
call fcn.00404be0
push 0x40
push dword [ebp - 0x24]
push str.Intel_r__Visual_Fortran_run_time_error
call fcn.004531b0
add esp, 0xc
xor edx, edx
lea eax, [edx*8]
cmp dword [eax + edx*4 + 0x4e0180], 0x1f6
je 0x405376
inc edx
cmp edx, 0x1bb
jl 0x405261
mov dword [ebp - 0x450], eax
cmp dword [ebp - 0x2c], 0
jle 0x40535c
lea eax, [ebp - 0x28]
push eax
push dword [ebp - 0x450]
push 0x4e39c0
call fcn.004537d0
add esp, 0xc
push 0x4e39c0
push 0x4c6640
push 0x4e17a8
call fcn.00454390
add esp, 0xc
jmp 0x4052f0
push dword [ebp - 8]
push dword [ebp - 0x3ec]
push 0x4e38c0
call fcn.004532e0
push edi
push 0x4e38c0
push str._s_s_r_n
push dword [ebp - 0x18]
call fcn.004532e0
add esp, 0x1c
mov ebx, 2
cmp dword [ebp - 4], 4
je 0x4056a7
mov eax, dword [0x4ee180]
test eax, eax
je 0x405315
cmp dword [ebp - 0x444], 0
jne 0x405315
cmp ebx, 1
je 0x405424
test ebx, ebx
jne 0x405461
test esi, esi
je 0x40532b
cmp dword [ebp - 4], 3
je 0x405692
mov ebx, dword [ebp - 0xc]
mov esi, dword [ebp - 0x14]
mov edi, dword [ebp - 0x10]
mov esp, ebp
pop ebp
ret
cmp dword [0x4e1648], 0
je 0x404ec2
jmp 0x404f81
cmp dword [0x4e1648], 0
je 0x4051a0
jmp 0x40525f
push 0x100
push dword [ebp - 0x450]
push 0x4e39c0
call fcn.004531b0
jmp 0x4052a6
cmp dword [0x4e1648], 0
mov ecx, dword [eax + edx*4 + 0x4e0184]
mov dword [0x4e3ac0], ecx
je 0x40539e
mov eax, dword [eax + edx*4 + 0x4e0188]
mov dword [ebp - 0x450], eax
jmp 0x405288
mov eax, dword [eax + edx*4 + 0x4e0188]
mov dword [ebp - 0x450], eax
lea edx, [ebp - 0x38]
push 0
push 0x200
push edx
push 0x409
push 0x800001f6
push dword [0x4ee184]
push 0x900
call dword [sym.imp.KERNEL32.dll_FormatMessageA]
test eax, eax
je 0x405288
mov ecx, dword [ebp - 0x38]
mov dword [ebp - 0x450], ecx
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x4053f9
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x4053e4
dec eax
cmp eax, 1
jbe 0x405288
mov edx, ecx
cmp byte [edx + eax - 2], 0xd
jne 0x405288
cmp byte [edx + eax - 1], 0xa
jne 0x405288
mov byte [edx + eax - 2], 0
jmp 0x405288
cmp dword [eax + 4], 0
jne 0x405454
cmp dword [ebp - 4], 3
je 0x405454
cmp dword [ebp - 8], 0x197
je 0x405454
cmp dword [ebp - 8], 0x196
je 0x405454
cmp dword [ebp - 8], 0x195
je 0x405454
cmp dword [ebp - 8], 0x194
jne 0x405461
push dword [ebp - 0x18]
push dword [eax]
call fcn.00420d20
add esp, 8
push str.FOR_DIAGNOSTIC_LOG_FILE
mov ebx, dword [ebp - 0x18]
call fcn.00453930
pop ecx
test eax, eax
je 0x4054a4
cmp dword [ebp - 8], 0xaa
je 0x40562b
push 0x4c66d8
push eax
call fcn.00454930
add esp, 8
mov edi, eax
test edi, edi
je 0x4054a4
push edi
push ebx
call fcn.004549f0
push edi
call fcn.00454c90
add esp, 0xc
push str.FOR_DISABLE_DIAGNOSTIC_DISPLAY
call fcn.00420890
pop ecx
test eax, eax
jne 0x405500
cmp dword [0x4edea0], 0
je 0x4054d1
push 0x2010
push str.Intel_r__Visual_Fortran_run_time_error
push ebx
call fcn.004b0a10
add esp, 0xc
jmp 0x405500
push 0
call dword [sym.imp.KERNEL32.dll_GetModuleHandleA]
mov ecx, dword [eax + 0x3c]
movzx edx, word [ecx + eax + 0x18]
cmp edx, 0x10b
je 0x405545
cmp dword [ebp - 8], 0xaa
je 0x40550e
push 0x4e17a8
push ebx
call fcn.004549f0
add esp, 8
push dword [ebp - 0x18]
call fcn.00419310
pop ecx
jmp 0x40531d
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 0x405531
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x40551c
dec eax
lea edx, [ebp - 0x448]
push 0
push edx
push eax
push ebx
push edi
call dword [sym.imp.KERNEL32.dll_WriteFile]
jmp 0x405500
movzx eax, word [ecx + eax + 0x5c]
cmp eax, 2
jne 0x4054e9
push 0x4c6720
call dword [sym.imp.KERNEL32.dll_LoadLibraryA]
test eax, eax
je 0x40559e
push 0x4c66dc
push eax
call dword [sym.imp.KERNEL32.dll_GetProcAddress]
test eax, eax
je 0x40559e
push 0x12010
push str.Intel_r__Visual_Fortran_run_time_error
push ebx
push 0
call eax
test eax, eax
jne 0x405500
cmp dword [ebp - 8], 0xaa
je 0x4055b7
push 0x4e17a8
push ebx
call fcn.004549f0
jmp 0x4054fd
cmp dword [ebp - 8], 0xaa
je 0x4055f1
push 0x4e17a8
push ebx
call fcn.004549f0
jmp 0x4054fd
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 0x4055da
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x4055c5
dec eax
lea edx, [ebp - 0x450]
push 0
push edx
push eax
push ebx
push edi
call dword [sym.imp.KERNEL32.dll_WriteFile]
jmp 0x405500
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 0x405614
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x4055ff
dec eax
lea edx, [ebp - 0x44c]
push 0
push edx
push eax
push ebx
push edi
call dword [sym.imp.KERNEL32.dll_WriteFile]
jmp 0x405500
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 0x4054a4
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 0x405674
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x40565f
dec eax
lea edx, [ebp - 0x444]
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 0x4054a4
mov eax, dword [0x4ee180]
cmp dword [eax + 4], 0
jne 0x40532b
int3
cmp dword [ebp - 0x444], 0
jne 0x4056be
mov eax, dword [0x4ee180]
test eax, eax
je 0x4056be
cmp ebx, 1
je 0x4056e6
test ebx, ebx
jne 0x4056f3
mov eax, dword [0x4ee180]
test eax, eax
je 0x405924
cmp dword [eax + 4], 0
je 0x405924
mov ebx, dword [ebp - 0xc]
mov esi, dword [ebp - 0x14]
mov edi, dword [ebp - 0x10]
mov esp, ebp
pop ebp
ret
push dword [ebp - 0x18]
push dword [eax]
call fcn.00420d20
add esp, 8
push str.FOR_DIAGNOSTIC_LOG_FILE
mov ebx, dword [ebp - 0x18]
call fcn.00453930
pop ecx
test eax, eax
je 0x405736
cmp dword [ebp - 8], 0xaa
je 0x4058bd
push 0x4c66d8
push eax
call fcn.00454930
add esp, 8
mov edi, eax
test edi, edi
je 0x405736
push edi
push ebx
call fcn.004549f0
push edi
call fcn.00454c90
add esp, 0xc
push str.FOR_DISABLE_DIAGNOSTIC_DISPLAY
call fcn.00420890
pop ecx
test eax, eax
jne 0x405792
cmp dword [0x4edea0], 0
je 0x405763
push 0x2010
push str.Intel_r__Visual_Fortran_run_time_error
push ebx
call fcn.004b0a10
add esp, 0xc
jmp 0x405792
push 0
call dword [sym.imp.KERNEL32.dll_GetModuleHandleA]
mov ecx, dword [eax + 0x3c]
movzx edx, word [ecx + eax + 0x18]
cmp edx, 0x10b
je 0x4057d7
cmp dword [ebp - 8], 0xaa
je 0x4057a0
push 0x4e17a8
push ebx
call fcn.004549f0
add esp, 8
push dword [ebp - 0x18]
call fcn.00419310
pop ecx
jmp 0x4056c2
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 0x4057c3
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x4057ae
dec eax
lea edx, [ebp - 0x448]
push 0
push edx
push eax
push ebx
push edi
call dword [sym.imp.KERNEL32.dll_WriteFile]
jmp 0x405792
movzx eax, word [ecx + eax + 0x5c]
cmp eax, 2
jne 0x40577b
push 0x4c6720
call dword [sym.imp.KERNEL32.dll_LoadLibraryA]
test eax, eax
je 0x405830
push 0x4c66dc
push eax
call dword [sym.imp.KERNEL32.dll_GetProcAddress]
test eax, eax
je 0x405830
push 0x12010
push str.Intel_r__Visual_Fortran_run_time_error
push ebx
push 0
call eax
test eax, eax
jne 0x405792
cmp dword [ebp - 8], 0xaa
je 0x405849
push 0x4e17a8
push ebx
call fcn.004549f0
jmp 0x40578f
cmp dword [ebp - 8], 0xaa
je 0x405883
push 0x4e17a8
push ebx
call fcn.004549f0
jmp 0x40578f
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 0x40586c
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x405857
dec eax
lea edx, [ebp - 0x450]
push 0
push edx
push eax
push ebx
push edi
call dword [sym.imp.KERNEL32.dll_WriteFile]
jmp 0x405792
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 0x4058a6
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x405891
dec eax
lea edx, [ebp - 0x44c]
push 0
push edx
push eax
push ebx
push edi
call dword [sym.imp.KERNEL32.dll_WriteFile]
jmp 0x405792
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 0x405736
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 0x405906
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x4058f1
dec eax
lea edx, [ebp - 0x444]
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 0x405736
call fcn.00420fb0
mov eax, dword [0x4ee180]
test eax, eax
je 0x405943
push eax
call fcn.00419310
pop ecx
mov dword [0x4ee180], 0
test esi, esi
je 0x405948
int3
push str.f77_dump_flag
call fcn.00420890
pop ecx
test eax, eax
jne 0x405985
push str.decfort_dump_flag
call fcn.00420890
pop ecx
test eax, eax
jne 0x405985
cmp dword [0x4edea0], 0
je 0x40597c
push 1
call fcn.004b0b50
pop ecx
jmp 0x40532b
push dword [ebp - 8]
call fcn.00454fa0
pop ecx
call fcn.00455730
cmp dword [0x4e1648], 0
mov ecx, dword [eax + edx*4 + 0x4e0184]
mov dword [ebp - 4], ecx
je 0x4059a6
mov edi, dword [eax + edx*4 + 0x4e0188]
jmp 0x405a08
mov edi, dword [eax + edx*4 + 0x4e0188]
mov eax, dword [ebp - 8]
lea edx, [ebp - 0x20]
push 0
lea ecx, [eax - 0x80000000]
push 0x200
push edx
push 0x409
push ecx
push dword [0x4ee184]
push 0x900
call dword [sym.imp.KERNEL32.dll_FormatMessageA]
test eax, eax
je 0x405a08
mov edi, dword [ebp - 0x20]
mov ecx, edi
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x4059f8
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x4059e3
dec eax
cmp eax, 1
jbe 0x405a08
cmp byte [edi + eax - 2], 0xd
je 0x405b94
lea eax, [ebp - 0x217]
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 0x404fa8
cmp dword [0x4e1644], 0
je 0x405b55
mov dword [0x4e1644], 0
call dword [sym.imp.KERNEL32.dll_GetThreadLocale]
push str.ifcore_msg.dll
lea edx, [ebp - 0x440]
push eax
push str._lu__s
push edx
call fcn.004532e0
add esp, 0x10
lea eax, [ebp - 0x440]
push eax
call dword [sym.imp.KERNEL32.dll_LoadLibraryA]
mov dword [0x4ee184], eax
test eax, eax
je 0x405ba9
mov dword [0x4e1648], 0
mov dword [ebp - 0x450], edi
mov dword [ebp - 0x44c], ebx
mov dword [ebp - 0x448], esi
xor eax, eax
mov edx, 0x1c2
mov edi, eax
mov esi, edx
lea ecx, [ebp - 0x34]
mov eax, esi
mov edx, 0x4e3ac0
call fcn.00404be0
mov ecx, dword [ebp - 0x34]
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x405ace
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x405ab9
dec eax
lea ecx, [edi*4 + 0x4e164c]
push ecx
push 0
mov ebx, eax
inc ebx
push ebx
call fcn.00419250
push ebx
push dword [ebp - 0x34]
push dword [edi*4 + 0x4e164c]
call fcn.004531b0
add esp, 0x18
inc esi
inc edi
cmp edi, 5
jl 0x405aa5
mov edi, dword [ebp - 0x450]
mov ebx, dword [ebp - 0x44c]
mov esi, dword [ebp - 0x448]
lea ecx, [ebp - 0x34]
mov eax, 0x1c7
mov edx, 0x4e3ac0
call fcn.00404be0
push 0x10
push dword [ebp - 0x34]
push str.forrtl
call fcn.004531b0
add esp, 0xc
lea ecx, [ebp - 0x34]
mov eax, 0x1f9
mov edx, 0x4e3ac0
call fcn.00404be0
push 0x40
push dword [ebp - 0x34]
push str.Intel_r__Visual_Fortran_run_time_error
call fcn.004531b0
add esp, 0xc
xor edx, edx
lea eax, [edx*8]
cmp dword [eax + edx*4 + 0x4e0180], 0x1f4
je 0x405bb8
inc edx
cmp edx, 0x1bb
jl 0x405b57
push edi
push 0x4c6640
lea eax, [ebp - 0x217]
push eax
call fcn.004532e0
add esp, 0xc
lea edi, [ebp - 0x217]
jmp 0x404fa8
cmp byte [edi + eax - 1], 0xa
jne 0x405a08
mov byte [edi + eax - 2], 0
jmp 0x405a08
cmp dword [0x4e1648], 0
je 0x405a88
jmp 0x405b55
cmp dword [0x4e1648], 0
mov ecx, dword [eax + edx*4 + 0x4e0184]
mov dword [ebp - 4], ecx
je 0x405bd4
mov edi, dword [eax + edx*4 + 0x4e0188]
jmp 0x405b74
mov edi, dword [eax + edx*4 + 0x4e0188]
lea eax, [ebp - 0x3c]
push 0
push 0x200
push eax
push 0x409
push 0x800001f4
push dword [0x4ee184]
push 0x900
call dword [sym.imp.KERNEL32.dll_FormatMessageA]
test eax, eax
je 0x405b74
mov edi, dword [ebp - 0x3c]
mov ecx, edi
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x405c25
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x405c10
dec eax
cmp eax, 1
jbe 0x405b74
cmp byte [edi + eax - 2], 0xd
jne 0x405b74
cmp byte [edi + eax - 1], 0xa
jne 0x405b74
mov byte [edi + eax - 2], 0
jmp 0x405b74