void genindmiss(int *nx, const double *restrict plev, int ngp, int nplev,
                const double *restrict ps_prog, int *restrict pnmiss) {
  long i, lp;
  int *nxl;
  double pres;
  for (lp = 0; lp < nplev; lp++) {
    pnmiss[lp] = 0;
    pres = plev[lp];
    nxl = nx + lp * ngp;
    for (i = 0; i < ngp; i++) {
      if (pres > ps_prog[i]) {
        nxl[i] = -1;
        pnmiss[lp]++;
      }
    }
  }
}


x86 assembly (clang, -O0):
<genindmiss>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
mov    %ecx,-0x18(%rbp)
mov    %r8,-0x20(%rbp)
mov    %r9,-0x28(%rbp)
movq   $0x0,-0x38(%rbp)
mov    -0x38(%rbp),%rax
movslq -0x18(%rbp),%rcx
cmp    %rcx,%rax
jge    11ec <genindmiss+0xec>
mov    -0x28(%rbp),%rax
mov    -0x38(%rbp),%rcx
movl   $0x0,(%rax,%rcx,4)
mov    -0x10(%rbp),%rax
mov    -0x38(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x48(%rbp)
mov    -0x8(%rbp),%rax
mov    -0x38(%rbp),%rcx
movslq -0x14(%rbp),%rdx
imul   %rdx,%rcx
shl    $0x2,%rcx
add    %rcx,%rax
mov    %rax,-0x40(%rbp)
movq   $0x0,-0x30(%rbp)
mov    -0x30(%rbp),%rax
movslq -0x14(%rbp),%rcx
cmp    %rcx,%rax
jge    11d6 <genindmiss+0xd6>
movsd  -0x48(%rbp),%xmm0
mov    -0x20(%rbp),%rax
mov    -0x30(%rbp),%rcx
ucomisd (%rax,%rcx,8),%xmm0
jbe    11c0 <genindmiss+0xc0>
mov    -0x40(%rbp),%rax
mov    -0x30(%rbp),%rcx
movl   $0xffffffff,(%rax,%rcx,4)
mov    -0x28(%rbp),%rax
mov    -0x38(%rbp),%rcx
mov    (%rax,%rcx,4),%edx
add    $0x1,%edx
mov    %edx,(%rax,%rcx,4)
jmp    11c5 <genindmiss+0xc5>
mov    -0x30(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x30(%rbp)
jmp    1177 <genindmiss+0x77>
jmp    11db <genindmiss+0xdb>
mov    -0x38(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x38(%rbp)
jmp    1122 <genindmiss+0x22>
pop    %rbp
ret

x86 assembly (clang, -O2):
<genindmiss>:
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
test   %ecx,%ecx
jle    11bb <genindmiss+0xbb>
movslq %ecx,%r11
movslq %edx,%r10
mov    %r10,%r15
and    $0xfffffffffffffffe,%r15
lea    0x4(%rdi),%r12
lea    0x0(,%r10,4),%r14
xor    %r13d,%r13d
jmp    113c <genindmiss+0x3c>
nop
add    $0x1,%r13
add    %r14,%r12
cmp    %r11,%r13
je     11bb <genindmiss+0xbb>
movl   $0x0,(%r9,%r13,4)
test   %edx,%edx
jle    1130 <genindmiss+0x30>
movsd  (%rsi,%r13,8),%xmm0
xor    %ecx,%ecx
xor    %eax,%eax
cmp    $0x1,%edx
jne    1189 <genindmiss+0x89>
test   $0x1,%r10b
je     1130 <genindmiss+0x30>
ucomisd (%r8,%rax,8),%xmm0
jbe    1130 <genindmiss+0x30>
mov    %r13,%rbx
imul   %r10,%rbx
lea    (%rdi,%rbx,4),%rbx
movl   $0xffffffff,(%rbx,%rax,4)
add    $0x1,%ecx
mov    %ecx,(%r9,%r13,4)
jmp    1130 <genindmiss+0x30>
add    $0x2,%rax
cmp    %rax,%r15
je     1157 <genindmiss+0x57>
ucomisd (%r8,%rax,8),%xmm0
jbe    11a1 <genindmiss+0xa1>
movl   $0xffffffff,-0x4(%r12,%rax,4)
ff ff
add    $0x1,%ecx
mov    %ecx,(%r9,%r13,4)
ucomisd 0x8(%r8,%rax,8),%xmm0
jbe    1180 <genindmiss+0x80>
movl   $0xffffffff,(%r12,%rax,4)
ff
add    $0x1,%ecx
mov    %ecx,(%r9,%r13,4)
jmp    1180 <genindmiss+0x80>
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
ret

LLVM IR (-O0):
define void @genindmiss(i32* %0, double* noalias %1, i32 %2, i32 %3, double* noalias %4, i32* noalias %5) {
%7 = alloca i32*
%8 = alloca double*
%9 = alloca i32
%10 = alloca i32
%11 = alloca double*
%12 = alloca i32*
%13 = alloca i64
%14 = alloca i64
%15 = alloca i32*
%16 = alloca double
store i32* %0, i32** %7
store double* %1, double** %8
store i32 %2, i32* %9
store i32 %3, i32* %10
store double* %4, double** %11
store i32* %5, i32** %12
store i64 0, i64* %14
br label %17
17: ; preds = %62, %6
%18 = load i64, i64* %14
%19 = load i32, i32* %10
%20 = sext i32 %19 to i64
%21 = icmp slt i64 %18, %20
br i1 %21, label %22, label %65
22: ; preds = %17
%23 = load i32*, i32** %12
%24 = load i64, i64* %14
%25 = getelementptr inbounds i32, i32* %23, i64 %24
store i32 0, i32* %25
%26 = load double*, double** %8
%27 = load i64, i64* %14
%28 = getelementptr inbounds double, double* %26, i64 %27
%29 = load double, double* %28
store double %29, double* %16
%30 = load i32*, i32** %7
%31 = load i64, i64* %14
%32 = load i32, i32* %9
%33 = sext i32 %32 to i64
%34 = mul nsw i64 %31, %33
%35 = getelementptr inbounds i32, i32* %30, i64 %34
store i32* %35, i32** %15
store i64 0, i64* %13
br label %36
36: ; preds = %58, %22
%37 = load i64, i64* %13
%38 = load i32, i32* %9
%39 = sext i32 %38 to i64
%40 = icmp slt i64 %37, %39
br i1 %40, label %41, label %61
41: ; preds = %36
%42 = load double, double* %16
%43 = load double*, double** %11
%44 = load i64, i64* %13
%45 = getelementptr inbounds double, double* %43, i64 %44
%46 = load double, double* %45
%47 = fcmp ogt double %42, %46
br i1 %47, label %48, label %57
48: ; preds = %41
%49 = load i32*, i32** %15
%50 = load i64, i64* %13
%51 = getelementptr inbounds i32, i32* %49, i64 %50
store i32 -1, i32* %51
%52 = load i32*, i32** %12
%53 = load i64, i64* %14
%54 = getelementptr inbounds i32, i32* %52, i64 %53
%55 = load i32, i32* %54
%56 = add nsw i32 %55, 1
store i32 %56, i32* %54
br label %57
57: ; preds = %48, %41
br label %58
58: ; preds = %57
%59 = load i64, i64* %13
%60 = add nsw i64 %59, 1
store i64 %60, i64* %13
br label %36
61: ; preds = %36
br label %62
62: ; preds = %61
%63 = load i64, i64* %14
%64 = add nsw i64 %63, 1
store i64 %64, i64* %14
br label %17
65: ; preds = %17
ret void
}

LLVM IR (-O2):
define void @genindmiss(i32* nocapture writeonly %0, double* noalias nocapture %1, i32 %2, i32 %3, double* noalias nocapture %4, i32* noalias nocapture %5) {
%7 = sext i32 %3 to i64
%8 = icmp sgt i32 %3, 0
br i1 %8, label %9, label %61
9: ; preds = %6
%10 = sext i32 %2 to i64
%11 = icmp sgt i32 %2, 0
%12 = and i64 %10, 1
%13 = icmp eq i32 %2, 1
%14 = and i64 %10, -2
%15 = icmp eq i64 %12, 0
br label %16
16: ; preds = %9, %58
%17 = phi i64 [ 0, %9 ], [ %59, %58 ]
%18 = getelementptr inbounds i32, i32* %5, i64 %17
store i32 0, i32* %18
%19 = getelementptr inbounds double, double* %1, i64 %17
%20 = load double, double* %19
%21 = mul nsw i64 %17, %10
%22 = getelementptr inbounds i32, i32* %0, i64 %21
br i1 %11, label %23, label %58
23: ; preds = %16
br i1 %13, label %48, label %24
24: ; preds = %23, %43
%25 = phi i32 [ %44, %43 ], [ 0, %23 ]
%26 = phi i64 [ %45, %43 ], [ 0, %23 ]
%27 = phi i64 [ %46, %43 ], [ 0, %23 ]
%28 = getelementptr inbounds double, double* %4, i64 %26
%29 = load double, double* %28
%30 = fcmp ogt double %20, %29
br i1 %30, label %31, label %34
31: ; preds = %24
%32 = getelementptr inbounds i32, i32* %22, i64 %26
store i32 -1, i32* %32
%33 = add nsw i32 %25, 1
store i32 %33, i32* %18
br label %34
34: ; preds = %24, %31
%35 = phi i32 [ %25, %24 ], [ %33, %31 ]
%36 = or i64 %26, 1
%37 = getelementptr inbounds double, double* %4, i64 %36
%38 = load double, double* %37
%39 = fcmp ogt double %20, %38
br i1 %39, label %40, label %43
40: ; preds = %34
%41 = getelementptr inbounds i32, i32* %22, i64 %36
store i32 -1, i32* %41
%42 = add nsw i32 %35, 1
store i32 %42, i32* %18
br label %43
43: ; preds = %40, %34
%44 = phi i32 [ %35, %34 ], [ %42, %40 ]
%45 = add nuw nsw i64 %26, 2
%46 = add i64 %27, 2
%47 = icmp eq i64 %46, %14
br i1 %47, label %48, label %24
48: ; preds = %43, %23
%49 = phi i32 [ 0, %23 ], [ %44, %43 ]
%50 = phi i64 [ 0, %23 ], [ %45, %43 ]
br i1 %15, label %58, label %51
51: ; preds = %48
%52 = getelementptr inbounds double, double* %4, i64 %50
%53 = load double, double* %52
%54 = fcmp ogt double %20, %53
br i1 %54, label %55, label %58
55: ; preds = %51
%56 = getelementptr inbounds i32, i32* %22, i64 %50
store i32 -1, i32* %56
%57 = add nsw i32 %49, 1
store i32 %57, i32* %18
br label %58
58: ; preds = %48, %55, %51, %16
%59 = add nuw nsw i64 %17, 1
%60 = icmp eq i64 %59, %7
br i1 %60, label %61, label %16
61: ; preds = %58, %6
ret void
}