int right_shft(int p, int a, int b, int *xp, int *yp) {
  int dx, dy;
  if ((((xp[b] - xp[a]) > 0) ? ((xp[b] - xp[a])) : (-(xp[b] - xp[a]))) >
      (((yp[b] - yp[a]) > 0) ? ((yp[b] - yp[a])) : (-(yp[b] - yp[a])))) {
    dx = 0;
    dy = -1;
    if (xp[b] > xp[a])
      dy = 1;
  } else {
    dx = 1;
    dy = 0;
    if (yp[b] > yp[a])
      dx = -1;
  }
  if ((yp[p] - yp[a] - dy) * (xp[b] - xp[a]) >
      (xp[p] - xp[a] - dx) * (yp[b] - yp[a]))
    return (1);
  else
    return (0);
}


x86 assembly (clang, -O0):
<right_shft>:
push   %rbp
mov    %rsp,%rbp
mov    %edi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %edx,-0x10(%rbp)
mov    %rcx,-0x18(%rbp)
mov    %r8,-0x20(%rbp)
mov    -0x18(%rbp),%rax
movslq -0x10(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    -0x18(%rbp),%rcx
movslq -0xc(%rbp),%rdx
sub    (%rcx,%rdx,4),%eax
cmp    $0x0,%eax
jle    1152 <right_shft+0x52>
mov    -0x18(%rbp),%rax
movslq -0x10(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    -0x18(%rbp),%rcx
movslq -0xc(%rbp),%rdx
sub    (%rcx,%rdx,4),%eax
mov    %eax,-0x2c(%rbp)
jmp    116f <right_shft+0x6f>
mov    -0x18(%rbp),%rax
movslq -0x10(%rbp),%rcx
mov    (%rax,%rcx,4),%ecx
mov    -0x18(%rbp),%rax
movslq -0xc(%rbp),%rdx
sub    (%rax,%rdx,4),%ecx
xor    %eax,%eax
sub    %ecx,%eax
mov    %eax,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
mov    %eax,-0x30(%rbp)
mov    -0x20(%rbp),%rax
movslq -0x10(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    -0x20(%rbp),%rcx
movslq -0xc(%rbp),%rdx
sub    (%rcx,%rdx,4),%eax
cmp    $0x0,%eax
jle    11b2 <right_shft+0xb2>
mov    -0x20(%rbp),%rax
movslq -0x10(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    -0x20(%rbp),%rcx
movslq -0xc(%rbp),%rdx
sub    (%rcx,%rdx,4),%eax
mov    %eax,-0x34(%rbp)
jmp    11cf <right_shft+0xcf>
mov    -0x20(%rbp),%rax
movslq -0x10(%rbp),%rcx
mov    (%rax,%rcx,4),%ecx
mov    -0x20(%rbp),%rax
movslq -0xc(%rbp),%rdx
sub    (%rax,%rdx,4),%ecx
xor    %eax,%eax
sub    %ecx,%eax
mov    %eax,-0x34(%rbp)
mov    -0x30(%rbp),%eax
mov    -0x34(%rbp),%ecx
cmp    %ecx,%eax
jle    1213 <right_shft+0x113>
movl   $0x0,-0x24(%rbp)
movl   $0xffffffff,-0x28(%rbp)
mov    -0x18(%rbp),%rax
movslq -0x10(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    -0x18(%rbp),%rcx
movslq -0xc(%rbp),%rdx
cmp    (%rcx,%rdx,4),%eax
jle    120e <right_shft+0x10e>
movl   $0x1,-0x28(%rbp)
jmp    1249 <right_shft+0x149>
movl   $0x1,-0x24(%rbp)
movl   $0x0,-0x28(%rbp)
mov    -0x20(%rbp),%rax
movslq -0x10(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    -0x20(%rbp),%rcx
movslq -0xc(%rbp),%rdx
cmp    (%rcx,%rdx,4),%eax
jle    1244 <right_shft+0x144>
movl   $0xffffffff,-0x24(%rbp)
jmp    1249 <right_shft+0x149>
mov    -0x20(%rbp),%rax
movslq -0x8(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    -0x20(%rbp),%rcx
movslq -0xc(%rbp),%rdx
sub    (%rcx,%rdx,4),%eax
sub    -0x28(%rbp),%eax
mov    -0x18(%rbp),%rcx
movslq -0x10(%rbp),%rdx
mov    (%rcx,%rdx,4),%ecx
mov    -0x18(%rbp),%rdx
movslq -0xc(%rbp),%rsi
sub    (%rdx,%rsi,4),%ecx
imul   %ecx,%eax
mov    -0x18(%rbp),%rcx
movslq -0x8(%rbp),%rdx
mov    (%rcx,%rdx,4),%ecx
mov    -0x18(%rbp),%rdx
movslq -0xc(%rbp),%rsi
sub    (%rdx,%rsi,4),%ecx
sub    -0x24(%rbp),%ecx
mov    -0x20(%rbp),%rdx
movslq -0x10(%rbp),%rsi
mov    (%rdx,%rsi,4),%edx
mov    -0x20(%rbp),%rsi
movslq -0xc(%rbp),%rdi
sub    (%rsi,%rdi,4),%edx
imul   %edx,%ecx
cmp    %ecx,%eax
jle    12c1 <right_shft+0x1c1>
movl   $0x1,-0x4(%rbp)
jmp    12c8 <right_shft+0x1c8>
movl   $0x0,-0x4(%rbp)
mov    -0x4(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<right_shft>:
push   %rbp
push   %r14
push   %rbx
movslq %edx,%rax
mov    (%rcx,%rax,4),%edx
movslq %esi,%rsi
mov    (%rcx,%rsi,4),%r9d
mov    (%r8,%rax,4),%eax
mov    (%r8,%rsi,4),%r10d
xor    %r11d,%r11d
sub    %r10d,%eax
setg   %r11b
xor    %esi,%esi
sub    %r9d,%edx
setle  %sil
mov    %edx,%ebx
neg    %ebx
cmovs  %edx,%ebx
mov    %eax,%ebp
neg    %ebp
cmovs  %eax,%ebp
xor    %r14d,%r14d
cmp    %ebp,%ebx
lea    -0x1(%r11,%r11,1),%ebp
cmova  %r14d,%ebp
lea    -0x1(%rsi,%rsi,1),%esi
cmovbe %r14d,%esi
movslq %edi,%rdi
mov    (%r8,%rdi,4),%ebx
sub    %r10d,%ebx
add    %esi,%ebx
imul   %edx,%ebx
mov    (%rcx,%rdi,4),%ecx
sub    %r9d,%ecx
add    %ebp,%ecx
imul   %eax,%ecx
xor    %eax,%eax
cmp    %ecx,%ebx
setg   %al
pop    %rbx
pop    %r14
pop    %rbp
ret

LLVM IR (-O0):
define i32 @right_shft(i32 %0, i32 %1, i32 %2, i32* %3, i32* %4) {
%6 = alloca i32
%7 = alloca i32
%8 = alloca i32
%9 = alloca i32
%10 = alloca i32*
%11 = alloca i32*
%12 = alloca i32
%13 = alloca i32
store i32 %0, i32* %7
store i32 %1, i32* %8
store i32 %2, i32* %9
store i32* %3, i32** %10
store i32* %4, i32** %11
%14 = load i32*, i32** %10
%15 = load i32, i32* %9
%16 = sext i32 %15 to i64
%17 = getelementptr inbounds i32, i32* %14, i64 %16
%18 = load i32, i32* %17
%19 = load i32*, i32** %10
%20 = load i32, i32* %8
%21 = sext i32 %20 to i64
%22 = getelementptr inbounds i32, i32* %19, i64 %21
%23 = load i32, i32* %22
%24 = sub nsw i32 %18, %23
%25 = icmp sgt i32 %24, 0
br i1 %25, label %26, label %38
26: ; preds = %5
%27 = load i32*, i32** %10
%28 = load i32, i32* %9
%29 = sext i32 %28 to i64
%30 = getelementptr inbounds i32, i32* %27, i64 %29
%31 = load i32, i32* %30
%32 = load i32*, i32** %10
%33 = load i32, i32* %8
%34 = sext i32 %33 to i64
%35 = getelementptr inbounds i32, i32* %32, i64 %34
%36 = load i32, i32* %35
%37 = sub nsw i32 %31, %36
br label %51
38: ; preds = %5
%39 = load i32*, i32** %10
%40 = load i32, i32* %9
%41 = sext i32 %40 to i64
%42 = getelementptr inbounds i32, i32* %39, i64 %41
%43 = load i32, i32* %42
%44 = load i32*, i32** %10
%45 = load i32, i32* %8
%46 = sext i32 %45 to i64
%47 = getelementptr inbounds i32, i32* %44, i64 %46
%48 = load i32, i32* %47
%49 = sub nsw i32 %43, %48
%50 = sub nsw i32 0, %49
br label %51
51: ; preds = %38, %26
%52 = phi i32 [ %37, %26 ], [ %50, %38 ]
%53 = load i32*, i32** %11
%54 = load i32, i32* %9
%55 = sext i32 %54 to i64
%56 = getelementptr inbounds i32, i32* %53, i64 %55
%57 = load i32, i32* %56
%58 = load i32*, i32** %11
%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 = sub nsw i32 %57, %62
%64 = icmp sgt i32 %63, 0
br i1 %64, label %65, label %77
65: ; preds = %51
%66 = load i32*, i32** %11
%67 = load i32, i32* %9
%68 = sext i32 %67 to i64
%69 = getelementptr inbounds i32, i32* %66, i64 %68
%70 = load i32, i32* %69
%71 = load i32*, i32** %11
%72 = load i32, i32* %8
%73 = sext i32 %72 to i64
%74 = getelementptr inbounds i32, i32* %71, i64 %73
%75 = load i32, i32* %74
%76 = sub nsw i32 %70, %75
br label %90
77: ; preds = %51
%78 = load i32*, i32** %11
%79 = load i32, i32* %9
%80 = sext i32 %79 to i64
%81 = getelementptr inbounds i32, i32* %78, i64 %80
%82 = load i32, i32* %81
%83 = load i32*, i32** %11
%84 = load i32, i32* %8
%85 = sext i32 %84 to i64
%86 = getelementptr inbounds i32, i32* %83, i64 %85
%87 = load i32, i32* %86
%88 = sub nsw i32 %82, %87
%89 = sub nsw i32 0, %88
br label %90
90: ; preds = %77, %65
%91 = phi i32 [ %76, %65 ], [ %89, %77 ]
%92 = icmp sgt i32 %52, %91
br i1 %92, label %93, label %107
93: ; preds = %90
store i32 0, i32* %12
store i32 -1, i32* %13
%94 = load i32*, i32** %10
%95 = load i32, i32* %9
%96 = sext i32 %95 to i64
%97 = getelementptr inbounds i32, i32* %94, i64 %96
%98 = load i32, i32* %97
%99 = load i32*, i32** %10
%100 = load i32, i32* %8
%101 = sext i32 %100 to i64
%102 = getelementptr inbounds i32, i32* %99, i64 %101
%103 = load i32, i32* %102
%104 = icmp sgt i32 %98, %103
br i1 %104, label %105, label %106
105: ; preds = %93
store i32 1, i32* %13
br label %106
106: ; preds = %105, %93
br label %121
107: ; preds = %90
store i32 1, i32* %12
store i32 0, i32* %13
%108 = load i32*, i32** %11
%109 = load i32, i32* %9
%110 = sext i32 %109 to i64
%111 = getelementptr inbounds i32, i32* %108, i64 %110
%112 = load i32, i32* %111
%113 = load i32*, i32** %11
%114 = load i32, i32* %8
%115 = sext i32 %114 to i64
%116 = getelementptr inbounds i32, i32* %113, i64 %115
%117 = load i32, i32* %116
%118 = icmp sgt i32 %112, %117
br i1 %118, label %119, label %120
119: ; preds = %107
store i32 -1, i32* %12
br label %120
120: ; preds = %119, %107
br label %121
121: ; preds = %120, %106
%122 = load i32*, i32** %11
%123 = load i32, i32* %7
%124 = sext i32 %123 to i64
%125 = getelementptr inbounds i32, i32* %122, i64 %124
%126 = load i32, i32* %125
%127 = load i32*, i32** %11
%128 = load i32, i32* %8
%129 = sext i32 %128 to i64
%130 = getelementptr inbounds i32, i32* %127, i64 %129
%131 = load i32, i32* %130
%132 = sub nsw i32 %126, %131
%133 = load i32, i32* %13
%134 = sub nsw i32 %132, %133
%135 = load i32*, i32** %10
%136 = load i32, i32* %9
%137 = sext i32 %136 to i64
%138 = getelementptr inbounds i32, i32* %135, i64 %137
%139 = load i32, i32* %138
%140 = load i32*, i32** %10
%141 = load i32, i32* %8
%142 = sext i32 %141 to i64
%143 = getelementptr inbounds i32, i32* %140, i64 %142
%144 = load i32, i32* %143
%145 = sub nsw i32 %139, %144
%146 = mul nsw i32 %134, %145
%147 = load i32*, i32** %10
%148 = load i32, i32* %7
%149 = sext i32 %148 to i64
%150 = getelementptr inbounds i32, i32* %147, i64 %149
%151 = load i32, i32* %150
%152 = load i32*, i32** %10
%153 = load i32, i32* %8
%154 = sext i32 %153 to i64
%155 = getelementptr inbounds i32, i32* %152, i64 %154
%156 = load i32, i32* %155
%157 = sub nsw i32 %151, %156
%158 = load i32, i32* %12
%159 = sub nsw i32 %157, %158
%160 = load i32*, i32** %11
%161 = load i32, i32* %9
%162 = sext i32 %161 to i64
%163 = getelementptr inbounds i32, i32* %160, i64 %162
%164 = load i32, i32* %163
%165 = load i32*, i32** %11
%166 = load i32, i32* %8
%167 = sext i32 %166 to i64
%168 = getelementptr inbounds i32, i32* %165, i64 %167
%169 = load i32, i32* %168
%170 = sub nsw i32 %164, %169
%171 = mul nsw i32 %159, %170
%172 = icmp sgt i32 %146, %171
br i1 %172, label %173, label %174
173: ; preds = %121
store i32 1, i32* %6
br label %175
174: ; preds = %121
store i32 0, i32* %6
br label %175
175: ; preds = %174, %173
%176 = load i32, i32* %6
ret i32 %176
}

LLVM IR (-O2):
define i32 @right_shft(i32 %0, i32 %1, i32 %2, i32* nocapture %3, i32* nocapture %4) {
%6 = sext i32 %2 to i64
%7 = getelementptr inbounds i32, i32* %3, i64 %6
%8 = load i32, i32* %7
%9 = sext i32 %1 to i64
%10 = getelementptr inbounds i32, i32* %3, i64 %9
%11 = load i32, i32* %10
%12 = sub nsw i32 %8, %11
%13 = tail call i32 @llvm.abs.i32(i32 %12, i1 true)
%14 = getelementptr inbounds i32, i32* %4, i64 %6
%15 = load i32, i32* %14
%16 = getelementptr inbounds i32, i32* %4, i64 %9
%17 = load i32, i32* %16
%18 = sub nsw i32 %15, %17
%19 = tail call i32 @llvm.abs.i32(i32 %18, i1 true)
%20 = icmp ugt i32 %13, %19
%21 = icmp sgt i32 %8, %11
%22 = select i1 %21, i32 -1, i32 1
%23 = icmp sgt i32 %15, %17
%24 = select i1 %23, i32 1, i32 -1
%25 = select i1 %20, i32 0, i32 %24
%26 = select i1 %20, i32 %22, i32 0
%27 = sext i32 %0 to i64
%28 = getelementptr inbounds i32, i32* %4, i64 %27
%29 = load i32, i32* %28
%30 = sub i32 %29, %17
%31 = add i32 %30, %26
%32 = mul nsw i32 %31, %12
%33 = getelementptr inbounds i32, i32* %3, i64 %27
%34 = load i32, i32* %33
%35 = sub i32 %34, %11
%36 = add i32 %35, %25
%37 = mul nsw i32 %36, %18
%38 = icmp sgt i32 %32, %37
%39 = zext i1 %38 to i32
ret i32 %39
}