void multiplicar(long a[], long b[], long c[], int ord) {
  int i, j, k, p, f;
  p = 0;
  k = 0;
  f = 0;
  for (i = 0; i < ord * ord; i++) {
    for (j = 0; j < ord; j++) {
      c[i] += a[j + k] * b[(j * ord) + f];
    }
    p++;
    f++;
    if (p == ord) {
      f -= ord;
      k += ord;
      p = 0;
    }
  }
}


x86 assembly (clang, -O0):
<multiplicar>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %ecx,-0x1c(%rbp)
movl   $0x0,-0x2c(%rbp)
movl   $0x0,-0x28(%rbp)
movl   $0x0,-0x30(%rbp)
movl   $0x0,-0x20(%rbp)
mov    -0x20(%rbp),%eax
mov    -0x1c(%rbp),%ecx
imul   -0x1c(%rbp),%ecx
cmp    %ecx,%eax
jge    11e5 <multiplicar+0xe5>
movl   $0x0,-0x24(%rbp)
mov    -0x24(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    1199 <multiplicar+0x99>
mov    -0x8(%rbp),%rax
mov    -0x24(%rbp),%ecx
add    -0x28(%rbp),%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,8),%rdx
mov    -0x10(%rbp),%rax
mov    -0x24(%rbp),%ecx
imul   -0x1c(%rbp),%ecx
add    -0x30(%rbp),%ecx
movslq %ecx,%rcx
imul   (%rax,%rcx,8),%rdx
mov    -0x18(%rbp),%rax
movslq -0x20(%rbp),%rcx
add    (%rax,%rcx,8),%rdx
mov    %rdx,(%rax,%rcx,8)
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    1148 <multiplicar+0x48>
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
mov    -0x30(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x30(%rbp)
mov    -0x2c(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jne    11d2 <multiplicar+0xd2>
mov    -0x1c(%rbp),%ecx
mov    -0x30(%rbp),%eax
sub    %ecx,%eax
mov    %eax,-0x30(%rbp)
mov    -0x1c(%rbp),%eax
add    -0x28(%rbp),%eax
mov    %eax,-0x28(%rbp)
movl   $0x0,-0x2c(%rbp)
jmp    11d7 <multiplicar+0xd7>
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    112f <multiplicar+0x2f>
pop    %rbp
ret

x86 assembly (clang, -O2):
<multiplicar>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
mov    %rsi,-0x40(%rsp)
mov    %rdi,-0x38(%rsp)
mov    %ecx,-0x44(%rsp)
mov    %ecx,%eax
imul   %ecx,%eax
test   %eax,%eax
je     125a <multiplicar+0x15a>
mov    -0x44(%rsp),%ecx
movslq %ecx,%rdi
mov    %eax,%eax
mov    %rax,-0x8(%rsp)
mov    %ecx,%esi
mov    %rsi,-0x20(%rsp)
and    $0xfffffffe,%esi
mov    -0x38(%rsp),%rax
add    $0x8,%rax
mov    %rax,-0x30(%rsp)
mov    -0x40(%rsp),%rax
lea    (%rax,%rdi,8),%r12
mov    %rdi,-0x28(%rsp)
lea    (%rdi,%rdi,1),%r13
xor    %ebx,%ebx
xor    %r11d,%r11d
xor    %r14d,%r14d
xor    %ecx,%ecx
jmp    11a4 <multiplicar+0xa4>
nopl   0x0(%rax)
add    $0x1,%r14d
mov    -0x44(%rsp),%eax
cmp    %eax,%r14d
mov    $0x0,%edi
cmove  %eax,%edi
mov    $0x0,%eax
cmove  %eax,%r14d
add    %edi,%ecx
sub    %edi,%r11d
add    $0x1,%r11d
add    $0x1,%rbx
cmp    -0x8(%rsp),%rbx
je     125a <multiplicar+0x15a>
cmpl   $0x0,-0x44(%rsp)
jle    1170 <multiplicar+0x70>
movslq %ecx,%rbp
movslq %r11d,%r15
mov    (%rdx,%rbx,8),%rdi
cmpl   $0x1,-0x44(%rsp)
mov    %rbp,-0x10(%rsp)
mov    %r15,-0x18(%rsp)
jne    11d0 <multiplicar+0xd0>
xor    %r9d,%r9d
jmp    121d <multiplicar+0x11d>
nopl   0x0(%rax,%rax,1)
mov    -0x30(%rsp),%rax
lea    (%rax,%rbp,8),%r10
xor    %r9d,%r9d
mov    -0x40(%rsp),%rax
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
mov    (%rax,%r15,8),%r8
imul   -0x8(%r10,%r9,8),%r8
add    %rdi,%r8
mov    %r8,(%rdx,%rbx,8)
mov    (%r12,%r15,8),%rdi
imul   (%r10,%r9,8),%rdi
add    %r8,%rdi
mov    %rdi,(%rdx,%rbx,8)
add    $0x2,%r9
add    %r13,%r15
cmp    %r9,%rsi
jne    11f0 <multiplicar+0xf0>
testb  $0x1,-0x20(%rsp)
je     1170 <multiplicar+0x70>
mov    -0x10(%rsp),%r8
add    %r9,%r8
imul   -0x28(%rsp),%r9
add    -0x18(%rsp),%r9
mov    -0x40(%rsp),%rax
mov    (%rax,%r9,8),%rbp
mov    -0x38(%rsp),%rax
imul   (%rax,%r8,8),%rbp
add    %rbp,%rdi
mov    %rdi,(%rdx,%rbx,8)
jmp    1170 <multiplicar+0x70>
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

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