user: 请从给定的汇编指令推导出C源代码：

```asm
<cpuE>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  mov    %rsi,-0x8(%rsp)
  movapd %xmm0,%xmm4
  mov    %edx,-0x3c(%rsp)
  mov    %ecx,-0x2c(%rsp)
  test   %edx,%edx
  jle    L81
  mov    %edx,%r15d
  imul   %r8d,%r15d
  lea    -0x1(%rdx),%ebx
  mov    %ebx,-0xc(%rsp)
  mov    %edx,%eax
  mov    %rax,-0x18(%rsp)
  movslq %r15d,%rax
  lea    0x0(,%rax,4),%r14
  movq   $0x0,-0x38(%rsp)
  pxor   %xmm3,%xmm3
  mov    $0x0,%r9d
  lea    -0x1(%rcx),%eax
  mov    %eax,-0x10(%rsp)
  lea    -0x1(%r8),%r13d
  jmp    L53
L58:
  mov    %ebx,%r10d
  lea    0x1(%r11),%esi
  cmp    %r11d,-0x10(%rsp)
  cmove  %r9d,%esi
  imul   -0x3c(%rsp),%esi
  movslq %ebx,%rbp
  mov    -0x38(%rsp),%rax
  add    %rbp,%rax
  lea    (%rdi,%rax,4),%rcx
  mov    -0x28(%rsp),%rax
  add    %rbp,%rax
  lea    (%rdi,%rax,4),%rdx
  movl   $0x0,-0x30(%rsp)
  mov    -0x20(%rsp),%rax
  sub    %rbp,%rax
  movslq %esi,%rsi
  add    %rax,%rsi
  mov    $0x0,%eax
L72:
  mov    %eax,%ebp
  add    $0x1,%eax
  cmp    %ebp,%r13d
  mov    %r9d,%ebp
  cmovne %eax,%ebp
  pxor   %xmm2,%xmm2
  cvtsi2sdl (%rcx),%xmm2
  pxor   %xmm0,%xmm0
  cvtsi2sdl (%rdx,%rsi,4),%xmm0
  mulsd  %xmm2,%xmm0
  pxor   %xmm1,%xmm1
  cvtsi2sdl (%rdx),%xmm1
  mulsd  %xmm2,%xmm1
  addsd  %xmm1,%xmm0
  imul   %r15d,%ebp
  add    %r10d,%ebp
  add    %r12d,%ebp
  movslq %ebp,%rbp
  pxor   %xmm1,%xmm1
  cvtsi2sdl (%rdi,%rbp,4),%xmm1
  mulsd  %xmm2,%xmm1
  addsd  %xmm1,%xmm0
  addsd  %xmm0,%xmm3
  add    %r14,%rcx
  add    %r14,%rdx
  cmp    %eax,%r8d
  jne    L72
L80:
  add    $0x1,%r11d
  add    -0x3c(%rsp),%ebx
  cmp    %r11d,-0x2c(%rsp)
  je     L64
L41:
  test   %r8d,%r8d
  jg     L58
  jmp    L80
L64:
  addq   $0x1,-0x38(%rsp)
  mov    -0x38(%rsp),%rax
  cmp    -0x18(%rsp),%rax
  je     L65
L53:
  mov    -0x38(%rsp),%rsi
  mov    %esi,%r12d
  cmpl   $0x0,-0x2c(%rsp)
  jle    L64
  mov    %esi,%eax
  add    $0x1,%eax
  cmp    %esi,-0xc(%rsp)
  cmove  %r9d,%eax
  mov    $0x0,%ebx
  mov    $0x0,%r11d
  cltq
  mov    %rax,-0x28(%rsp)
  sub    %rax,%rsi
  mov    %rsi,-0x20(%rsp)
  jmp    L41
L81:
  pxor   %xmm3,%xmm3
L65:
  mov    -0x3c(%rsp),%eax
  imul   %r8d,%eax
  imul   -0x2c(%rsp),%eax
  test   %eax,%eax
  jle    L46
  mov    %eax,%eax
  mov    $0x0,%edx
  mov    -0x8(%rsp),%rcx
L93:
  pxor   %xmm0,%xmm0
  cvtsi2sdl (%rcx,%rdx,4),%xmm0
  mulsd  %xmm4,%xmm0
  pxor   %xmm1,%xmm1
  cvtsi2sdl (%rdi,%rdx,4),%xmm1
  mulsd  %xmm1,%xmm0
  addsd  %xmm0,%xmm3
  add    $0x1,%rdx
  cmp    %rax,%rdx
  jne    L93
L46:
  xorpd  D6(%rip),%xmm3
  movapd %xmm3,%xmm0
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
```

tool_calls: name: disassemble_data
arguments: tag: D6
type_infered: f32[4]

tool: {"D6": [0.0,-0.0,0.0,0.0]}

assistant: ```c
double cpuE(int *hlat, int *hH, double h, int width, int height, int length) {
  double E = 0.0;
  int idx, idy, idz;
  for (idx = 0; idx < width; idx++) {
    for (idy = 0; idy < height; idy++) {
      for (idz = 0; idz < length; idz++) {
        int down = idz + 1;
        int right = idx + 1;
        int front = idy + 1;
        if (idx == width - 1)
          right = 0;
        if (idy == height - 1)
          front = 0;
        if (idz == length - 1)
          down = 0;
        int i = idz * width * length + idy * width + idx;
        E += (double)hlat[i] * hlat[width * length * idz + width * idy + right] + (double)hlat[i] * hlat[width * length * idz + width * front + idx] + (double)hlat[i] * hlat[width * length * down + width * idy + idx];
      }
    }
  }
  for (int i = 0; i < width * length * height; i++)
    E += (double)h * hH[i] * hlat[i];
  return -E;
}
```