void identidad(float *A, int n, int m) {
  int i, j;
  for (i = 0; i < n; i++) {
    for (j = 0; j < m; j++) {
      if (i == j) {
        A[i * m + j] = 1;
      } else {
        A[i * m + j] = 0;
      }
    }
  }
}


x86 assembly (clang, -O0):
<identidad>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %edx,-0x10(%rbp)
movl   $0x0,-0x14(%rbp)
mov    -0x14(%rbp),%eax
cmp    -0xc(%rbp),%eax
jge    11a2 <identidad+0xa2>
movl   $0x0,-0x18(%rbp)
mov    -0x18(%rbp),%eax
cmp    -0x10(%rbp),%eax
jge    118f <identidad+0x8f>
mov    -0x14(%rbp),%eax
cmp    -0x18(%rbp),%eax
jne    1163 <identidad+0x63>
mov    -0x8(%rbp),%rax
mov    -0x14(%rbp),%ecx
imul   -0x10(%rbp),%ecx
add    -0x18(%rbp),%ecx
movslq %ecx,%rcx
movss  0xea7(%rip),%xmm0
movss  %xmm0,(%rax,%rcx,4)
jmp    117c <identidad+0x7c>
mov    -0x8(%rbp),%rax
mov    -0x14(%rbp),%ecx
imul   -0x10(%rbp),%ecx
add    -0x18(%rbp),%ecx
movslq %ecx,%rcx
xorps  %xmm0,%xmm0
movss  %xmm0,(%rax,%rcx,4)
jmp    1181 <identidad+0x81>
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
jmp    1128 <identidad+0x28>
jmp    1194 <identidad+0x94>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    1115 <identidad+0x15>
pop    %rbp
ret

x86 assembly (clang, -O2):
<identidad>:
push   %r15
push   %r14
push   %r12
push   %rbx
test   %esi,%esi
jle    11f6 <identidad+0xf6>
movslq %edx,%r8
mov    %esi,%r10d
mov    %r8d,%r9d
mov    %r9d,%r15d
and    $0xfffffffe,%r15d
lea    0x4(%rdi),%rax
lea    0x0(,%r8,4),%r11
xor    %ecx,%ecx
jmp    1150 <identidad+0x50>
movl   $0x3f800000,(%rdi,%r12,4)
3f
nopw   0x0(%rax,%rax,1)
add    $0x1,%rcx
add    %r11,%rax
cmp    %r10,%rcx
je     11f6 <identidad+0xf6>
test   %edx,%edx
jle    1140 <identidad+0x40>
mov    %rcx,%r14
imul   %r8,%r14
lea    (%rcx,%r14,1),%r12
cmp    $0x1,%edx
jne    1170 <identidad+0x70>
xor    %ebx,%ebx
test   $0x1,%r9b
je     1140 <identidad+0x40>
jmp    11de <identidad+0xde>
xchg   %ax,%ax
xor    %esi,%esi
jmp    1191 <identidad+0x91>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
movl   $0x3f800000,(%rdi,%r12,4)
3f
add    $0x1,%rsi
cmp    %r15,%rsi
je     11d0 <identidad+0xd0>
mov    %rsi,%rbx
cmp    %rsi,%rcx
jne    11b0 <identidad+0xb0>
movl   $0x3f800000,(%rdi,%r12,4)
3f
jmp    11b8 <identidad+0xb8>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
movl   $0x0,-0x4(%rax,%rbx,4)
lea    0x1(%rbx),%rsi
cmp    %rsi,%rcx
je     1180 <identidad+0x80>
movl   $0x0,(%rax,%rbx,4)
jmp    1188 <identidad+0x88>
nopw   0x0(%rax,%rax,1)
add    $0x2,%rbx
test   $0x1,%r9b
je     1140 <identidad+0x40>
cmp    %rbx,%rcx
je     112f <identidad+0x2f>
add    %r14,%rbx
movl   $0x0,(%rdi,%rbx,4)
jmp    1140 <identidad+0x40>
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
ret

LLVM IR (-O0):
define void @identidad(float* %0, i32 %1, i32 %2) {
%4 = alloca float*
%5 = alloca i32
%6 = alloca i32
%7 = alloca i32
%8 = alloca i32
store float* %0, float** %4
store i32 %1, i32* %5
store i32 %2, i32* %6
store i32 0, i32* %7
br label %9
9: ; preds = %45, %3
%10 = load i32, i32* %7
%11 = load i32, i32* %5
%12 = icmp slt i32 %10, %11
br i1 %12, label %13, label %48
13: ; preds = %9
store i32 0, i32* %8
br label %14
14: ; preds = %41, %13
%15 = load i32, i32* %8
%16 = load i32, i32* %6
%17 = icmp slt i32 %15, %16
br i1 %17, label %18, label %44
18: ; preds = %14
%19 = load i32, i32* %7
%20 = load i32, i32* %8
%21 = icmp eq i32 %19, %20
br i1 %21, label %22, label %31
22: ; preds = %18
%23 = load float*, float** %4
%24 = load i32, i32* %7
%25 = load i32, i32* %6
%26 = mul nsw i32 %24, %25
%27 = load i32, i32* %8
%28 = add nsw i32 %26, %27
%29 = sext i32 %28 to i64
%30 = getelementptr inbounds float, float* %23, i64 %29
store float 1.000000e+00, float* %30
br label %40
31: ; preds = %18
%32 = load float*, float** %4
%33 = load i32, i32* %7
%34 = load i32, i32* %6
%35 = mul nsw i32 %33, %34
%36 = load i32, i32* %8
%37 = add nsw i32 %35, %36
%38 = sext i32 %37 to i64
%39 = getelementptr inbounds float, float* %32, i64 %38
store float 0.000000e+00, float* %39
br label %40
40: ; preds = %31, %22
br label %41
41: ; preds = %40
%42 = load i32, i32* %8
%43 = add nsw i32 %42, 1
store i32 %43, i32* %8
br label %14
44: ; preds = %14
br label %45
45: ; preds = %44
%46 = load i32, i32* %7
%47 = add nsw i32 %46, 1
store i32 %47, i32* %7
br label %9
48: ; preds = %9
ret void
}

LLVM IR (-O2):
define void @identidad(float* nocapture writeonly %0, i32 %1, i32 %2) {
%4 = icmp sgt i32 %1, 0
br i1 %4, label %5, label %50
5: ; preds = %3
%6 = icmp sgt i32 %2, 0
%7 = sext i32 %2 to i64
%8 = zext i32 %1 to i64
%9 = zext i32 %2 to i64
%10 = and i64 %9, 1
%11 = icmp eq i32 %2, 1
%12 = and i64 %9, 4294967294
%13 = icmp eq i64 %10, 0
br label %14
14: ; preds = %5, %47
%15 = phi i64 [ 0, %5 ], [ %48, %47 ]
br i1 %6, label %16, label %47
16: ; preds = %14
%17 = mul nsw i64 %15, %7
%18 = add nsw i64 %15, %17
%19 = getelementptr inbounds float, float* %0, i64 %18
br i1 %11, label %39, label %20
20: ; preds = %16, %35
%21 = phi i64 [ %36, %35 ], [ 0, %16 ]
%22 = phi i64 [ %37, %35 ], [ 0, %16 ]
%23 = icmp eq i64 %15, %21
br i1 %23, label %24, label %25
24: ; preds = %20
store float 1.000000e+00, float* %19
br label %28
25: ; preds = %20
%26 = add nsw i64 %21, %17
%27 = getelementptr inbounds float, float* %0, i64 %26
store float 0.000000e+00, float* %27
br label %28
28: ; preds = %24, %25
%29 = or i64 %21, 1
%30 = icmp eq i64 %15, %29
br i1 %30, label %34, label %31
31: ; preds = %28
%32 = add nsw i64 %29, %17
%33 = getelementptr inbounds float, float* %0, i64 %32
store float 0.000000e+00, float* %33
br label %35
34: ; preds = %28
store float 1.000000e+00, float* %19
br label %35
35: ; preds = %34, %31
%36 = add nuw nsw i64 %21, 2
%37 = add i64 %22, 2
%38 = icmp eq i64 %37, %12
br i1 %38, label %39, label %20
39: ; preds = %35, %16
%40 = phi i64 [ 0, %16 ], [ %36, %35 ]
br i1 %13, label %47, label %41
41: ; preds = %39
%42 = icmp eq i64 %15, %40
br i1 %42, label %46, label %43
43: ; preds = %41
%44 = add nsw i64 %40, %17
%45 = getelementptr inbounds float, float* %0, i64 %44
store float 0.000000e+00, float* %45
br label %47
46: ; preds = %41
store float 1.000000e+00, float* %19
br label %47
47: ; preds = %39, %46, %43, %14
%48 = add nuw nsw i64 %15, 1
%49 = icmp eq i64 %48, %8
br i1 %49, label %50, label %14
50: ; preds = %47, %3
ret void
}