Function at 0x140068a84
Capabilities:
Query environment variable
Write file on windows

Disassembly:
push rbp
sub rsp, 0x1d0
lea rbp, [rsp + 0x40]
mov qword [rbp + 0x180], rsi
mov qword [rbp + 0x178], rbx
mov qword [rbp + 0x1a0], rcx
mov dword [rbp + 0x1a8], edx
lea rax, [0x1400b947c]
mov qword [rbp + 0x160], rax
lea rax, str.FOR_DIAGNOSTIC_LOG_FILE
mov rcx, rax
call fcn.14003fb28
mov qword [rbp + 0x168], rax
mov rax, qword [rbp + 0x168]
mov qword [rbp + 0x170], rax
mov rax, qword [rbp + 0x170]
test rax, rax
je 0x140068ccd
mov eax, dword [rbp + 0x1a8]
cmp eax, 0xaa
jne 0x140068c4d
mov rax, qword [rbp + 0x170]
mov edx, 0x40000000
mov ecx, 0
mov ebx, 0
mov dword [rsp + 0x20], 4
mov dword [rsp + 0x28], 0x80
mov qword [rsp + 0x30], 0
mov rsi, qword [sym.imp.KERNEL32.dll_CreateFileA]
mov dword [rbp + 0x140], ecx
mov rcx, rax
mov eax, dword [rbp + 0x140]
mov r8d, eax
mov r9, rbx
call rsi
mov qword [rbp + 0x120], rax
mov rax, qword [rbp + 0x120]
mov qword [rbp + 0x130], rax
mov rax, qword [rbp + 0x130]
cmp rax, 0xffffffffffffffff
je 0x140068ccd
mov rax, qword [rbp + 0x130]
mov edx, 0
mov ecx, 0
mov ebx, 2
mov rsi, qword [sym.imp.KERNEL32.dll_SetFilePointer]
mov qword [rbp + 0xf0], rcx
mov rcx, rax
mov rax, qword [rbp + 0xf0]
mov r8, rax
mov r9d, ebx
call rsi
mov dword [rbp + 0x108], eax
mov rax, qword [rbp + 0x1a0]
mov rdx, rax
mov rcx, rdx
and rdx, 0xfffffffffffffff0
pxor xmm0, xmm0
pcmpeqb xmm0, xmmword [rdx]
pmovmskb eax, xmm0
and ecx, 0xf
shr eax, cl
bsf eax, eax
jne 0x140068be0
mov rax, rdx
add rdx, rcx
call fcn.14009ef90
mov qword [rbp + 0xd8], rax
mov rax, qword [rbp + 0x130]
mov rdx, qword [rbp + 0x1a0]
mov ecx, dword [rbp + 0xd8]
lea rbx, [rbp + 0x110]
mov qword [rsp + 0x20], 0
mov rsi, qword [sym.imp.KERNEL32.dll_WriteFile]
mov dword [rbp + 0xf8], ecx
mov rcx, rax
mov eax, dword [rbp + 0xf8]
mov r8d, eax
mov r9, rbx
call rsi
mov dword [rbp + 0x114], eax
mov rax, qword [rbp + 0x130]
mov rdx, qword [sym.imp.KERNEL32.dll_CloseHandle]
mov rcx, rax
call rdx
mov dword [rbp + 0x11c], eax
jmp 0x140068ccd
mov rax, qword [rbp + 0x170]
lea rdx, [0x1400b9478]
mov rcx, rax
call fcn.14002cba8
mov qword [rbp + 0x128], rax
mov rax, qword [rbp + 0x128]
mov qword [rbp + 0x138], rax
mov rax, qword [rbp + 0x138]
test rax, rax
je 0x140068ccd
mov rax, qword [rbp + 0x138]
lea rdx, [0x1400b6780]
mov rcx, qword [rbp + 0x1a0]
mov qword [rbp + 0x100], rcx
mov rcx, rax
mov rax, qword [rbp + 0x100]
mov r8, rax
call fcn.1400a6b60
mov dword [rbp + 0x10c], eax
mov rax, qword [rbp + 0x138]
mov rcx, rax
call fcn.14002be60
mov dword [rbp + 0x118], eax
lea rax, str.FOR_DISABLE_DIAGNOSTIC_DISPLAY
mov rcx, rax
call fcn.1400768b0
mov dword [rbp + 0x188], eax
mov eax, dword [rbp + 0x188]
test eax, eax
je 0x140068d08
mov eax, 0
mov rbx, qword [rbp + 0x178]
mov rsi, qword [rbp + 0x180]
lea rsp, [rbp + 0x190]
pop rbp
ret
mov eax, dword [0x1400fc280]
test eax, eax
je 0x140068d47
mov rax, qword [rbp + 0x1a0]
lea rdx, str.Intel_r__Visual_Fortran_run_time_error
mov ecx, 0x2010
mov dword [rbp + 0x148], ecx
mov rcx, rax
mov eax, dword [rbp + 0x148]
mov r8d, eax
call fcn.1400a7740
mov dword [rbp + 0x150], eax
jmp 0x1400690e4
call fcn.140068150
mov dword [rbp + 0x154], eax
mov eax, dword [rbp + 0x154]
mov dword [rbp + 0x158], eax
mov eax, dword [rbp + 0x158]
cmp eax, 2
jne 0x140068ff4
lea rax, str.user32.dll
mov rdx, qword [sym.imp.KERNEL32.dll_LoadLibraryA]
mov rcx, rax
call rdx
mov qword [rbp + 0xe0], rax
mov rax, qword [rbp + 0xe0]
mov qword [rbp + 0xe8], rax
mov rax, qword [rbp + 0xe8]
test rax, rax
je 0x140068dde
mov rax, qword [rbp + 0xe8]
mov rdx, qword [rbp + 0x160]
mov rcx, qword [sym.imp.KERNEL32.dll_GetProcAddress]
mov qword [rbp + 0xa8], rcx
mov rcx, rax
mov rax, qword [rbp + 0xa8]
call rax
mov qword [rbp + 0x90], rax
mov rax, qword [rbp + 0x90]
mov qword [rbp + 0xa0], rax
mov rax, qword [rbp + 0xe8]
test rax, rax
je 0x140068dfa
mov rax, qword [rbp + 0xa0]
test rax, rax
jne 0x140068ed4
mov eax, dword [rbp + 0x1a8]
cmp eax, 0xaa
jne 0x140068e96
mov eax, 0xfffffff4
mov rdx, qword [sym.imp.KERNEL32.dll_GetStdHandle]
mov ecx, eax
call rdx
mov qword [rbp + 0x50], rax
mov rax, qword [rbp + 0x1a0]
mov rdx, rax
mov rcx, rdx
and rdx, 0xfffffffffffffff0
pxor xmm0, xmm0
pcmpeqb xmm0, xmmword [rdx]
pmovmskb eax, xmm0
and ecx, 0xf
shr eax, cl
bsf eax, eax
jne 0x140068e51
mov rax, rdx
add rdx, rcx
call fcn.14009ef90
mov qword [rbp + 0x60], rax
mov rax, qword [rbp + 0x50]
mov rdx, qword [rbp + 0x1a0]
mov ecx, dword [rbp + 0x60]
lea rbx, [rbp + 0xc4]
mov qword [rsp + 0x20], 0
mov rsi, qword [sym.imp.KERNEL32.dll_WriteFile]
mov dword [rbp + 0x68], ecx
mov rcx, rax
mov eax, dword [rbp + 0x68]
mov r8d, eax
mov r9, rbx
call rsi
mov dword [rbp + 0xc8], eax
jmp 0x1400690e4
call fcn.14002e91c
mov qword [rbp + 0x58], rax
mov eax, 0x60
add rax, qword [rbp + 0x58]
lea rdx, [0x1400b6780]
mov rcx, qword [rbp + 0x1a0]
mov qword [rbp + 0x70], rcx
mov rcx, rax
mov rax, qword [rbp + 0x70]
mov r8, rax
call fcn.1400a6b60
mov dword [rbp + 0xc0], eax
jmp 0x1400690e4
lea rax, str.Intel_r__Visual_Fortran_run_time_error
mov qword [rbp + 0x38], rax
mov rax, qword [rbp + 0xa0]
mov edx, 0
mov rcx, qword [rbp + 0x1a0]
mov rbx, qword [rbp + 0x38]
mov esi, 0x12010
mov qword [rbp + 0x48], rcx
mov rcx, rdx
mov rdx, qword [rbp + 0x48]
mov r8, rbx
mov r9d, esi
call rax
mov qword [rbp + 0x40], rax
mov eax, dword [rbp + 0x40]
mov dword [rbp + 0x78], eax
mov eax, dword [rbp + 0x78]
test eax, eax
jne 0x1400690e4
mov eax, dword [rbp + 0x1a8]
cmp eax, 0xaa
jne 0x140068fb9
mov eax, 0xfffffff4
mov rdx, qword [sym.imp.KERNEL32.dll_GetStdHandle]
mov ecx, eax
call rdx
mov qword [rbp], rax
mov rax, qword [rbp + 0x1a0]
mov rdx, rax
mov rcx, rdx
and rdx, 0xfffffffffffffff0
pxor xmm0, xmm0
pcmpeqb xmm0, xmmword [rdx]
pmovmskb eax, xmm0
and ecx, 0xf
shr eax, cl
bsf eax, eax
jne 0x140068f7a
mov rax, rdx
add rdx, rcx
call fcn.14009ef90
mov qword [rbp + 0x10], rax
mov rax, qword [rbp]
mov rdx, qword [rbp + 0x1a0]
mov ecx, dword [rbp + 0x10]
lea rbx, [rbp + 0x2c]
mov qword [rsp + 0x20], 0
mov rsi, qword [sym.imp.KERNEL32.dll_WriteFile]
mov dword [rbp + 0x18], ecx
mov rcx, rax
mov eax, dword [rbp + 0x18]
mov r8d, eax
mov r9, rbx
call rsi
mov dword [rbp + 0x30], eax
jmp 0x1400690e4
call fcn.14002e91c
mov qword [rbp + 8], rax
mov eax, 0x60
add rax, qword [rbp + 8]
lea rdx, [0x1400b6780]
mov rcx, qword [rbp + 0x1a0]
mov qword [rbp + 0x20], rcx
mov rcx, rax
mov rax, qword [rbp + 0x20]
mov r8, rax
call fcn.1400a6b60
mov dword [rbp + 0x28], eax
jmp 0x1400690e4
mov eax, dword [rbp + 0x1a8]
cmp eax, 0xaa
jne 0x14006909f
mov eax, 0xfffffff4
mov rdx, qword [sym.imp.KERNEL32.dll_GetStdHandle]
mov ecx, eax
call rdx
mov qword [rbp + 0x80], rax
mov rax, qword [rbp + 0x1a0]
mov rdx, rax
mov rcx, rdx
and rdx, 0xfffffffffffffff0
pxor xmm0, xmm0
pcmpeqb xmm0, xmmword [rdx]
pmovmskb eax, xmm0
and ecx, 0xf
shr eax, cl
bsf eax, eax
jne 0x14006904e
mov rax, rdx
add rdx, rcx
call fcn.14009ef90
mov qword [rbp + 0x98], rax
mov rax, qword [rbp + 0x80]
mov rdx, qword [rbp + 0x1a0]
mov ecx, dword [rbp + 0x98]
lea rbx, [rbp + 0xd0]
mov qword [rsp + 0x20], 0
mov rsi, qword [sym.imp.KERNEL32.dll_WriteFile]
mov dword [rbp + 0xb0], ecx
mov rcx, rax
mov eax, dword [rbp + 0xb0]
mov r8d, eax
mov r9, rbx
call rsi
mov dword [rbp + 0xd4], eax
jmp 0x1400690e4
call fcn.14002e91c
mov qword [rbp + 0x88], rax
mov eax, 0x60
add rax, qword [rbp + 0x88]
lea rdx, [0x1400b6780]
mov rcx, qword [rbp + 0x1a0]
mov qword [rbp + 0xb8], rcx
mov rcx, rax
mov rax, qword [rbp + 0xb8]
mov r8, rax
call fcn.1400a6b60
mov dword [rbp + 0xcc], eax
mov eax, 0
mov rbx, qword [rbp + 0x178]
mov rsi, qword [rbp + 0x180]
lea rsp, [rbp + 0x190]
pop rbp
ret