int ft_is_sort(int *tab, int length, int (*f)(int, int)) {
  int it;
  int arr_sort;
  it = 0;
  if (f(tab[it], tab[it + 1]) == 0)
    while (f(tab[it], tab[it + 1]) == 0 && it < length)
      it++;
  if (it == length - 1)
    return (1);
  if (f(tab[it], tab[it + 1]) >= 0)
    arr_sort = 0;
  else
    arr_sort = 1;
  while (it < length - 1) {
    if (arr_sort == 0 && f(tab[it], tab[it + 1]) < 0)
      return (0);
    else if (arr_sort == 1 && f(tab[it], tab[it + 1]) > 0)
      return (0);
    it++;
  }
  return (1);
}


x86 assembly (clang, -O0):
<ft_is_sort>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x10(%rbp)
mov    %esi,-0x14(%rbp)
mov    %rdx,-0x20(%rbp)
movl   $0x0,-0x24(%rbp)
mov    -0x20(%rbp),%rax
mov    -0x10(%rbp),%rcx
movslq -0x24(%rbp),%rdx
mov    (%rcx,%rdx,4),%edi
mov    -0x10(%rbp),%rcx
mov    -0x24(%rbp),%edx
add    $0x1,%edx
movslq %edx,%rdx
mov    (%rcx,%rdx,4),%esi
call   *%rax
cmp    $0x0,%eax
jne    11a9 <ft_is_sort+0xa9>
jmp    1149 <ft_is_sort+0x49>
mov    -0x20(%rbp),%rax
mov    -0x10(%rbp),%rcx
movslq -0x24(%rbp),%rdx
mov    (%rcx,%rdx,4),%edi
mov    -0x10(%rbp),%rcx
mov    -0x24(%rbp),%edx
add    $0x1,%edx
movslq %edx,%rdx
mov    (%rcx,%rdx,4),%esi
call   *%rax
mov    %eax,%ecx
xor    %eax,%eax
cmp    $0x0,%ecx
mov    %al,-0x29(%rbp)
jne    1186 <ft_is_sort+0x86>
mov    -0x24(%rbp),%eax
cmp    -0x14(%rbp),%eax
setl   %al
mov    %al,-0x29(%rbp)
mov    -0x29(%rbp),%al
test   $0x1,%al
jne    1196 <ft_is_sort+0x96>
jmp    11a4 <ft_is_sort+0xa4>
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    1149 <ft_is_sort+0x49>
jmp    11a9 <ft_is_sort+0xa9>
mov    -0x24(%rbp),%eax
mov    -0x14(%rbp),%ecx
sub    $0x1,%ecx
cmp    %ecx,%eax
jne    11c6 <ft_is_sort+0xc6>
movl   $0x1,-0x4(%rbp)
jmp    12b3 <ft_is_sort+0x1b3>
mov    -0x20(%rbp),%rax
mov    -0x10(%rbp),%rcx
movslq -0x24(%rbp),%rdx
mov    (%rcx,%rdx,4),%edi
mov    -0x10(%rbp),%rcx
mov    -0x24(%rbp),%edx
add    $0x1,%edx
movslq %edx,%rdx
mov    (%rcx,%rdx,4),%esi
call   *%rax
cmp    $0x0,%eax
jl     11fc <ft_is_sort+0xfc>
movl   $0x0,-0x28(%rbp)
jmp    1203 <ft_is_sort+0x103>
movl   $0x1,-0x28(%rbp)
jmp    1208 <ft_is_sort+0x108>
mov    -0x24(%rbp),%eax
mov    -0x14(%rbp),%ecx
sub    $0x1,%ecx
cmp    %ecx,%eax
jge    12ac <ft_is_sort+0x1ac>
cmpl   $0x0,-0x28(%rbp)
jne    1259 <ft_is_sort+0x159>
mov    -0x20(%rbp),%rax
mov    -0x10(%rbp),%rcx
movslq -0x24(%rbp),%rdx
mov    (%rcx,%rdx,4),%edi
mov    -0x10(%rbp),%rcx
mov    -0x24(%rbp),%edx
add    $0x1,%edx
movslq %edx,%rdx
mov    (%rcx,%rdx,4),%esi
call   *%rax
cmp    $0x0,%eax
jge    1259 <ft_is_sort+0x159>
movl   $0x0,-0x4(%rbp)
jmp    12b3 <ft_is_sort+0x1b3>
cmpl   $0x1,-0x28(%rbp)
jne    1299 <ft_is_sort+0x199>
mov    -0x20(%rbp),%rax
mov    -0x10(%rbp),%rcx
movslq -0x24(%rbp),%rdx
mov    (%rcx,%rdx,4),%edi
mov    -0x10(%rbp),%rcx
mov    -0x24(%rbp),%edx
add    $0x1,%edx
movslq %edx,%rdx
mov    (%rcx,%rdx,4),%esi
call   *%rax
cmp    $0x0,%eax
jle    1299 <ft_is_sort+0x199>
movl   $0x0,-0x4(%rbp)
jmp    12b3 <ft_is_sort+0x1b3>
jmp    129e <ft_is_sort+0x19e>
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    1208 <ft_is_sort+0x108>
movl   $0x1,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<ft_is_sort>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
push   %rax
mov    %rdx,%r14
mov    %esi,%ebp
mov    %rdi,%rbx
mov    (%rdi),%edi
mov    0x4(%rbx),%esi
call   *%rdx
xor    %r12d,%r12d
test   %eax,%eax
jne    1151 <ft_is_sort+0x51>
mov    %ebp,%r13d
movslq %ebp,%r15
xor    %ebp,%ebp
nopl   0x0(%rax)
lea    0x1(%rbp),%r12
mov    (%rbx,%rbp,4),%edi
mov    0x4(%rbx,%rbp,4),%esi
call   *%r14
test   %eax,%eax
jne    114a <ft_is_sort+0x4a>
cmp    %r15,%rbp
mov    %r12,%rbp
jl     1130 <ft_is_sort+0x30>
add    $0xffffffff,%r12d
mov    %r13d,%ebp
add    $0xffffffff,%ebp
mov    $0x1,%eax
cmp    %ebp,%r12d
je     11ab <ft_is_sort+0xab>
mov    %r12d,%r15d
mov    (%rbx,%r15,4),%edi
mov    0x4(%rbx,%r15,4),%esi
call   *%r14
cmp    %ebp,%r12d
jge    11a6 <ft_is_sort+0xa6>
mov    %eax,%r13d
mov    %ebp,%ebp
jmp    118d <ft_is_sort+0x8d>
nopl   0x0(%rax)
test   %eax,%eax
jg     11a2 <ft_is_sort+0xa2>
add    $0x1,%r15
cmp    %r15,%rbp
je     11a6 <ft_is_sort+0xa6>
mov    (%rbx,%r15,4),%edi
mov    0x4(%rbx,%r15,4),%esi
call   *%r14
test   %r13d,%r13d
js     1180 <ft_is_sort+0x80>
test   %eax,%eax
jns    1184 <ft_is_sort+0x84>
xor    %eax,%eax
jmp    11ab <ft_is_sort+0xab>
mov    $0x1,%eax
add    $0x8,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define i32 @ft_is_sort(i32* %0, i32 %1, i32 (i32, i32)* %2) {
%4 = alloca i32
%5 = alloca i32*
%6 = alloca i32
%7 = alloca i32 (i32, i32)*
%8 = alloca i32
%9 = alloca i32
store i32* %0, i32** %5
store i32 %1, i32* %6
store i32 (i32, i32)* %2, i32 (i32, i32)** %7
store i32 0, i32* %8
%10 = load i32 (i32, i32)*, i32 (i32, i32)** %7
%11 = load i32*, i32** %5
%12 = load i32, i32* %8
%13 = sext i32 %12 to i64
%14 = getelementptr inbounds i32, i32* %11, i64 %13
%15 = load i32, i32* %14
%16 = load i32*, i32** %5
%17 = load i32, i32* %8
%18 = add nsw i32 %17, 1
%19 = sext i32 %18 to i64
%20 = getelementptr inbounds i32, i32* %16, i64 %19
%21 = load i32, i32* %20
%22 = call i32 %10(i32 %15, i32 %21)
%23 = icmp eq i32 %22, 0
br i1 %23, label %24, label %50
24: ; preds = %3
br label %25
25: ; preds = %46, %24
%26 = load i32 (i32, i32)*, i32 (i32, i32)** %7
%27 = load i32*, i32** %5
%28 = load i32, i32* %8
%29 = sext i32 %28 to i64
%30 = getelementptr inbounds i32, i32* %27, i64 %29
%31 = load i32, i32* %30
%32 = load i32*, i32** %5
%33 = load i32, i32* %8
%34 = add nsw i32 %33, 1
%35 = sext i32 %34 to i64
%36 = getelementptr inbounds i32, i32* %32, i64 %35
%37 = load i32, i32* %36
%38 = call i32 %26(i32 %31, i32 %37)
%39 = icmp eq i32 %38, 0
br i1 %39, label %40, label %44
40: ; preds = %25
%41 = load i32, i32* %8
%42 = load i32, i32* %6
%43 = icmp slt i32 %41, %42
br label %44
44: ; preds = %40, %25
%45 = phi i1 [ false, %25 ], [ %43, %40 ]
br i1 %45, label %46, label %49
46: ; preds = %44
%47 = load i32, i32* %8
%48 = add nsw i32 %47, 1
store i32 %48, i32* %8
br label %25
49: ; preds = %44
br label %50
50: ; preds = %49, %3
%51 = load i32, i32* %8
%52 = load i32, i32* %6
%53 = sub nsw i32 %52, 1
%54 = icmp eq i32 %51, %53
br i1 %54, label %55, label %56
55: ; preds = %50
store i32 1, i32* %4
br label %122
56: ; preds = %50
%57 = load i32 (i32, i32)*, i32 (i32, i32)** %7
%58 = load i32*, i32** %5
%59 = load i32, i32* %8
%60 = sext i32 %59 to i64
%61 = getelementptr inbounds i32, i32* %58, i64 %60
%62 = load i32, i32* %61
%63 = load i32*, i32** %5
%64 = load i32, i32* %8
%65 = add nsw i32 %64, 1
%66 = sext i32 %65 to i64
%67 = getelementptr inbounds i32, i32* %63, i64 %66
%68 = load i32, i32* %67
%69 = call i32 %57(i32 %62, i32 %68)
%70 = icmp sge i32 %69, 0
br i1 %70, label %71, label %72
71: ; preds = %56
store i32 0, i32* %9
br label %73
72: ; preds = %56
store i32 1, i32* %9
br label %73
73: ; preds = %72, %71
br label %74
74: ; preds = %118, %73
%75 = load i32, i32* %8
%76 = load i32, i32* %6
%77 = sub nsw i32 %76, 1
%78 = icmp slt i32 %75, %77
br i1 %78, label %79, label %121
79: ; preds = %74
%80 = load i32, i32* %9
%81 = icmp eq i32 %80, 0
br i1 %81, label %82, label %98
82: ; preds = %79
%83 = load i32 (i32, i32)*, i32 (i32, i32)** %7
%84 = load i32*, i32** %5
%85 = load i32, i32* %8
%86 = sext i32 %85 to i64
%87 = getelementptr inbounds i32, i32* %84, i64 %86
%88 = load i32, i32* %87
%89 = load i32*, i32** %5
%90 = load i32, i32* %8
%91 = add nsw i32 %90, 1
%92 = sext i32 %91 to i64
%93 = getelementptr inbounds i32, i32* %89, i64 %92
%94 = load i32, i32* %93
%95 = call i32 %83(i32 %88, i32 %94)
%96 = icmp slt i32 %95, 0
br i1 %96, label %97, label %98
97: ; preds = %82
store i32 0, i32* %4
br label %122
98: ; preds = %82, %79
%99 = load i32, i32* %9
%100 = icmp eq i32 %99, 1
br i1 %100, label %101, label %117
101: ; preds = %98
%102 = load i32 (i32, i32)*, i32 (i32, i32)** %7
%103 = load i32*, i32** %5
%104 = load i32, i32* %8
%105 = sext i32 %104 to i64
%106 = getelementptr inbounds i32, i32* %103, i64 %105
%107 = load i32, i32* %106
%108 = load i32*, i32** %5
%109 = load i32, i32* %8
%110 = add nsw i32 %109, 1
%111 = sext i32 %110 to i64
%112 = getelementptr inbounds i32, i32* %108, i64 %111
%113 = load i32, i32* %112
%114 = call i32 %102(i32 %107, i32 %113)
%115 = icmp sgt i32 %114, 0
br i1 %115, label %116, label %117
116: ; preds = %101
store i32 0, i32* %4
br label %122
117: ; preds = %101, %98
br label %118
118: ; preds = %117
%119 = load i32, i32* %8
%120 = add nsw i32 %119, 1
store i32 %120, i32* %8
br label %74
121: ; preds = %74
store i32 1, i32* %4
br label %122
122: ; preds = %121, %116, %97, %55
%123 = load i32, i32* %4
ret i32 %123
}

LLVM IR (-O2):
define i32 @ft_is_sort(i32* nocapture %0, i32 %1, i32 (i32, i32)* nocapture %2) {
%4 = load i32, i32* %0
%5 = getelementptr inbounds i32, i32* %0, i64 1
%6 = load i32, i32* %5
%7 = tail call i32 %2(i32 %4, i32 %6)
%8 = icmp eq i32 %7, 0
br i1 %8, label %9, label %24
9: ; preds = %3
%10 = sext i32 %1 to i64
br label %11
11: ; preds = %9, %11
%12 = phi i64 [ 0, %9 ], [ %15, %11 ]
%13 = getelementptr inbounds i32, i32* %0, i64 %12
%14 = load i32, i32* %13
%15 = add nuw nsw i64 %12, 1
%16 = getelementptr inbounds i32, i32* %0, i64 %15
%17 = load i32, i32* %16
%18 = tail call i32 %2(i32 %14, i32 %17)
%19 = icmp eq i32 %18, 0
%20 = icmp slt i64 %12, %10
%21 = select i1 %19, i1 %20, i1 false
br i1 %21, label %11, label %22
22: ; preds = %11
%23 = trunc i64 %12 to i32
br label %24
24: ; preds = %22, %3
%25 = phi i32 [ 0, %3 ], [ %23, %22 ]
%26 = add i32 %1, -1
%27 = icmp eq i32 %25, %26
br i1 %27, label %55, label %28
28: ; preds = %24
%29 = zext i32 %25 to i64
%30 = getelementptr inbounds i32, i32* %0, i64 %29
%31 = load i32, i32* %30
%32 = add nuw nsw i32 %25, 1
%33 = zext i32 %32 to i64
%34 = getelementptr inbounds i32, i32* %0, i64 %33
%35 = load i32, i32* %34
%36 = tail call i32 %2(i32 %31, i32 %35)
%37 = icmp sgt i32 %36, -1
%38 = icmp slt i32 %25, %26
br i1 %38, label %39, label %55
39: ; preds = %28
%40 = zext i32 %26 to i64
br label %41
41: ; preds = %39, %53
%42 = phi i64 [ %29, %39 ], [ %45, %53 ]
%43 = getelementptr inbounds i32, i32* %0, i64 %42
%44 = load i32, i32* %43
%45 = add nuw nsw i64 %42, 1
%46 = getelementptr inbounds i32, i32* %0, i64 %45
%47 = load i32, i32* %46
%48 = tail call i32 %2(i32 %44, i32 %47)
br i1 %37, label %49, label %51
49: ; preds = %41
%50 = icmp slt i32 %48, 0
br i1 %50, label %55, label %53
51: ; preds = %41
%52 = icmp sgt i32 %48, 0
br i1 %52, label %55, label %53
53: ; preds = %49, %51
%54 = icmp eq i64 %45, %40
br i1 %54, label %55, label %41
55: ; preds = %49, %51, %53, %28, %24
%56 = phi i32 [ 1, %24 ], [ 1, %28 ], [ 1, %53 ], [ 0, %51 ], [ 0, %49 ]
ret i32 %56
}