int smoothmap(zmap, map72, jmax, kmax)
double **zmap;
double **map72;
int jmax, kmax;
{
  register int h, v, dh, dv;
  int box = 3, half;
  double thesum;
  half = box / 2;
  for (h = 1; h <= jmax; h++) {
    for (v = 1; v <= kmax; v++) {
      if (h < half + 2 || h > jmax - half - 2 || v < half + 2 ||
          v > kmax - half - 2)
        map72[h][v] = 1.0e10;
      else {
        for (thesum = 0.0, dh = h - half; dh <= h + half; dh++) {
          for (dv = v - half; dv <= v + half; dv++) {
            thesum += zmap[dh][dv];
          }
        }
        thesum /= (box * box);
        if (zmap[h][v] == 1.0 || zmap[h][v] == -1.0)
          map72[h][v] = thesum;
        else
          map72[h][v] = zmap[h][v] / 10;
      }
    }
  }
  return (1);
}


x86 assembly (clang, -O0):
<smoothmap>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
mov    %ecx,-0x18(%rbp)
movl   $0x3,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
mov    %eax,-0x30(%rbp)
movl   $0x1,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0x14(%rbp),%eax
jg     132d <smoothmap+0x22d>
movl   $0x1,-0x20(%rbp)
mov    -0x20(%rbp),%eax
cmp    -0x18(%rbp),%eax
jg     131a <smoothmap+0x21a>
mov    -0x1c(%rbp),%eax
mov    -0x30(%rbp),%ecx
add    $0x2,%ecx
cmp    %ecx,%eax
jl     1197 <smoothmap+0x97>
mov    -0x1c(%rbp),%eax
mov    -0x14(%rbp),%ecx
sub    -0x30(%rbp),%ecx
sub    $0x2,%ecx
cmp    %ecx,%eax
jg     1197 <smoothmap+0x97>
mov    -0x20(%rbp),%eax
mov    -0x30(%rbp),%ecx
add    $0x2,%ecx
cmp    %ecx,%eax
jl     1197 <smoothmap+0x97>
mov    -0x20(%rbp),%eax
mov    -0x18(%rbp),%ecx
sub    -0x30(%rbp),%ecx
sub    $0x2,%ecx
cmp    %ecx,%eax
jle    11b9 <smoothmap+0xb9>
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x20(%rbp),%rcx
movsd  0xe69(%rip),%xmm0
movsd  %xmm0,(%rax,%rcx,8)
jmp    1307 <smoothmap+0x207>
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x38(%rbp)
mov    -0x1c(%rbp),%eax
sub    -0x30(%rbp),%eax
mov    %eax,-0x24(%rbp)
mov    -0x24(%rbp),%eax
mov    -0x1c(%rbp),%ecx
add    -0x30(%rbp),%ecx
cmp    %ecx,%eax
jg     1235 <smoothmap+0x135>
mov    -0x20(%rbp),%eax
sub    -0x30(%rbp),%eax
mov    %eax,-0x28(%rbp)
mov    -0x28(%rbp),%eax
mov    -0x20(%rbp),%ecx
add    -0x30(%rbp),%ecx
cmp    %ecx,%eax
jg     1222 <smoothmap+0x122>
mov    -0x8(%rbp),%rax
movslq -0x24(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x28(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
addsd  -0x38(%rbp),%xmm0
movsd  %xmm0,-0x38(%rbp)
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
jmp    11e4 <smoothmap+0xe4>
jmp    1227 <smoothmap+0x127>
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    11ca <smoothmap+0xca>
mov    -0x2c(%rbp),%eax
imul   -0x2c(%rbp),%eax
cvtsi2sd %eax,%xmm1
movsd  -0x38(%rbp),%xmm0
divsd  %xmm1,%xmm0
movsd  %xmm0,-0x38(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x20(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  0xd95(%rip),%xmm1
ucomisd %xmm1,%xmm0
jne    1280 <smoothmap+0x180>
jp     1280 <smoothmap+0x180>
jmp    12ad <smoothmap+0x1ad>
mov    -0x8(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x20(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  0xd6b(%rip),%xmm1
ucomisd %xmm1,%xmm0
jne    12cc <smoothmap+0x1cc>
jp     12cc <smoothmap+0x1cc>
movsd  -0x38(%rbp),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x20(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
jmp    1302 <smoothmap+0x202>
mov    -0x8(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x20(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  0xd27(%rip),%xmm1
divsd  %xmm1,%xmm0
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x20(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
jmp    1307 <smoothmap+0x207>
jmp    130c <smoothmap+0x20c>
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    1141 <smoothmap+0x41>
jmp    131f <smoothmap+0x21f>
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    112e <smoothmap+0x2e>
mov    $0x1,%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<smoothmap>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
mov    %rcx,-0x18(%rsp)
test   %edx,%edx
jle    125f <smoothmap+0x15f>
lea    -0x3(%rdx),%eax
mov    -0x18(%rsp),%rbp
lea    -0x3(%rbp),%ecx
movslq %ecx,%r10
cltq
mov    %rax,-0x10(%rsp)
mov    %edx,%eax
mov    %rax,-0x8(%rsp)
mov    %ebp,%r11d
mov    $0x1,%r12d
xor    %r13d,%r13d
movabs $0x4202a05f20000000,%r14
a0 02 42
movsd  0xeaf(%rip),%xmm0
xorpd  %xmm1,%xmm1
movsd  0xebb(%rip),%xmm2
movsd  0xea3(%rip),%xmm3
movsd  0xea3(%rip),%xmm4
jmp    1183 <smoothmap+0x83>
nop
add    $0x1,%r12
add    $0x1,%r13
cmp    -0x8(%rsp),%r13
je     125f <smoothmap+0x15f>
cmpl   $0x0,-0x18(%rsp)
jle    1170 <smoothmap+0x70>
cmp    $0x3,%r12
setb   %al
cmp    -0x10(%rsp),%r12
setg   %r15b
or     %al,%r15b
mov    $0x1,%ebx
xor    %ebp,%ebp
jmp    11cb <smoothmap+0xcb>
cs nopw 0x0(%rax,%rax,1)
mov    (%rsi,%r12,8),%rax
mov    %r14,(%rax,%rbx,8)
add    $0x1,%rbp
mov    %rbp,%rax
add    $0x1,%rbx
mov    %rax,%rbp
cmp    %r11,%rax
je     1170 <smoothmap+0x70>
cmp    $0x3,%rbx
setb   %al
or     %r15b,%al
jne    11b0 <smoothmap+0xb0>
cmp    %r10,%rbx
jg     11b0 <smoothmap+0xb0>
mov    (%rdi,%r13,8),%r9
mov    0x8(%rdi,%r13,8),%r8
lea    0x1(%rbp),%rax
mov    0x10(%rdi,%r13,8),%rdx
mov    (%rdi,%r12,8),%rcx
movsd  (%rcx,%rbx,8),%xmm5
ucomisd %xmm0,%xmm5
jne    11ff <smoothmap+0xff>
jnp    1210 <smoothmap+0x110>
ucomisd %xmm3,%xmm5
jne    1207 <smoothmap+0x107>
jnp    1210 <smoothmap+0x110>
divsd  %xmm4,%xmm5
jmp    1251 <smoothmap+0x151>
nopl   (%rax)
movsd  (%r9,%rbp,8),%xmm5
addsd  %xmm1,%xmm5
addsd  0x8(%r9,%rbp,8),%xmm5
addsd  0x10(%r9,%rbp,8),%xmm5
addsd  (%r8,%rbp,8),%xmm5
addsd  0x8(%r8,%rbp,8),%xmm5
addsd  0x10(%r8,%rbp,8),%xmm5
addsd  (%rdx,%rbp,8),%xmm5
addsd  0x8(%rdx,%rbp,8),%xmm5
addsd  0x10(%rdx,%rbp,8),%xmm5
divsd  %xmm2,%xmm5
mov    (%rsi,%r12,8),%rcx
movsd  %xmm5,(%rcx,%rbx,8)
jmp    11bf <smoothmap+0xbf>
mov    $0x1,%eax
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

LLVM IR (-O2):
define i32 @smoothmap(double** nocapture %0, double** nocapture %1, i32 %2, i32 %3) {
%5 = icmp slt i32 %2, 1
br i1 %5, label %94, label %6
6: ; preds = %4
%7 = icmp slt i32 %3, 1
%8 = add nsw i32 %2, -3
%9 = add nsw i32 %3, -3
%10 = sext i32 %9 to i64
%11 = sext i32 %8 to i64
%12 = zext i32 %2 to i64
%13 = zext i32 %3 to i64
br label %14
14: ; preds = %6, %90
%15 = phi i64 [ 1, %6 ], [ %91, %90 ]
%16 = phi i64 [ 0, %6 ], [ %92, %90 ]
br i1 %7, label %90, label %17
17: ; preds = %14
%18 = icmp ult i64 %15, 3
%19 = icmp sgt i64 %15, %11
%20 = select i1 %18, i1 true, i1 %19
%21 = getelementptr inbounds double*, double** %0, i64 %15
%22 = getelementptr inbounds double*, double** %1, i64 %15
%23 = getelementptr inbounds double*, double** %0, i64 %16
%24 = add nuw nsw i64 %16, 1
%25 = getelementptr inbounds double*, double** %0, i64 %24
%26 = add nuw nsw i64 %16, 2
%27 = getelementptr inbounds double*, double** %0, i64 %26
br label %28
28: ; preds = %17, %86
%29 = phi i64 [ 1, %17 ], [ %88, %86 ]
%30 = phi i64 [ 0, %17 ], [ %87, %86 ]
%31 = icmp ult i64 %29, 3
%32 = select i1 %20, i1 true, i1 %31
%33 = icmp sgt i64 %29, %10
%34 = select i1 %32, i1 true, i1 %33
br i1 %34, label %35, label %39
35: ; preds = %28
%36 = load double*, double** %22
%37 = getelementptr inbounds double, double* %36, i64 %29
store double 1.000000e+10, double* %37
%38 = add nuw nsw i64 %30, 1
br label %86
39: ; preds = %28
%40 = load double*, double** %23
%41 = add nuw nsw i64 %30, 1
%42 = add nuw nsw i64 %30, 2
%43 = load double*, double** %25
%44 = load double*, double** %27
%45 = load double*, double** %21
%46 = getelementptr inbounds double, double* %45, i64 %29
%47 = load double, double* %46
%48 = fcmp oeq double %47, 1.000000e+00
%49 = fcmp oeq double %47, -1.000000e+00
%50 = or i1 %48, %49
br i1 %50, label %51, label %82
51: ; preds = %39
%52 = getelementptr inbounds double, double* %40, i64 %30
%53 = load double, double* %52
%54 = fadd double %53, 0.000000e+00
%55 = getelementptr inbounds double, double* %40, i64 %41
%56 = load double, double* %55
%57 = fadd double %54, %56
%58 = getelementptr inbounds double, double* %40, i64 %42
%59 = load double, double* %58
%60 = fadd double %57, %59
%61 = getelementptr inbounds double, double* %43, i64 %30
%62 = load double, double* %61
%63 = fadd double %60, %62
%64 = getelementptr inbounds double, double* %43, i64 %41
%65 = load double, double* %64
%66 = fadd double %63, %65
%67 = getelementptr inbounds double, double* %43, i64 %42
%68 = load double, double* %67
%69 = fadd double %66, %68
%70 = getelementptr inbounds double, double* %44, i64 %30
%71 = load double, double* %70
%72 = fadd double %69, %71
%73 = getelementptr inbounds double, double* %44, i64 %41
%74 = load double, double* %73
%75 = fadd double %72, %74
%76 = getelementptr inbounds double, double* %44, i64 %42
%77 = load double, double* %76
%78 = fadd double %75, %77
%79 = fdiv double %78, 9.000000e+00
%80 = load double*, double** %22
%81 = getelementptr inbounds double, double* %80, i64 %29
store double %79, double* %81
br label %86
82: ; preds = %39
%83 = fdiv double %47, 1.000000e+01
%84 = load double*, double** %22
%85 = getelementptr inbounds double, double* %84, i64 %29
store double %83, double* %85
br label %86
86: ; preds = %35, %82, %51
%87 = phi i64 [ %38, %35 ], [ %41, %82 ], [ %41, %51 ]
%88 = add nuw nsw i64 %29, 1
%89 = icmp eq i64 %87, %13
br i1 %89, label %90, label %28
90: ; preds = %86, %14
%91 = add nuw nsw i64 %15, 1
%92 = add nuw nsw i64 %16, 1
%93 = icmp eq i64 %92, %12
br i1 %93, label %94, label %14
94: ; preds = %90, %4
ret i32 1
}